/* JMP 15.0.0 01 */ ListBox(vertical,near,sub( ListBox(vertical,near,sub( ListBox(vertical,near,sub( ListBox(vertical,near,sub( ListBox(vertical,near,sub( ListBox(vertical,near,sub( ListBox(vertical,near,sub( ListBox(vertical,near,sub( ListBox(vertical,near,sub( ListBox(horizontal,near,sub( ButtonBox(title("Exemple 1_Initial"),scriptText("Open(\!"Exemple 1_Initial.jmp\!")"),underlineStyle(true),style("underline"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), ListBox(vertical,near,sub( ListBox(vertical,near,sub( ListBox(vertical,near,sub( ListBox(vertical,near,sub( BorderBox(top(10),left(10),bottom(10),right(10),sides(0),options(0),xmin(0),ymin(0),))))))))))), ListBox(horizontal,near,sub( OutlineBox( open(1),title("Analyse descriptive"),closeOrient(1),imageExportDisplay(0),sub( ListBox(horizontal,near,sub( ButtonBox(title("Graph_Parameter 1 vs Time"),scriptText("Open(\!"Exemple 1_Initial.jmp\!") << Graph Builder(Size(1464, 684), Show Control Panel(0), Variables(X(:Time), Y(:Parameter 1), Color(:Batch)), Elements(Points(X, Y, Legend(3))))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),))), ButtonBox(title("Graph_Parameters vs Time_Selecteur colonne"),scriptText("Open(\!"Exemple 1_Initial.jmp\!") << Graph Builder(Size(1265, 684), Show Control Panel(0), Variables(X(:Time), Y(:Parameter 3), Color(:Batch)), Elements(Points(X, Y, Legend(3))), Column Switcher(:Parameter 3, {:Parameter 1, :Parameter 2, :Parameter 3}))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), ButtonBox(title("Graph_Parameter 3 vs Time_Régression linéaire"),scriptText("Open(\!"Exemple 1_Initial.jmp\!") << Graph Builder(Size(1106, 604), Show Control Panel(0), Variables(X(:Time), Y(:Parameter 3), Overlay(:Batch)), Elements(Points(X, Y, Legend(3)), Line Of Fit(X, Y, Legend(4), Confidence of Fit(0))))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), ButtonBox(title("Graph_Parameter 3 vs Time_Lissage"),scriptText("Open(\!"Exemple 1_Initial.jmp\!") << Graph Builder(Size(1106, 604), Show Control Panel(0), Variables(X(:Time), Y(:Parameter 3), Overlay(:Batch)), Elements(Points(X, Y, Legend(3)), Smoother(X, Y, Legend(6))))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), ButtonBox(title("Graph_Parameter 3 vs Time_Différentes modélisation"),scriptText("Open(\!"Exemple 1_Initial.jmp\!") << Graph Builder(Size(1460, 684), Show Control Panel(0), Variables(X(:Time), Y(:Parameter 3), Overlay(:Batch)), Elements(Points(X, Y, Legend(3)), Line Of Fit(X, Y, Legend(4), Confidence of Fit(0)), Smoother(X, Y, Legend(5))))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),))))))), OutlineBox( open(1),title("Modélisation linéaire"),closeOrient(1),imageExportDisplay(0),sub( ListBox(horizontal,near,sub( ListBox(vertical,near,sub( ButtonBox(title("Exemple 1_prediction linéaire"),scriptText("Open(\!"Exemple 1_prediction linéaire.jmp\!")"),underlineStyle(true),style("underline"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), OutlineBox( open(1),title("Plateforme modèle linéaire"),closeOrient(1),imageExportDisplay(0),sub( ListBox(horizontal,near,sub( ButtonBox(title("ANOVA_Param 3 vs Time_Lineaire"),scriptText("Open(\!"Exemple 1_Initial.jmp\!") << Bivariate(Y(:Parameter 3), X(:Time), Fit Line({Line Color({212, 73, 88})}), SendToReport(Dispatch({}, \!"Bivar Plot\!", FrameBox, {Frame Size(388, 327)})))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), TextEditBox("Objectif : Evaluer si le modèle linéaire est adapté\!r\!nCritères : \!r\!n- Si p-value < 0,05 --> Pente significative\!r\!n- R²\!r\!n- Résidus",))), ListBox(horizontal,near,sub( ButtonBox(title("ANCOVA_Param 3 vs Time_Linéaire"),scriptText("Open(\!"Exemple 1_Initial.jmp\!") << Fit Model(Y(:Parameter 3), Effects(:Batch, :Time, :Batch * :Time), Personality(\!"Standard Least Squares\!"), Emphasis(\!"Effect Leverage\!"), Run(:Parameter 3 << {Summary of Fit(1), Analysis of Variance(1), Parameter Estimates(1), Lack of Fit(0), Scaled Estimates(0), Plot Actual by Predicted(1), Plot Residual by Predicted(1), Plot Studentized Residuals(0), Plot Effect Leverage(1), Plot Residual by Normal Quantiles(0), Box Cox Y Transformation(0)}), SendToReport(Dispatch({\!"Réponse Parameter 3\!", \!"Whole Model\!"}, \!"Actual by Predicted Plot\!", OutlineBox, {Close(1)}), Dispatch({\!"Réponse Parameter 3\!", \!"Whole Model\!"}, \!"Residual by Predicted Plot\!", OutlineBox, {Close(1)}), Dispatch({\!"Réponse Parameter 3\!"}, \!"Batch\!", OutlineBox, {Close(1)}), Dispatch({\!"Réponse Parameter 3\!"}, \!"Time\!", OutlineBox, {Close(1)}), Dispatch({\!"Réponse Parameter 3\!"}, \!"Batch*Time\!", OutlineBox, {Close(1)})))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), ListBox(horizontal,near,sub( TextEditBox("Objectif : Evaluer l'existence d'une pente et d'un intercepts communs\!r\!nCritère : si p-value < 0,25 --> Différence siginificative",))))), ListBox(horizontal,near,sub( ListBox(vertical,near,sub( ButtonBox(title("Prédiction degradation linéaire"),scriptText("Open(\!"Exemple 1_prediction linéaire.jmp\!") << Bivariate(Y(:Parameter 3), X(:Time), Fit Line({Confid Curves Fit(1), Line Color({212, 73, 88})}), SendToReport(Dispatch({}, \!"1\!", ScaleBox, {Min(-0.721649484536083), Max(40), Inc(5), Minor Ticks(0), Add Ref Line(36, \!"Dashed\!", \!"Blue\!", \!"\!", 1)}), Dispatch({}, \!"2\!", ScaleBox, {Min(4.20565749235474), Max(6.75), Inc(0.5), Minor Ticks(1)}), Dispatch({}, \!"Bivar Plot\!", FrameBox, {Frame Size(388, 327)})))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), OutlineBox( open(1),title("Plateforme stabilité"),closeOrient(1),imageExportDisplay(0),sub( ButtonBox(title("Exemple 1_prediction linéaire:Degradation"),scriptText("Open(\!"Exemple 1_prediction linéaire.jmp\!") << Degradation(Y(:Parameter 3), Time(:Time), Label(:Batch), Upper Spec Limit(7.5), Lower Spec Limit(4), Application(Stability Test), Connect Data Markers(0), Show Fitted Lines(1), Show Spec Limits(1), Show Median Curves(0), Show Legend(1), No Tab List(0), Set Upper Spec Limit(7.5), Set Lower Spec Limit(4), Set Censoring Time(.), Show Residual Plot(1), Show Inverse Prediction Plot(1), Inverse Prediction Interval(Confidence Interval), Inverse Prediction Alpha(0.025), Inverse Prediction Side(Lower One Sided), SendToReport(Dispatch({\!"Overlay\!"}, \!"1\!", ScaleBox, {Min(-1.38239478761194), Max(53.7597972960199), Inc(10), Minor Ticks(1)}), Dispatch({\!"Overlay\!"}, \!"2\!", ScaleBox, {Min(3.75), Max(6.94), Inc(0.5), Minor Ticks(1)}), Dispatch({\!"Overlay\!", \!"Inverse Prediction\!"}, \!"1\!", ScaleBox, {Min(-1.38239478761194), Max(53.7597972960199), Inc(10), Minor Ticks(1)}), Dispatch({}, \!"Reports\!", OutlineBox, {Close(1)})))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),))))), ListBox(horizontal,near,sub( ListBox(vertical,near,sub( ListBox(horizontal,near,sub( TextEditBox("Objectif : Définir la dégradation sur une période donnée",))))))))))))))))), OutlineBox( open(1),title("Modélisation logarithmique"),closeOrient(1),imageExportDisplay(0),sub( ButtonBox(title("Exemple 1_prediction log"),scriptText("Open(\!"Exemple 1_prediction log.jmp\!")"),underlineStyle(true),style("underline"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), OutlineBox( open(1),title("Plateforme modèle linéaire"),closeOrient(1),imageExportDisplay(0),sub( ButtonBox(title("ANOVA_Param 3 vs Time_Log"),scriptText("Open(\!"Exemple 1_prediction log.jmp\!") << Bivariate(Y(:Parameter 3), X(:Name(\!"Time + 1\!")), Fit Special(xTran(\!"Log\!"), {Line Color({212, 73, 88})}))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), ButtonBox(title("ANCOVA_Param 3 vs Time_Log"),scriptText("Open(\!"Exemple 1_prediction log.jmp\!") << Fit Model(Y(:Parameter 3), Effects(:Batch, :Name(\!"Ln (Time + 1)\!"), :Batch * :Name(\!"Ln (Time + 1)\!")), Personality(\!"Standard Least Squares\!"), Emphasis(\!"Effect Leverage\!"), Run(:Parameter 3 << {Summary of Fit(1), Analysis of Variance(1), Parameter Estimates(1), Lack of Fit(0), Scaled Estimates(0), Plot Actual by Predicted(1), Plot Residual by Predicted(1), Plot Studentized Residuals(0), Plot Effect Leverage(1), Plot Residual by Normal Quantiles(0), Box Cox Y Transformation(0)}), SendToReport(Dispatch({\!"Réponse Parameter 3\!", \!"Whole Model\!"}, \!"Actual by Predicted Plot\!", OutlineBox, {Close(1)}), Dispatch({\!"Réponse Parameter 3\!"}, \!"Batch\!", OutlineBox, {Close(1)}), Dispatch({\!"Réponse Parameter 3\!"}, \!"Ln (Time + 1)\!", OutlineBox, {Close(1)}), Dispatch({\!"Réponse Parameter 3\!"}, \!"Batch*Ln (Time + 1)\!", OutlineBox, {Close(1)})))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), ButtonBox(title("ANCOVA_Param 3 vs Time_Log_Filtre"),scriptText("Open(\!"Exemple 1_prediction log.jmp\!") << Fit Model(Y(:Parameter 3), Effects(:Batch, :Name(\!"Ln (Time + 1)\!"), :Batch * :Name(\!"Ln (Time + 1)\!")), Personality(\!"Standard Least Squares\!"), Emphasis(\!"Effect Leverage\!"), Run(:Parameter 3 << {Summary of Fit(1), Analysis of Variance(1), Parameter Estimates(1), Lack of Fit(0), Scaled Estimates(0), Plot Actual by Predicted(1), Plot Residual by Predicted(1), Plot Studentized Residuals(0), Plot Effect Leverage(1), Plot Residual by Normal Quantiles(0), Box Cox Y Transformation(0)}, Automatic Recalc(1)), Local Data Filter(Add Filter(columns(:Batch))), SendToReport(Dispatch({\!"Réponse Parameter 3\!", \!"Whole Model\!"}, \!"Actual by Predicted Plot\!", OutlineBox, {Close(1)}), Dispatch({\!"Réponse Parameter 3\!"}, \!"Batch\!", OutlineBox, {Close(1)}), Dispatch({\!"Réponse Parameter 3\!"}, \!"Ln (Time + 1)\!", OutlineBox, {Close(1)}), Dispatch({\!"Réponse Parameter 3\!"}, \!"Batch*Ln (Time + 1)\!", OutlineBox, {Close(1)})))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), ButtonBox(title("ANOVA_Param 3 vs Time_Log_Estimation dégradation"),scriptText("Open(\!"Exemple 1_prediction log.jmp\!") << Bivariate(Y(:Parameter 3), X(:Name(\!"Time + 1\!")), Automatic Recalc(1), Fit Special(xTran(\!"Log\!"), {Confid Curves Fit(1), Line Color({212, 73, 88})}), Local Data Filter(Add Filter(columns(:Batch), Where(:Batch == {\!"B\!", \!"C\!"}))), SendToReport(Dispatch({}, \!"1\!", ScaleBox, {Add Ref Line(37, \!"Dashed\!", \!"Blue\!", \!"\!", 1)}), Dispatch({}, \!"2\!", ScaleBox, {Min(4.44166666666667), Max(6.75), Inc(0.5), Minor Ticks(1)})))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),))), OutlineBox( open(1),title("Plateforme stabilité"),closeOrient(1),imageExportDisplay(0),sub( ButtonBox(title("Stab_Param 3 vs Time_Log_Optimisé"),scriptText("Open(\!"Exemple 1_prediction log.jmp\!") << Degradation(Y(:Parameter 3), Time(:Name(\!"Ln (Time + 1)\!")), Label(:Batch), Upper Spec Limit(7.5), Lower Spec Limit(4), Application(Stability Test), Connect Data Markers(0), Show Fitted Lines(1), Show Spec Limits(1), Show Median Curves(0), Show Legend(1), No Tab List(0), Set Upper Spec Limit(7.5), Set Lower Spec Limit(4), Set Censoring Time(.), Show Residual Plot(1), Show Inverse Prediction Plot(1), Show Curve Interval(1), Inverse Prediction Interval(Confidence Interval), Inverse Prediction Alpha(0.025), Inverse Prediction Side(Lower One Sided))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),), ButtonBox(title("Stab_Param 3 vs Time_Log_Filtre"),scriptText("Open(\!"Exemple 1_prediction log.jmp\!") << Degradation(Y(:Parameter 3), Time(:Name(\!"Ln (Time + 1)\!")), Label(:Batch), Upper Spec Limit(7.5), Lower Spec Limit(4), Application(Stability Test), Connect Data Markers(0), Show Fitted Lines(1), Show Spec Limits(1), Show Median Curves(0), Show Legend(1), No Tab List(0), Set Upper Spec Limit(7.5), Set Lower Spec Limit(4), Set Censoring Time(.), Show Residual Plot(1), Show Inverse Prediction Plot(1), Show Curve Interval(1), Inverse Prediction Interval(Confidence Interval), Inverse Prediction Alpha(0.025), Inverse Prediction Side(Lower One Sided), Local Data Filter(Add Filter(columns(:Batch), Where(:Batch == {\!"B\!", \!"C\!"}))))"),Margin({Left(2), Top(2), Right(2), Bottom(2)}),))))))))))))))))))))) /* preview image PNG (v=1,x=300,y=300,b=16446,c=96,d=126,e=42,f=92,g=59,h=34,i=39,j=47,k=44,m=C0DD2845A787CFFF1C638006475BD397) =v}uA%:{>vs>!!&+I!!)vNhz_)n!0h%N>fnu+Mb<{{@Y%tbYeAfo+bikX+b<0n.D-H7jGw@a#c46yS@%DR4r_K0(9#0_0LwRyvQBk:8V:F{$604{GnjF@4BAS)i{qQ<=9+t@l8[VL)S6g2wj.H[LhlHNBKLBm?g^c7[MP._0Yb7n^x?%COfvV.Qk539ZEte<0{P8C6gR[EYiF&y8E?DaGBp2^V&-0&rp>r#{U>) :WMOJRh2U|!SMawHNf+SPt$w!Qmzk<<(@-jkqC{r0xT^:!1.ag-F5>1ZZo@R0dgyA@o|Vd6eXh8e1J!xaUpePotyQ3r89f0XC9Bqw^%&5BXp@H5i:X>x$?e{u}}hqKUF([b1N2&)aoAi@CzHV>sHPk[Ys#O8L$>vd7A)m1l[R!d<- Bu!)Z:Q2d?^ncg}B_%TEna$nTtMb)4cxn$+b7.4)h{9t@RK8qy9T>?O+qQFWyu9[Fe(n!eK(>:]!1.bFP.Qz|3&l:[O1:%weOnnq-AF{?e$Klw2zsy(a:3tX@1rmWK?^{IRXk=P3r(^C9U0qY84N5X!(VBFNqsorjYBQ><0]ZLg3BMd$0R2GOWUYh|?<]!!d%Jk|?07Qr9AuqWE[2n0lcpB[ti6cm-.ph{AIA:wj=G+2]MnfW(SSHK4PK6rEw7SV+TJp.j@bQR7t@Daz4h?VI#P>K(ONvP6nJ_p%Re1C3b:1T73fZ!Y-< Im{t!h|E(G!!d%L-FCGD+m%$NHO4ug_GgFi5o?%Cusmx|?Axq4]RYbv(NjMr!(VCF.<5S%Ve=??BI7z:oX_dWtnL+JeMcHsg1xWfC#5tp61?2L[FoV76$jdZXZBItcd#s4gFZJ4E.8xFk[LxrD89N?KBM:?My8E4CD(VSCrLj0JP29L|DjE=jm{[M5vn@-n.a-6:ntM^ea$2VV^v@9G9A5ogU+:=_7(yY=GHrOWWXTDseA+Vfid1ST59ZHK4PKhm-kwZp46T]em4xuMuUR.WbY}l|XfEH@]G5$+n2x!1.aw)_YnK8pf_V1anf6t1Ats-ju9ihBHgB1hDOPU3S:UTNA_6c8)%<.!(VDL$c3d6s|(H+#k(9PJ]Fsi3My.FwPii&5t^4JyM1x#fuV)Tx?QPneh]|=IN7dPZ_ykFKhs#.VxUD0.#ltDx8x6-Pm<^T4_n%R&4e_[QsQ%+Ysctyb7?}A_YqnN6cCA6RaV-Mnph)Hi7htSBpDDd&k]d06&@CE:F}$Km!!DSAk}Mh9 @O=7Sxn.sHki5AV>&zFbb?O3GrP[[Xe[+ba=&L3+c|mdd3M!=h_>AS=>FUSKeFrEa0]EDDTp#TcvK$!#H+I<(+$..p9p#fEP3wjU?07]hxOZorZs$Ni<#?M1myMM:qa5l3kbKBo(S9FiU#+grYCnIzd$}S%T)D+OsYR94g#&)U^YsMSx+)Q9c:te%qG{ky:884d^e9m:%3QIZx.?an-n3T7OM.GXC%:R$z9#-Y7&gjij%mhh|&pl!!d%ZZY$VA pe!>BZ]N}e544.rbZlmp)z&c_0.rg?0#-k-EQ4yd!mt@aoJ)r5x6>(nZGz_Gzp9T18+wbwuhX!ew&1ue5bS=ZdT_quMPJg[6gVo3XRVvq#KaT75A>n|R1N_:K>p5.ZK%meHQL2Hpt2#XkyCN3HO3qA?N29{dCp7HE.N2}kqC{rlOFsY5CK(7o(S9FRs79R!$k4S$CGfHDj#6srWD[nKkdmNdNZs4jhg99W2=S#KLh2%WHsHnN%TylfR02NISXeB4g?<3W_C.(iX9=[t]ZE_j_TV3!?khd%GU%OM:2s8 Bzl|oO-@X>ARFFxBpJ=IiiiSORs79U!$k45<1w4?zECHt(c6T{I2D[WvF%&-!1.dX#^IB-yHZ(SK6yibjq5.ZE7XIE%}Ch$$+nxAsckXTwa3$ttZ=5k^(ZSxa1t@lqQ(An!=9C2.CYnyA=tN^<1aS>XVif!ZK%me.#B%#THSUv!#H+3#%u?2@Rsqt%g-3MSkHGNmpmExADi#T0iN]!#H+3<0ei()jz{36^Ks1=UlvHNjB!cIk%tCS85Q9s-bzaM$f)8yyx9 J{n@4HbD_%P1uyo6h8Z{y^P7iZar)VE?c#Co-@=U>6UQx2$=jVAi@CzVw@&i$uq%!lrT]v[_(DQ6}3Nv=w3({+X@(eA9|:NwGQ[8HbR8XBi)TrU4|P?VjC7)o7Su7s=}e{-![i_YH7bbA+N4$C4XKW.l]D&xn]{cJ]+kGON8Tq6gV:h$+nkIcGDdca>BCwaY[Ss>6SGj5C|tvu8Jbvn5TMh]K.!tiHD!q=nGjgh}!P=im!Yz>Xy(a_WVY@]K+e=K8P&5^Vmk[yrTb32@u=59B(Gny[= sDj1wXc$+yE0[J}Z72!2jLyRvz1.FttfcEML7(+3K.F)yIg6WnS7k_bu--1k9ic}8vd7P+kW$}->hVoHIQ^M}rPZvXe$iq3cxXVIO}ZK%me6gRNT9>Ivlj42X3+{sqX+bf]RYbv7JkKgP-^FKR20BH%Jb_A_4q?D&5[6|l-x$&1PWZ8h)aX?fc4:y!!d%lPa=eXkyHe#0aP?LrpArTZK%me-FjIvl^8mmZsA9CT)D^XVXc]KMMBLKlXnkezZHp$=a7[e]|KZagz.33Apwp$a:cMbyM2zDFgLwcBk$&SZ)w6@!L3Mx3A>?cbTc@F&5m8MylJ{N<|lts:wz1}-FsyXYM[mZ3_p+22O0AT$Tgn!2[4y4b@^E5%6_C1QlqYKB.m2%9:9j<A!b2PGUwwe2=imx%vp#|4?p<|LFhvKzEC>+zz{:&dNc38OnjV(cGs+bBj!=9>OyB?SfXWEkTk{Ha4DGFb7Ohbup%8pEZw^7@qti89^58vhic:${{ZhxupG>o3wz1O3pDiijF)[IylBuM{OL(d%bpWjH|8YUlKx^jSjr}9Ayccy]MaJtB+Id+PgIXounyxTV$c(A88J8xqXulDM+pry8j Dc]1}puR6F@R.+!I_Hd2sbNwd3_+P)dkAo}Dc2Hm@0f4K&sOu>^m4::#n[Zi!&Hkd:7od+s%!5yd>i()L6$nXHOkBSt.=mKejVP(Y=iws%GHD1aF}FZBH?E}DrFbOk+5?BnI+h)^scp{ZisWIiJLp35A?ya$Kv[bcO0vUT.DeB4jnG>R:b%0zLb1y6U 20(.aWZ|Ui?>m7q3K6.h#rRfmDTio)Ccpf00?o9==th[.6KRueJ?[&:3.}yj9XZ{0#mJw_KM2rkg?geWM4>PYBhu{#GDb=WGws&o9l?@c}x2^_OTxwVS:9xas!itb3_BUXVpv&ZK%mehV2_sSm3xLSv>K14ZzBjdkAo}R9ZPAi0$N|-2HLyTE3oN!#H+@H]$s$))G7eB5dw>yiLU.n9?8AJP]?3zRwG-?rUHK4PKFuYPikBt)T%Y0H899{}R:?.)>GY:_oyx57!#%v{-LDH?jhS}je0hUx9%:qW|$+nMjA:N-Riq%Ns!!4ia0JAwu$+nbdKSaPtoCs80=E5Y(KN[nqEKX3La6M4@uNx.I!!d%tZ]M8qOdciW[ng!C7>!wEnJ@:YZ[Zd25b.ssnd#Vu_pZdKRsd#bst3?De>b|f6gZ>% R6#HpYji<=0zQl5HQItIj2&vQ:wYP7R)F]c<(@-jkqC{r0xT^:!1.ag(-)zOKutT^CteG1:6Sts4kRHeUU.-+A8{DWvFt^h=Tb29mY8v=>N-@Mjd2wacW+gS2pZ%=4U3S1OIBc?NR)gtp3{hd?esAp]RYbv?>m7q<[GI0(>tgKbba||)qKX.h.CTBzkJn{^lm:l?Hzkzp2^<3Vg0xjwpT8{bZP(Hdp8Hz-%{o5tnfBH=V+Rj9bc(wz2fDQ v]B#-7hr2N]zSt-j4h%^g2+Uev@-T5F=%}DGh$GV1x{lBPyb]{n&r2)Z4i#(t&=yX9-gNgf%jng=fTZEZZGdIev7NSi@oe3YUq-!To}HK4PKb{16[-Fj6$d)#:lu%J7Ysbh{NF@n_p_Y+@Cq.CdqL=EH{xQORWo@gxhU:<2$S9EjX!1.f4%_2OwkF}8h3$Lj.H%TS57]_5zSt-Z1&[]OTjC+X|B&OaKp3fMY%zpru6N ZVn&K_Aft0[Nw_vyvCcvyJ=YQxjpf>0:MK9&jeV8Em[2ByQ=1c#Ba50>vd79-9js(LJ_?{c>FP1xSEjOsFe:PyU%ePsiaF#7d o@#=_ou2w&u0[]u0-v]PJou!D8?m!JnA{LVZbkSqyaHo>hynD9_WO(IC5LC(HH_pl::7S8EcC^4xESD=QHyt3ywDr>kqC{rl)l>LHOOU($lh1Da@R42HO$R72B!45L4^i|S3@k$d)fZ_z.4)r6&be9Z[03FqI{@WRmd477Az9l&5]L>l-x$&TW6!KzARf[%w6hc#ErvPTIbKzkzZ[t)1}Y3DAi@Czc6.?_z]WB_84pChjnvG8+IVzB?QqKo!#H+.<3!jn<_{]?es@|qC_Ul%{8zsEnfLQ{!=9B:.CYny9ET5t>e8FFuB^_IZK%mfh!tp}(>8Er:0pu9!W:KS6gCCNu<=5IknahGZuNO!T)D^XVXc]KMMBLKkz%1kZIHY4xO<<59s9?)>DkGco_-s|qcCEQcq^3sPlpr{]xsdTZF)CL)?T^buB|e8PurHQqqt@=OteI|mTf.P]CvZ5ue^6X>rV{GyVXb}-9ohL1MW3i!SM)73AGMZ sbJyETB[C^k!^&xgKxrRwbEi|2=b_|u3puMh+^$IU4jeMbOZp^ze_7V!KGcQKlSQF9Y7b_V.@{3:{pHEtah^U@XsR$LS]]Jiw2w^c4>+AO%UFADF6rhOSW>bj}r1A]y{n4MSjNdf@BC2toOwkereTd6%|r_kyBLT:WMOEhV2aNFkqeOrQHGpSy<[R)rv=s$s}e(c%(ASDu9H{X20vx0gJKB_A)sQx}A5adSSTh39nuXBRqY{6zpGn#YQ8dIx-J=7.:S?J>TZDQ8h7ST8ZFb.^o}mz{Cj{NAa6U{j^rTk6qK|!)3atgcKRyQT26Y0Hu0[^$00G2J7==w+u]lq8hk@CBE#B%HTLrw4$^.6-Z7:S0^M}rPhv=dw0R2BVD+Z.M97u8)e7$xrgi3v[tW^W=e6D4N%LVLeC:Oo}mWwIq+|QZg7-E4wommK+nHEG5y|!i]kxsHCp?M[hw}Bwh7^Lh3k_I5qgYQLEZZ[!h$P1uyfSoa5vSob[C>%Q_IBjE^>U^zZ:e6SqS=@tU}O%dV0YqPV%0+&mc-8gy4r(O!2BS}JDB_!tR5h({=aSVR6E0:{j#qhLGnBBbTJ27ZDuXu$Tx70tM(&Mn:+@n]9y2|D|.sp#+5D@7+aA}XeZbl+5HO3f=ZK%mcqvtug+7p4rSYjV7evAi.#B&Xglk?tZe9u|]2kN4($lhe|gng@W^!=9B:.CYnyxd9GBbmCf1UQj{xNxjnjY_t>q9pdUwV>GhA!!DSpCWWOi_10}>egSq9l!tRn6[uB<%E54#tL^x>tuin]dNGFMlLJO&cCM@oVlv!7j}uYBava>Cp1oa@Nj#7^xlUu-LgiX(?crkFOHvR)UHZ745UnD!A40K7@HShub_h&yvZ&K7jIpIvx]I-XL?y|QGG(OR{d%AwW}P3=4S Zeo#_(cG[MMSh9NgfE%-1rD$$h^3.nR9k6V9<1RW0l=g@XQ.L[h)Jc?!#H++#%u?26gVKWu9#d3knahHZuNO#T)Dk])P?B@c}U>akz%1q:U}V(hSk!?^6S[.d08|y!I.s]b0lo16]AVp?@MX)D72XG$T0gAr+cWQYyrvb&{DS?z6Bz9QDN%Uxxs=eN$npO!!4i]&5t70+8|gJlR1fHCSuKa6eteXoD7YM_HQG7kNrz?[YlkmaIBArzw8tZi]NMW$2?QW>-<|Jo[[qTt7H#l{#v=45A^p9ZgM{58qHipaU}HsY!nO-!!+J4TB[|!GuMkY ta053MIl6ZoRYES[?oro<[@k9kUM_OxE[QzW)O2eT0GSZoiRTR!!d$^d)Oqt(F)hxA7bvdH71D6Ylj(a&}w]tKQi]&{voT8Q6dIuGEkYJ5H%3rH&|2Usx]9C04|S9v!iY)nr>4fbL$|O&R=#Wn&eERcj?ja5^uu3+Ip{>:_Lzz<}^<&FX?=%u}%7)[g#iU#o|_pOsxfRa#wpi:In?0.K})sid|8p_53IAYQFYNbsgEaoO4N2p%dVV6)sCrOc+X2.tq8[&$oF1dhQ]#yC3b?2(aIGu8^L^+buy{G6n^25y)9Z!?fOfJ>X-p:rB9q[}khjns#:IIt-y(Y_InVo:xJxub8:>sxEyDEHUnc.(rWl@v#@<7Tkj21hZHvyPMkWOPbizF>Bd@B6!R!yd3!SM0njs5iM%V=-H?U>z55neKfqudY_iheBX9+1lM#m2g)AYk2BULPA&yqSaR)[ExbGG< xe&6kf&7${bD>:.nGDq&htldcvGg}F.zc94qdxq&@6RKE7YE!>jLfqq0ZRDajT3umyyq_}1FvXa:EGr=:WMOHga4@CkxN]o8}Br8ONzA]59BmXEI@$@VLv&p5#6IvscT{FQ>3![Lvsk&.Q9fy!2(P}3h)O(2%O0(-|7M7-Xd1uzq8U2{7+a7>EGW]L3(&+SHF@f^k.G(Gc]N3>-=uEOOCfs?K5LHTNA>Htwj6&]B@nF]gXgzmWJ1PXLn!^Uv[pcL1[+7A{93kDq8.Jh2+Iq)Bf7S4%yF+2@Mo1{owtHY{Q3t7mpwXTp>lzM]MiPQ_-TnDtHcHZ.1O#mgxk8EXz|n1JIeM8g^0cM)ITwDrlEZHG^>%8zP1uyp#&A_[6gVKWKvo!Zx|jH9p_n@|cHj3uoa9%fgAUvCss)2(u2U-%U7xA&2f7c<2j%XrTH^|6Q=n2=u3Ve1X#q=]3p)KF!!(4S<9RsX(6#_zk}JdzNh!$+0V&amC2rsQ(CtLGu6#ws<^ t8ctZ{6#6}nJTXSl!53Pqx}@bpoF[)qLW5k.-BP9QGL7r7Mn:{H(>cgLIPpN$(3u[)SDxX:XtK1rnN!1.]t-XRMQ]L&XLCwUGAl)r^(QwMJl _9SdS[:O+B5Q|Tuv%xe>8.C&ZUK}H:[zVpA[N|EVryjGS8<6@PI@w(Pv}wIYQGHW1-yPRc.&v}X!$k3a$97^GrT{}nxVnaqEk14sDT:&I=NeQ-dNqdtf5yFsrd.29ts_Z7%5pnEsc9x:0MWhe6)-uW-O]Z[o3teq{h!_3+[6cin^szVh1]L[1_ez7jr{>oz_e7RsmYW|Y^zZTP%buNJum)xzMyy3XM3i87OzVqRB)Yk%DFmLZbP D:0n7:$9Tr_Uiwllu!:CnAqe__>]r1hk]U$JfW[2:x^9dZd?GP4-l5#ZyO}>.LQX9fFU.XR(Iy:M}.8NAGRn1KL{bFi4n-@cohQT_hffTz][hTo>^JUXs.s?^)4c>wsvF|>UrhobqIAfPa?vN:y>+YPJ)}.EGU5.kqC{r)!=9F6HNZ8hPtmbp!USp7ej+E9ZK%me-FpQ7kLMwrdeT0Fg^?u%t$O4kZ@ #H^5qw>&f4S4TPbRcY3E&5UvrU]w:bBUNfM@x]JTQT$io|B2z_ncqIp]WxA&b>2Qsj){l)Fzuk0lm8O5KQUX6goM} l2fE=yW?q2Vso#DP!=9CN6gEU=:y#N!qXQ.L[h)Jc?!#H++ZarH>:R]2n:I1{&j:3cTeOB9#Cc1pBCYQUxr6UbLP&K0_cmiW@N)quXw<8F-x_)NtyxSTNvWHh-k?5>r>y^2$]RYbvLDUW?k$1aAzu0fsC}eRSP.Bs{m=g+2eCN5j&|:$!3{&P1X}XdEHK4PK6henIup_hlHOM:hG5x.n&5^C|2]G&VwG{OPpDD_%)rMmauKSIb2pAB9 w0v0|bp4b$uFTzzuGMG[(u#Y3(<2jgMjn?sh9{6Cm$9ZBZUx^mUay{ofv@Ulcpuf@Hg#N0BE>vd77vum$YJSV+kllh}3fRsT+bZ-F|JmR4}AU k9pyUbvAGK&5l?jy>$-AdDEEXbi??oYbl8H[$8p!E^pBz6gSEi.Fc^e)osQEd:?1l:c71tHbI?D$okU5Ya)_7x{5HVpvEg)uDBgHHPT+}x>c?S{6wq|.]{sDp6scvP1uyp6gj(4F?8E|nG>]Fe1]^Wo:l0HZruKRd-^Sb5z^NPOVhookLSqL%u9_:>wwd-xCTO4u4=OfIEDjAfCCTjdRDnw$x-8NVoHIQUmec^%zxiT+E<[Lo@9aX]blOy5Hl+0Nntfl[cM@IISw3lm=g)T+hET|NMJ2|<)x>Yyh_VWrZ]XHZ@X&YzOy{}oNJ6(J1sH3 ZIa>C-|nU4TeD:O#%vJ15ckHqZ!eVU.j?H5i1(I7!!DS8HOSA|(TwTRya4RUHO8-iMb2r2Yu1)l2muWuXQ.L[#%xTYPt=_GQmzk<<(@-jkqC{r0xT^:!1.ag-F5>1ZZo@R0dgyA@o|Vd6eXh8hm%jI(YPN)Y#1L^sG}q]%dkfP]@0KF:BovzDky2e=K.<3V%7%tdXrui_RmFb_qceOO@Znsp!YNz-eR%9dcn!jDEjAd4dYr)V^o5#i^ER:G^Uutx4kNft4gX8K1yt.Z%PT}$S9s{l24d5!$+0N4B9)Yv?F)4>H7AHM)9QCvCc+6CNosn xd$LKK2:cjmy@rwN9o@2nnqr>?K>BE4!=9F6HNZ8hPtmbp!USp7ej+E9ZK%meHQ7#e)I!XpSa<8{+Yi%g^kHw.k[9vEKZZ%NoG(zkP1>qT]0|aT-@d)POIU2pXzlIQ@-9vkN53aqM]%:eqeY.B>z7K^7RsmYZyOmr0iY1r14k?V@5S]U+Sd$qEFDm?Jw9rnpiNyZ6q0c5diOzz&glpLoX^{=Ud.k:J$i[51C22jfFq?Pf)tJ>TzHX6X_O4Z$LO[jG6zviuXS>Yqr+EdYlcU[3km]UlSAU%?qvtrXe|IZBns}4?cvn4yS_m!m7DuQpyO]wstNiO]?E1qobqIAfTBHU)+1%>OoJx.0a{f(&yoOU:fP}gIk|X#N:L=wN_WJ:9i)XvTwy_rai=k]UQf15i3P-^Z9>b9Xp#x+U=MMg%swu=7BGreRHPlyQvbQ_]!!4i]pjt3L+-WPnuzFFCx_xwi^l##mrYg4IS@-+=ItW2}AOBxeG(C:9@c]y^.pV31xJTwZkJ4eTTop].f7=upUyapvO2#fc:omPcOnGTf dg:hZzuRg|8J[U}f9]noPtx&9gHI2k@CW=VGuIL]ucscy??v#m1%y-%3CN7}SD6bu@{f6{ppdNh!#^vlD9w#U!}AlbWx.r!G+Yq@X>ZK%me[e8luC$#P+lC>aMBXn@]YaS2juM8Cu3fa]fQYRC@qyQ@2Y^V1a]M6IP^MpNMA8qZAgeFW0YZZmwQK1DX[(NjDA$+n@i:tvCu)#vsb&G8d_sgR1g!!4i_:o]k:&5^s(Pknbl2%oiD-iLI@:o^_XJQ:8jYf)}P4n1t{W]8KLzACapKs1Mn+Jlq[ >YSuSrl7C#bQy7ccrPVtwwm2QL6NMlIq$2xs7{i%J4L.lM9|_U@qwgX$CYcFd8FA<0[t@|v[S0($+nJ4G}Ia:@_{Iq)^?4)CyzL!>9F=i$_#OYVYn7x?hV8mZyR{@zO6fmF}4j5fspqr1jN#RkqC{r-Fcx[xc8%?-c6zuXFVCAgv]&z@Ze!&!#H)o#l2zFaxQ(VuwmD{BN:z8mfe^gG[G=JP1W7Dklj8RpRFdQVpzI0An4t:Afdap<.eByX?QN5O3BJla3P66eN>THyvJSJpa9cky}<4:yDda1b+XP-5@|th$+k{!Ur30M5-b9gKCF)B n8fIE8H:.#ve!+77Gyja6Ok}CUP0aiYCVd=w1lL3$QJFz?kU!$6gCDuPa=SvLuX8&v78KTX7+U8]Mgd)i8^=@NTtAI!=9(6HNc$!NYFE$YDb.mw:cKhk|Tp=.|-xf1[$3Ry>?hDEiOas+dUKvywSe#wC?um@NBq&<&)GXtq+6#JwyOkKS7xlWM9U6U:P:ajlVTIz8D{LV3|-hy3e._5p65x2cbvO@TRxFKJa|uOMb?bwm3q-Mt|1Fz.n.kd%BLHr5)sZe_F#k8d)bMQNo>yi#.-QeF>a^p31D.akqUm(h9IJuU!FPf6YoILsjKhwAC4f ygW==yBdaVeWr1ac?KA{v+!ttiht.ETzP+GlrCgJa!#cywEO-7W-y7H07ib#TSIqH{beZTq!OOEXomF_PE36M$v>r9mLc2b.e+B&G96}hG)j:hCe[%X7@zg{3bZZ4V9qyq} x{JBqe_f}:MoPe?v0YENEqW7K-IRg@z@#hX@_WpU%N@LSG!Cv9!OD_vHvY-sv&=p_6f4qP15n6TsNSHxxk>E3He)>E%k5iz-F?16LsBzk)AU6DDVI<@C=1coMoQ40zV3yOtn&k[bp>DZaLqwaCUN%(z2aXJ>r)kDDdv4Ot|FXgJD]BvV:tR1l+lutHPLM9bwG:nbe!|SF3V_O3qDzz=O:.EGXO0F9>]5jOBeyw7qcs0.}^zhY2n%g{).0KN{Gt44&2VF{hw!eaNIji4qj6_(cL?boZq}H8e>eu):LNx[Zd^ {$Qt7?-C]C&_o5CKb99LK_|st!AawTdqkzNWfWw-Z#7fTZFj[?!j?YZ_bcOP[ehx]:K2h%IrhqH|_7nDmxZm-3Wwp:l17gi4=v8==l.7#o(- {7e#uizn=<5=TxYrtM+sy8j=0wMT2dNo(!Pu3pzV(AW9qD^_sKJd10S@e2!ghZ2ojemmM7IWidF1.Cbh#!GTL]DuthcxMHBWO@kpA58:qbek?K<::qvtuEQ+iwNH7wgQ#gRo.>Sq%G-{_(N1cDDOb$fA%@AvSSC:1d%^0^zsP}]?E9P8I!B{r5pQ#kKiLYp2%sRJB9v)]#4 +eH!)D8FlDL!ecikis$LoXF3Qzud8NO[FNK#o0xr[SieX!!DS74jFJb4YPKHDQ1OEdF]4ez+XTI)z@YsajD$QYwvbfSw=3wdb[&!9yA]P4oKc#^lm6(^|GddZ@U?jU%#UB:6^mm-ii>8FrR|phHxLwzMG2SH-@}R9cXo>!|YIzr5{TcwRA?UmG=Tw$3RH0Nn!TFw?_IusPt$:w_I?7<3nlhTKj4y]zu6EZuH6 Nmn+}E]w_p<1x6UHO6Z1NAl)4%h6p]hf1$$$+nlgiwJT575hl_YYO}_Q&X]_%+tg2!#H(RPa=kN$+n0uiwJT5KS5Z|8C_!ox[xQZ8s94l?3zRw::FqKQmv-C2N0O)i>H{X4(5=E6gUvV=s+-7xd%Kbo%Opxak|LD({_y#pypcprnoyhF^>!b-):P=ox&Pp[f=Qmzk)G2j0)1U.7Qv73A|!(VB]HNh7qjq1}WR_1OMk_bz6MPqQYfu[KTu|e2dsym0?98}M8v@)%aynkA&zs$WJzCLF:n2mK9>_kx:]RYbvoIW6Wru[9aBA}CsZ$b=s_dc.ku3[2gZ?dA5H$olwzxSClH:QVQIgEC-xb%Rjya}F?UXRj>ZK%me@{i777HqNkxY=3|y6%.CxBABmOW{+WrWK|OV!>^>e|dHwHh%-^w<.>RusCQO-OiEfIKk@nEEo])AoOGzIo8%dTxJ[7_9uQD]+fwayhm5}Cp@]v7&}8yafSUWx.yF=60oNV#=J?bSwTSv6x8iU8jpY5Oy8?g4X{)Ygjjs&_ ogwekL7qorCZE#lcY#B0W4Ck9yC|pb[o}SNvx)M+-7vVE[]uZKy-X9!zr[d:d-VMB8TSu5jf=y@0]aF?9TREGuDc=h9w^k[Uit78.GYN-h][OHM-hJ@GkGq(YckIAyXVGRrQ.NqFp:pNv}PD@W!J+rc?^ExnHA}3Ojkyvzh.S2Rd}ab=^[YcaP?}dQedb$@ypNPIp+&}T.O:BQ2b!X_!SsE<<1dlA(7cd6GZvTmO(c3] Kq>5}ocFRREJ!3ADC0C4jp8WyU)R_|}TBRDT5V?Rex0OgAm-0dIzJI:Y&5aK+ZYAwllD%A-P+ip:xdH&:t.GRj3Is__Wbn2rfBkO7@e>?0M&MAm4=A)HOWM5AutTCTc1xNIDcg-a75UN!xEBD!G7orPEc]nP9Ycgyy5iLw0>Vz4VLP(5j(9F>.i&_9.|QV7GheQ-Dfk?PyD5sysf&Rn@HWXbTD%Wh6g_dHPm}K1d>oR9 dk9+kegzYZdk=X<7SMEh7ojSHY&4$gl%%J5yWcJ>s@0&$9-2c9zT]<19QWjlr}h?2q@0WsaNV&%?GeHk$LL}d9U!e3&pAS7h8ZJ009A|j0QYzUQk]FSc)KEbD{K=}f8traegzs_5@|tp7]MUdDt_6tmMl$__Pk)S-AH?}P!_M-z>[8}^AGh!J0Dbuw2Yt:yuLN}xdi7ZaNtx&W4!IEno^NrXD{o$sj7MOG3VZesLx$pzky4peU!sifR0KKlU}ytjjHbB6$wf!9K^=+h^2]Nq^i}IMA%OozgBJLjRL$xzf-kt z7jPM#vZeSYkBkm|e_k%F%Ud4ixNcpiDku](s$%H?zS4WCFOvROK?RwDZ!1FVfGm1ZiAk5D:G%=oS-A}u!??RFkxJ}u0&cMAmr&u6ng@TpPA?WEz+Xc|6d{cgKCDSF+0w&(:0NsXz9l5?U.gxQZVf?c8Fle$0Y(vH[tNX7w+X6@.ym7t!!1:&(7_yj!!)@4Rh2UHP1qf+h!tpda4[0x2L[I7uML&GG2cZ($WV!l.)ps@kN7czzu.IMZK$dXh!tpbu&{9{f4#YrxTP=myB%SJP+c8^GQ6-V :rGCS(r4M0kMF]5{<+Mg$EZ0k@UlMsxRITDcv}U-!!.ZT:o]leif:bIrG34xc|#.{naA6P1uz?RLumYqWFko3!hRG=TY5|280)vfewH5EBbqdex&7:5:(mPv1UC8!=8}8C=tb4q_WPrK2AxcJd8H>p|6RFVVKDZ.2BZj!!4g[$+llF=l}V[0iId1Mlys!WepXvP1v&d!SM9qS=j.Wr&OF{J:zn)!!&0<3!!!![ -F42tkqC&M!#H(Q&2Xbs!!!9Z:uJK7!!!!%!SM)0YN(^q!!+G80U:QA!!!#96gC@jZK#zt!$k1!-@4Eh!!!N7PloqI!!!!)#%u2:8^Q2c!!4iL<+O}[!!!$MHNaZT:WIki!(V=#6YCfP!!!wI#B$Vl!!!!3$+l?OL>}@F!!DRsQ4z}9!!!&ukxC8(P1nWR!1.S$H5bL{!!#pm$^(0X!!!!A&5XWysV|Yg!!d$h$)?pL!!!.mZY$?.!!!!#!=9%(kFDtx!!%cZ(>0<3!!!![-F42tkqC&M!#H(Q&2Xbs!!!9Z:uJK7!!!!%!SM)0YN(^q !!+G80U:QA!!!#96gC@jZK#zt!$k1!-@4Eh!!!N7PloqI!!!!)#%u2:8^Q2c!!4iL<+O}[!!!$MHNaZT:WIki!(V=#6YCfP!!!wI#B$Vl!!!!3$+l?OL>}@F!!DRsQ4z}9!!!&ukxC8(P1nWR!1.S$H5bL{!!#pm$^(0X!!!!A&5XWysV|Yg!!d$h$)?pL!!!.mZY$?.!!!!#!=9%(kFDtx!!%cZ(>0<3!!!![-F42tkqC&M!#H(Q&2Xbs!!!9Z:uJK7!!!!%!SM)0YN(^q!!+G80U:QA!!!#96gC@jZK#zt!$k1!-@4Eh!!!N7PloqI !!!!)#%u2:8^Q2c!!4iL<+O}[!!!$MHNaZT:WIki!(V=#6YCfP!!!wI#B$Vl!!!!3$+l?OL>}@F!!DRsQ4z}9!!!&ukxC8(P1nWR!1.S$H5bL{!!#pm$^(0X!!!!A&5XWysV|Yg!!d$h$)?pL!!!.mZY$?.!!!!#!=9%(kFDtx!!%cZ(>0<3!!!![-F42tkqC&M!#H(Q&2Xbs!!!9Z:uJK7!!!!%!SM)0YN(^q!!+G80U:QA!!!#96gC@jZK#zt!$k1!-@4Eh!!!N7PloqI!!!!)#%u2:8^Q2c!!4iL<+O}[!!!$MHNaZT:WIki!(V=# 6YCfP!!!wI#B$Vl!!!!3$+l?OL>}@F!!DRsQ4z}9!!!&uvne#XLvt+B84v9{!!#B[==lOb