From 349b1e4d5fe880c8085c5b705de3fe223e5f1c5e Mon Sep 17 00:00:00 2001
From: polos <pls.153@protonmail.com>
Date: Fri, 5 Feb 2021 17:39:56 +0100
Subject: [PATCH] add example '9999': draw in JS canvas, calculate in Lisp

---
 examples/X-extras/9999/9999.jpg           | Bin 0 -> 27866 bytes
 examples/X-extras/9999/README.txt         |   3 +
 examples/X-extras/9999/lisp/main.lisp     |  54 +++++
 examples/X-extras/9999/lisp/qml-lisp.lisp | 233 ++++++++++++++++++++++
 examples/X-extras/9999/qml/main.qml       |  49 +++++
 examples/X-extras/9999/run.lisp           |  15 ++
 6 files changed, 354 insertions(+)
 create mode 100644 examples/X-extras/9999/9999.jpg
 create mode 100644 examples/X-extras/9999/README.txt
 create mode 100644 examples/X-extras/9999/lisp/main.lisp
 create mode 100644 examples/X-extras/9999/lisp/qml-lisp.lisp
 create mode 100644 examples/X-extras/9999/qml/main.qml
 create mode 100644 examples/X-extras/9999/run.lisp

diff --git a/examples/X-extras/9999/9999.jpg b/examples/X-extras/9999/9999.jpg
new file mode 100644
index 0000000000000000000000000000000000000000..59c3b2b75b869a514137e9db222e8ddf3dfb6fb7
GIT binary patch
literal 27866
zcmex=<NpH&0WUXCHwH#VMg|WC4+e(+w;7xnn3<SBh?$w0g_)U!m4lU)g@u)iot=$?
zhl_`Yn~R&9mrqE5mrsz7n_ECkKu}mjR8*9QUtB^=L_$bJR0L!QBQpyND+?<pD=Vi6
zFE_6U$>9GX20;$SIgAsS83h@b1R0qH8UG()kYQkCU}6S2mjMPC*;!cGn3y^KA7Kz<
zM3DihU}XA#i-Cukk%38oS%86o@vm=#kOPB|1H+_}0Kw@qgna!P7!(qp%(V>wsb;Ww
zsMNr~(7`Y<*h{XcV^U_Y0|QHns0jlTCj&#JEt5gWOV*quG0hF^Dy5Y^jOS;4-f$@+
zIraRpDI2!T61n(b=Sg-YzAcluwp^Vq_*LNv@5i?M#=}z1HDw1FxRz{fU=1mMmN|)!
z<zctX8^)%(ID0SY4URv3{&JN(nGkxs>9Var=)^BNvwk-%wp#q8?7_;@91pld7#KsQ
zZDeU$Y`)wl&+))q#V=+D4q7msQ4t7bUFV^&x|`v~B*!q<j`Z*aLC-_V(jv5^?jQHd
zV_*>V%$nq&wdpE@jNm2d2|U8BIz<jzo31c4t<zOt44t-sMKmy*`Q(dL-2oFA7(k?B
z=(L3jGLjc(PvB8*(P`k&y0PU2ht{J@3{7iv9XPZmT~lFNr5nJ&Ao0wB;kezCh8q9$
z4gBgyPB2Iu^I(y9=D{LyEP&yNQ76MuBTohf-pCK;337fi?-~>y`<<A;%em8TflT2Q
zNd<Y~=~kB<S6P1E%5Y8U@=}H?63_lLIWSz1GTzPbDTwufhs_kjS|JY2qO;}=q913J
zEs**&LI3gvyVQz^1C#cfu<m0#E|Xa(#K6$xz#>q^(EO;jlcB+b&2WMT!>1|+0S^U%
zDh4@!2L{K_>{l2nRVMJOOyXCWP{lrh-=V?rg@A)C69>yAM}|ob3_nFzo}Ru@K{PQ_
zh=1bG8Gl*w84pNZR@uaOY)WC8*iP1zNY{+W2ao)0eohZC;M2H1ZKnF<&mZg^g%}t_
z1G5^!RV(T`R74Xe%q`p-pmkYcQzJWD@zQ;K9Phl2Y-v0-Te(p;AyMSuNBv128kd9W
zIvW;%;{+7;3=e~=W?ySKY@u|Lp=qtI0VJ4L=_W7+PdmUO8X9$zm4RWEcLYOd>M{>@
zu6*H|1&MP6QyRE7Y&oE?+S`YTYsuCF3ah+h7(!LoFfcH;TNgQ4G;dR3o@thLhFRum
z-w}p_=LL-HeB}xP1??4#>}=&NO?)EnIvIo<pU5>RG<mWJcq#~RvM_O~G;p#ocz{B(
ziBpBalQpRD=&w}f7K_7mkq=h&D6g<ykm1#GPVbVxszOcoiZhmn)){*Lkl7h5yEA1{
zg+{Q<U$!b%uMEE@?+*x?vMVLc-S|SL^T9bQgF?4GZ+KVO%*kZW@O-kaXY&rbHp}Dl
zjrXvvxIT|>fxOWcGxiz}%gt^jX<ryT!FdltaHv3NAqUIi6$~;bFHK@xYV31?zjLV-
z1Bd0|B@8kbFEu!xl{H|Ixp-+3<Jq~A3QQiXAyEsM*61oZSQJ;}GZ^x*Y;sUo-R;4|
zwPnizg;l3Rn79^fJ*Xm@n8g4}>LHL|<;!1O>X0PEnbP1GE;fNhv@nwaoCQQ3vza_V
z8Ha%}RBQ#qO8$+vWH~I7bESg!F6;<idc#9u(di2l9K&TTuL?Pa&Mn+;#G%QYQ{MJN
zRB%!Wdj<o;N^hMrwoR*b9T*Rb8vYVF%O?5r$`)^dN&IJ18=_h!gdU%Cg?-WryQLG-
zn3h>zo@afDYt5#v8(SF|WHv6co@^quIfKE#-z|Z?IWBqj2Cf$;tPeS^V!JSjPvfeX
z<rjr3GoM**VC#6&x8{BWBio!G6Y@JP55KE2TYlrpJP*5LXRb*+ncaNx+)VY&8fQ$N
zU-{s;&C=Q8_iW`?+58HVGb&6~1oAo=<h(?l_ZWY*u(z2ntgxBy#S^ZS>tdNX^0W9C
zPKjO~73R*AIL$IcRPgAG;}Nk-or;%nrcP7zlVSW~-So_IQkM~L<*$}63<{q(RVE))
znB>d2#mMo+&q@3)bAIk&UwrXN6XTmt9JZ4Z=O^D(UwpD9by770gQEfiD9?goSHJ_5
zd4(7hKsjk=@+8JsF+~NL%AIBpB$msRCkTYMb}+J5L^KG5r*<*27DXIs2v2SEU|<M!
zUBv(@!elh}n<q%LGes&0gf3mi$Ql)uAQ0-hhC!?7I;f0_2oYicr3iu0)@2?xa}4+U
zK5A?$aGeBJ*busO8Hd7Z?tn=gT8pl!2!w`a9cch77d;s#zlf7HAW6*R+{dMrn$2~Q
z4xd7gDdsb6(+S$3YfyOX%0usv$sCLQ7uE_nI?iZ+QRKkzV`}3ny-5z*i;k$sd2#Gg
z&ePg!biVUmbElTkF`Wb9%WJ}qcJaA9?B7|y%=5U%>9|T$tHQpM3``6P6Brl-I8_=P
zR0Q~47(h9Zp}~Vi$nk}MhxX$Knfw#4G6y9J<@N47BjJAKru5~>cJ5cs+C8&eV{~To
zqbk$1#Azk$T(v%%HEziqd~(`u*@wqHmppVQIk593OSm7nKkM+TMCO#-u0MC=&TL+$
zJvpt~?zvC+vBXKWXB!vVxg~x#cQZUcll{gi%gs8c*?q#<eoTHA`J{n?1zfO#B8h<k
zT<d|DD1smXFlO#BaWBd{!0^nk=Nsc$nM$_GWT8yni4n6W?_+50v-*64VFCj~0|Ns?
zsCz`9`wQVJMpmul>5XrsK25d?zL_~GG`%RG^;nt9gfLgHveqY6Fy-OLr6Saux3Y+4
zo|rEA#oR&a@#lvL(<Z936{TI+a*};=x8>#CwzC&-GB9v}-0_TS$9ujH%qM-tC6}8w
zT#&x}`QW{2k!lUUW-;$%Xj*PD`Ag&%1|d*jGYBv!Jo5>jqwB!6<{|%uc7{lYRo)S+
z{Z*HFhR(fte(nkONvllL1gqv9P+<V2O`A!K2j^^ja$n3t;jvHfOdaOM>;@&r%^WXH
z3V&`EsrH8Xq|a>TeKyh;Ku%$4;9wANWRN@f;8T^#7an7c22b@S$0xs<PbdgMyyn5s
zz+tJh*`)2k8GT`a1wNmA4m~mAKeOz>&H2U)bUsbCbbe8y`lDLQc!K%yJ3quTSQ;2u
zm>gIbDh$sQKS+>J&vRU1)El_Wy7*OAk1)$^`Q(g5dEuahxjWT1e91WDtnh{b;%rbp
z0|g8OL)_-b0*VNT2m=EHCj$fj|04`W0t}4IOe`#{%q+}|j38N7W)?O^CI$gP1$H4*
zGhtB!6LS$ULvbTx2gQH{HI@Ij7&sUi85mia{xh_#|MvA>oyU*L`Ib`>o4QwB)@0n(
zx;^nxotKiSTDDr^>{c5Q<!3e@3{EDc^`>2l%b3RKCof??Be_)T&Cgw}%krPP<d}KI
zm3W)Hd%juq?46z|&8s#garAn3o(icf(B1PWuw&)Xe&ajNPjV;!UYR79b)I8~?@^<9
zWz9Pty_t3F$=W43n`+-I_V@5~>J++StaC`T?xzBS)bSh7`Ce^4f7|Eq_vb>^j{FZ#
z%sRRKk>n;{eO|7&KFhxcowm6+&!WCmFLOuxiQN`Gy?v6kEzHc!TX_0{&t2g6by3h<
zonC4Ct;W*pw&HDzvbkHtH_2a(<InrgkWlxp<{*>r+U?V3%1hl?^Zkv3MAlU`kJKX}
zIz_kNC`d>sE=VyK{3&i*X#bCQ^1h4Q7e80NwJ5*2+oJMPne(r02mb!u_@Cj#&G4Az
z_cvcq{-k#DKf|`0)^8d1%A4;y-(EX+bNgQH6#LaVg7<gJ|LNUS``ealyWi6?oxA2D
zH#V7B_?^y7-Fa=!6-Soa>KoZknk_prTc!85ZqC&1oYf)g;*;J^Dt<9ZVa7Hk&SfcO
zrAIGa+h%{WWa-k@Z4yQ|v_sxK-)t1*;x;jFZJ4|1)U7NH^FH4;R{Lw%)9w{LL3yV5
zi|#au*U6pF0u~qYvdqd!w0)kt@1wx9)f;=B$5<?M|K#)Tk6hWs;wyjBt-DsZ8cYeg
zXn8V-+spai_7lbmw_i&fef;jG;Ii_6O3c^&W}XWw+fyZSYwf+~nxcu08_M46tG;@<
z{eb`ci+eYD-TiTU`O;-~&3|l5>WYrtx^8yqW%)U;%Vt~`S-11ruH;!WuIKHxT-jTe
z-CI^1EcHIrI?Vga4L$*;bN043?bhbz&gzPqI_Yx$QlG~E3=?j8Gw4K0{8@f(#)nT^
zcPUO;XPYx2Bt~Gno<(tbi?W__d{JSxeM->p^@dX}y}BtP&LH$6C!{JV&C>2$f%Li{
zm4Cli9<f>7AULf^{F23PjZgC$^(TC;2y>de(vn%P%!_%_MEj|R4mmR7F6WX(K8O4$
zzIpT1qL(M4KODQ7%R1#wcGCf!zZ>PYPFXl>N%EqJdp8`ES4eqxYsD?QM@}5p;p^vp
zWH;Pb#rS5%O84!*SoXQxwEwnS-F6ZCqO|w7KD^$%t>E|aoX*m<O?D19oS)QA{?G96
z3+JEC%^h;rQ=V^e_~LV~+E2Eu?3{eb--&YDH~62B=BVl4+#!GPg$>WHPkSd#crD?c
zGNq`sp~vaj;?0GrAx=uV2^;@TbmVT&-oP;RxX_IQR&SqH%XY+O)}4%KJ)^!qCVO*C
zc5m@@skhhjc3i&*BJ%b%AAc`2f67GRRcEJuyq&5UwD#7zoXr+f5+?8NPPMIaNcjHr
z-rjOvot*_gWpoo98=iG*oe@0bDS2vt+xwH<3Q-RJ$1=8GF+0-vs@c(v_nsxAQB!^J
z#49pun$%C5^tyNK*>WvB_OwG#5nqb9x93Ie?6o_+e690RC6gaLe#Cl5ID6-jLUy(J
zF6;ueUYS09ZnNd~O)Q(rqavKJ?Mdmx^in^ub4_i$4&FAaeG4w>-CX=o&`t49YK$Pq
zkKc;~*;Hb0=Bpa)GP87v@tv`p`QaIMyA!jyxeSU}S8rrIpdfDjX6d($t$~ZX4zpir
zHMY`v^kyY*YQ}^|0$k_+o^CGNZoA>(ZYT8(C$-qcPM*JJayI&pO2hOmFZMR_M&!yi
z``++<R(d$O%+h@0!7UdoH{4uuDDs8SPyUqu47c9QDVw1GLEOCVdVB2r&Fz2fQ@q#Z
zh<@Tb6t9#szq;OG`iW}wf7es)Z)qyYx%)d#_FLUK`7eJb>h0VRe!`lwrh8NU+rLcl
zif<m-eqUyO{>cokkFT#7%_*C(bxj_dwfgVgnz_H@B;+za@R}9;c^$v<rts_Zvp<z0
zyM8jcq@Q43w7hFtP<vkFInk*yjtVJ%o`l7C?EBLG_e8Z|^Y;_d@3hvgEaZMYJL&Yx
z+MWJ?x1Btm$-nxXf_cV8HQ!I=Z=GH9R7JYH-q@xkEBBu3>O8&5wdPT6R_)u(QcJfL
zGIy+AUSd0c>xt<nmQ}fkZz+1jT9W%!Gl@Mm_fC|N$)o+t7Z{wK<$UYOkL;qbH&thq
zc%zJ6yKCNW>WVs0#VqyH*x%@EoP2X+m_fnexL~uz(VHTF9DDNi%oG#P^7`ct+TA*f
z%APFPc4|VTbhu}?h}+f^JHpbV|IKYY(9m<x{C13y&V}Byeuh=g+9P8A%?xw0>W`b9
zVwwI-vS+JmZqyljwJT9sQ?r`2xlQ(VGwF6NZfA+!5_xi(&z-$`XG(K-O%LYx@0WXe
zvaDzJn!wd%y|IhF%7|#)ajuqM9+vB6T6MQGtmW<D&VXgBc32!;yWY!GW>!|z+8H&j
zJFZMoyDHW>DQC5tO0<x__<fhRDUma+O!UsaIyoa{_1&$1TvxizJuV%$dP|h<!^@(7
zg!QiU^ttq&<<@F_aNj9P@0f9?z<&nQ<fM5fMGwzS>px=u%lDDjOodCq+d|dVC$DBQ
zOj{@EzEMqJlKJkkP48}Rif!;v3Xi%j<CGe1X0`Dr$EG)T#Jo&P`<F&c+T#1Ll2u2p
z?As}ha>k6OQ<8;G=a#(PdP-9=baH#)k5;>NzMTrE&#<P=e%}7r^T!i+<=QLD-bE$*
zWX{($TxN1+f|}}wyQ_Q!FH2=k%~@J_x-TYk@&lhvizmzG?6~Z+<+{v{r^nSoH%(oy
zYk1P@(fr5ix`GvRJEP|A*|Bt2>ara<M|W#iX0F$@zq7w;@8sUe=BGD0r|iA7X0ejU
z&cw)FYjbnit2S~RI}!Z#gwai@n%$djvkMfgIiLKAPk46DEc@7Icm{aB#qmoFGy}+e
zc?&AZz!?Bs&RtOcBzN*Z!`AaLe$_7Wu4kWbeRw@R=izt1n?kQ=zHY2nc)pIarW;fu
zUQqp{maoWrZ};S*6Sy};U0E#d#=mXC0mm;ft7E*Dtc%_G@OpY`)XUD0xoO=6r;ZA<
zPZx;Mx@MgIrsM0LW!!Q1^u%7RPzXO^X|p!tnx@3(4H~Rl^aYA}#9j(=x}+N1zPf9h
z`ghMY#yb{fww;{uokif>mg~Y1!K+s&YEKZIvg^^QMRF$h?3DOU7GCUGx}MWmSYq#=
zN(o_iUDs6Wgq<2s=WjAOT9&$Lnpx<ZoSG@C%?!Kj$~8~k-MV*+>a4?$^=DWF<<B_Y
zntX)UPFHDn-OlXSuX_vEnciJz`nB|Q>}TV?27a^3ORTvw*S!du+<J?%e^$|po&^&b
zJFKQy|MK4}w#EKlw_%RJ>!VyJPwJ^eZ8~n!f8Q*$<F*<%|AI*7qud@#JQ~s?tERbK
znWbSl$>{6M5S!LlEl=I%b;drK_bg$`Y#rMsqpLS>iMf1DDz@Z$BwDJwQDN#Ftt(YQ
zS8ps6^7vTvY^uuC7pLb3u%^9QV0AL<j1IR-*~ZMoqmD+uZ^m!eHs8CNTlF;mic0IF
zUMKmqw8hU&$x*u5wMKf&)SWp`Og7%$UY*(yI?+I1I;6RO(`BE~gp*nd0@BBJO?I0*
zr|g%>?q~B;)dQ|My$N05@oG)HWWh^mH>YVU<Tp)<$j-<W@iEB^^FPIz=P4FowY~rE
zl-bL46Tj@c@Ub=0UgK+7rfF;30{cz6MV4FKkNB7*rs<z&+OcVVO7xQ}%{Mk2yT~sp
zFtJr);-rp%2a^SFbM`G!I?86=@ndCckH(Rf9;5ej7P75sT*={^cy^JT>B2{=4C_jA
zTV@zM{5q}KO*-qW`;ok@2^W61@BYuQ(O55u_vsy1$<#&OTg}dAMsh2h%Z&dx^YPo{
zHE$nT?0&ns(<x-J=7a0+Hx)#(J(;7Mouc!|VQVhCiL7GzhAA5o7K!YRst>K7lyc=i
z!#Q4wPZ}zgZO3lBnZx67rp2+{P)KCm&izT9YQ1wT9=?7jckL?ssm%Wji<h}se>m?U
zs~lTkxZ-lgW1Xi#t9tkTk!9)OG<YWGHud_iWsl<W0^ZmjF4$;Q?8bU@R-5Lm3D>nW
zcDTCu^sr_Xb~N4#vNwMtpms}EG_)*tp}CsB^2dCeDldh%ig&E|uC}BnSZoehr!x0m
zjCF8NbKj?l{~4}M{`RCSui3#d^=<F|b33dYS)Wh8dom$u#ccVB$r|k21v|YI-(*^+
zz5VCsqi|zk-$eGeveODByLRa6Wqk6_y|Q-ywaMR}xNp<>scadu(oI`Ya+9q_@!KDz
zw<HUhe;6`;D_ZyP#QEA8FAeH0p4;CiUH0Tb7HdC`#v>uO>BaRSUvh)>LLYv5y{w;K
zEN_BF{iMlfL{c}nrcBK85L?4}_X>mD1*K0GLWj!|6r!0_0(4vErz&?<{@(q7Z^{OP
z+s@tRc6hgYnJt#kJ?k|^=*DS-#Wr)wznWf_xpLf8yDuwTWY^U5QOQR(%UroWYs%U5
z4)fi!rX0;*YIxQsyZ@NR(yhl$4bS>iOnW^w+bcPyI9O!Y)T4S!>sM=UpJlZvMYiBe
z@$~glE_b89`xHta_Sx{%d$I$gklC3Rg0m)V-<q*yUDe5It-I0T?(CsO_mcG^ueAMk
zS*t0x`zp_Ii>hDGbMKjLd>qgd6!RcG>(;~FNB2EYGx{;<TKKFxJ`+QooH}RL^R(X&
z4!GgFy;em2h)nvglI>o*GP<t>$=u!S`0!S@BgbR2POcs`%WvWADT}Y%*zS2WdC{vU
zbD}Qw32(ac=J3Lt`x;?(N6v9D{5tlsBWJ?J!_r*2ZD*o4FLIVrcs6n3HGweW<V}+H
zaue0w9^amIHsf~uqFiy;%?2NjxLW>aXk7p6{{JHkB7)#vAE@UC#T&p~JZ45ldq$=H
z|3?^P1sRwaSs|T6s1iX&1p|kM35E$^rA#2D$GZdDS`;~)ME$m=a`Wk&KYE^LajES+
zjyL}Qk1zy)dznmZY^?0;ob0TO3=E7+%q$FotU|&f3W|n~0!D#}B^%k43X3->8#o0O
zO+099;*eC@cu`cv)Hz_%ltT~Af)kRPCNC6IZEjh#7;Gye1Die5e}*olhZhtUC9gM$
z{d(tgw$#7I<Uaw+rmHSE{nT!E!hOw`ZO&1#HZ2>ExBh%{YVP7oF9K()zO52cUUlkM
zuAGK7pXG5a&lQ(XSIHU`r|f;}f4J?`yq*I;J<Goqm+{?gpU%zfeP-cR(>W)YzL~5s
zjfjfojrVyacSdkyr}3hbtLzu<{dIeNRcqRoT}N6r9=o>Rw$q|azLj&CRnSs>-|4-2
zA!}H94Z739Ht{mwvPw>@G6?$2Rqa{(=*}va24k_=+S_wmU1luFIQ_Qusm!h<Et8T{
zRn8Av7J8jNBL6V{Lg0UfqrvC)9ZI&k{3_MMYjeJIMR-&3`E<^p4o=})J57IHw*Sr=
zyIknOThIM|n(tPrSvLNe^Wl)m#^a%1p347Rt8KS<<(=1Bug$9Bzh`|~5g{i(&&2Fv
zX0h&nhNmVS8>M(n`p(rpPjX{zRrDw=nrozbyVz6f>3t`gl=78_uSLGKmYewF{->^k
z`!mcp_E%4{mzw$3{fMS~O3B0S!pvN&*|V?Yo?FhSImw&*?h@IltraC-9(1XwDhuX4
z`ORBbcK-X(q!#Js4%;OAvU{Qr?tZ>`SgO$ScFeO&OXel*Uv%U5imkjY$8+Y~47`20
z>-VhYcY+_fs=R#^x8M7-=#tf4{lBf1VRAte=A2ZyeS5Q^1H)3^s^{CU-TX57*nfs8
z!BvM7?@Ar+*soglCVAh({$o?+yfZ7O7CP;a+VJpl>+xx);?qM4p2Tn4zv%IQhO!B#
zHF&o)rYtFXdGJ=LV(xl@TrJOMI;;M5C%;>C#!Ogt^|MobclT%?-2HrW%a3o{3jK=%
zY7g1Tw*Nc$X^r`tI%}gn+4sfHFR3&Cvp8M$J5QapMSOGl`Q_zqoWDKStJa(Yd+*Sm
z>bPo)<vUl{J(TCTQU69>>u}w{&o`$(j{C8#R{7)pr_vVhccg#3dFYSyzT|Y4ze}!9
z+LvM#FzJzN)7m{b%RO4wYo0OYzVT+|b|JCWLa!ZCoF1Fp9+>G=1mrGZyDcL$F~Q6u
zbIUf)ot$F#H*Gb$6|i*9DTP97tqQXVufA(0<XdZ2Y@77Swdw61-YJ>U-ZMpKTDHEa
zu1kICpLTJ}oZ}ihm#J+Mk*Y|O-0`O4b(RxjwS#<cnPYs~DTA-7S9Wa8xb$e^E6teP
z+PNmJvQJbs{l02^V|2K6{YjZ*^TIlp<pE(+jAp-EvSy+0RPHD7f*ZDr6)jYHa%rBk
zmBoLCt1H%sYLwlcc6d{a*R{5zCvweA6xmb^6}B(kd}90R4R2O*pE&LG%H+}Gsl8I0
z*7B*H^1Kl;Q~T77ySF^wh&)VKp}91ra64P5!uS3eGumzkuhU(ss^KqO)hgxfmHKS*
zRL`)}c|M0_%T&tW%5ny9$bSyKRlTj?<&NxUej0arIeU+=6okEtyF2~)hR5$t^Jd)Y
zo4_Iac=PQ*=9^y@Zk+95oBjPw=0~Ml@!si*XVZ0mZIzBcyZrw3*QvkE-)}q8#&{~m
z(f9A74F?n?n54a2rmx@S`1I}D8*f+6XnEFM{B+Nv1?v|zUX|wG&a0XoD0yj~s=U|L
z&aAao*Mt^Lx=<nD_4ak){oKZxmkupnW7n=b>y&@F)iFcP=*y~^C-zD@gtjZxJ8Peq
z^ZaFW{aIGsEt<}an)mE|Ui0tUE>OQk?AESTVx~V=?SHrW$2F-tYNtJlw7UY%_?;6^
z&VT;4@{OoY%aVMRPix$Nn!5JLNqH8z|NdIW)l~mP`QgjVA4Q__0$s(M7L?094oW(m
zA9_^6k>A}eX~QSqbHT@NRfUS|S|-D8oTu_3RG;hU<Gs>i>Hn%4DryshX0uG$u6sq@
zaNmQfIL$!MOXhoO7dq`#Vs&ZMFFns6Qu1ht5J%tIM~n7sR9Ks<>i+Z4Zf%KnS-%W{
z!!D}XT8}UNXSiV(+CEii@$}Ab*Ti~`Yj(Wcu4gTAd$Y-@=;E-Jr<I-?)+o8yTFJzG
zyKOlyXr1|=bAk_LKi?=d{E!xxARl;Gh3C+QBj*p@ZacT@`YF{9d%xdE<A__^9Buqg
zHE#3#)e$`vZ`)?(S#o-;kdxito*diqY-Q($$rGRaRs8Ckct7Rm+?JKxSC?;oZK!G!
zRNrbh{p!qzx_6#$4ZnZsO~r~!Het=vzCBna`cl2;KZC~0BgzJI-dmlTH09f@uFFlQ
zojtwUYgfyBc=Kh?l#dz;Ar<x~SnmpKD^z9r+P12M*D*<ZXYdm4v)^-)7OoLFo#nFB
zX6nmJbFVfp$`eS~`e(sKzD%d>@9*w@R?yG!e%?9p$2ULUJX(8ljs4;6A9~yO9sIP$
z{>^;j&GyG_Kj!@Me9V5xtnfVFxpTq~Wp5s=&oq6qe&)eH%KNG<;``Ijr;C19+wh-(
zufIL<{f3&=e81JtygC2zd`-07q#p-A^v=mYY`nSUhkIE;{4L)~?Pm!|nwl3j9J(Fw
zym&LG&XlGzOKghEcxP_7wW09Yr{(5cU8jD%-7-bGoVQ)bV#>ro#r@O0E|{M_+;?W#
z{nO<tJ6@c=;djp9^Ufl#2{L)dr$y&HifG#OLdEEo;O)ZA%z}Qgu`^!hMt{Ha=HbDf
z{fdVCs||lC{b#rxpp>m1RAzN`;daA_H^)+6NFAEvB`9@!&fBxTmf7hZp}T^9eKbwn
zIB{?4mY&ydm=@?hUUWp&W?D(N^d*sUA?w_Tb>f<Tvx7BHe3aYBQv6bAq0Q?`i>1px
z=f4enGV5T$kIO;_r=6@k>C=7h@QZ7ce7oQ7*cP(nLs)S3m%WBZRvx(VYC+88h}V~5
z_)hoq8b$a&ximYE`QsWRlaowQh7!Auhuu=XVZF^bIsbH;)srb(mZa!B{iPUlG`T4G
zgf~y3tAgPaS$*TG%-hjcPP^2-vOldgS*rGT%M`!NziB?nhI$s?CVM9Csau;cNyTP*
z@}pBhC6c)d-)wy8wfMY6RdiT+3@6*mzhC|-tYm$g<rLKx@3Bk3ce8Yua;r~$R7lFg
zBlgpdG@tl#=fkqC?fbv|)Z2C2OJkGh^wkqSzJ2U<w0Y%~%hn-RKK+#w-=E7j<AT(r
zIhL(kw)<>d_FehK`!%e~!e(qLWL>FeCtS18Cdc|!bWun2M-?rrIZQX-p3m(G^s`Yh
znzNFzZtdPFEB&^udA+evGj!6^9cePJ?iybEb=PZ#<;2CI+pmAho)vy$?`Nys>%Q-O
z@AtxK%HvgM9<P&LnZD=C+8zGKT*{+00xDUieD7-HS$XHe@slTVBg3pS1(TJPJsy~;
zd!Bo}EMxPEf~Lt)WzF3M>TXT1HfLP^8oc3>`n2f7QE`)9E~@%XJoI<U_UlXiChJYz
zqIII|jxpDUJ62+sJI}RtYpTy!YgDpc!+eq3%*ZVnzZOkaWjreOeo=1LE~))8i<h~$
zb4|K^LL<;!N+P>Mt4~PC+I5F~uFbM*kI&oYDxcSS6}qEj%G?K6VlG|zVv(nL;^U{U
zo^Ng5MxC8L*>l;|&o$E~zm87WFxBLyz2~v!Y2UayS*={MmK*yoxS1KAoAriy+RrIV
zrB}Ldng4dhj<lYsc9-U!KM|c~bmeBT&!<SSr?oSULz*5%xD`!2H?xMDJwQA^<3`ZG
z6?+XWIdm6ZESOq&v+~%5C2aGe)y=c~&ir`cG%3k)aiGoj__R1F>3|~Z%!2h3_nnC`
zSm=8Ec5q`&>$aqoM>MO-FC932V*boSHb_~SZ9#QQjWyrj=BE+$8{-9U9<iwgH5>Nn
z)F`J*eK_;x!9T&fbCkbLj_*J7P)_i^?Hv8%Tc2<4`aL<o_HaGl;rj_c!{p!CrKi>R
zRX@7<W%AMfhMdQBl5^)MAF|%u{O?ls$DbhP^Udummt@BHT<Z#~PP3i*?`;1^&!t)=
zx~>Ou1n1ix_tSpI>s)x0MbU7ASHFJPQZZ#6$Ly;vQ|lwDcg6i?KQ*(V^;SrAt69aZ
zKW^t#+cYaxIs4YA#(Sha-TYF$Tb^UZs*9N=@0a$OZT<NsxlVFcU17HGqU|fI<7-!P
zKb*mwH%IlxM4szg)9qaJ_5Wq&>0eyhqL8K@>HlHH=Aw+|7w0E^-|i>2?e=90L$<Ey
zy_==AOY1l5)pz=OL{IcFm#EmZ>=dXW>lxMLw&LBV>erv%{%5EO2=YDn%&K6&-1T|q
zG~fBUb@hBSka*z~8_((yAY(h_HjjeYCDut3PcH=(l3Yg$zP`G#r(~}5oauYsnLOq<
zOHMNU8$Kg^#*JwYN?eab%=t890&kaJUdc1b4u)g8@<o^Uo?9O~zGR+3jnansw|H}s
zBc}-exj9d5dBc{;uRhqX(VV}*W>-N!*IVE3+Mm{F-{G4h|E)W|w=Pir-kR(g{{qW%
zx2qlVe(kWy^J)CW7r)P%%eFkp+&EQJrrkTqIq|@)!=3w8`K0ySYo**`#De^-oOu*X
zF0oFU^67@A4c{x5j1w1)`c}DX34h@fI#iVDE}f%$)amQBMN6w*J^p^VXz>w_3HL)Q
z`;N3n<|{qXw{CwemEn=^Ar(<*drF#XvX<V&uiT<(O8brW|7TFz-^<d+T<#qla`(xW
zNiF&tq@uGWCu~g8TygR8;?#{(HQ&f;CS^yZO<MCH?)K}?_Wv1H?eEo`;hPa1w0UCn
z``fjK^PP{jrWR|yniW%~YWDiXqn5c}S90cN$G=;@e|gBY+t-X!PuA5=xgC_U?Q~yh
z&|*)cB?~94lkAt`c50fi_Ca5*l&Al~7TE)9E==3WyUb9W@7dj`2a_)LX1^@1+Pbvo
zQ(S&q%DlFy(kBa#_k~^Z`zqy9zSQLM=?AUawF;h-ZnM?~Y>oQDanH)MQfPMO>$DRU
zw<i7mB%QhRYslv83sau7U6lDyu)1)`uEU+BTML4GkGswC`n2pD1NT(90~(&OH?nT_
z%}Cw8t^18f?lE`KrO~aLfhlG`JU5=m&ufn=tJa8)p2oFn->sCrn#&H~zBn^B%X?Ca
z*(uQjYs2=kE_C#?J}4^{sjt}fZ`0Y;Q88_orLJF^TD5hp;<u}E*DtkJZC%pyOWvJ(
z!Tkj*-8H07n(Php&TlE*r1fp-W;t(vi~Erpp>N%kQcYGW|5~v2cil8&nJ3ZfCS7}7
zwDsSwFGa?IbJD`(ms}TFa_jE(=T*I}S?72n_XPVbFZ#=U-z-1fJ5Z!IOs6v8Y3};i
z@72|l???QYbm+cCOUibhrIzdJ)|dVL+P=5TY<Z+a+WPAB&2x^wU*U6-Rj=i%zhdp-
zg@qRtcU<DIlnHXw{1(1=lWG04h?+H<g!&@{%+ueCc6j9(oe_PM<k6q|Dy8sl#F-y2
zbRWK-!nRI#M&q8_i{uoZY@7D_Qjv21$;~(OkL^|L`OH-m^H*-!g4xfW?)WY>W#yZd
zAC-9oZ)_^AS#I+8Yx`!cUnM3?>n|!xxqMgf%I%r?U1Wm!t*bAd8FwC6Qd_s-1?LW@
z^UQg_zEt@fo1$o_>$l^k_{9ZZIc2ZfKDafj=g-z1heC8;Ra+TspT0yeVv@+OS=N{4
z-I_kxTZuW?Y1XCu=!pmKzg_R8@^Gzw@PxL*2|T-;W~Xgfdb;VR3(LXWsdIKZ7H|Gu
z;&5ofrRcn<)1RhIxos7E;&--4$T6;4lNn6KPVU%$RkZQM(c9Wx_v9i&kL9e3ZhyaG
z?I~8id_}HDQzq{yNi>uz4()r~6*&DXhd=-Q2;p~b`{cP2FFlc-)_AaNO_obq_=?>&
zc5Mx>w^&^h?K$7o)MI#Mp@!Khk%h+&FN!gnb5Zw7gw`^HBV~(qB_b1Eonuv5J@qwX
zo;G*ti@-T9r<Yx`(W$Tdb*SLUrj6al=Pi#9i{sq)HGcmW5y>3YOMNS!Y4U7pxa}e4
zC1lRq`&*;RTk)xKL*U)-HCMlt<Zo#Y{2HdGp{k&&T-tV0@TRlEdrRT$FY)ugos$&R
zTj3s)F0$;W@aA@jcPkg|>|Gf4jPv2<j(vwt=Pg_mwD8ozwdqDzPI0Qwd)w~uNGMDA
zlZ@V;4aGX2?{79NlF?gfbk{-a3F95J!fW?R*7A6A<j5~Fdh=+b$V<apiAxn_8g0r7
zc663>ymK$~%Acs5&TDvAS6tof*4ndb-{p;4D%@+nK?-8+cfJnaIewJM{boP4;XlKs
znsaCVGst{Dy7{Gkw>-nmV|$G4`_Az{jJtWLK4bF_NCW@op+AsLuqiXVHEfM&4SPR2
ze!#47KiB!ko11@xZ!4I8OXr_G#7^1T;EgPrhi7Z4Okm%%Vf*aqhM(7MnX`Uhn8h1q
z$-^?yN2ffk60}?0@$UT^uaMIEAg9|l0oA+?AKv~^POLEFOjmuX`u$(G=0DT++R4v1
z^cZt_OzgHlP?S-d93=2*^PZV`t*f`(ulGJ@^k`PG$Ne?U$=5`*FU5=5F<$PnxO6&C
zwN+rrY{7sji$WHi@>HMq>ewD*TYbT=ysopAMUOPEyEA8!hfFrNQ>y3WdB)2=#hlOW
z$t*I|eET9zbBpRsR!yc2%O_gpG^KBuvq@gt-!3{kD0r?zjQY0yH#_aW2M45k9Exo?
z%%i(0Cc>ty;G^uKmwCx~T6Y?rZ&r(A|CHz9=V>_k;KRH318x_jMoBt_So7|RY;Ret
z^+aZ!myM*arIf+BN0+?r+NO(UwaR&?E}t-YCi}F1Q)RTYmik1VnqA9(ZRy&&-g8rJ
zAD1s#nYnA_-#n{FJDyCJy|})&^JQtrS@F5rj;H2tb=vq`E@L78N$#BaON_oe@-b?9
ze9mCWQstQ|-pIS9t=QJk{mk!on0m*_!}A($pV`*ZUhVF^AYWC5tL;eJX?+Fhg)!S_
z9eSp^D0#c=5zTWBb9)k%nWh@<6uR<CCZ|C+qS*d~(4wU)d-p6Cb7bIuJ1xaEckA6J
z+xDs}WbsL|^3DtjSkB$|HE3c))yzcB`Ff7sQ=>1m@@-t%RcFPgDCN;PQT<9#KXY)w
z%M%XMMN}hiy;`aD(0ihMSe~)()V2Bdo_z8UZC319nJ;i;hvGZlcRNj9o#wFUF50To
z@T;|U->GB5rY({cb@3<VL(klePu1o-5}j*g!a1SU_|WmGdfu#4p4{7Ndw~DghLxOs
zQ_dX;n|9l&e--ERh-q66h1v-pvI{AV(RwxS)zQc!Gu<|`PWXHC)f)M)%N`{0noO7P
zU$bRd1>;$@&1*8{i;H#m^t3lEIPKQvbFz<3K(L@;Q$5$w(qlq9H^_LGWv_acxANT@
z*EzmRI1QCM?Uk<v`Tx37QPHfcaH@ZeNz~I@lLLfBnO#0jkt_AptTMd4Ytf0!V}+bT
z^LR{_9SaeaI%<02rSXCt(>`shbvG{cP0D@bv%sU}#Kcdsp(>XHHnK_O7Ae2h)tr2K
zmT%(6<TO5?NXZNLCOYsPxe~r`Zk|iKOG;*KwEn!jQ%AOTytHUhpDeG$zhbNQs%(*b
z;Y6kovF7_qwV}=bw#>1s*4_4a<B@4oE<XM0YqBD%=T1ti=698tr{B1GHIGS$%-mEW
z==Nnv^Fg<bye26#Kin7Gr0}adXxFlhVIS2dt~rolQz8p8sK;I)aogQ0i%FMeTCY8;
zHnVWbQm?`bSFi8a{ds$C;%AnUnVVxTY`d2q_IKGvLp3WuMb-lsozt%rtX>^4Ibw0f
zW#<Hs-7+GR|812L`6itkbmN+&t{n5LSuJNuREyGV7daNMn)f*<>`RHZK$73`#ZG%&
zbv~HCS(9kdta)w2lcny?R|~XP`)%wpx+T6UyF;foF7w+pnVA!B=g#rmYH_URz3)!>
zyIbyr-S?@skWuwGd$`qU)|t7{0$oP!PI*(Ak3=mzp7`m`jCC(Bs&wD2IVt;9%lK2+
zla>70T$6Jjo^#=vs^`<2mouAn=X4E*0)~)ssTpmvQt~p7eO9->_V;T0%HZ5CC(DWY
z>cZz9&FM<fj*9+uaSHp_z1!CK_|}}5+))>Jr8{+d*u7IRH#coPS*36&M0g4d|FH>@
zhmR>-T0htFfc?*9Hz#~+iY_W$@zXZp;IDnB=A2pHy=j@{vY3|c$mG?DcO#lMO0vbQ
zT-!FMP+5ahM%QzuQQWrQIUR2!EsGZaxPEHG>2)fyl9iI1X8Fmj<lr~?Hg_hk(owDV
zZ`Zi)Tt9uOUqp1jLbRrAG~cT^dtCn(xoq27Y9T!BgzS_nJ12eJuDp5m=2uTo&HMLj
zPlcav<Sz|{=-XAnMsgSZV&<0U?py6wULK}&=cek*$<t&CzjUW6gIv^jBqh5@%|tS~
z(=S?~VEbI9n3J<^ui3nMbIQ|G{f`4x48E;3Q~JE+p}6dWF2Su+vzy$uuZ{k7?{-<p
zw<jlpC#P92kD1b)8u02yd6-h6q|}|x6}-Afmg`PpdmXmdC~UhT56E*)0rpZ=!ueUh
zqGM~XuXtm&H}b|R?;eYZSAr_?R<7BvuqtJH$?HiIvvo>ytXY%P1?!_HS~4ydn>dA~
zPi&!C%HG0nHwAAgS~>;($>yIat~inR(1zQ4Lz`Wf&*wdN&F9FD>!Dk}G2RTmJ>_Rv
z&efMOlO|?sl;&8ks`{wD^`x*AkFKX*fPl5l%auh>v-6IphbNspJ=ON_mt|LFg+gpo
zRJ~5`zkO<nYh{)Cz4{2&MIM>X?Q*7_J&u3V{1g~UuPoPXcy%LqeNxcY=c4kVzLTeG
z*B@JC@n^H@3Ju+(Zqcdi+qe8@IOfswqc&gH@=#>P`to;+mKs}X%6N9Iy)rXUmT%L#
z>cGfp?>dA0LWB>ec+Lo$*0m{?bKfs6?_!b32RcqIo+xxZ_uiURsU#(q7ORh&OnO!-
z{QYaVV9i|Xmq8PBZyuXdTI-^+;zE%0j4kt64X0$DxNv&u748+fn`Y;1=JHvx?e`w`
z^zEC!RQzYyeD!0P=EFHZe4UPc*mK^saLTF}z5CZh?yOjso}2vcowWsvCBwA2mztA*
zZMnzWW4WYj|5<hI8NXKDC^Bg~yk>{al395&M`ub%pW19BdbIhgf2n`Krb+2Gj&irY
zq#s%R@a2KOhwrz7`&R1A2iNRzExf$6`o#w8+AUFO@2ob@ygvO}<c)m3!<W}Qx@2y4
z|H|Lw2yKbx?&(@ZbFamnJ$Gm29&z!=GNtb>bLvFvdhR?)5=z+D_9eVOPt^8m@{R6=
zJi3u$3sdtRMx?j<PxYKG=$&cAzFtOt^8VayV(b4pcd9-6#wES_;#)mswYpO4p9kgE
zulDZN-K(7S``}xVGqJ|~ZEXSD{nwO<%Xue03)2Z$HADH)=R~6`%cZ@2CgvVncxGbv
znOVu&Rsvtw9=dCos#g3Vu5YTUR??kUUgwusbRCKgJmr;B9%4Q-NA)IeyG*>P>`WoY
zkk0-UD~sgrtxv5o{&x3AW?||!ncVn__abL}jVGBn9Xwuj{7X*oVapG*8crVGC_2Sx
z$}^Yh<~K_ZyHpz9cdqi;Bz=0<Z@Yds=SKf6G1?x#%w0w0oW9&S@pFq`+|9OsGoJpr
zulFI*(*2UHL^q$yjE~pjEN7&wC|zaa8<osww`PUD@s#*wI;?4zPk2q~=Docte`omA
z#JC4JtKIpkS8{2dxy{mhwZUfF66egR>y4J0PRJMGxc|!zoC*@_WaUDhzj^rajWW++
z!8MQ0e+{xQ{dH`wY|yk6zuLT&->-h@^D2KctNA}e_>roD{9C$pwi46(s~@d*tMS?=
zH;4Pq-X9_7i`Hu$+I!&Ue}*@EKZY;<@MN*I-pUIL|1<cSw<Psx-myHKF*)?~*U(=^
zGWnv@8C1<q%DgjKcIQjCV3df?l1b)W&c0R79oufPPMYBMD(1PNr18DrD*fqC^lLly
zRaX8C5(#<yu5|BI!HcFZ{EqE&-F&=OpjP$Bn(Cv*tbCeROzUG~{Qk{Y8Qqm1UaQ};
z=fu;CiX4T0ne&2=n=7q4ykzB3g~J6qCfH4TU2=5N%<~7UEEKhpuHX0a+N*NJ%VQ%;
z?^h`yv9M`^6EtJ|PED4Vn=iX*(OT&;hPXw(_2Sbl15au=U)%Pp$Yj~!UY+8nK1VL=
zez>q9dQQFD<CyH;!k3R@6T|lXdVHzj^@^M|Hx<3M{xYAS-S795ug~<F_{;kjk1y_j
zv7`5-|A`fM)sD9&TFskSw>tI9w%XF|XSlx1k`s~3TsEaQcDbI|?5_>`xhAt27bPDy
zxU|*e@9|T`)~{mH56y6CTQ4c)v}Fh5Jx_b@g+~>oT$ie}lwELBmyJ5IjPq3e3h@VX
z|7e-Xb1u3auz#*+vEiA}FTqub0`o5HxYF}!>Dqhs?^^$?>~UOnb#cm)eZOKXXFJ%t
z+Gz4AJacM2_~Pi(*Secm9`#;h_KT@`?%}^$EE(7P)q_K}E<Kv+arb$Iou=%S6~;14
zHX1##sL0=%*l#F##4*p!bK>KVr>w1AUkkaP>UeWXBUQh2(!5ip?RwFLmZ8a6^R@Z1
z-Nkuxj;F+bT6eqBcI%5T)8-dOOxb?N=Ste%%eCKS)_NY>(tRc7h)=<s`<jRD-`%fO
zFIuaUBsgd4+{kq@S<hcwuoV#b?Z3Z8Mce02^?mz`YIjyyC9#Js-Lq}Fa@Xw)xqme)
zkNFf$YFhS2EO5#8+V>IjWVMY{x4k@fBJ7FEhf~$s!iS%xrMVtnd;ILo4fiu__b(E@
z?UniM(r2$nt=-LT#=IPF-hYkyn)^LyR?j_$#WUT$YuPTjGG)WmZ9C<sRC|=P|66tK
z&ZIvt8Kq40oYqgYy{nY8Xv<3H=A(Ao@B7)c1x%mwdI#Iru#GDWm!F;QIU(LW*CKYd
zhFjS!kA-!M);em6dE8-l&Ymc_eA>M)D>L`5l)7wr%AAR}cem}7J87xbY+At+w#prP
z)FL)1vQKyl+tew4zesf5$lYgmueD9m*)i+fnx^ZvTXymu%iMnbTA>D`+t!N`nV-`i
z?>4`-Jy*%+q`$Xw*10>Sx7{Ycd8xB^zT)GFsdgbsTP_94sO$9<Y?b)%zOCnA<)W&#
zueuAB9P0viPuhI*Q0<m4i#~69W@WVU``N2`=YQ<~e}q9>fRTZTk(q^&g_)6onUR5k
zfssK_(a<qaKq0a4gF)lOg$^4JUJOY1_z*f7&uFjs;;;CNO}pgX{xft2?Kw47D`aKt
z_1mjog{*(bH^q0=`&sRa8BU&+FOdB;|8?l4WZORTCkxN4{^)G${_n7QjNqcmMNea5
zA|jV<JlS)=-sss~SJtangIoHuOVTa5qK}xoIC8<1b&IXkkqO)5p0c}pOp87&+@s#6
z!62c!bwOp%JdLW`6}gUW@)ax&vrnuL7mYeCRk}taJxcGNvEYA(uAn!!4DQwaX9zHx
zut|eE!QS}0(8R4i@wZofzyDh;lK<R+c|wP+rS5e8`})H#VD813ru91&S9C3$esb66
ztDTwBlj~hX5B_$WeR%POxBlmi%lGa0^TxR)^|Rr%Md|DGW^Z_&z!LN4%wP7`tMX+<
zSi*nY-@!Xq>B#;S7d$frTsNh+oxIM<ueX28zjKohoMCjh?)~~x%wi8suWdKmtTk`3
zq;;)hEwjvuxZ|8*wOQkoLTmKGO^gp%*~6aC6N}JnSs-UO&EoaKtsA^KS968+ii+KT
z!I61gttQ@f@#p=UYUKG2y}4$8s_yk~-+!GI-*%L3e!Qdf(yvAqsnV5G3~&C{fAhBT
zL(TFt#lH+U#$Wt&+QsF;o5L>}u5nCsUSYeCt)rD!_zc$@u3DE3pBx`VNwLeeEzDRl
zqyGKF_N;x03TxwQcZl%%8=p^#5%yqMav|>eJNE8b&9^L8XlcH%`73nN*xg2Ghodj^
z`Lxco<KDgN;!9)uCT>ji5ITOjR&jZ1W@GKV*=?zx#dlP{shVh*@LbEsyFmNcH~y0Q
z8?w%vt$gytde7Oar#@MAy-#_If8P$<ZIYP3OS#HqqqyfwYrWJn+&qlCHj0@a41Xb-
z=9MFo{VpNu*R`+On~ef4=gwZO_e1l>D(<(lD_J9#M_hQbNouP1&eeyFZXLO1kk+QZ
zv17^a7`AIaTH+7&cGr8>c6!V|&SG+=X<@-~KEGMMvIV{wmuIf`XmOSAI+J+e=cDS~
z4bPTMU$tghmDIPO?%M9D)slr`=WIpxth#l#t~GtDUiii{42_LU_bWtiOuxOf^ye3A
zhquAocFj<VS)R6O@9ALHGb=Pc+|PKGm3^bvN7y}}<g7Tmd%%?|p9J(~zS^qyG;Ve9
z39r3*tQU7iUtfFWlgsSyU1p!2c%?;8ioUdI#f7JBbGtaURWq5qc_DK)=9H@Fw?{!&
z>o2dabBoNY?zv^W;l<w-2R3VMUz^_Hu_EiIvDv)o_rusi*02iOma@w(bK0w-9L+jU
zJbcfIDKmPqj?E6(eWprqq3_eGH&LYzPfgFxp2E!R^yG5hqF1_Kr%G*gex{(I!KJeF
zgYzq!>tPC?!Y)`p<TB$@ytaG6x!t!n{%1(*Owuuw{o`ZxTJN1QH(#Y^&aJOccC=ky
zP`Ghd;Oq7`_O=<Xb0wHw>j|$A=J#GZuht+UVOxb?0fX_QJzp)>96sfGb#?`JX<gDr
zohf4JEmlVBSSo!DHmo->f4TH~on8N_55Iz>e@0q6*iYX5GHmC}Z!RzGw9n_CE~;00
zz*QsO`O(Ij{pj7h(tO8lH*D>HR($)@ow++|MfE*rJlnA%^JacYX!^E2hd0j6IJNd!
z_;;=~?3<ciia(jQOzZba`}f%<>$bk`-=A#mr)pvJ*zZ_|7w4V3bNeQTDcov|Xq!9J
zD`}Z@_?!v(JEy$86ug7?TR`*GBZq=`zeG*fU;BJP{)_1s%48)hH!fi}dato_LvU=m
z<*hCA*IkLM4QpA|y*qF7qXfIN+uqEIuQ>kxobJ`w;I&UqyUBL#GCv|${#dX(S-a?{
zw5isETfZJOd$(MuOa98G=IFQXTGHNv?5-Ua#XNI!^TRSq*gOjkHpJ+@Ufeb1smPqj
zTAtvxDTcbd3xW%z^x2eF-aXFz+~V4=I|+wfPHy-vu(PAVq;YTdl|xcV;R?w-`x<^Q
zW*vO!*(No+_m<R=YnBCP|LpmEWK;1Kn_304zJC2))w<TnK{>UTI{wY<TD^JR;l+k!
z+jjD2W<=fEAL!x6#S?f{Hn(uvS09fT;i?O=H(siJuyoEVwF;X&G1FsbY;sf713ujD
zjPDPN`n2x#m9wgI4Emi6wk%lN<Nu$*?ARvB*UN=%udb4M5%6Hjy!RFNjRGd9GH!P^
zST|wTq$e-lSIG#9DxZ=4uzuBIBMp9@6Pd5JHDzc=Jesp%relTGq%E12s`CR+{yKFw
zxiaJ4{z$KHXW2u{tV^F9{n@F$yHEVQl;gGI3AW|kH%jV1vAZvxb4!nXY1wp}&)il!
z%y0Z>Xqao#@XKW@L-zNZm14TKf|W0MH2pts`L;0FM10GReamL))KwcOoe~X|%HEjK
zwB%=KwuD(3r@MSsW=#@*;>DLAYwTuqiu@~i^CK>Hk=%{B)vm@5_k2^G$|`>BMCRA(
zAOGb2a{q+$oo{^lWxvd~8zu7@pKpIyskmg_j=!>h-t*ndSfy}v+kCbE3<~$xs-M`r
zQS0m31;IM|a}1V!wfKDfS*34-nbwgf#wKMla>m#7ckO7t_Uu~dwvEYOa~EE`R1-cU
zv+33Aw)K0m_&0{d2RQWzd+Tl~`+L!GP54&E9dB#1r#WsAyH)f0PjkSu1>7fOzE8Q|
z$nM(MZs9GrZQ8!`^FDHv=mdq;c8HY4GOs`LY5I~GkNV52Vv^1-Ui_PH&9&_vK{B1|
zwl$>xXQ=wjcKXGaqo4Ndjd3fIGAI_b(&9S&sG{^oo#%%;zl}T!B<}}3{kLQTXM_Lt
z>czpDeuj4C{|?Qn>pXacjrTWu#=9FoyhLxUkZs7F+b?jZZ)(rFtcw~!(Kg?BmU?LW
zu2Vd<^u{vn@-{B3*{6JVnbvm{H)hRd3wJkK)F7_7tfx?FM@+L>2Yd6%eOtx8x@_OD
zyYO1F(#!qq!Fk-F9L@bXpC9eFx_MKy^6Q-yQv_4X8)x^ta<_Zb!W?q_@%@f9eVmKx
z?$(!0f0X0c9CPL2-Q6b@A{?vPZCO?raMu(w83;}(S*9eoL8|syz~)KkW$i_DCJ4=X
z8lip3_~(KticDhaJ{oiP?+n`gwl&(Tm7&GwR`8yC+GlEirIho@T#$^IndYs2@KWr>
zEQ9PC?-omIo3o3m{>JQIqO(F{O1X{e!YK(~+7`Zf<2O@Vv|&dgLqJ5yndO%zXh=OX
zG|cU)Vx1TfASh|Hvi9V{1)@2#K3}maJtB8KfP3XC-Cas&wZoQ+JxMd@nZBjY<l(nj
zYJ0rSpYVG0(D8JnW04n6;NA9{h5Br}TK?>^IWlQ`;iP#jFG@a~nd%pnT%>zi^r}Ul
zcijh>!WqlbMVIYy4spx4^Pj=vV5{uhnI#L(xg}aXnH$2K9Q<AQ>)|_hWwhkCtWbQl
zrQ&6$lgtER<D6|48qR9x<eqLw6guCy;m52^F%KgjXzUePp24f_mObTGoOQq1gmbPh
zt6J>Op6>a{s9(8er<=CsE`yK3nZ;i<&hEH&=PZX@?e)&6KW-2E-AgPbc22N)=CJ+t
z0-F_UHadMsd97`*VC}^E>@(F}(=_!DT)p;{Gd?yv^?_ln?&I0TRW())f=P^v9=k`G
zuIP5su5ixV|5oJpS>B^NTE4TEE&aN+G1f+YUCRdTMcZ_A8(u|jIp8kDrxnJ$P+I)k
z)G4i20V&hwlsr11A#rI{=ymlOva*6AS{s9w&6sjqmO){2#n!kig(aKM$Z`aHYX4xM
z)ymcIDERsc(RIBX$8UcTy|Y!z-|B!A+v)!d2X1~@zcq{ZFVm%c1#|SXzsS`r`p9=S
zr9JAI<z3&CTHiE6X3V+be>1CSZr|jlGe7nxZ=7XsrR6JMcT8Dl-OIe=9-(`0s~WuV
zoARGQLExXz^_uG{KmN(iH$J_6v(ejcwo{BB?tEKQuAco%_vb#@>9;@mM$NZ9dE5C>
zW!bT~lT%D*ee>Aq`AOz$Y)Or|dg^@d_~wT<ZhzXVm*dT|>qu$v9<J8~3XNAZzRmix
zqxoi;!=gy5>mi$Sir@eHcd$2Gu3S)$f$g0C`QZ8nzwAvuwdyI|Mt%>YdLkZ8T{Sb|
z=k2|bU9Q48MjZ;uMh4!gNmCblU*24s_C{9i<;)LTZ`YLX7di0s+N8NB@7_1cbDMB^
zL!aCG$mSKVdaBk*O7|+gSYgfLxBab(P5W&rxs?H%_CGP+lT}o@_JP(Gcjc;?8qVjN
zoAf$+MHjF1TDztpGU?I;wI04%8`ERGURX;g*UZsav@TS0d1&<ImGN%8x7zpFrnnv6
zx+&nWU$^80(QdZQh7oeym+x4w3yRd#dvs-I%I?=iCsg)L^Pciz$&yX{(No^U2(P`e
zDQ1(fr)OJG<lWNaohR3@ZTin}$yc9k)#*SD5&aEXhhkG2H9x-zON+eW<sI_kt)$sD
z=Zo5L$y+C=Z8}{pC8+0JS-R*S?@^l?fxFyKo~hR~-4}Xac)zmFHSOUmwzXWJbtE10
zjZ0VQEpELz<x-!_(XPF^W;`!uI8L$d>2-TL^PWKN`)$Yn&Pp)L(cJT&VMS>Pr~J&H
zj@P$a<r*(a)c=!TsI43#Y_xZWlEai~@4N)Irml3jv*BjmX5XsHnXz>yJB$}uG!<|O
z99Awmb8zSTh}O@#r`+=-cPwwqnK{4nn`4R6jj5$_OkaGI_;z{L=G=KEEi$WdDQESm
zcYz&OtOE{RUzvV%#Y%@){6aUE3j25M>Fb!XfJyFg@!V%l(;F-#zbLz;F3+2mB@&x0
zT~s2lM6Y>|`kGabH7^=WS6Vx{=<cD-8ex5E+I0t)2(pHmG^YfJPs%Wfo0-}AC;G~=
zrEfM{A5lECZnxd`sfYb89=Ex6jc4`&zPD~7(=Jy$n{`XO`e3?HQ_~mb8pqIJsiP*b
zJ{~LM9)-Oui=CKz;b4?=tD)uoCr=X}WX8CjbB?_sr*vogk|j@`ruz6s7WN25mYMT5
zpVg^7^=iN6v5TS=L0cBsKEJc=;V#EjpEed6=x_*J|IaYNIrfEaN4$UVp9xHp7F?8W
zHD!1%w&$#*($!s0r}q44WXNTUj?Cmd>=e73ao_QoEgbxRY^5^HoC3tx{tH@ixIa%{
ztF!XMm7UQIr_PAZi~Y~wwZNS%y!@eCXI{_*zI=nfyXQ?Rx)=G@m3znhVqx=#Oa3w+
z;j%dw^`Bvh<I#7P26CSb|2QyDF5N9$>g1qlV`G@el=i!(cfykM%H9tJ7{3S<Gd%mx
zpc(z^kY%M#n))U2D=*r$PqO^HU8z0Sd~cG|nusVl-82u*>vw){PYQO8UlY%!xcuMa
z;zt+Gt>ZZnF`+UmW0vEJ53_Brzn!>s&TjAK+QtprM4iLq76x>O+0E*0R5kIJPzqjY
z75d7?*{}In+ClUAd%`ZdJkXuF@WAJn96jl4Sc9w2?%KFdH0R@feS^l0d;c@^=()75
z6xWsy_pGa^UvIPbhwz3PH@+K_vgJ>>o$Xw7BX>sSOsfSQFJGFvpPcgQko;5`-^UCq
z*8h6ew=^YQ`+$B4@2&n@9i5x=rnB`ip0Hoi7wY2FG>_qknRQamZIvrh^&+cMX2iZP
zQWfL5^66NQb(KZ(>HiE4cgt*JCj1f;-N&ZJp1^bPrHe%6%`cPF!Yox9x9(qeD)*#L
znoZ`>B}Lg{su#<{4xh2gW_1?YzVeaXq!~vOkK{kI*?eA3Av|1JjE^Dc&4c;chd3wQ
z4^O!{Ln>NKI{w<qpxwu;UAdNIZCBl~@W$ic)h2H1_ok@E$V!~zIG(v7_|Gfv>!w??
z{v`3-FMeIqIsdos%Bl^Q7n&bcTzB)6&4V}PtfyIDX@y!gW}6y1dP^#(cJBW;ZI^~r
zTf*<U(*ds|8IC?bf9>AE2RrtKT^4w4_@m;bvW@f8bY80(eZh}=9=)lp;J*2v;j(c?
z&T>~}i&+9T_Y}E}tp78xyxEkXX!Pp%=d?sq2^)t9K8~FwRXZYVgHBH06Lj==gPZ5M
zc~dQuCa@~cX!X=kOe&81HE(H!%$z-G*&IeYSi3zWdNxgNY@2Hu?AJ7X`jvoLi=4OE
z%wbsYe8bJ4r|B-Dn_g_<2$~saqHyZT!>M*}LT>$M=<1D_Chpa!!+FMp@vESN>G7Da
z-j8A~yxw|t<3o`k*4IH%oOXQ4E1d8Aon`dtWy}H9-ieOcE?15(OIfIvwe+LOy{%ub
zI=%~^VVRI1;quXh;nzRSM}|_K$toMNd#g{L@xCDt@ctT)bc`W~X*WZb>GhISgT3FG
zo-O`-ale3X+=kkxPed<>M#WCMddKSKMD5yHcNIU&x@s)?mfyy~H*@8uXTRsEvUtz4
za`&tcaFN(ua(4REB};wgGCO>Ao4ar+lljcW#gX}nyKXL7R~m7e{ikh#+x0ndA3i#G
zto)QIdq8BqR>r~a-HmQ5s?1I%JdI!0F)J^zpmjlKsMxN|TMK#@#Z`q{Zdq?&RKKJ;
z<<w!0pqHzUm?*Bly1F1dBIdSzbl*O~h(Fwy*i)nbGYFgMvo_4re$UV^)nIiy>ZZ=>
z(^>C~_9Z4f5&hlvam(R3bAD(@y?ga#^;9P-mMcul8BT54URkkz+v?LZ{xY^cO4(4(
zk>ADa@M59RwE5lBetp{aY@2x@*TS{pvR7w3ib@JlK5+JDd#f(nl~=2$b`}aMu-#jI
z=I^g|)=uADhgNIe{MLWqpU5rAwd+`AB_I4+`mr)(S?0oTiaFnO-RI8t`D&W3#H-z*
zvO%b?t%3h9w=@5rbl5Rd49pA+3<5WGx1H8)V&K`vz@T&iyl;kCLuHcdHc3XY2@DL<
z2@FgO3<9hT4Gc`)8Z6$7DohM43=W`EDi|0TCU7z^I4DeTRG7e^(!j{Tz@Z?(z{23k
zFo}_+L4iRCG#sbG-~c{Z!-0i?5u~eufkA*#fq{Vqbg~130s|+50NBz729PXRu?pz4
z46t|uBS^M^fnfq8*bqhr0Y;E469Y?w1B(CyLj$7%69-5QNTVajsZ9)^<1LsNSr|M(
ziUmACM@R@Us(_SvC@_It3py{vgJlCF=unpi28IR)HjrN!85jgu7&sV&7!(*dKqq`K
zFt9XmI)Gf~zyR`{188s&<XR2}21W%Y2ap$-I29NiK#B!C6hH@lF(@=}st9m`WG6T%
zOk!YZ0(swr!2x9Q1P2gz0wc)$Ng#8f7;@kRlLz=X3`USIK-MvU!m|M!Rt+2sObiMQ
zo(c^NAXx^61_1_8z&3%+2YJUq;Q$B2Bu14cP8J3R6;SXpFbFX!G%+$Xa40ZwfHZ<e
zN*Nd?Feos2s0et1oXzB^018hAg$W#>Xl-y%U~o`@*d^ouibSwEETAxSRAKU9ndGP-
z<e&lyF$M+(aKL~P11Q88m>gKZk);9(b_S4VL1_!*1yG<dfr4m41A_vC2l#Xk2bBg7
zg$4&On^8ePfTaN(whbOEU7+Y-X<!gw0!1`S10xF)2LltM3X_KlgD1lT4+a5G1||*#
z0S*NrMuiEUDw8}J7(7&j99aYySU|DNsUYORBE-nh;HUyJ(*Y7(pm1ga5g^AvXcUqW
z6n8?L3?LUmC0M|*&mh1FI@<(f3n+cEFflMp00jbrkf#b0_$(+P4u(mNDhwP744x{W
zm<8<_1L>N;$Rfa~GRc9Zi9tbt1AKT6149!7%Op=wI%o1=nE*QHMS;l!WE6u3gAj+p
zBu*6}4u%HM*;Wvv6q*=V1Q-<>7+D$^K}JE+3DkiQqdZ_dFfHV%^8W~fq#$T09F+OM
zf{-!sfC+}+5pd9cIe{mKpGaS<X`2w9aKn7jf!FK*A7M}wWMp7uW(MtfgX&@wWDqb^
zGzd^|a7<{J0M-oJK__s}_|o&r_7vgW{~4YgoV|13Dvn!B){4@P-sL6Fzv`|u*=^ot
zsXtGIy+w?Q*k^fN{3>)@WeUfyE$SD$-IXRg%CCt3e}q9xfDtrq&%(sW%*qJfvd1XM
zplB$d;24-#*k~~EgTum&2QNPS7y!1Gk%7@(;DyNX+S65;R&&0sv-A-vY-DDy3RXE5
z+5g3{$o7dY`(wMCa%cK0zn$Oa_*^I{D8Z@p_SU=hHOoa#Ru-tgu>Ndh`=t6s{<gXL
z>Cd@p6Yfo36(fB*b2?Abl2W;X&f{+me9OG*tIvEt=y2R8kB(e*iEp3x%rr`kkiOt(
zl5XM4qq=^>Cp!x@4cidy`NdiKXO1m!$WU0YC&nVgKzPx7U3t0fZHF&DmeBK@o+;d8
zyFxILx4}ccZsW!0%i7|CW}W*myKwen^;N=$JK2^z=C|HBSHInoQA0n-WaopLWYY${
zq6@oa680X*<>GlU<+4HC8GT1V!A~b^+?>4CnbkBsqJAruweMSd%)&n^aznn%<=Xn=
z0<ZcdCaT_VUt`_#Rr!|riW|CJFN~)3K3ebPvscUenwEyS<d2#?Qqqe=Y8F1Pi0zYp
z8)bC!>GySeWK@<}btqXa(A>L6rh6Mhmit80uzRb6pB&#4vFF3L6`xaVT6Z!`ZQtg<
zj*my+<zX)AhmZXQ4E{4rym*BB)Q#>quAR2_53DTHqpw`n5SL%6)gB>jalc_*JC6W6
zchw%L(}(yHrn?9<sZD%;wI)@HFZRsxJ=-lT{+&=il=k`Q_x}t#uAZ)7(5`D<CA;yE
zszv+9;5#elEG@sD=y;-yQ*QVAyxtv3rCxPKRX>Zk=4`lF#1VP*u}QvZ$C0zro4<4Y
z`yu>%ahtvSKgr;{RSXM1H2*l%#bCkEc>SnTz@}>b?+52h|M|JWlE3|d+%6r-?Ti!7
zdrW?)7wH=oSbt|{azlgR+xEBj_b>k|^Wa3)S-zVM9r^e4pH@D6{(ggO-I*<-d%HKS
zj(yHO>(0lJir0@n_pSf9?)cw_txw-*dOX=bbKU7<e&?$G?X`LL>*bQ~J(a)f9k$Gx
z`lq;i$;s^}XNyd<-z_S?eWPo|vAME6%PbfUcgG!l{JDeY`QLR%AD;`%f7*RMl&>(~
z=08Kfeze!gu8aQ}YNqlX?bF>~ynl}KgVIM$%}=cTt(XO~Ol<6oILaJWYrhiqY}%o4
zP=LLG&zdXQL!)mp?~x<SGk9hDJ}USNXtht?`uWDx6B{l+^`5gp^i89Twd>Su$AC3*
zMqeG3H%q16uUXV=mf&smqu{^;^XBBnh}rj8Z2vXB+MO=PoZXzbSRmNhdEK#D#gDaj
zL}?u5a+BX|_w#kR<-yeLR?BX6lziE-qMGT}*Lc2L_S<Lnb#zU;bmCK4)?HOKk0W0T
zA{9CLTLS!B-#ik?lMH?#!*nEfRnscBgApGRntHA7*2GjRzRgz^id%N@?6HIFu??Z!
z(TxYUhA`irs#m4JwReH*bIVurINxnkFJ>@25P0#>?zS8+yU%m(KHgnD<w%f*$+dgz
znyO4Ue1(*2zsa)kT@b33XvuTXpJOIh)ub0K>fe!@e7SVHtas`8kVT2pCz?)O`dNct
z;)dzVPK`zV{He*D8FRamm}Hl+8cui}B|iU`^c&kX58WF7#OQFnIWQ&gQB=?Mw)LT>
zo%~B4^R`?F@r>~Nv_oG)@q&lA<nNdte?FUcwap7)Ry$A;IO`4f>IjMcEGF|^Ifi1A
z%spF;9XE+Hu~$ibZjdQs=sWZG+yRy{3(g=Dxd|b^3s_9bcrKlN;3PZm@}iq%;vWtR
zDBe8hdDuO2;uVLlO{YsgHx~HbJHk@H%kqvfgg?)@@murX=d3dPe+)AHPJCJ>e!5wF
z!_$V!!&=LOI>npsxt)@?Jh}4yibsyuKF|I$^KAd(D`#U9m}XeA?T;xH43qrNaN*zy
zrFrvKN_=h%;GcNShhu%?!R0O*PxNLOx)kIWH)~G`<0@QwH0S-EmYRugZY(iys43Ha
zV0x-pzMaA1+OK6-dxfX$V&?OGqpjI->c_M2$ug}WyThlicKgP3E{tdD<JVFL@01GU
z>pwcbvfE6k)8^c-rW-~ME>9QQ<*O+R-Cty5Hm7aRJjb(7bgqWoV0ZVE?PWQ+(f7Gk
z^go?s#{*mrAEFoE596COA**xa!FT>f4|vOdocd$`T_<>N>23uJiQasH!dIK;#_rge
zrNObD_2+@PtQQX#F_lF*uodk|{+({RFzvp0kIdiw3;!HnCL`;q9QCAk+TO&4s}&z6
z-uvFD`|T^M%a*t+c?|32H4QdBkn(>QuYE4)uWX1(;mkX}lNUVE(4BsH&a5}3&C}vs
zOZiL|259~~6tH+r=i<Be^A^P?I?h{g!II6ve%oh<pLP3fu2!)!=%1ebp^aywueIz<
zY2!U#tmeHEVt+Ryp)f_$O#SBR$3dUgR>-<rloX{H??1dgW0u}Cr?!b7w3dn%s{Vdo
z?33_#!~6YzZCAvwWIf)b`t(fr^EYY5pS#^ZtUD*Mr6zd2UeOoX*X(RDg;zOVACoh_
z*?j&*z3|K1+drEh-2Q%}%9j5O``OC4_%l0~z2o@L(E6=l=J8#R-b_+6U$;Ls-SxO^
zocx*y<=MX&LJl`@3Heu_>R!HalJkZj1ACtxE6ty8{65biV@g4`)?LM`T0a)w{HXIY
zME~j0wan4nA~t+S+q4%)tl!ruGq<^iv7Li8*lcz5$Nr#Yd!GtLns@x*oqc}amY3%k
zV+^||OPijHDXl1ev_I8O?L+^biQo1%7D+BsHT!o{>Umv3X4M<-<5tHmo=D&RconN{
zLgWbxQ8{Z7@1_mcL&XK({7w8EANin!$0+PU+)8D;3+J;VzIvQ9Ds58R@v3oNZDM?U
zM0?+J8QXo@OFoI-JTk+i{dz-VMkTLt(YEi##~+<*w>Xm?$m`dW;eE`R!B5uZlc#F(
zgvlmR4vr@z3Q7!Z1sgh=G&HZBnS9}LX;E{=9AV|l{*we(F!PqGnuH5T6b8n#7CKkY
z5%ASfo@aD_&6>-KDMAxJcX6LT?w5H^Z-3l^y+2z69y1o@N9ZXnEV4c{E$nBXz4)TE
zC0)XvPh|fYUhecb+@a)j(QLc<x4&C1FkHx4FU)79d(WuYBKR!7g#J=C-Fdpn{nLW_
zn9eY2n6w=)OIJSo;u2>8gLI+FiWz~7!4tPWZ2RfB>GpZ?)4o0vKIn&E_-(JC-qf1S
zv}<!^clHDp^EDmETXgv*C`m2b-5+dvQR#WUw08A}#Lp&4tn(Fw{^c<&W^UkT4_I@O
zQ|W@{!&#^Qm@R86adns6wMQ;R@Qevt^U8|q!b@pS<}A1qa!f?$<i^ZH{t;Z|46UKt
zT0@^!E#_abO!0tkA5%id?d26+&rI)@RbJcn=Yg+GiT1mLo~G3|#U|a_SNvhoz719m
zmjc)xv~*-JG?YkuIV&jerO#~s!pMlDIk^GcYc`j%YpmS$ZNo*Yxi7f#v^b0(9&C|0
zqrk90f%oB&Z1)R7><lvN1E0PA;iUfkw7JXl%}FmT=BzpHCGbmk#<$4SJ3A6R*ICU=
zTG64jMEYgq%cDk}UqdIg>N<7!CN?cj`?_}b^bhqvn$Ev$+`{b0v{SqCaNpUIMKg|9
z@<+ZdlV@U3$%vJCbRhr5(weyqp2;$c4E}B?oaDATIA-0^8QbouY>0d~<xS)~P3Ou*
zH<hceCmq~XU|r*!Y3_ISxV+_-rCkOKx9*y$`2B{#o4LGKKI}H%v-Gp1-_=)-ejl)~
z+il<Q{X~7;LGS)Qh5;XM?&f2gJBPcu`NzJa3m+xieP%mBvcR|MKSNzy)nq*(%a_jL
zj$fOrY|=m3Z8ZD)uVu>*0}H#|+WsFaR&2hX>}L6&VOpJk>ZiYHR`cY}Rh<2+{_}6s
zqI7-3=j++;S;sNk*UTw14DPApU-Pue#$u}ck#nzK%iN#$m!183s?tLasovn#k9lv)
z$Os;~vFpQK_2BxMn;GP_O|Mii>(4s6-@9Ds@1D{dpBXs?I|btyG!K~zeBK+o<Flhj
zW&9NL>2p|=ueR739J#G?)2Tac%GJyL?>l`@Wyf0V`|$psxx&I3+^3b*?${)opXFXC
zerC^?oa+{^`dhwg316Sxc}i?z=z4~ONp2Z-oOKT`K9-%}q2yKSquoF4d*P?`O|z0F
zo~g5v`8MTP^d!ZY>7VWQvFmlQZ?t^1C4TwaR{r}*YCmObA8FoPVEc`?|7VG3^Q<7o
zt4Gf$Rf$jadAQYL_p(B{YH9hbf8MqhCUVV8vA-CrSuHA_d~JNE(2{#Lr=wzVj3A%9
zE!*+OBENkuvFw@58@@C*^EJDE$LgBwJ<C>2sBxb7`Rh^n_rH#IOKGI6*z=#^`jY1N
zf`w8On5}H|AD<IF!?pPP;hmaiPeyf_7M~W^p8a5o3~T70y>Z0~(*ip;9%y+}ePx4w
z#*&&u(~e>b=D$A=w7kx`{8mZ*&7=F9kBBT<ed^KU70uHf=UBR)G%4M7lJkm#XiWZ3
z?NYnw4fovn-(TXlFq?9rQES%))7P3eZG~QYYoFWDKKp{p!880T4zy()UbXa=yq_J<
zH3!Du>@LgPlDB=B+B?rjVpXP+<ND-AACm@)rQz#-W^ZFmc0T)DB=qYe(<YgUN!JcO
zKPJ0d=V!36+nvbQ`kMt0X!HwAoK|^!f#)u-^BgwPAA3&s^$VZV3S?Z+Wyk*Jeviu%
zZ=H}2A=+H6r`PNaacZ8zyPmOSr`D<fb)|GmV;#M%%~Q?S7)^8db>P0RY{PV)XCLk6
zaMvwTd|D~ru5+?QvvXCk@#%xpLb7va*@QBEdak=lA+7zW)5kq*kK8(@xL<eD7MqzR
zB&PA6>#$*R?CgwR2g+?*->6nhdtk3sznR_3@tB%G=nrPIQpw*p<IgK3t}@#eC-^Mw
zT>?h|<JFJvb(a1-8xs|==Fhw$i=t~SoA>s9+#~ZQM>Dl}?dxM7X2c{N6*TF0QBbPV
zWBT-Y@ioC5)lW>1>kJP?G*2++eD<-gnW3Q~o&Ubu(t?Acp%08M&%E;E;?nPjXU*Nx
zT;}+w(<^3`)<!G0Yg3kYPx({Uq|bK8+qa2H$24eO!A8SVFPd`|qRd4$ZcsCSzWVM%
z<3G0#D19_i&FpPqvRQiArCVCemrHK1#DoJIt~y9m*+m^^+WLO2qEN--1yd};RJpdg
z7wEAc^b=&ypY-F`lh}M_`zKDqQ(4|hcTHFs7x=YpzNKN>M~(e4dP~1HWpOSSTW%L5
zA-Q2@Cu_&wsgHSHOm8TwZIbVsb!VEbYPGS)mKkrdb$*&U%rRZ2@Sh>1e~wFYb)TYu
z+zF;_4mP(hE#o)uOkuTT3YMSsg5`(1zrnZ1W`z#jvuZfEoC>#Wh-X-7)*mr%p22Pw
z4TFFcy#<!_Ym#FO+y%1c^Mr4Y&2~MIe)8%)|BN+N3W6;kj}`VZB?-0#^Bz^0^SCb}
zR&dd^pM1W_S^wfbYA>)*G3;M15Y>1x@U-2g`4zdE3-^kei|cPIY5a0m@A9<h46BOd
zfaWTH9k!MOc7gNlgpXP1eZ8%-SyqbSLqeIh@uXk#dl-4V)b~Vg{B0;c<=2TT50@W)
z&)-`Y*OGg)<B;RppyNE^4#E#C3^>K4?2LO})EFP-V}AR!Ch7AWR=;l9j$f;?4qfzV
zYIz}G>ob#gOH-faCb?Y}@$2{4C^E1!9&Bv(d~jky(Jr+Q3UV7Yc1+y-@=#gO^uzB}
zMRi2>Jn;$pS*3SeSmj~M;grCn48{dN4jeGykaB*k$idD~cwvY0a+##_@f^25JqU82
zlv`K$!ehlP8S%YIa&gunmg!mTItS&XZ){jEp%l10SI*k);oIf=Zfu%<y@2tTlt-p@
z+o$F=7S^g4w#L{VDN30BexuHh2`?AFub8;7YnokX+|iKNW^DcMJ46iEaQ$O=^Pk~i
z=d~xI0S*@~-aIVl#TW87Cg}a9XB#<XTscio^HkkEYthSkXllIbLFSErvl8BWStWlv
zC^G9W^PlrP7IwRZ+<&h5{{6-V-s{`rviYo~r@x)jdjGd<AIE07svot_^{=O?8m`@L
z;5PHPzr^Hc?ca`1UlhZ6+xin9-=+^U)_*KNT>gGlfw=V%<pQ0JRxB?!&Uu#8pDL&=
zqx|RYukHYOOUGsNC9~6PmG5atU)}M}v-~2{PX0OfA1qTnS$TA3Zd}nSYZLj1Prv^%
z)}3Z<e!ckE&LbU0XFph7JlL7ZuN~fc*#DfP<$XVcsW&R8H@9ueWu7SzD5A1{BFFum
zMT<U_>amO8^Iq4z%|)pDtG^A)_6=4KxSy+)1_}RCkY<1XHnQ=`Ed8_g^Ohg;7ht$4
z*uR-wZ{7LI-6hU*{Avoy88_O_m=hbcX7Q<gMeQ%v8J90wQ4#1e@kqj&B~sG_Y#y2{
zmp+p0`{u`?<;PtfGaOTU!H_2yXY3)RAfl)o_+>|Cb=xF8h6(FhJ%1iOAyG2>{CyU=
zn0rnyk35#;Ki+r3+9-Q<$c21S&FeP|^L98b-0sc#=&f>=!}EkWwMwPkwMN42Gc&vm
z)*TUfeD3L0hd&QE!VX?%vvaAp^_}6##iGu@zGYA9l|x;5$NJaXRj8QQ-PzV<v;6Uj
z6SG_A++Pr*s4Dn!MyZhz`{|>?ALo2w3i_JBf9k=fy-!5gQ)l#b?DY`cYc5x%aW2f`
zz~2vgf(@s{YLwegeY>rDF5=9CwN;L$>++l=l&sj!PJ8^+xae%x$MVOb`)e-;y*YmJ
zpOyd28KOKKYj&E&KJx#U;5J$Fy@+A&o}}ad6510d>scM0JN4I*p7L3CM&hr{y!SlW
zXZ!TW4DL084^N*xVe^P*`D2DnPj_q<Ha~t&xw9*xc*>EY^m{5?ed_0UYLaCF@)z#9
zIQv>~+z0guR!dE<H~U_=J!w_tb?f7&n5<eQN`+p}eRwO!@TiOL2Hod6r?x3F-CCtJ
zC&ts_(OizDTf)2N^n{$gBKm52CQntGw+E-<w$|Mz{XHE1EI2r4P7DLvfubBKhOp$y
zPt%l^nr@r3aE|GVf78=eh{fwBo!m5aiQl}eH%7DAi?)jftXSngC&Sn0+C;s_C9`dl
zGQ4DznoHVpUL1SqmGgz^aOnr*s>}sX<2LkfTvzz7ySLM%ZNr*bN7{InTD@6g-gY<j
zPW(k_W9OOKYr>Xz+>j_+Is33<oC-_Rt%}2ppUyc1#V!n)Z?XMmc#yTV-1l>#fA4ni
zRvnxBn)!oNT#KWNxJ$&Ny_?TQ39NKH-y`L=OjASrsnlftpx;5eTUf6-{YmKF_tjy_
z-G|FBcI{?j7vIFYdS!F?371t44%x}GrwCr^P}w>)RQ(+PZNq!B7u~MOSKqMW1KaF9
zr7x1EtP$%<dt!5YpHb;Uq5lj*6V`RfeNI*RApUfk?7UCh*Ees_+ILyF>VTj1e}-t@
zq`A5m`?UDjmb-Q`X&ct{nA{6=&fMZznCfA%X;N5&w&n4MVm2*nvly=3@yQk|*7-0c
zfnntw`PkhX#Scwz4%&Uyt~jaXRQ9pk(u+HfDa~BfWXQSFK>o^)=?pw9Z;tUl5mAs}
zyBZp^GrH#8C$<NUcZ$<4h_>)ZPN*<?thT^&XG?$UyL-Azj(y8<@VaW=AD){YaCe`8
zK4aS^t-M05xz@s$r`@}$d9}ZTBiCThDT{7T3x&0JPu$aDy122sW_^Us+MX_{Yr$??
z^3|qp;%dARutn$8iXiR+$B66vYC`#OJFW$^vgW<h*?z)tO_}@557+$K^gdi$dFX}X
z8eWx2mm6GuvbRfJagO@Wz$E@e)3m*_a2@M~FM97j`u<#M%zYy~`x>w3MN8S~^K7ys
zg1)HSp5rE7(q_7M%I`Q{n?02~6N66{rUyL?U0Wb%S-VTx%(QIZh9@0!uHDLN+Odbt
zRco%07{`Hn9i>~%97V1zwZ=1}9|WvXWZAa$VC*8h>^GI6w{0Z8Zt3mYl6{|jvDWhx
z!4t;jZ22Z>k5#8C<tUbYo)`0E^|M7g<nlf$yvPu36?^vSYp1`%@k>l+*qx({mdz5`
zqhCAo(2Ca?Mb*Jio}|58t|^(g>B`r6!moL!ai`gFF6P>l5_P1+Gr{R}oAC7)MfWY{
z)_!fB%v9hv&uaHezR8N0dv^ZarS4I(<NXqA-@@yClj?fDocr$kudh9K=J_w*_(ZY-
zxN>Te7S6O24RSD#*)vyo>FI59?rh&~q+UO?T=v5HJ(g_Kdf#j)3U%aTJNj+jheQwA
zJ&Ky25>$RSZ1g(vsVH&jr%aEAhiM1DUtF{!EVMw#Ac;{_rt!IRWAKCeJ1oBrIcz%=
zXc69CRq*iZ)y)4478-lDU7pSmWpZ*G7rW;}YrdkClatka<}crK#Pm$Xgqlf(Cg%A&
za_5;pn&Gjb@$t*bDECck7Qbh{_{+k<U&&r>qsQ8tF5b=y!mqa!Ow0;2Q{T5d;q>bN
z44fx^_}p1wxYmB#o}yPiQRNMP8!oB1917s?OIi8Ce(qz@4eQSEIX4BHm1VuCs0)_U
zWtO-78`|Fe?tw!|vdyf#>dVI!Y|faJ1!UT&uFaD(ZCi5am%WSj$A^j&wKRUbD*h|f
zF-dl|sO<j7Og@^di$q(J54SeWTiem=bNTY#W0&(E@!Vef)s#OXWS-5{vO=9dN!#u#
z=APBPf3bPP<MtM5_M}92C#FyaW)9N>W%g0N=6}>%I-cBC(|TCy5dN60^KFks&^-QT
zi!T}$(~`69wW&RS!fLeR#Q6#_k1TetI|T)HpE$29F!hQ3t)MDlGLJ9q!^?uDj7Ku(
zo%kuNG{K|k#Q}+oAAHO0mxzC1irM5^DsQPY)iWvQ$cLvnpM7sk4gbrZBI<ZLL|xwT
zwa&BD?^mP~!s>3WKfUMLrG4RHAMUJS`KEU2k?*8*xkJgm)t#HAGY+kp=<nY1c+VF{
z7w<{3Z>`lfX9<=*<e2<VPo}ga-1X@ELz5cV3=MA`N)Br~79U>0<#UvIqr6hOtzW&z
z<JHG=gB6$cg=+;@@_spCdT{Z|gy%<FZEpSGUGO^ex(4t2H5)2YZFUz#)SEX(AE<gY
zr~U8K7`2JNQ^F*ti_e?pt$pH*YJE@P^Y!2Qe;m~{Nr+*MS72@_tC=a$byf26jt}x8
z9}ga7b-4IbZn^!E!mAID`ki{Z)@s6}yJv)_hn?V8(s+1zMY)0;^R;5j%pDAIes*zd
z8jgPMW>ppvteYTn=)o<q@8SzC%=-4YAn8PldqmZNjG1n8zGjt+oX|Y9YxXrB&9lc=
z@p_n5$Qepq37!?(_HJ|YlE>{fty~q^(z9o<iuegfFztTG=eT;m?3BGdy!$Q&v3z^P
zzArBJ*eO5Tq>_tny!Hxje73I7$q(pvlJ5gM^6|Dy9hL>NTmpCbXstew@vvmK){YNT
z1tb1^*?i`tM5Nc9UkCO&Fou7e(|B}y@oT0R0(y6(f)}_lcYM&^ez0Boe&(dxa?PAu
zpY!dnv0-^=^SF^+>tm10U#<slmpqZ35q|L6cDs#ItzOD?8!|6^6+g9%E5J`rjisog
zjjQ%yFtbo>Xw{s56OV`Y9bCp1{+N+XIPv>2jp)nFXRpqgw$V_QBf%vnXwJTfs*{d=
zR|Pqe*h0$AHx{ft_M`Xkg7*tDE@>}}+HWZ|?ErJ58fW%_8T}lhf8By3O&N~6b#$`_
z-aGET$3Qg2@sU^bG?n7Ve-&Hn&V~BqO$uy1xRkTyrOfX*L9rd_Cigh)Iu5Pv4T{Ul
z+j_0+-7bLzXV1*KyfE{}LX8}OV|khvj~T3d;&X?=ve4VHx#sFU>sg0icr7YfsPb`2
z&e811s|>x)<&4kdEn{c%Exq?AHM++oDfY{R<ENKg{<h@O?I~(9Q3AQMtZq-{+i7ay
zrF8Gp=7`xR{xg&bwP@VVUb9%sMm5suwpQf%;Q5y<UVXfwm@U>YuU|s^2#a%4@n*{(
zXC2pu-1B|pVaKm@`LnN0>Z7@80<N-KB+}0pCTKD?&5^EB$X7{Y>S*b5j_?$9nBlV_
zW5;5*&h~||+bd7L@6=OKNouHhpj-W*gYgC5{K}%`2YuhwNJ=qHeqAoYyVhcd@nVBp
zKV6+=SXO@WUdi-H>bj`*F{{;6ZC34Ivq{_$%M!(Q#k^_H^Q&Cp&#OQ8JBkM}2c0!8
zlnG3g6WU)o=gH>B3tb=aombO56!A#o+U}IVXV=!<x?|HgPoRS(*h6_vee-K31x5x>
x&pjWzY!@#mxR8HNCV%1imolXl|0dNt75{RVt(&&lBYIu@e+Gf)U+n+i1OOF3km&#b

literal 0
HcmV?d00001

diff --git a/examples/X-extras/9999/README.txt b/examples/X-extras/9999/README.txt
new file mode 100644
index 0000000..6d1c5df
--- /dev/null
+++ b/examples/X-extras/9999/README.txt
@@ -0,0 +1,3 @@
+simple canvas example: draw in JS, calculate in Lisp
+
+see also: https://en.wikipedia.org/wiki/Cistercian_numerals
diff --git a/examples/X-extras/9999/lisp/main.lisp b/examples/X-extras/9999/lisp/main.lisp
new file mode 100644
index 0000000..72211d7
--- /dev/null
+++ b/examples/X-extras/9999/lisp/main.lisp
@@ -0,0 +1,54 @@
+;;;
+;;;    1
+;;; -------
+;;; 5 \ / |
+;;;    X  | 2
+;;; 4 / \ |
+;;; -------
+;;;    3
+
+(in-package :eql-user)
+
+(use-package :qml)
+
+(defvar *number* 0)
+(defvar *canvas* "canvas")
+
+(defun draw-line (x1 y1 x2 y2)
+  (js *canvas* "drawLine(~D, ~D, ~D, ~D)"
+      x1 y1 x2 y2))
+
+(defun draw-number (number)
+  (setf *number* number)
+  (q! |requestPaint| *canvas*))
+
+(defun paint ()
+  (draw-line 0 -150 0 150)
+  (let ((dy -50)
+        (dig 1))
+    (labels ((line (x1 y1 x2 y2)
+               (when (find dig '(2 4))
+                 (setf x1 (- x1)
+                       x2 (- x2)))
+               (when (>= dig 3)
+                 (setf y1 (- y1)
+                       y2 (- y2)
+                       dy 50))
+               (draw-line (* 100 x1) (+ dy (* 100 y1))
+                          (* 100 x2) (+ dy (* 100 y2))))
+             (draw (n)
+               (case n
+                 (1 (line 0 -1  1 -1))
+                 (2 (line 0  0  1  0))
+                 (3 (line 0 -1  1  0))
+                 (4 (line 0  0  1 -1))
+                 (5 (draw 1) (draw 4))
+                 (6 (line 1 -1  1  0))
+                 (7 (draw 1) (draw 6))
+                 (8 (draw 2) (draw 6))
+                 (9 (draw 1) (draw 8)))))
+      (let ((num *number*))
+        (x:while (plusp num)
+          (draw (mod num 10))
+          (setf num (floor (/ num 10)))
+          (incf dig))))))
diff --git a/examples/X-extras/9999/lisp/qml-lisp.lisp b/examples/X-extras/9999/lisp/qml-lisp.lisp
new file mode 100644
index 0000000..58c1e29
--- /dev/null
+++ b/examples/X-extras/9999/lisp/qml-lisp.lisp
@@ -0,0 +1,233 @@
+;;;
+;;; * enables QML to call Lisp functions
+;;; * allows to get/set any QML property from Lisp (needs 'objectName' to be set)
+;;; * allows to call QML methods from Lisp (needs 'objectName' to be set)
+;;; * allows to evaluate JS code from Lisp (needs 'objectName' to be set)
+;;;
+
+(defpackage :qml-lisp
+  (:use :common-lisp :eql)
+  (:nicknames :qml)
+  (:export
+   #:*quick-view*
+   #:*caller*
+   #:children
+   #:file-to-url
+   #:find-quick-item
+   #:ini-quick-view
+   #:js
+   #:js-arg
+   #:qml-call
+   #:qml-get
+   #:qml-set
+   #:qml-set-all
+   #:q!
+   #:q<
+   #:q>
+   #:q>*
+   #:paint
+   #:scale
+   #:reload
+   #:root-context
+   #:root-item))
+
+(provide :qml-lisp)
+
+(in-package :qml-lisp)
+
+(defvar *quick-view* nil)
+(defvar *caller*     nil)
+
+(defun string-to-symbol (name)
+  (let ((upper (string-upcase name))
+        (p (position #\: name)))
+    (if p
+        (find-symbol (subseq upper (1+ (position #\: name :from-end t)))
+                     (subseq upper 0 p))
+        (find-symbol upper))))
+
+;;; function calls from QML
+
+(defun print-js-readably (object)
+  "Prints (nested) lists, vectors, T, NIL, floats in JS notation, which will be passed to JS 'eval()'."
+  (if (and (not (stringp object))
+           (vectorp object))
+      (print-js-readably (coerce object 'list))
+      (typecase object
+        (cons
+         (write-char #\[)
+         (do ((list object (rest list)))
+             ((null list) (write-char #\]))
+           (print-js-readably (first list))
+           (when (rest list)
+             (write-char #\,))))
+        (float
+         ;; cut off Lisp specific notations
+         (princ (string-right-trim "dl0" (princ-to-string object))))
+        (t
+         (cond ((eql 't object)
+                (princ "true"))
+               ((eql 'nil object)
+                (princ "false"))
+               (t
+                (prin1 object)))))))
+
+(defun print-to-js-string (object)
+  (with-output-to-string (*standard-output*)
+    (princ "#<>") ; mark for passing to JS "eval()"
+    (print-js-readably object)))
+
+(defun qml-apply (caller function arguments)
+  "Every 'Lisp.call()' or 'Lisp.apply()' function call in QML will call this function. The variable *CALLER* will be bound to the calling QQuickItem, if passed with 'this' as first argument to 'Lisp.call()' / 'Lisp.apply()'."
+  (let* ((*caller* (if (qnull caller) *caller* (qt-object-? caller)))
+         (object (apply (string-to-symbol function)
+                        arguments)))
+    (if (stringp object)
+        object
+        (print-to-js-string object))))
+
+;;; utils
+
+(defun root-item ()
+  (when *quick-view*
+    (qrun* (if (= (qt-object-id *quick-view*) (qid "QQmlApplicationEngine"))
+               (let ((object (first (|rootObjects| *quick-view*))))
+                 (setf (qt-object-id object) (qid "QObject")) ; unknown to EQL, so resort to QObject
+                 object)
+               (qt-object-? (|rootObject| *quick-view*))))))
+
+(defun root-context ()
+  (when *quick-view*
+    (|rootContext| *quick-view*)))
+
+(defun find-quick-item (object-name)
+  "Finds the first QQuickItem matching OBJECT-NAME."
+  (let ((root (root-item)))
+    (unless (qnull root)
+      (if (string= (|objectName| root) object-name)
+          (root-item)
+          (qt-object-? (qfind-child root object-name))))))
+
+(defun quick-item (item/name)
+  (cond ((stringp item/name)
+         (find-quick-item item/name))
+        ((qt-object-p item/name)
+         item/name)
+        ((not item/name)
+         (root-item))))
+
+(defun children (item/name)
+  "Like QML function 'children'."
+  (qrun* (mapcar 'qt-object-? (|childItems| (quick-item item/name)))))
+
+(defun scale ()
+  "Returns the scale factor used on high dpi scaled devices (e.g. phones)."
+  (|effectiveDevicePixelRatio| *quick-view*))
+
+(defun reload ()
+  "Force reloading of QML file after changes made to it."
+  (|clearComponentCache| (|engine| *quick-view*))
+  (|setSource| *quick-view* (|source| *quick-view*)))
+
+(defun file-to-url (file)
+  "Convert FILE to a QUrl, distinguishing between development and release version."
+  #+release
+  (qnew "QUrl(QString)" (x:cc "qrc:/" file)) ; see "Qt Resource System"
+  #-release
+  (|fromLocalFile.QUrl| file))
+
+;;; call QML methods
+
+(defun qml-call (item/name method-name &rest arguments)
+  ;; QFUN+ comes in handy here
+  (qrun* (apply 'qfun+ (quick-item item/name) method-name arguments)))
+
+;;; get/set QQmlProperty
+
+(defun qml-get (item/name property-name)
+  "Gets QQmlProperty of either ITEM or first object matching NAME."
+  (qrun* (qlet ((property "QQmlProperty(QObject*,QString)"
+                          (quick-item item/name)
+                          property-name))
+           (if (|isValid| property)
+               (qlet ((variant (|read| property)))
+                 (values (qvariant-value variant)
+                         t))
+               (eql::%error-msg "QML-GET" (list item/name property-name))))))
+
+(defun qml-set (item/name property-name value &optional update)
+  "Sets QQmlProperty of either ITEM, or first object matching NAME. Returns T on success. If UPDATE is not NIL and ITEM is a QQuickPaintedItem, |update| will be called on it."
+  (qrun* (let ((item (quick-item item/name)))
+           (qlet ((property "QQmlProperty(QObject*,QString)" item property-name))
+             (if (|isValid| property)
+                 (let ((type-name (|propertyTypeName| property)))
+                   (qlet ((variant (qvariant-from-value value (if (find #\: type-name) "int" type-name))))
+                     (prog1
+                         (|write| property variant)
+                       (when (and update (= (qt-object-id item) (qid "QQuickPaintedItem")))
+                         (|update| item)))))
+                 (eql::%error-msg "QML-SET" (list item/name property-name value)))))))
+
+(defun qml-set-all (name property-name value &optional update)
+  "Sets QQmlProperty of all objects matching NAME."
+  (assert (stringp name))
+  (qrun* (dolist (item (qfind-children (root-item) name))
+           (qml-set item property-name value update))))
+
+(defmacro q! (method-name item/name &rest arguments)
+  "Convenience macro for QML-CALL. Use symbol instead of string name."
+  `(qml-call ,item/name ,(symbol-name method-name) ,@arguments))
+
+(defmacro q> (property-name item/name value &optional update)
+  "Convenience macro for QML-SET. Use symbol instead of string name."
+  `(qml-set ,item/name ,(symbol-name property-name) ,value ,update))
+
+(defmacro q< (property-name item/name)
+  "Convenience macro for QML-GET. Use symbol instead of string name."
+  `(qml-get ,item/name ,(symbol-name property-name)))
+
+(defmacro q>* (property-name item/name value &optional update)
+  "Convenience macro for QML-SET-ALL. Use symbol instead of string name."
+  `(qml-set-all ,item/name ,(symbol-name property-name) ,value ,update))
+
+;;; JS
+
+(defun js (item/name js-format-string &rest arguments)
+  "Evaluates a JS string, with 'this' bound to either ITEM, or first object matching NAME. Arguments are passed through FORMAT."
+  (qrun* (qlet ((qml-exp "QQmlExpression(QQmlContext*,QObject*,QString)"
+                         (root-context)
+                         (quick-item item/name)
+                         (apply 'format nil js-format-string arguments))
+                (variant (|evaluate| qml-exp)))
+           (qvariant-value variant))))
+
+(defun js-arg (object)
+  "To be used for arguments in function JS."
+  (with-output-to-string (*standard-output*)
+    (print-js-readably object)))
+
+;;; ini
+
+(defun ini-quick-view (file)
+  (setf *quick-view* (qnew "QQuickView"))
+  ;; special settings for mobile, taken from Qt example
+  (let ((env (ext:getenv "QT_QUICK_CORE_PROFILE")))
+    (when (and (stringp env)
+               (not (zerop (parse-integer env :junk-allowed t))))
+      (let ((f (|format| *quick-view*)))
+        (|setProfile| f |QSurfaceFormat.CoreProfile|)
+        (|setVersion| f 4 4)
+        (|setFormat| *quick-view* f))))
+  (qconnect (|engine| *quick-view*) "quit()" (qapp) "quit()")
+  (qnew "QQmlFileSelector(QQmlEngine*,QObject*)" (|engine| *quick-view*) *quick-view*)
+  (|setSource| *quick-view* (file-to-url file))
+  (when (= |QQuickView.Error| (|status| *quick-view*))
+    ;; display eventual QML errors
+    (qmsg (x:join (mapcar '|toString| (|errors| *quick-view*))
+                  #.(make-string 2 :initial-element #\Newline))))
+  (|setResizeMode| *quick-view* |QQuickView.SizeRootObjectToView|)
+  (let ((platform (|platformName.QGuiApplication|)))
+    (if (find platform '("qnx" "eglfs") :test 'string=)
+        (|showFullScreen| *quick-view*)
+        (|show| *quick-view*))))
+
diff --git a/examples/X-extras/9999/qml/main.qml b/examples/X-extras/9999/qml/main.qml
new file mode 100644
index 0000000..53f0882
--- /dev/null
+++ b/examples/X-extras/9999/qml/main.qml
@@ -0,0 +1,49 @@
+import QtQuick 2.10
+import QtQuick.Controls 2.10
+import EQL5 1.0
+
+Rectangle {
+    width: 220
+    height: 320 + input.height
+    color: "lavender"
+
+    Canvas {
+        id: canvas
+        objectName: "canvas"
+        width: 220
+        height: 320
+
+        property var painter
+        
+        function drawLine(x1, y1, x2, y2) {
+          painter.moveTo(x1, y1)
+          painter.lineTo(x2, y2)
+        }
+
+        onPaint: {
+          var ctx = getContext("2d")
+          painter = ctx
+          ctx.reset()
+          ctx.strokeStyle = "blue"
+          ctx.lineWidth = 10
+          ctx.translate(110, 160)
+            
+          Lisp.call("eql-user:paint")
+            
+          ctx.stroke()
+        }
+    }
+
+    TextField {
+        id: input
+        objectName: "input"
+        width: parent.width
+        anchors.bottom: parent.bottom
+        horizontalAlignment: Qt.AlignHCenter
+        maximumLength: 4
+        text: "0000"
+        inputMask: "9999"
+
+        onTextChanged: Lisp.call("eql-user:draw-number", Number(text))
+    }
+}
diff --git a/examples/X-extras/9999/run.lisp b/examples/X-extras/9999/run.lisp
new file mode 100644
index 0000000..52a39a2
--- /dev/null
+++ b/examples/X-extras/9999/run.lisp
@@ -0,0 +1,15 @@
+(in-package :eql-user)
+
+(si::trap-fpe t nil)
+
+(qrequire :quick)
+
+(load "lisp/qml-lisp")
+(load "lisp/main")
+
+(use-package :qml)
+
+(progn
+  (ini-quick-view "qml/main.qml")
+  (|setPosition| *quick-view* '(50 50)))
+