'=========================================================================== ' Subject: TWO TEXT UTILITIES Date: 03-28-95 (22:00) ' Author: John A. Kiernan Code: ASIC ' Origin: kiernan@uwo.ca Packet: ASIC.ABC '=========================================================================== '>>> Page 1 of UPSI_ETC.ZIP begins here. TYPE:BINAA TLEN:10406 DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.1 SUB V1:OPEN "O",1,"UPSI_ETC.ZIP",4^6:Z&=10406:?STRING$(50,177); U"%up()%9%%%[-%%)SKCeP4=^_%7%%s(%%%)%%%%fgIhilb.n3RUR1jp$MAVNd(3C U"+_.tlt$6zYy8n1&*m8rdZ0Lr',T(:kirNkkh\1.?#Rq\79Q(GGA32TS]T[:a>d6O3D-rbs\##[F,1#%h/$-PO$3\A77vfOVn*Pd?%_YWPh=* U"%Lse;2.T;&6IdHTnEUXrwO^,M3?K:m(4&nU1Kt',fD,u%p()9%%%%-R%%)K%C+D U"8*mL)%+%?4%%%1%%%%hmj%pxuj%hSfxOn.&*,:\]98MTm4ZeL:S:J0UWZb;)jDt U"TY#KSUx,IAJ2j50+GRN;Hb^b*JZn_S.SW4o6u%)23Y?7WismUoKo%r9KejO\(9(H)PZEmR[7&T+ U"X1]b3j\cD.fGf\00&>m?IB=lfi*,hXp/dZEsrWju]ySzYwU/t83cMEm9bq<:o;OWI9<<8$k=EGpId U"-XYA)J5'(kJ4cR#[,: U"C:fO5:^TWs-oKIa,62%&6p5zG)Hu+(ASuS'Y0GF[gyC^D^AaO6IRQ;N'bDv_P;q U"B-S;)sMU6TF^j_>&it$pCGB)+i6FY,<3Vz\lVz#mQ$ke'disxY^V89c1owM2>AA U"[%2lUIJsOEgGxVF*>Fe/NRstU=FZ#<=Q_tFX3tKh;6Z9:0rV+aCZe2hY35WDjOK U"+,hMZ:&5bkoJ+LIQjfo'.x/uMjjHgcHs'A7y6ldlcqB-c4_dExSsD3L2pcXR,pu U"7Cxu7ZB/,Ao8lNsTqyLrfATi1WD**z.6'5jQEOaj&2d$dT6FQ=u,'f4Tr/&#HZ' U"]P4tf(#Km&>9e.)R&>N(Xfue5Ox7(06d;n[876O#iLf>hmC>?s$[B4twW\evaoA U"nL[ULnm6H\6A*nlT+G/lCOXXCJc>Bk+0[i8ez_0tLMNgA/\w$^DcFZxoG\Dqgr&%Puty U"+^)y8S*i*4L?NXb<3mJ/1ZXd.fP0&&qR0Ho8t>vKEZ0Q,YMx\o,JVBod+JPlc]( U"i8TMI0qsm$Kqcxvvv-D8up%()9%%%%-%4%)KC;kk%f&.*%%&z4%%%1%%%%hmjp% U"xujh%StgoWf%x:(x&9dlpVj5huu8uOwPxCQJ2o,rfi?25w*'$oL:0.K,zv7GR1D U"u3Y/8'nRVfOLgiCCrt0mjZu+Kpp]tR20h U"ZicC/eG2p1>ZouWl2$$5Bc$WUJK;U'2N*p$FNPcf%O&-%(N-..%*hnZFPVV_$,y U"fS\F7TJR;V'T2'FL2p4/V?69k-E[%CV?K&2/SYTq;oFP\py%fK+N,CFLTOm_,dZ U"jeF%G'C_]D3$Qnb0SmUfqq_zK%k9Q9Y-*Xui)-tF=rnh(DVji8vvk%4z1YB16#5 U"l.,Am-670lkv)7Wh%o:uqW;pT6IJvVWY17uN2p9R?9TC]NzZ7;JXT/E+QHTE,$/ U"PaHD^+S;[Kt#Ep]12m\[P_WXH?NRW\A(IfH^E,_h1/36/1kKg%_n-7h\dS,hL$[ U"rSXfvE:Li2ylY-4p-z:z?cY4sojfnl85%qy)7p]rh%()xE\&:9\0wg2M\?)*8G4g'bJpog0cuKBE:Ma-WUO\tXk'Lm3F2-Or^Rk6, U"K99qVleWPAW>9G3lg^op9shad5vS$fj)MT.[?3$Ei:**GNj=*#C5t=C2^ke,+kD U"a&+a?]aD2kP;^o(?9xv5^$b(yhat'DTTgtgfGDw#7gb#RGHDoIvC-UFc+TbV9t^4hidE;B+m>eiDpF U"M9fK&^ri\F;b%?U\8:gu0?x\NLZOkCd.xv\/,g1^:)MtW14A,lXds9DZML]D8PL U"uRUJNKTLv%mpE%k8B&aoT883oRP2DESi7/XT8^y9Ea;Xui\+WMeO]D>w2>Xjq[? U"jq?*5Cqxjt(G,)D$z_g&Hr<,=&qDI(;w^Vi.-IhaZTDi)?? U"fEB#Muc%9?WWy;o6KOWwsYdD$eO=ndUM#(1dVW/Qlbv'adk+9tmq-<:6+EB/R/x U"oNC\9\07JvUlW%ZOs\Ph#4BH9+rb:xBViv%jY6ZTJZ3b'a*c?e3t7t+LB,[5rLH.gYlaj0JCkmQiLBenEV=tnG;TGxNmITJFK] U"*J2W93w.\>rotELF<;,X6\$b*ZXwFh#/(8O1mlCkRu,HIrMX,p$:kyG9VA4fHvDk]N8JxafxtvZEr U"GcmM^N4[DUJeG?=Y8]7Wr5_*JmCeZP;++O9+JuZ>(G^&,OgXM)+Xu^: U"4#hE3[BS[h9rr?:UQu%KhWg3ii-r0rC5<:W0N4UC(]&o0f3L1C5:)r7R+s*pyQ& U"-T:1Yb>].5DmdeQd5'MoHGwf;U(_,ZXLQ#Qf\9e\5luQc5-:GzEma7vK1cEa U"3^*pQ/fN-/Oj4XzMCzLGqvCp-2dV7sx?7E:g[7G6:zSR+SxQ^jSA.q,R#C0I8el U"IAnsuNi.l\fCer6)Fm)>(3'w]/uez1b%jl[>(#=r;1CuPffhSPW8_guh<;_Q+GI U"V5fdY1SbEFiGB,_nVp(I0nA)jYVL6rJsYQ&n]EolNHSiL)'c3aXYE=Gvr-DKETE U"ZvuGmiPRFZg_hfj4l(o,#s3Yo$fdf]fB0sI#;ZEv.7WOj\S U"[EB+o]Mn1(dF2fUN:-TvF91fs]Hu+q-Tet[G6kd,sn/k&&P^0LYC^[M0^;M;AN^ U"gJ^S]+mSxvMi?llOm=BtXxtDqiY).Y]p>$L$k9v:H:.uz+Bo1TnGJ7R*v1OpSho U"ZiFRD8:5]]ov%#a(KC:%Z-X%J'U=:MZk>wFsRh_^,wJT:GJd7r&9-c>4T:sD;4NkH5I-XaJ<0W;k<6bmGb_ycQB3BJY-p6oF-Kf,KPI\W$Pt?XcwHje U"V&L%$2w=$m(nnCr'cr+0S=Q40W_JPi5agM(qJEf\MynVRN5\x>f&H<5l_e1?NL& U"o^Lo*Bosb?Atnf-(:SHe^\sk/IH.ik[iC=l2X^ybP4gFp4MpzyUvr[^pR6uhH?6 U"iT^pjoiySt'mZYQ8sJC-O+W U"qOg]scf;n5$U]FUj4H_-^b2UcUi5;ulC3f>dWCvrsHHTX4i1R%ep&q,1nOAmmV= U"c7LJgaWMEk_7-]nl5H51$;Jg?['+q$Dut.d.l+#fZ-JeDES2&\y.FF[w:']WYLu U"4uB#g'pkjO(heMGBYX;70Ms8Hcjk(6tCoI1X[9hz;VbKQ,D,ghidZ)hWiUBER;<0ck U"gS3mIV)l0ZRKH8Hv1.t40\CeM]h3=MMIdL*N*+]-t0YAk;KfX?S6D/7ZAu(%up( U")%9%%%[-%%)nKC>%:qE>/%%%/I%%%-%%%%zu%xnSfRxn&()*>#\^;M\YFd)t6&v U"kEF48RA[E4\0>P/DAq(ye)n]W)m6d%Zq%G(Hjgs>RJw9*;aJoTc.B7hTTS__oex U"ECmhAI]AX%^OokYtGAC7N_4WTMA+#Gm21R58zo[K*lugcCG^M3XcoK4$[F)a3di&?*a5l5c_JJwX:?C[IS3 U"f)O.^NYQ7wTZakiERf$&+y-9RC+o'vYhz*JUv1>IQ\;n>Z3fS=DcDJFt^YDo:c>[']D^j)p\rUFAFR*eiL>)XYw U"+5M/w:/W4[:DoN+Z(M2T4cY>]j?(r:L.(;VS_S;_q6Xh U"*^%5c(V$CAD?ALEGJMtY^L)VJ)_^kaP#gsmyPIw#s,+M;Nu])VeMc;%UO_%fOg/ U":n.ss-&V$t=>-f3o>jq8h9[t(rl1s$e;\X]d>8Ec^'M&_tZ$+L&xhmjF(sNxm%& U"+0IaB[;7P+0cWdz4/>7zO+-bq#i4^]q[k#w=Zh)uuKAbl_(Y);#tg#1]&m5O/sT U"3VoO-vmK_PLr_?$10fK;RCeKk#php$9VHN.Wo$>(F;,&]?<=MLA)gC8aNo>*,[* U"YWLuhF0nKNALRDfn%3[Iy/EIZ$F>Od50\+lQ6KKl U"]6dGGI0K*MoP[:[Ji]-T1*6Dgk]CljSgjBhXmilq>\FG>_X(FU-Tre\wrVU:rRV U"]r$B_eJflFN12/Ui=FDUz*?UZ:0/Tc;ey02wTgh1lWM=xIOMW$^#,+7&j6.kPiy U"9]A]x9-\F%$Oj7j:/Jw6>O$,yD:q81Dpjp6f-qYA]3iqU=Re>Sfd2%=O[p.Le4t U"Zu(r9v'/vb_C0]*+]%tX_]'j\076G?Z?MCt]?]\,&=]Pa6^q8-b]W,1^W.s=0Sf U"*>l'Ch*]3A&AGM:HG2y8YkY*.VzwQ[?PA.q]tYm(BwI]p8VIS*fYzzM#eCJVwWL U"AQU3z2S(J*5u8Xf(ek?:UM3Bc0(ir5>Tc_U^[y/u>rI.U6,QOq++kBveO.tpTrA U"KaP;d)7KU7c+6f7#\&8IJFS7aA'l?bW8l>R]>ljl(c4tu U"qg8aS5b#/oO(>q9BTLfqI9QmTv3]0kDg+etyyE0qUZRLjA\k(?CI;3#Gg>?ahAU U"[mmF=OntGeS29xw\:f*R3k6:BSx3OP%ikiPo<1bmuQ/(%ju(jaM9H-2l+ U"-Mf9j))%o+u(M\/gIDJm]'txOga4;C[xii^;4uhOa0^Q.brM:UliNa4-w3yJ4p/ U"3cT'''_nwy/Snbgg*U4/8/lWbEGETI2/JgN6dD,>cuwu._&cdPmHz_)qZu3f.23IDwGFRf(0f+maka9dXo>A] U"Wb>#pW)RT0S5$KJJ;n*iCCuYQ.AZqI.sPY+g1qH2 U",c3oASduFZ[Cr6VZ65()#Qo8Iw2QL5r-wLPFqhIVm:0U?trc U"j*PKfo/L&6=q575 U"Z,>a[&kp=.js>387^ahxrtRR U"PdM%)88+*2-[VK5$X'F7TW)[:FP=\jOeu3TEq08W+D%5dn<'jC4/jE8PW0%W_&j U"euV1TqHg8Wn&458;']jdP=eN\PqoG/jfRK5X)=F7T)$[\:[]nK5(0&5>[>PqJ/- U"jvK5EX*FMTU)[BFP=#\;8M\Yd0)t6zqr_Y*Y1^+,B4n;YIQ\9<1P_c0D_3&9^i((H U"F1.A]X:0a.29.IjK(eP->O7n'9-etHcSv&D1hA5]RH_foS:)j_sauGZ<2b_Y:'G U"IBupTVjp%oLgB9V^r[.i&$,[h)6(^tE=0E(m-2'_?3e;3cqI0-RgN[O;=#M=fn[ U".n\nzbvedcd( U"Y-Gj-'(d'#/N&<*oHbW&DGQ'J20-bvMZCS]2 U")S[niSn[eb3%P5ds/]C8,/G]i[w*5='kXGgcc.2Im8aU2'/etZJsK,m?S4B:>l:R1=k[LVr;N:)+8M/?2vIG9424 U"U-2TdvIx(xXrvkAeJcm\U)uHjOBwi/l0JMQ,^I$I4kIcdZA3-8id-h%R-ZU(u+M U",Y+Qa#QAPr4+4KIqf7hdN)GZh&h4+p-M.K<0'0oaM0j^%l+I7iIGn]O\a?CXK]u2[,fMl(X#=F\%(yw[Gz;my'DCHBf[<2'^>58v: U"q.Ri3(JC)Q\tFoZJ4TNqk:QX5g[1T<93D(J*jx(/P'C3zA+mfx U"68B-2[:W^HA#;j#o5VZ]cl_+LD\fp3U%d^=AF?5gn9x49,FIBta2V=#[X4,)]>. U"B3ib[UBegzcD#q:1TjNP(Z9RzDi',gDU+;aL,(AqY6g=-^xI<]cES;YA./9;5Q^ U"'^PC-lSG?EGyS^t?9-3y.U[U2O1ZWk:vWboZjk)S6=YVQ/p=mX;R2on/$#r+OY2 U"+0761'16N'%#7t[5L+4K=Yi5]ftf+n2vEJ7]yX=b258A>Cweqz'3r^AH_dK4g[> U"EVTRa[Q>:AyH*m(wqyx1i5ygo_/E;WHYFw4ojV/UDykFtX?tjJ;QWo\'XTJMIr1PPPII*)_B/F)lZBC&k U"S)I%;c]dCp2UD?Sy(kx#yo= U"'O8l4<(>NdS:JXGQ6bldtkcEl-0jFs^3rQVU]6O]c=t]X6m)44JDyM%ODEcGm$j U"G[MzI8*EKx^H3GDA&$xqALUWD:JLgLi1IS.%_h2x:^2Yy(;^+-w3SaJzYMfo)u] U"DkEr^Mxu+q\qZYTPPfEQi?7[qG>/di\,A4Oa3#A)rch*'M% U"XUEobNwrX0?62jO8jC)]iXMk_DImW8#u1TbStzJ7-(bRtCBj#dgMf6>;(zviI;] U"Sd.O,ElQf,'_IEso#_tpXK9Q/D#bt1PgpRbe[Yps78ZAu,lIxseZf9T,Q.u#x-f U";e+%W^U8I+V2Y\>cLRAgS'yD1GP(e)sg6[AkXs%CMmOm3V#>UN)j./bBE91+:lz U">8Dj[a%D+c.[F6anOjCxv6ZII_2:yZ#J(P9aJo1XXT/2FyUAG#c8:gD98v6^I;c U".DY>euM*(p(%>Sq^Do$2Rr9?k U"?\&DxQXm+90fd8E1MuRUmmiY<7WuCnQS&yDRCW'A:]Z,$tT2MKJ(Es$]]db*hbh U":B5h+/XCnLnlAc6LFft,rgOhUF6Eq7U8PHCSyPeZ8g/S0he[8Ip[TLBXsIh4aC# U"Ou.AH)'j#f*YhfSc/&pB+w,DCus,,JcpaC=M:Mak U"%j[=1* U"3xuT^O1fiNeEsUl%cxCj_BQ&2s\0j613Bi_'rtb%c/J;3?ZZ)4JN/Y)J<4zO?,Y U"nF+*Du(XDWRMApZf:r96ebL[T2\(LlB$A3?^.MM'*CZP^6C6I3XM'iwV+(-i5VU U"x3T0B8Zq<41>I)l^6Km2m'OoFl U"m>vr1J$H\6Iw3&zSZ)s#8IiHNUtwg8Qp*Si'aUBTIs<&d9wnLY-Nr$#a[r;JA#9=4DZST0W>YWX?\(,c#5 U"4%XhN>y,+%yo,ZM6Oat_y3\PJ]_-yp1voh)'s:'tD04PZfn0iGI;wuu2+UC?8/, U"r-^TvjCW*fN23_QlilG?)hd,b5h]FL0Wn61cP5Fo2WB;H.*F-aRgxfLG&u[4U:+ U"?4%5xqK:u:osb7jNAO4SV*5LSh+&Ax(Ta/bEqnqE^5/&v*ZyHcPsE+V#6/nWoD; U"c9sn U"-u]KvUP/T-RlPT#Pun5ger/^uUE)1X U"n9vq*zg6G;wXI2o5el8NZ2SGv3E=fsWGFdeKWgSqx+3=4s8W4ceQuaSG983=\gs U"W^cUeKdScq)3=e&sWpfceKf>Sq13H=psWFtdeKW$Sqs43=6s;Wndel5\Sqnq3=4 U"^sWTdXeu]Scq53=.,sWDoce5h>Sq*3B=lsWG>ceKraSq/43=Js>W(cekKeSqT33 U"=vpsWhdUeK[S-q'3iTL.Jy=(jQ.cj-3=.#sW\Tde-k+5F_5Ctl5^ode5b2SGr3] U"=:L=&b_5\nl50d.ea#gD+x(#fT.#,43=*s>W0deQ5fSG8z3=TgsW.dXeucS$qt3 U"=e>sWXodeug>Sqf4IEob(s8t0x%&up&%'9%9%%%%-R%%)K4CeP=*^_%%+%s(%%% U")%%%%%%%%%&%E%%%%%%%%%f%ghiu%p&'9%%9%%%%-%%E)KCGtrqD&[%%%'%(%%+ END SUB SUB V2 U"%%%%%%%%%&%%E%%+%+%%%%hfx%yqju%p&'9%%9%%%%-%%*)KC+RD8mL[)%%?%4% U"%1%%%%%%%%%&%%E%%(%R&%%%hmj%pxuj%hSfx%nup&%'9%9%%%%-R%%)KgCkk%( U"f.*%(%z4%%%1%%%%%%%%%%%E%%%%O%+%%h%mjpx%ujhS%tgou%p&'9%%9%%%%-% U"%$)KCwS(%SG#)%%Y%.%%0%%%%%%%%%&%%E%%+%,0%%%rjx%xflj.Sy'y%up&'%9 U"%9%%%%-%4%)KCH>%qE'>/%%%/I%%%-%%%%%%%%%&%E%%%%y5%%%zu%xnSf%xnup U"%&'9%%9%%%[-%%)/KC&)>> Page 1 of UPSI_ETC.ZIP ends here. Last page. TCHK:91