From 6cc16c21bbbd8971062727af4247fe32cd08fe47 Mon Sep 17 00:00:00 2001 From: rmkaplan Date: Mon, 1 Sep 2025 12:18:01 -0700 Subject: [PATCH 1/3] Move PRESS and PRESSFROMNS to obsolete --- {library => obsolete/library}/PRESS | 0 {library => obsolete/library}/PRESS.LCOM | Bin {library => obsolete/library}/Press.tedit | Bin {lispusers => obsolete/lispusers}/PRESSFROMNS | 0 {lispusers => obsolete/lispusers}/PRESSFROMNS.TEDIT | Bin 5 files changed, 0 insertions(+), 0 deletions(-) rename {library => obsolete/library}/PRESS (100%) rename {library => obsolete/library}/PRESS.LCOM (100%) rename {library => obsolete/library}/Press.tedit (100%) rename {lispusers => obsolete/lispusers}/PRESSFROMNS (100%) rename {lispusers => obsolete/lispusers}/PRESSFROMNS.TEDIT (100%) diff --git a/library/PRESS b/obsolete/library/PRESS similarity index 100% rename from library/PRESS rename to obsolete/library/PRESS diff --git a/library/PRESS.LCOM b/obsolete/library/PRESS.LCOM similarity index 100% rename from library/PRESS.LCOM rename to obsolete/library/PRESS.LCOM diff --git a/library/Press.tedit b/obsolete/library/Press.tedit similarity index 100% rename from library/Press.tedit rename to obsolete/library/Press.tedit diff --git a/lispusers/PRESSFROMNS b/obsolete/lispusers/PRESSFROMNS similarity index 100% rename from lispusers/PRESSFROMNS rename to obsolete/lispusers/PRESSFROMNS diff --git a/lispusers/PRESSFROMNS.TEDIT b/obsolete/lispusers/PRESSFROMNS.TEDIT similarity index 100% rename from lispusers/PRESSFROMNS.TEDIT rename to obsolete/lispusers/PRESSFROMNS.TEDIT From fe4ddf3a5692d54842931248e9318936f5ed0145 Mon Sep 17 00:00:00 2001 From: rmkaplan Date: Mon, 1 Sep 2025 12:20:48 -0700 Subject: [PATCH 2/3] Remove PRESS from the loadup Also moves MULTI-ALIST forward to the beginning of LOADUP-LISP --- internal/loadups/LOADUP-FULL | 26 +++++++++++++++----------- internal/loadups/LOADUP-FULL.LCOM | Bin 3079 -> 3030 bytes internal/loadups/LOADUP-LISP | 11 +++++++---- internal/loadups/LOADUP-LISP.LCOM | Bin 3553 -> 3594 bytes 4 files changed, 22 insertions(+), 15 deletions(-) diff --git a/internal/loadups/LOADUP-FULL b/internal/loadups/LOADUP-FULL index 9d7c67a51..ed1583f58 100644 --- a/internal/loadups/LOADUP-FULL +++ b/internal/loadups/LOADUP-FULL @@ -1,12 +1,12 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "13-Jul-2025 11:41:03" {WMEDLEY}loadups>LOADUP-FULL.;28 5184 +(FILECREATED " 1-Sep-2025 11:59:41" {WMEDLEY}loadups>LOADUP-FULL.;31 5430 :EDIT-BY rmk - :CHANGES-TO (FNS LOADFULLFONTS) + :CHANGES-TO (FNS LOADUP-FULL) - :PREVIOUS-DATE "30-Jun-2025 00:04:34" {WMEDLEY}loadups>LOADUP-FULL.;27) + :PREVIOUS-DATE "18-Aug-2025 12:09:49" {WMEDLEY}loadups>LOADUP-FULL.;29) (PRETTYCOMPRINT LOADUP-FULLCOMS) @@ -45,7 +45,9 @@ (PRINTOUT T "FULL fonts loaded" T]) (LOADUP-FULL - [LAMBDA (DRIBBLEFILE) (* ; "Edited 21-Jun-2025 23:33 by rmk") + [LAMBDA (DRIBBLEFILE) (* ; "Edited 1-Sep-2025 11:59 by rmk") + (* ; "Edited 18-Aug-2025 12:09 by rmk") + (* ; "Edited 21-Jun-2025 23:33 by rmk") (* ; "Edited 18-Jan-2023 16:22 by FGH") (* ; "Edited 12-Aug-2022 11:17 by lmm") (* ; "Edited 14-Jul-2022 12:32 by rmk") @@ -70,16 +72,18 @@ (PRINTOUT T T "Full loadup started at " (DATE) " while connected to " (DIRECTORYNAME T) - T T) - (LOADUP '(MULTI-ALIST)) (* ; "For FONTSAVAILABLE lookup") + T T) (* ; "For FONTSAVAILABLE lookup") (LOADUP '(POSTSCRIPTSTREAM)) (* ; " to get PSCFONT.READFONT") (LOADFULLFONTS) (LISTPUT IDLE.PROFILE 'TIMEOUT 0) (SETQQ *DEFAULT-CLEANUP-COMPILER* BCOMPL) - (LOADUP '(CHAT PRESS INTERPRESS TEDIT HRULE TEDIT-CHAT READNUMBER EDITBITMAP FILEBROWSER - THINFILES GRAPHER SPY WHERE-IS COPYFILES MSANALYZE MSPARSE MASTERSCOPE UNIXPRINT - ISO8859IO HELPSYS DINFO CLIPBOARD MODERNIZE WHEELSCROLL PRETTYFILEINDEX WHO-LINE - UNIXCOMM UNIXCHAT UNIXYCD UNIXUTILS)) + + (* ;; "RMK: 2025: PRESS was after CHAT") + + (LOADUP '(CHAT INTERPRESS TEDIT HRULE TEDIT-CHAT READNUMBER EDITBITMAP FILEBROWSER THINFILES + GRAPHER SPY WHERE-IS COPYFILES MSANALYZE MSPARSE MASTERSCOPE UNIXPRINT ISO8859IO + HELPSYS DINFO CLIPBOARD MODERNIZE WHEELSCROLL PRETTYFILEINDEX WHO-LINE UNIXCOMM + UNIXCHAT UNIXYCD UNIXUTILS)) (COND ((WINDOWP *WHO-LINE*) (CLOSEW *WHO-LINE*))) @@ -94,5 +98,5 @@ (FIXMETA) (DECLARE%: DONTCOPY - (FILEMAP (NIL (458 5146 (LOADFULLFONTS 468 . 2373) (LOADUP-FULL 2375 . 4896) (FIXMETA 4898 . 5144))))) + (FILEMAP (NIL (456 5392 (LOADFULLFONTS 466 . 2371) (LOADUP-FULL 2373 . 5142) (FIXMETA 5144 . 5390))))) STOP diff --git a/internal/loadups/LOADUP-FULL.LCOM b/internal/loadups/LOADUP-FULL.LCOM index 6cf1563dc59f3c41fceaebb4ac17499ca06241c6..e28b50b4377f37a6a0e900de6bb56a4fdff8d3f7 100644 GIT binary patch delta 418 zcmZutJ5Iwu6x0?d;DQPSO7&z>#E~5B^JeX23xs2D6i1t^iMT;7N}LkkR(q3u6h zZKkepx`I2)_xd!C?S8HlT;GDZ2HT6RR?CFh$QY<7&Eh-*ba37NiQCuXEG?(I zugZ0ySq!wTqOojNRQ{`E9q0vm6swBuK^Bdqu9P^8WT@mt7$wys0NWfI!NAW}lf8XH Nuv{32s~2NIz5(iEXBPkf delta 433 zcmZuty-LGS6y^?Eo1r);N~c3`Xo{)##ViEdEC0z_^ir)+l3n}(x-q9Xmh8jLf8 zGdg>1UPgrwQ8LUkxSE2xMDUl|>2y>WpWj`K*J_wl)s$8gi_jm1ZXO1pu8X09d?VVX z0~R`_ydeiiD_aeCItowYq{#H3QUH}LlTN>TP|B&vnJE|Kkl6DNa<)MhGO9hum)ddR z*bt0j&l4e_gW!uK3rj$oLKzQ(q)Y+36hz_%MKziXM4aVmkpnXPTCY+78r>hF>~B4{ z?Jl&-UZRV57`7`F>mM{7@cd+uRdl5_LCf#CIaF1$Z0^+?gc$Nf+1*A&XblRH N$GW?8pO2MW@(Ix)Yx)2H diff --git a/internal/loadups/LOADUP-LISP b/internal/loadups/LOADUP-LISP index bf91823b4..61ad45ff7 100644 --- a/internal/loadups/LOADUP-LISP +++ b/internal/loadups/LOADUP-LISP @@ -1,12 +1,12 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "XCL" BASE 10) -(FILECREATED "15-Jun-2025 14:39:57" |{WMEDLEY}loadups>LOADUP-LISP.;20| 6425 +(FILECREATED "18-Aug-2025 12:09:49" |{WMEDLEY}loadups>LOADUP-LISP.;21| 6713 :EDIT-BY |rmk| :CHANGES-TO (FNS LOADUP-LISP) - :PREVIOUS-DATE "24-May-2025 10:20:14" |{WMEDLEY}loadups>LOADUP-LISP.;14|) + :PREVIOUS-DATE "15-Jun-2025 14:39:57" |{WMEDLEY}loadups>LOADUP-LISP.;20|) (PRETTYCOMPRINT LOADUP-LISPCOMS) @@ -19,7 +19,8 @@ (DEFINEQ (LOADUP-LISP - (LAMBDA (DRIBBLEFILE) (* \; "Edited 15-Jun-2025 14:39 by rmk") + (LAMBDA (DRIBBLEFILE) (* \; "Edited 18-Aug-2025 12:08 by rmk") + (* \; "Edited 15-Jun-2025 14:39 by rmk") (* \; "Edited 24-May-2025 10:20 by rmk") (* \; "Edited 21-May-2025 09:25 by rmk") (* \; "Edited 5-May-2025 21:25 by rmk") @@ -43,6 +44,8 @@ (* |;;| "following files are really loaded earlier, this call to LOADUP just cleans up") (LOADUP '(ACODE MACHINEINDEPENDENT)) + (LOADUP '(MULTI-ALIST)) (* \; + "So it's functions are available e.g. for FONTPROFILE") (* |;;| "establish all package exports early") @@ -138,5 +141,5 @@ (GLOBALVARS MAKESYSFILENAME MEDLEY-INIT-VARS MEDLEYDIR SYSTEMINITVARS USERRECLST) ) (DECLARE\: DONTCOPY - (FILEMAP (NIL (640 6219 (LOADUP-LISP 650 . 6217))))) + (FILEMAP (NIL (640 6507 (LOADUP-LISP 650 . 6505))))) STOP diff --git a/internal/loadups/LOADUP-LISP.LCOM b/internal/loadups/LOADUP-LISP.LCOM index 87001c262ef7bad5d2068ecc73070332f553fadf..edf3b884df4690e89b218e985c47a51df8de78a3 100644 GIT binary patch delta 606 zcmZvX&ubGw6vvsQ&Bjf@fKWtR9Rp$(yJTl}lTCs&yv>fuxVuTZyP?fVw1z79i-HJ} zyPy~21L@z;gBP!YcTXOqcvNp51^)nN+oA`(3~#>g`~AH4zMX%u`YJxtGU3Ut$t~WX zjCZVd$7wHS*BF}{RIjqe->z!et&YR1bbfnpw)5!0<9qjKcjk1ybNAN6-Pz*P>hh6$ z@pGm1PprYJhF-faL(z)`q{63F_MgevCF>fS)27R8+#}t^<_ggf$U6Qa6Y>^sv$o5xWQcN$I|mcK^?|vI0An%rjGTewA-AHp%*}3m|_T-(QdgXM!d3gaN6IJ5#?uBMJ8jWdI3?LaC z{R}mS)0!vyo=hVcCrWVfd*QO%RB|s0lL+Dz;(lW2)NUMWCz~p(qlAnnw$m80tc@F5 z{hV5)=EZ@(HB^#1xR%ODWB?1FYgN+51MMPd;YaP#S(odXS3qFG&^HyPCk)D)m@ghy zvU%Y95X*F+LI-35)FH<$4D_x7zSN&7V4-xCxX4SKG;yZh2JV-h5(g{g Zfr?GbP{}rnCSfW~2xXEQ@Ak`*{076foEiWC delta 577 zcmZvY&ubGw6vvrZv&|-;h=o#HIxdLW>c-vKA8GbrncbbFYi48E-PradtqoGp8fwKK zEO_^%KJe&4Jb4k(yNCx59+l#?e}srPUuZxN!Z7pr^8J3^d-G)e@XXT`K9HGbH~q(E zp;J|}m~rLauE9*^Qp@x4*sey4t-axmJGVzWw}#sVErt(9dw2bU%BwsY^bHwjeOm17 z7F25wq@@2c8jS|Vw>S64!T;f1Q`6OYJFZ9(rh?}pf_G#VLb9Zo1@#=}!ai9!%^V}y zd^nlQ^qJ{f4tyaOOZfaG*T`#-rSGtG?7%jgG)m(jkb*iUo6Jb<*57iO(LN8mydw{t)dZnV}z3D>FTaUu}FTJTcQu2@IXmkyb?gI(8+sgIDiP`yArh^vgaP~h#r+vm@ohU From c2c5985b583e61cbe1b141724018b919ed2cb0c8 Mon Sep 17 00:00:00 2001 From: rmkaplan Date: Mon, 1 Sep 2025 12:21:23 -0700 Subject: [PATCH 3/3] BACKGROUNDIMAGES depended on PRESSFILEP, now moved here from PRESS --- lispusers/BACKGROUNDIMAGES | 98 ++++++++++++++++++++++---------- lispusers/BACKGROUNDIMAGES.LCOM | Bin 7403 -> 8171 bytes 2 files changed, 67 insertions(+), 31 deletions(-) diff --git a/lispusers/BACKGROUNDIMAGES b/lispusers/BACKGROUNDIMAGES index 3015b32b2..4353c9a9f 100644 --- a/lispusers/BACKGROUNDIMAGES +++ b/lispusers/BACKGROUNDIMAGES @@ -1,39 +1,42 @@ -(DEFINE-FILE-INFO §PACKAGE "INTERLISP" §READTABLE "INTERLISP" §BASE 10) -(FILECREATED " 2-Mar-87 16:07:23" {ERIS}LYRIC>BACKGROUNDIMAGES.;6 17437 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) - changes to%: (FNS BACKGROUND.SETUP) - (VARS BACKGROUNDIMAGESCOMS) +(FILECREATED " 1-Sep-2025 11:35:16"  +{DSK}kaplan>Local>medley3.5>working-medley>lispusers>BACKGROUNDIMAGES.;4 18372 - previous date%: "11-Feb-87 21:26:26" {ERIS}LYRIC>BACKGROUNDIMAGES.;5) + :EDIT-BY rmk + :CHANGES-TO (VARS BACKGROUNDIMAGESCOMS) + + :PREVIOUS-DATE " 2-Mar-87 16:07:23" +{DSK}kaplan>Local>medley3.5>working-medley>lispusers>BACKGROUNDIMAGES.;1) -(* " -Copyright (c) 1986, 1987 by Xerox Corporation. All rights reserved. -") (PRETTYCOMPRINT BACKGROUNDIMAGESCOMS) -(RPAQQ BACKGROUNDIMAGESCOMS [ +(RPAQQ BACKGROUNDIMAGESCOMS + [ (* ;;; "Enables you to load interesting backgrounds. Simplest entry is just to call (BACKGROUND.SETUP).") - (FNS BACKGROUND.SETUP BACKGROUND.FILES BACKGROUND.FILE BACKGROUND.FETCH - BACKGROUND.SHORTNAME BACKGROUND.MODE BACKGROUND.SHADE) - (FNS BACKGROUND.CENTER BACKGROUND.REFLECT BACKGROUND.TILE - BACKGROUND.LESS) - (INITVARS (BACKGROUNDS NIL) - (BACKGROUND.MODE 'CENTER) - (BACKGROUND.SHADE 34850)) - (GLOBALVARS BACKGROUNDS BackgroundMenuCommands LISPUSERSDIRECTORIES - BACKGROUND.MODE BACKGROUND.SHADE) - [ADDVARS (GAINSPACEFORMS ((LISTP BACKGROUNDS) - "Delete saved background bitmaps" - (SETQ BACKGROUNDS NIL] - (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS - (ADDVARS (NLAMA) - (NLAML) - (LAMA]) + (FNS BACKGROUND.SETUP BACKGROUND.FILES BACKGROUND.FILE BACKGROUND.FETCH BACKGROUND.SHORTNAME + BACKGROUND.MODE BACKGROUND.SHADE) + (FNS BACKGROUND.CENTER BACKGROUND.REFLECT BACKGROUND.TILE BACKGROUND.LESS) + [COMS (* ; + "RMK 2025: Copied from now obsolete PRESS") + (FNS PRESSFILEP) + (DECLARE%: EVAL@COMPILE DONTCOPY (CONSTANTS (BYTESPERRECORD 512] + (INITVARS (BACKGROUNDS NIL) + (BACKGROUND.MODE 'CENTER) + (BACKGROUND.SHADE 34850)) + (GLOBALVARS BACKGROUNDS BackgroundMenuCommands LISPUSERSDIRECTORIES BACKGROUND.MODE + BACKGROUND.SHADE) + [ADDVARS (GAINSPACEFORMS ((LISTP BACKGROUNDS) + "Delete saved background bitmaps" + (SETQ BACKGROUNDS NIL] + (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) + (NLAML) + (LAMA]) @@ -330,6 +333,40 @@ Copyright (c) 1986, 1987 by Xerox Corporation. All rights reserved. do (add START (MINUS IMAGESIZE)) finally (RETURN START]) ) + + +(* ; "RMK 2025: Copied from now obsolete PRESS") + +(DEFINEQ + +(PRESSFILEP + [LAMBDA (FILE) (* ; "Edited 20-Feb-87 18:41 by jds") + + (* ;; "Returns FILE if it looks like a Press file") + + (AND (SETQ FILE (OR (STREAMP FILE) + (FINDFILE FILE))) + (PROG [(LEN (GETFILEINFO FILE 'LENGTH] + (AND (NOT (ZEROP LEN)) + (EVENP LEN BYTESPERRECORD) + (RESETLST + [COND + (T (RESETSAVE (SETQ PRESS-STREAM (OPENSTREAM FILE 'INPUT 'OLD 8)) + '(PROGN (CLOSEF? OLDVALUE] + (SETFILEPTR PRESS-STREAM (IDIFFERENCE LEN BYTESPERRECORD)) + (IEQP 27183 (\WIN PRESS-STREAM))) + (RETURN FILE]) +) +(DECLARE%: EVAL@COMPILE DONTCOPY +(DECLARE%: EVAL@COMPILE + +(RPAQQ BYTESPERRECORD 512) + + +(CONSTANTS (BYTESPERRECORD 512)) +) +) + (RPAQ? BACKGROUNDS NIL) (RPAQ? BACKGROUND.MODE 'CENTER) @@ -351,11 +388,10 @@ Copyright (c) 1986, 1987 by Xerox Corporation. All rights reserved. (ADDTOVAR LAMA ) ) -(PUTPROPS BACKGROUNDIMAGES COPYRIGHT ("Xerox Corporation" 1986 1987)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (1897 10963 (BACKGROUND.SETUP 1907 . 4149) (BACKGROUND.FILES 4151 . 5706) ( -BACKGROUND.FILE 5708 . 6973) (BACKGROUND.FETCH 6975 . 9284) (BACKGROUND.SHORTNAME 9286 . 10006) ( -BACKGROUND.MODE 10008 . 10460) (BACKGROUND.SHADE 10462 . 10961)) (10964 16807 (BACKGROUND.CENTER 10974 - . 11668) (BACKGROUND.REFLECT 11670 . 15603) (BACKGROUND.TILE 15605 . 16340) (BACKGROUND.LESS 16342 . -16805))))) + (FILEMAP (NIL (1911 10977 (BACKGROUND.SETUP 1921 . 4163) (BACKGROUND.FILES 4165 . 5720) ( +BACKGROUND.FILE 5722 . 6987) (BACKGROUND.FETCH 6989 . 9298) (BACKGROUND.SHORTNAME 9300 . 10020) ( +BACKGROUND.MODE 10022 . 10474) (BACKGROUND.SHADE 10476 . 10975)) (10978 16821 (BACKGROUND.CENTER 10988 + . 11682) (BACKGROUND.REFLECT 11684 . 15617) (BACKGROUND.TILE 15619 . 16354) (BACKGROUND.LESS 16356 . +16819)) (16879 17682 (PRESSFILEP 16889 . 17680))))) STOP diff --git a/lispusers/BACKGROUNDIMAGES.LCOM b/lispusers/BACKGROUNDIMAGES.LCOM index 701473b75fc86dd2dd150604540b919aaa6e94de..0ab4268ea8b884c13966dc4d1452ffad83d81155 100644 GIT binary patch delta 1774 zcmb_dPi)&{6p!1cO|4Pdv6M6^>^0iJsc;uN&7ZncJ2(E4m^!v=J6Q)6&^2k-Hcd*} zshiLg?S!~7EHq9`LV^<~I?m$?C*Z^`3=RmSUCMzg@ID*1P!I=14ln+`@Atj;e!usg z{cz^t{M*G2%W?%(BYBI+4pATu0&mxMc`+%bK@g-=S`yQ7;Nokoo!!kwy#}o&g4j0{ zd-2Bk%3i&_H@CgI+gNSRX|1)@#@tT5)~H`kO{M1!TJ7!4<_7QY%r!RmcCUK)1v$T1 zw2X?bsO64aB=*$obOPApp~Z|OCgZSABR8I}!6pVSR5T5`Q=FQbibHL69~1kh`!n&x zzw_%LK_T-$68eJ=2)R^N1c@lB!!KNd_Rco2QobbX$d`8v;Ht7^!-D%36Rt|8MXIV% zv3UiHfJ8*TyxQh-Sr9T(GAoIx|B~RXcTY2{d&Hb#*u!AY0fUPhy=`0^^={C`a_}13 zuYzxmvX3h=MVr9}Ny)K?&He+XkL6~PuFxNLe;tVQvm6L1!PP^ft{7SjAHU~cdnXj6 z?%x|+LHo<#ELwr3Nfg+xdvG!K#7}5@hOVN$HdIFY>Oi=UMsyzx-Qid+4Z2(=SU3=7 zAkJe6yYed=3i0B&A3gap^)p-@W4XUT?2`N^=Jnx=i1~c@eDoM5PjrV^zN6D4pCRbG zktHOXVBLumPkGrKYA2U_@!-SoYmsBO9TdqY`^@Oalp+umupwNL7XhcsyKnnB)m{tIP)&{knX@pMD=e59~U1EZuBwoipKk6TZ2>bu=8{rc*!zPzH_#q6mgbbUz8Kn2-iTQ$R?9s+$#u)^Hj) z)9M&S9k{$^*rYH|AyrwckVK+e5MK)uGxa#w4xI%P#J}@0k*ucL=5k539fTw)H%}{{ zEyjFwjFeyLV>$um!XRbyX~_S-9H@PwdfYvdBTS&Qb#$03)q=gZJ>cOBr6%*+4_ilf z&p0C!y&lv%@JxvMx_73ZIe9mDVfYH_lJoWVQunI}*$k|dtC)!c>si6CS6At$@wo63 zu?*yxgQ730suv8LF)W*|cx2Mxi)*5mnT)4JcMQ?1Ytbp;G4}44k+TCVXPNTSlKUVM zW`W}-VRm*FST{CS$40$5MyK-Iv6c1ip`yK-!1@?v8|VdyTjfQd-v9~nt=&z0yRNre zJJ4($KsZh{9dpD Z2Mh)HIrbc0h>SmrHaor^Vi8P7?{~Fj#3uj% delta 1015 zcmaizO>YuW6ox|uf=#BSwXIYNa~!S00?P2sw4p(mQc@UjX3!cxX_;0cGKA8KX=~%k zxWn8Z(3Pv2xTuMVap4~@8e`(dg&UJ5U3KNwb0M)67bcT8b7!9Wo{xL(;p}0oot7Ba zTqY|fWig?ODd709N76Suu>kN9!S56JCy2i-T3M?v>kW-e^|3qX!vApz3!$hG2yn1OO{$m6P^kgK<+O5Ddkn{**X!k=Txw#F zliMSLFCqkkoVzDa@OyHlh9?>UK1>lmM%WbPjIuo=Wiv{lsED!>&)$$T$@rB-av?3} zi&83+OQc1`I~~UAf`JGu-!IixwKZt!lLENrBn6mb*sF+YvEU}}4UV09L))n6>ua41 zk)~3H(2P$o)?o5K>XbRe&&bl7s?;fS!z$$ceDO)pyrmV957V z4Fj{EH?GpfTT=_wXMQ$z(v0p=I%fMH&5sO5#uf9Cwt1A?w%8Egu&j*s;$8a4Vxq3U zPTxXR`=?Rc{UaFeW&f8xT(p=2)Y8B@>bHR$>eGo)Bh8w`2X{vpR|sgXcu>H{fb-yy zk)y#g$eFA+=}zmlamMv`;q!@<*ojU)TdyPI8k#xR!z4vX73D7UWatAzv%^>IJ&-KU z;S8(YLiUCiPa$R;yJzdcRP0Tc*&2IAi*?&}dl~Frw|(S?Ep1_>OqQCE=k`hDU)wLD zezj|;!US#9l=A|4HxaX*>?yS%ZO0Um*g^8iF^<@QgC{S{BgE@GkE^`XNA}ntzP-V> zpU$v}al0`H%bvw=5%v=59oC7u&8|rJ4+o>D7UX*Le