[comp.sys.ibm.pc] Cosmos Planetarium Simulator part 4 of 4

lee@cimcor.UUCP (Lee from Minnow) (05/11/88)

				


			Part 4 of 4

			Cosmos (c) 1988   Ver 5.72L  5/5/88

	1. Intro

	Cosmos will show the past, present or future sky as viewed
	from Earth.  It also shows the position of the planets in 
	orbit around the Sun. 
	Cosmos was written on a UNISYS IT with EGA graphics and a 80287.
	The program is intended to run on any DOS system that has
	VGA, EGA, or CGA graphics.  Although the program will run
	in CGA mode, the display is very poor because of the lack of
	resolution and colors.  The program will also run with or without
	a math coprocessor, however it is painfully slow without one 
	because of the intense floating point arithmetic involved.


	Cut out the uuencoded pieces between the equal signs
	and then cat all the uuencoded pieces into one file.

	uudecode and then de-arc.

=========================== cut here ================================
M)DB24) $P;:)UO$N2L20@;@UGS(<]:00GD.0B!@%#RE@/ 4^?6@?_F%ERN.,
M!U)0MBA(/"9L9:(M@7=ZD')+1S0>;;1!4OD0L=A4@I%D-BB5 2%[JA)HC5&)
M-G-^@K:'LU$SAU(B_P>6R35\J/8QT"*5G(%S"_,7F-0>?V&77W=G>&@2=X-Q
M:,D9;?561_87HR*&4NEG:E)1GF$@9R)(4FD34B Y*Q432U(G*]DJ,75DG,<7
M0')\K6)@"S,>,L(V(H:6@\%AF6%<,ODP<C@__KB![E$A-;5$?C088JF(L+(D
MMY*'\X.-2><3X.07LWDCFJ@J=0)6\,*)4@E3D$AU8C(U/M69( $@%A0U%K9[
M[N='=?%W891/N]@1L>)'16F3$2)8N"E@IW@:7[1=?_(=VS@ ]O&*\*F=-XE!
M'69^?K1O4/=?[^$LOG5ZY/%9#:<;(8&$YW>@*:>,D]$8DVDB!JJ5)EF'^#&9
M"=>@*_&0DBA+OEBA*55DRN,6=C,A>4A,@A@A(3:)UX0<#1H0VK91KI%!IFB@
MOK&$.!85*@,=Y4A,,QI;QK1+)W*>T01Z?G,EX[B/ L896/<BBK,[_>=- #@L
ME?%EFZ9+CN&"<C@L)'-Y,'$<!M-< F6@#&06:VD=F/(PKZA-!DDQ"Y%$]F&D
MVO29B6-<=C0A/YHN>X1%)4%R6-F@?.JAUH4T &F@[*118VE>](,W!LJ;NC< 
M2K=8C-F@H8&93-@[FK<^= H2O?F:&4*+Y&:I]D1Q;P1(M_*C)&9! I97\.*C
M!KH];3@ 0!(HW(B3!LH@=@H3>6%A9-I]#1I<0;&?N@9$P"I@#((JJB<<5P(Z
M>$>AP9I<N!2.8A=!==F@KP%^Q5EV5Z@5*^D:AA:@C1,3*A-BKQ@K*TJ!T8%)
M!_&)78(SX)*F(K$7I2$O^;9;4B&>@35,<D8W*QDK&35<VE@B3/&O#X&+*N<:
M-,6EIP>PRQEUO?02YE9V^"I\-REYOMF7YP<>*C6>"T&OM*HI#:M#3O"2]TA[
MP1B:N^4R#.<GQK<D#/&O# 1VCA0DH#.Q,KN%/XE-F (D.?NDRW4A*I,3IVAA
M05I,ZP%(ZM&P5A2OU*1V.@E/3-L@7&@:D/)=WE2T-A&""^,6>XF%4QN-,I4V
MJ2FF4QNP$8(V<>(C[=:P@P&T.YHT7XBL;@L;P&AB*_2%+OBO43*=.SDU<UJW
M'MD]:2-+;Y&'LX6@&&F&[L*O&PL26UE>JP@1E9A?C_L?*=@=*&HW:-BP($&<
M#+B/"M$\<HA2^5=?(O$N8%BT]?)GJU>X/ $T_XHHBEI,K-)Z@U*.JI&*Y845
M/K9J]79XH*1*Q+B:P:NMH1LJ$NJ"1>L?7^J4IS%V68$B&XN($]@923,U5E*T
M#.*:(>L0Q4>9&_M:3MM2IR$C"/2O#$($Y6MBU'L@&(* 2768RD,YTZ$X10M=
M0[A[X[&+7]6PKW&TXY:1]RNU&[M5JB=R(G&S4G=ZUP&ZRO@US @=QW<=8BND
M+,,7?G&*UX&V\3-RN[0:*ZE/B.6R/H$T.>3 9J:>F>H4]5E (QP0^KE12/$N
MY3<9*@P"\:>YA4JY/@6 9X*Y@%6OC(*^=<+!(^,@UU(UJ78K1AK$.F@AZZ-*
MLW2L<'*7UUN%!R&A0).'0?R\*[7%TQ&5YQ<G.QPAK1HXU?.*<7*TD)DVSJHZ
M#KP7 MR%.3E+]%?&C@E+6U%#L.; ?"I_D,%0/L(L%6P3$GB1JE(]P])_(2:'
MK2B =V<I/6@B<5;&#(:8Q53$KK)0#NRI]]2,OC9"4/C)\A8[MH$6Q3+"&W:W
MD5@U"=$>GV'*IRM2_L:,*6;*,)=8^L2KC57&_C&XLF@](3$7(XR(0^C+1$)2
M;.G 12(%FCQN2S$U0U+!KR6*RX40:3?"W7NW]?H=)&<:(_P:<,LS#3$F..C 
MMI0%6! B<V=Q]OF 96Q+2DQ-JL',4U8=R)6N$$NV!,MFYU<HY1S/7T-2UG9Z
MA5+',)PKVP(6"/T0O<FLNR-R&5P=6O2FX4@<.PJM%IV!MZ:,ZV%-D02 6G3!
MG5$W-11)QW?1F,6B.+E8%(S0G.&]1*G*CFO1G.'&IS,<[M93M"?3D5.[K_Q@
M8[=;*RE?."*N6+98)Y*'66::P3B-^R1&"$T9"PBAH\PV9&;1!>;*M.$60HHK
M >TMV RQI<05M',A56VW-=81"W$5-5..),+/KQP=67)&",VG=_9[NZAT>=V4
M]CP9-60E<D@BD6LAG%0A)4>8%ATE06"R.VA<@%0SKSAA>$F 8Y$E!>34P",@
M(N)^%B)^" T2';O1'U:%P.L"&N9V"3P S.(Q6_IL 9V=F:L_PP%6E MOLWW*
M4(I7*H-A".T?[#O$! T>;:%.P6VQ:>L]-40W3NV\_+9I)))6[I'<N]Q>)O)#
MFYW<29VF26-']E'8T1:@PL2?)R$>E=V]0R#4,+) K0<R""TI5^T= 7D@$QG?
M?\G#]V& !B&_0R:\ 36"-439"/TKKQ8^^2*;!:[<1[88^?(6IUAE7#B:2S*]
M<N@DU3*MOTLZWUR.$ 35Q11W7<$0'MY);$@Q_R-FD?2*$,0$Y=,=ZF$@Q)A 
MU0%!<+N"T1'+VWMZ$,2US,E[) 6//*Y#T'PO2GJ$3UGCIC2KJT'(2K22Y*(N
M$J58^X0VQX=./]=>*$E^) 3E_)7,"$DH=O,57JZSW00HN!DU (A.A]V,6A@Z
MQNL",W/==P46J<84>3@S+0G9OKP>1HQ7/#Z&7.B"%J8^$7=^,S-Q!:<;SC)J
MB)XNM3UM7],H0"._,W.90MTXZR&QJV&D,T/7".D12;30CV[FLIC*&IS/<CZ&
MZRU1&@N_CE/C@V$$%\J54*M!-\3CRDF%T4>*(6[I44*S0>NB'JCKK WCQ?BJ
M\BSK65/K1"@[E/N_B+X<+ )+23O5U8WH=9'%"+E  %<;/-[9#??6\/(5>2Z=
MH 697A'+6Q;N;&WD/>AZA:7M%)9V-&@;KT?O?U5P-=%MD73AH0%]S3-]U>70
MB"[<^PN1X2-+GN/ISDNB&1W)\C03+!YNK@L30[(3/Y/M-9Z)LYH3PS(0:./A
M1,;"H;4O+%<[B'[-:'9#!M*XH<+C#'+&DCY;W>J,'7_L,+E$(0'H*_]HGHV>
M#RZ^.6^1]34#/C-D0UKTU3Z*1A<Z,?_S/A[9:?/>YU;CKP'JQ;(?71%C/.X^
M"RC%U:0MO?KUJ9>D00P1QY'GY.S-(;O NP3A9K^KUQ1*L7O)U9$Q#>;2K-(F
M<'&O$_%Y;T>!ZX%)_J?J^P'&A"^E9'=\&8.FU/0>$NFHYV>$="U,5H6]1FJ$
M11 %K:T8:?]=Q)7W3NK5T!%%BYV':E/O =,S^1:F;)?WE%&R_S@B+)3+E6_5
MR:CP.:XM[GEZV4*5V*V%"J$TIY@M"/N:82::E@C\>]$$3S"K[29+Q>/\(ZKA
M^QHJJ5;VE6\3PG^R2Q%ES;.2>64%D6YB OY=Z G\9/&@C*6+>L5)[%^J!?<1
M2',Y\R_E*\5&_9G:1F>G(O_2->1/P&]K#RD_,M*X]P'\-]*GMFVBN^1'JO]T
M(IB/LV1 E7\CYP^9&?Q=U7/\;^O5&#)^(C^J>;]A]IB\-'02P0G\I%TR/-P0
M>G8<CD_:TXDVQ*]D.#\1E\KK:K5:\ 7\XF[;)@*B^9[WGSM 8J\;DV;,P!^>
M#_D5&:)7>2&_7@<%["R-##4=RSX1_@']O/X6$K]I .AUR2?"#Z<TCN\?YD_<
M=.-N71'7P']V+1TX[VP@:Q83P,\@5 !LM4\3^<),P"_?Y%U @JTK7^'X[O.P
M(F^O_\Q7>>\^F-J?G+9%\]@6J*>6CO3JS^HDU7.P%X^02W020W(=U?,0BK_)
M"NH8^^,DU=.A?I,T8K9;.U$]G^?5<VI'2IEOU0/1D?I5DFDN#U$]#V'^Q+V1
MJU4LY%$]#X$$SLZL--053OP0U5,18?^LSNEZ:MT64!B7M6\BD^^,U0-#X@KA
MQ^DU#U$] 1&Y;DA#!\),#U$] 0$%[+R?KDJ=L5(]AN.3R'X0J3EWL5(]I1]Z
MZK0VQO<0U7.7/NG.#+-8A/T0U9/$?"Y,DS%VEG(=U:-#88]WH?ING-86SS1?
M!WD<>>7+#_80U7.7^CINO"4H,[$3:WQ:K4WF243F#['&>T/[?#^)#0TI:\S@
MH3L9F2I):TQ$[8OQ;N+W@+'&7[<Q?Z+]6A9A:WQT9ZYUOKFA:PSTW:,2,JXT
MY,'(K*^,K(*;N5$HC/Q%B$?U1@=5/O$0C P"3N#LB3%=J\6=#\'(YWAGK?KG
M\\[((("\NW<EP^@YA<+(#&YBDPLO9_40U=.WZ3X D:1*CF%^U?.V7AUBQ@U$
MQM(6O00"R.N=7*\OU%L]MF9!5I(M/N)<#U$]RP'F0T+(-K83%G5:F9YKDED]
M<6%1I[6LPM04>]GD#V%17P28660@:S;O%A6*A'K.-82_#V%1#(YY> 6RN6$P
M%A742XP5+V\EL6)1>X,$<\0C=Q))UV%1R*/(OMGO/"$_#V%1]/].MG%P5D(>
M%@7@V9SVU&DPUE8Z.:>@I&5R;1& -QY]/W)5?N$DUG9:[#TDBX9W!M06UA6N
M?I.WT_$5!E,])5]CD70=TV&O;6%=0(_*D7RKA%D]W6PZX@PZ2V' U0-=W&XI
MZ7,HYS;2I79W<2WC2A,K(WU:7-,\V>(8?G$=(YULR^83)N%,*O$0(WU:,LC3
MC/,P.S'2,>@WGS$F%_,0(_WNX:A!O27;(TVU#[D_L:8O?-86,Q$067ZRK')5
ME/P0D>0;H>QYJ K0D100RBI1#N&L0/40D22C@Q^Z7L@[Z_$0D>0;=E9P-;S)
M^_'OI7.3V>W[ /WO9R]=33&>7_,0_P[T\KH[\.)-@/'O<1EIQ*8O#_80_PZO
MQ!U)#-46!=H6%,_@H0O6)4(C#['B7X2E_PD26/T0*YY2]7Q7_)_;\[[BI7.Q
M*-45$Q(K*ZY4CUU56>882E,H*Z[#VL7#.I'REAM)-@']5"@XGU$AKJ<2#Q%)
MK<;MO_-PH/\0D90N _3*-#!]WK8?D>3]AP9J668A5@(ID90N16Z;:A?!@!%)
M6VORB)U/)B$JUQI)-O$$K9[1\Z,0\-T6GJ%4>[^H=G\2TWL=D90N2, U'8%L
M^,1G;3&'$*Q\L08C"11)@P&ZB*T6L_-[#Q%)R^&3]?5@UC0DD!))K?N8C/5@
M@3-WUQ%)G]NR@-;\Z32JD41B\AE"PS@D@!%)B*+)KVDB$EM A:+2 'YD=J)E
M,[$3*@W8Q?D9HKI\*IU2+4*X:4\J?+5E(("\N[=^NU1O#[%E.K_(FG)5)%0H
M6P;T]7407*$DS_00D?0KH9=FN:(:X-X6^Q(YZ9X6#K&+Q=X6M%<ZPR7&^(3#
M;4%[IEZ<;M&C,[$3(?80I=UO0?Q=@P(I(:8==Y<;]O81\]@6M*=4+V[;X!S_
MN=X6M)=2+5+[8LQT$19B%1'V8=Z=DIKM(68>]AC98L)",=T6M&?J)WOM![*1
M#Q%B#U&;1P86S'A4#Q%B!XMI$+IH"/EM;4%[.I]HQB7C(58H(08WO,XLI$.)
M0V(P(180AXV0(M$H:+,3(180BA^ZV9U.CA-B.?J.UF&!3A)BG82.<V?SM,-7
MC\S;02NE(B))CZSS'^P4FN<7^_'(# ZQJL5\??C([RZ+=L@70!,KCRQ-["V&
M:_,6D/+(O#V>FK5Z,&JN>T/[X2@FSNI3@&&N5&M!9'S>56>NK=/TP:A:Q')N
MYHJ,$O41^8*<#V&N#+YV22-F44,>YHJ,]R+&ZO],#V&NK%_7:]N*9=H60Z3X
M.VK_2K$AUV&N#)[]#;,M?8B&R*/(H9N]/%&-#X&&7Y3NDIH@[,I,#X&&[[[<
MD\X3>_<0:!C4R+X0(1ED#X&&)?F0N6$PCL&F#X&&O\;GT4<DSL(4L8*&R%.[
MZNXQ*^AO#Q%B>S+X^YKYCG$<@!%B>P)LW4,D,J(<AQYBD-K6U@4ZKK<>#Q%B
M@P'J$]+3\PD8(?98'\U85<\71_40(388T,_DV'0GQP$I(388$.S: @4Z\:*Q
M(18E)RY9.3!VQ=X67I2(B0&%+]S\;4&2,YQHUK%:Q4(>(7:IO)X7NK8M,!IB
MZ'Z3=,$X>_<0(1:>.SL9W^X5#Q%B(#'0^]-LT>=^(7:IF7Z")*4TD!)BH?$$
MB+>O%&*[^Q%BI%W/@;,^$A\OJQ9B_J&LM>\6*O,63A)BPMV^Z@Y!X[:A(99M
M@]\9_H8I7Q$K(39CIM\[-CQ/#Q%B18($_I6.$-06<W<=(6:]BHQY@C2>:MT6
M@Q/4.S(9H+,4Q!5B1:)N<,;H/&$E!A-B>I3N.XT4(/&:__,0(>:\]1PX1 D2
M% TI(>:\]5R<G/Q=T+$3+9I2+7+F<*_^N-H63#GU_V6_"K%3#]&B@!V,!R$C
MKQ+U+1HY6!IHBHTRY-&BR(CL0;*M3M*B.H_9'C$JE?X0+1J7$O41NY@;Y-&B
M.E^<K,**BE$H(>8^#ZN,_JP0C=@6093?MMD0T[::(9;U)O_&W>G:N-H60:3S
MRT7,NI(;.Q%B^_:1L92P^Q%B 3SX5U%Q,BE6#Q%BG6*/&^VKFGX=BB'XK7V 
MHP+R#Z$8#U&;%,A7$_]M;>$><2FPVC3BN-H6[K&&9N6XE#@A3J(8$/WB: PK
M:BR^BB'XK=UH61(U@*$8!SL$!TFZ<L:P;>$>1W>Q8\I/)?$0BO$0I8WQWHK6
M _D0BO$0=@J98MU_'6$PBK$2B(>WVM05Z/T0BA$0R&O.0:P0?@0IBK'"_@4C
M7K$V!?L0BF$X^@J9GR%7*J\8 7'CM+&N:B]@!J,8 ?$$K3Z*;RXBH:D8G23L
M)[]\ABY)VG=:K2T>$.2&UZ%]]M36@R-GS.(DV@?8/D8H,GG?;7%#TA1,FXV^
MXK$3VA>NPP7'?GA[;7%#:_B0H (8(I]/#Z$8>\$B?-XX*G%5M[(3BD$M7/@P
MQ!\OW]86EGB.@*D5431+":08#(2.FTUZBO80BK$7+,(U&S)](KD?BE%GN25R
M-$$\V:X8>Y&(OBRW>D5'#Z$8#.3^0Z=G@=L67D/_MDDHAC^]A9)C0GR3)F)'
MK_T0.18YZ>[:/5PBCI-C.AS]2ZP298F/#Y%C>X,$=Q>_DBE@!I-C*54RL5/0
MT^$YY)%C)6E!U4/\[4IF.<;Z51@=(%L]^Y%C@%V<)I(O$P(I.:94CSU<!;U/
MFG$=ZK&&#_D5Z 32!J,>,<C'/3V95_(0ZO%K?$X;O0\O=0(IZG&.Z<Z+\J4K
MK_T0ZK&&O/X5:-7M.Z$>IM[@BQ8?NJT>Y+-L##,F9_40ZA&7W<,^VK(A.Z$>
MK"\<"R%F\?L0ZK&&+;^NN^07UZ$>>_,$B-?/;XYW7_,0ZB&$IL-S^8(A<:$>
M#'ZG#9%JXN$DH'_]PS6YA+4?H&_J=Z4:,GY6#P'Z>W/^PF'_?'%.#P'Z\T7<
MU\G $0;ZR*/(V"MHHRLZH)_?6IXA5X$A.P'ZTAII@E9L^0[Z*54RR.["K2_6
MH%\Z?L-GK6\L;>&M02V-:XOO40_Z>W/^D/E@200JL0+Z.I]HX8/6(?00BN$?
M,]Q2DTN)$P(IBK$]=V9\SHIO;3%=7Q=,?O1AWZ6G#Z$8P3P$!VDEY+&")?$0
MBA%4]@C7AUZ%T*H8P>PA?(Q.%I(3^Z$8UJO(:P?'(4&4#Z$8#)+(WMTJ70%%
M#Z$8N@KYV=Q[/4\D#Z$8##+05J)/Q0_N;:$53N-?HK?:&Q^:BO$:B<S#,3!]
MQ-B'BE$V+7NR6)$E#U,HBN$^T'> FD="@*$86?_1"J\:@1.X;8%7R*/(N^3H
M]JT53J(8?B>7&B],[-,650/8X^EO<H;_;5$UCXBE[SP[1/L00).O#^G<=]+E
M#P$TYN'5!=5[(M]+#P$T#S'##3Y^%O(6UP$T#\'/ U%;2',<UP$T<%.[WSQ&
MI *L0/,0WU],8(&^0W(=0/,0='].$FL:@ $T81G*ZV-ORG&M0).C=\84"HI/
M= <TG23LG2$F_IOO0!,0')88-Y0:N>$D0--)[O\6T_W5UP$T <%A8C^78I_!
M0!,0I2WV<?==I/L00).!0T#<B\@3?D$>0.,;V=<E,GF #P$T*^Q?TCTU!048
M0&,X/@E+U3H=I=P6T<0BD"WR3;*DDL2)[_Y.FLD[><R)]-_;-^;+?,6)1-2^
MB TM288VY,&)2O78M>\1-XLV.\&)R)BF0EMM*L^)_U$%Q,UUL<R@G/CN+JT:
MBLUU#P$T=89XS[X4B19A0+,7R N9GV&CM_T00%-GV/_&4GH2*@\T>W'CUV2B
MY97'0$,M'^W:6N%K_+L30+,74S\0BC,SK_EM;8%-*57/%)@ANWA.#]'%@&TT
M\Z/NU]'%.AS]R/ZQ6W1N70P"F)ZF"?2:J]G%\W6047H;V='\;3%,>X,$7&.*
M(%LG^]'%*57/=_47UN1-@ $TP9[NC%7U U[*;0$K:SBK^[,?WX77;0$K($#K
MV]F5Y&<?.P$T@]'FM]),MP(8LIM2+0)G<KM/#T,>LHN,V\93VY) L@L"3N#L
MMSH>2<2\#R&[7_>8:;% ,'W;#R&[I7/T W4@DO@0L@O8F1JG?/&?#R&[7[<Q
M"#18ELQI;9%/(("\(@<6?6W LJO#T8_LFK6O2R2[I7.31,)^#U,H]O=K?"XX
MQ$Q: &U_O&W3DZLKXOP0]L>[&#\3Q"\B96=_IU6[(J<3[+'B#V%_I;/H$/1=
MR-T6/$+_RWT0L3R]L6)_[V[;=.$L)P(I]G?V(L4_=X_#;='?O!W5VK2"?]\6
M_0T;GE__O?>:*O$0E:[#T4\Q8KY/W%_I2O7B,*D::_K3;='?2K7WQ?D9":X6
M#U'I2O78?@.M_:=)#P$T[M.G[?412=9T;6%<R'B2@@<3E0HT9=.RBTHH:*U"
M#P$T U<$[3R*#*4K\O,00&/@-ZG]>K4^<0$T].Q?"$=#;<%9;6%<2O78[LPP
MAF\IL0(T 0QLR&XG[ELH0!/ @Q_9S5(B<P$80-,I]MB?]%EM (V%7[<QU^01
MJ:;F#X&%H<BJ/+(D%?<06 @"R#O4/'4W?]\6[UK+@=.D#U&O!H^%*57/+?4U
M(:F2#X&%()#(<":T_VQ ;?&NM;Q<2)]O$W^!;?&N [TA;TZ,[-,6[\HBD!W!
M1N<C;[$?6)A2+HE%)N(LQ=X6[^HZ[#T7SLE+XM06[XJPOLR?PC%@;<'35/N0
M.RFQ1/L0#V,X+9UV1@B9[O<P <%A0^VJ3+*:#V,X/NDW8('/??@PAN/*,((4
MK*@T@/$P 1&YD/D>#S=*#_$P 8'I1]DJ73$N#R&;IMY28*%Y!/(0LHF,A)N/
M5+>:L@GTL(058L80A2*;R*/(NW1]N]BJ#R&;*57/@";92L$4L2*;R*/(NX2#
M^<*=#R&;R*/()O9@=F,EA2*;(("\^)3Y%C(A3B*;_U$%![G*D[8:!B.;<>G.
M?_,0MYK!LAFN"1K+<_40;*I4>[_(%)]D!50H; H"R O[,> S[;HT; JO*BA,
MQ-P6FK$?;(J,52EHWT78#\&FYYCN71-T)V]0;2$V]F0ZBC-]N$Z8#Q/(L>.[
M^Q3>#_$PK=;2+J9-WU4G^_$P?(K]&,\C!]=T;8&37_>8C/5MB50J#Y,NT-<1
MXW<@(_T0#\/JCZGPM\L3XK$3#Y.H[AQ$7'F!;8&3X9JD[M;UM]<6.,G@)UU*
M(>RM#_$P>S+XH?LCH+,M&_HP-Q+VPF0B!^='3O(P3Z??TM$6B_(0#Q,E)PZ3
MO0\O>0$I#].WZ?Z]VM1_Q6(P#P.I,N@U$LM*;8$W2O7B+V**7%%^P/HPRIGN
M\7PE$CHDY/$P@X'I[MS?>A:_#_$PK4O<,XC6&[(3#U.3_M6,VM064>,D#P-3
MCRVO@MVM?/4P_F$%54#<8F5'C/P0#^,?$>WF#(TR@/$PGO78 CM8"+<?#U.4
M@ZXI,JDTU_$PP7SQ,"(2@3,HL?(P_F$%54#<$R+8L)[!#\,@M9EH/"TCGKA$
M#[.^8*X9L$TJEOLP9P?F:DY3KO@0#[.^R2PX*B&G /TP#%+: X&_AMM+#_$P
M#/+]<&U=2VJY#R,I8&Z>Z%L]@%&$IIYV4@HOYE>$I1,[T;&+ZW,=15@Z:6K_
M6C:D11B7)?K6E#A*#U&$DHQ%49^4//T019A2[(SLOEM#).0D1<C@_=D4L>S)
M;<$P,8A%)H(I_O0011B#[OS2-=1=#U&$\8GBZ4,F45^$R%.[YIPAKA)B!E.$
MO-OG8T1I!B,39.6Z%)W57]D6</(0T#^K)*1%7?$5.R$3UV'T.V_<7>@D,G$=
MR(M/DW&SW"\3'1SVM($02]+,;0$G 8&\PK%"2$,W3B(3^H2PL/\>J?G[;0$G
M'FU6M]UZ,=T6<&)F'[W3_P.RZ=P6<!(0+ +9NZ<38G8BA2(3^I3E@)9W[R9.
M;0$G <$B?%[WQ.33#_80,L%6>T_X^O3&@"$302S,B3G=X.4D,A'$_ RA;YW;
MP"H30>R];S$_^!3U,A'$'(;:]D8U[B<300SBOJRP<7][;7'%IZ7) P$9TJ$K
M.6$P,A'$.[1M]D8USB@3<0+B&-]+#_&:>2P3<;*K,)(A@3,AUR$3<6(%5:""
M""=?NF*U#R$3<<($C[TCO+5%;"<3?C5 N_<_60+Z#R$3<7+C",DH[*>V#R$3
M<:+X5S&]/E/%^R$3?@7F*A(XG/H0,A$G=KI[/S)IU;,3,B$=-_XG[U&>)M<6
M<&)%9:V,?;]V9"83TE''=$,7)=+P#R$3TI%\!>2JT3=@;0$GB5I??:\M(/\0
M,B$=3N#LL$\HBV7N#R$3T@'B8O]@=C07D"(3TF'T(G7/@R?;,B$=I2V@@EV#
MERP3D>P$SEZOWEYMNBT3D<PB?(Z0VCS@URH3D1RY(O<9('&K__,0,A')T#^K
M^%HAY0>L,A')DX)XNN4U^5(S.R$3D3P$ZN8W-V8A$P(I,A'));Q<D^&L#[,3
M,A')=4SB5Z4XA2(3D0SBPJ&.3,=V,A')W;V>,^%N0PT8,A')+,+G?Z*.:F^O
M;0$G0U/6"@S;,.)O#R$3;:G_P9@AJJNV#R$3;5D^? XCMK$D0+,3,M&6PWV3
M<UFOSB@3;4GG<)T@()L;!B,3;8G1/_Y'>A5BL2(3;:FX%/CWD<UI;0$G@<B%
M D8ZN@(T.R$3;?FI(5L2K.A'.R$3_L>[K_R^S^HD,N%_7Y3N\6PB%:(O&RH3
M_L?@:U<2[R7;,N%_L.'Y8:=-RDP>,N%_I8/L->&L)&0P,N%_I5-P=,'NHB,3
M_I??MMD0=R*)#R$3_K<WM&_"HZ<4C=@6<.(?$1WFB 29SB@3_@?8P1@D=K0A
M.R$3_H>,%.,58.--^R$3_J=4+V[;-Z809ML6<-*3GBT_J<80A2(3_@<"B8SL
MZMCGL2(3P*7SP7@:LV/\#R$3P,7;8:VEA^\5#R$3P)5L-<8LK:+VHRH3P"5-
MM<LS&8(I0T(>,@%<.AS]]\(H:$WH#R$3P 7T[FR),@D9L2(3R$7GN^1<>A;3
M;<$IO/W!#\:,\_00,H%<M/Z1"5*N$283R%7')Z*@_7<B^R$3R-7FNSDJE-<6
MJOT0WX]Y4,@5E2C6,E$H.R11)L)^MW(=,E$HF!X[V<T73!$K,E$H' 83]N&J
M@D.8,E$H4__*24-Z]_,0,H%=+IFDH^Q,L]P6JOT06:ZN^8A Y"$3X]7JRSU9
MK?\=#R$3A>+!J_<9D.2X,E$H4P_[8)&:KO@0,C%>K>[24GUO^2X3ZC7AP^$S
M"")),C%>F':K'M%M9ML6JOT04,#.T#L_N@+R#R$3A;)#\DI,/*/6;:':^7J0
M<Y$AK7^6,E$H=CH0N>$D5?@_#R$3ZE7/=Y4V+&3,#R$3+/V0&VQ-MW(=,J%%
MM<F5#\9^<V<P,J%%;[8P<24H^2X36D0$S@X3NS5S_/3W;:':2V[D@H:UHRH3
M2*VCOMP4HS(HD"(3\J6X%!@D:T/@;:'::-+JZVDC]X5E#R$32-VGTB7&NQ::
M,H'4 R2@:]NN)?$0,B%?3N#L^"024W,<^R$3\D7G:Z)*+9 ;D"(3\L5A,/'.
M^>)3Y"$32*UN<,8_/'$<@"$32&UG9U[0/,$L.R$32"T%M2OR-O)#)%0H,B%?
M1A^.E\030&(P,B%?]!M0*\2,=.,D,B%?4,#.R#ZOS]Z',B%?'/;*D[Y+YOX0
M,I%EW2U=*J$R$^(D,I%E#X)X5R'"UCDX#R$33VV/D:T2-OP5@"$3669G\CF#
M-QMBA2(36=;=:.P>4Q.8;:':>W'CT0=E^P24#R$36>;B-59 3W4HQO40,I%E
M-.^;O*5;/O$0,G$J+1LXF$A36/80,D$B5UI?2 $ZI'*6,C'7$UX;H\*@,D$B
M1N)?PG0:K @JL2(3)'*EB>6<SR).;:':[7]GF&A-?N$D,D$B,_S!3O'R@=D6
MJKVURG;F&3([L-H6JNUICTG?Y;8:^R$3))*(B:$6=C0D@"$3$X:\WRS8PD&8
M,F'9KCQ_XS>Z "T3$U;+=S6O^VHL;:':K>G52F-TI&5<#R$3$X:PB%T;&LEV
M,F'9/GGF]L_\\RX3$V8DM2OR-Q3+W"\3$^;!=SKI/'&=#R$3$^;!NC4XC$,W
M3B(3$S;#;6+GK;]\,C%AT,_K=!,H^!2:,C%AP@QH:*XM7^$D,K':WV]BK (Z
M#6TP,K':R"OR/"V83!$7,K': [TA#<-+"_$0,K':+ +9D'D?=H,V@"$3JZW3
M(00V:+,3,K':B8A/MB&A/A4K,K':BG\5_T?]ORP3JWW9N[0^6A3:XBL3JUW:
MD"D28,,0@"$3JYV(&'^;?+$^<2$3JTWWYMIM$W(=,K':4W^K2"$CA^\5#R$3
MJQW1>+<0P9C!,K%C5E %Q.U-]I:.UR$3.U;"+74A5Z6G#R$3.U;+F9HV$KO!
M#R$3.Q;1"%E*7@GN;:':"']W590K0)1 ,K%C0Z!N1TGNAW^!;:':B-CT@ :%
M+S\HY"$3._8$K2Y3_Y,KF1+U,K%C'GSR5\(>XA$K,K%C#X)XQ33I;IE/#R$3
M_^TZM7NK<,P3P_80,O'?4R^@R#;BV2X3_^U$,B5.->13.R$3_[U#M9_B2M&Y
M;:':\KW[1;B7I/L0,O'?-RXB--$_&?\0,O'?RGJ3_@8ZC9O',O'?5WJ3!&PA
MS&(P,N$KX<K'JN1&&RH3OA*?1Y\A)5)0A2(3OB)-&T-U-,%^2D,>,N$K.JQ=
M-[G,.RI.;:': %K_JW_<V2X3OM(Z+9UH%9AI#R$3O@+T2QPJ2=:V;2'G#U$6
MO'Y4HS(7L2(3&.ZZMUH2N#DN#R$33A+1M'$AF((VY"$33C+#@2-UBCTDD"(3
M3K)#KF[S5&- ;2'G#W'C,.(5=K,A@"$33F(%57"0,B>3#=P6<FX>]M@97C$[
MJP$I,N$DWNM4FF?\#R$33F+T+MTL5U%Q#R$33J+3'GAPQ=X6<B[XK>V"M>=&
M5_(0,H$L+AEV[I;;)?$0,N$D-][K6:80]_D0,E%E)H_:;=E_7Q$K,N$DAQU]
M50_7^2X33D+W!;5H=_/W;2'G/S&L-*Q%%J(93B(33O(@B'>GY!JZ&BL3R')H
M.U(3:W,BD"(33C+#7*D;=D,W.R$3;O8$B%=,*I&:)P(I,M'C)@_[<VG?S=\6
M<IZ!D"=,*K%: _D0,@%!Y</G?R(FU*@53B(3;O8$B)>PJF3)DB03779HVP88
M]7J6,@%!PNQB>>7+9"83'^[5=!,H7>_S,N%F19Z76?9=#T,>,N%FYP_[-5$A
MY2=),@%!A]TX!L47*_X0,O'A]KAZXV&HM_T0,N%F4I#I:S]Y "T3Y)+\"O\=
MN;)F5_(0,A'E?0I7"HK8_?T0,D$NPFS3"V%'U;,3,D$NG\J+@FW?%/\0,A'E
MH>R>5Z6G#R$3Y$+G5_':]V4IY"$3Y!*YRNCMT[$:.R$3Y$($S@[[2]/SQM(6
M<HXFK0Z3DTN)8?(0,D$NZ;?S@FTA0_<0,D$NR#L0N;':ZE_*;2'G:#($!TGB
M+/2##R$3Z'3Y@58AI&) ;2'GN@]G#V9-%_,0,H%.M9QHTZ5Y+E@H,H%.0Z!N
MM:]!8_<6A2(3Z-3=U)0T8K8^UR$3Z,3/]2HU2E$GY"$3Z&3T+KU ('&K"_$0
M,H%. BPB-P8OLO40,H%.RNK.%4@LI=P6<KX71F_;X,L3,_00,H%.=+YZ%-+Z
M"_$0,H%.,_S!!R&9[-@6<KX71MG;<HOM9RD3Z-3=)@R^S>TX,H%.$4T;)7$G
M!74=,H%.R,NLR'8@#-L6<GYI%L00I./(WOH0,L'F"8\V@N8PQ2@3Z&3TZ_EC
MONEO#R$36%[/=1Z0_[5J,I'H@[]+/)<K:X;#;;'J\3DYV9(?0RH3,^/!"0O;
M@62Y,C$SRGHOK))!,_@0,C$S(35ML,N_@"$3,^/!J_<>(+O^;;'J7[<Q>(;;
M3 *M,O'IT0TJ'J.,RR<3>GYHWEWH  &,RR<3,FJXB&$#!@@:+G#4 #'EB)0&
M"F*  !$#APL9,!9"&C#CX@R#"!6"> (%"42)&RW2B$$#1(L8 FO< )EP(9(L
M04Z"V(A01HP9$VG8</&1ID@H11Y&G$CPHL^)'UW4^'BP)H@A4H3HI"@PQHV6
M+6QTG%&PJL@A291*I(@P1HZ6%(>Z-;I0R),G.C?&D&H#K P91#&:73BD")6\
M P3*^#K1)U^C-D!0"5(%,6"O!D',:$LU9&0J4I(@MCCCK4L9.8AV3A@92A8L
M6V5TK($#;HNQ-""#@#)E".*V-&2XC %C8 W=244OW=AU!E#-%E'KIJR6:4P<
M$E^V+>L9!),D6I>"D.T"1M^)-5('U#TDR)2M,0#3J+%V_D7NK*]:<8)8((T<
MF<F T&:Z35:9>"RYL%)+*94'H%F1V847@JD))=Q+%>*'0V0-5;?14$*ME=Y%
M,YEU@W=9\+<<1P/A<.%?1!%G(@C)6494#1HE=J-1)Q9VF'@PEB:<9JG!L!H.
M)S(1A&\KQC1#=LXIB ./5SW!!'P6T0;6##>4IV&/4N2$8)<T.'?:7BM129))
M*^XEPT9!"?0DE4$X041L'=%0(@BT$?5@2#VZ%QM@,\@065A[I4<E%54PN997
M@8G8E8PAX0 "$6'"UV6A0^(X$ Q&68JIF"@-D.54IY%):4*6N@8;D+,]R*=_
MQYEE:7OO 5G<?X=&J6>H(#21A*-,R0<34\6Q!*P5:=D8T*'Q#51BI5<9AEBR
M\0VGV)2V5OOCHZG-0)]+-%AD'K!4%'$ED'MMMA!T@0$[1!9'Q%8<6;81>J2E
M042Q;JEDVO H::!V>T013=BK8 Y M2#40+EUFX2=6"IHIDL6$614#@P-\2U3
M'8$Z9%2_FL7Q$$\DO.)0,L%E7T8;HZABJ?XQ7*R?,1N(V*8YK+79CB:#<+#*
MC[)<%@@V" 0#MR%Q/"I\0\F 0\,S>9ESIFU>5 -8"9(5LX^:EE?#D-'.1].#
M2"0%7Z*FM7!#QJL]. 02I.XT@+X+M2 UQ&<;9,03'NH(PPW/581S50_JC.!0
M,]06U*E]@Y!VX!VQ]*YC, B&T(-!A#:H5.,V^%_D2-6+8%O88;P7#'!N;E 0
MO$%-5,0.(V1DY$X ?JV4[QXG%=,NR"TH@EW1L&6[JS[(1!50V!A<?=B2KC:%
M"@8'59<^13ZOZ8_>._5P+&L>O$$WU<V<@K+9[>:?XX_DN:[57]X5?@]:4<6_
MC16'6KY2Q?VZO[%)U'F0-A;@R:T(S5N9M"*#-.1%C@DIDIW47)8H_TEN>N "
M'5S&=I^S261[._O46AS&-\1)I E/F)G=!G0LEQ3G=B:DT?L>E2?3C&<O&HNA
MA$(8 Y9 )35SB2%U9)>1AKE%2F<33F\FM!;R&"HR>C%.$G?3&_@HS3P3:0%I
MDB><[X2G5$.!@5# =Q'VY:"+"/S-I_*V$JF843A(T!V0+@,#*.EKBKPQGX[<
M,B08G0MQPE$<#<LC1O1$37PVJT(3ZD81P$RECSB,V.: @C*B-29/$1N/>I('
ME-+!!S>E&HL9@<*LZL1E(()YR0LE&3R@+!$^@#%4'[N4PTE6R9)<*<\-^HB0
MJ9P-*#LDWD56,AS]%<R67E0C1D8V(%;:#"F!ZU)Z;).G8[8R6"F$3Y'@I!G 
M+.V7*#(E1G1Y(0[Z$G% 21?^>.)&GTDS;BT9XND45,A3K@=Q+0GFHU8WME1)
MZVPM*9^-XC.R9!FP):!13A,=*9B#5,Z,+5$2L<:3K#)!!40'O0J]$-,1GSRG
M3!>QIFF@*3NO/.<&M (H"!2I4+LIQGCJDXI(6P*XEE(D-?0)$*'HUQ+[X8^B
M#GH.6:22O): 4('QR4Q3OHE/]]GTB#7@9N/*J-*C/LJ1/AS/IA!IU)3!IY<R
M.DV+5)I,!%W&!GV<S;2"UU5<1FLS<*E:'57ZM!4Y4E;B&DA1=X-!NYGK8HM1
MT%I-,[2*+;,QB<KHY!16E,=)9;"$V:@"ZY@WXA"%?@M!H0JCF)N/WLN9"ZG3
MG5;4D\PU!GO)6X@@72J5^:#'/X@,;17$65&R=26V(.C7.@>PJXOIJ3RXQ94V
M+_LNMP'W;*$%((*V"!;[X BYDE$78G X+H?)";<E*0*>%'2TA]US<Z&E&(+<
M= ,HWHVHT&5"$9AXL\-NY*'0+:45Z?FBV8AT(64%6(O\TDSH#F&1%:OC<QSC
M-<1%9K$KRM-?H#(; [:FKVRY2.KT%BZ1'A@G:O1*'^]5J\U]AC(AG,J 0=3A
MX$6FL-3S"M>R-%@..:0_H&L8EW1YMLB@;+?A(@A3<.A@[ZQ7F=^S9_(^?*!2
MV2Y;B!);C4$@!6L)\TE#N@%JE\S2BM5 8"M$Y=E.- 4(D\<Y#'S20,QX(D]2
M3T!-#)<!>R39HI&(@390"?U.5-=!2JUP>1KLB>0[7J>\"Z320=R)%,G(GSC(
M('H+F9XEA^$5%>G*K/WCYDXDT!6II& OB>6:&<U()[H6:9=9M'"7J]=WB5E 
M6[Z@."NWH2R&BW[\BD(T+9:9/I7I;):"X&8%-T#Z7!;7N9WM=$-:ZXPY\U;#
M*Y4C11(6VQU;<G+4;^882$*8 %NSP[YR9N*LH.0A.U<T&R;9L!<W2ZWVE)AQ
MB>_$".S<!0YN%X*)8($-!>8-6TA!Z<FS13O<GS!0)N@#=IT1VZ*/S@;6&N4>
M4Z(C+O2HQ(!.P]H^"9FC,-*/8^IE;RZ?].?B;.UL'-,G:_^2H['$C6,U':Y0
MA(I)D"<<,4;+3H)@N+F3 ;A)PX3+C%&-.([)T\T";@Q.DW>RK&Q7)@WKRUA[
M+IE&P?(^##243%U>28ZB#TH"=/G? N=-FXTG)A?/[0RMXY3L_%;;3%]> @<&
MNNS *$U,[]#GEB9CVYV<BH66BYE:L#6B<.N*('"WU;<V)+T]UB" K]'BRI,Z
MBG0)AH!'L'Y1<SEIU@KP*&ZB*"L+',03,K>R_IQ';Y94/GW>S,H&;J=Z\B# 
MD_3,1LJB8B[_>=V&," ,&@ 0RP+X_[9T([$,B$L(=[C(9^'W V!91H*"IA(!
M_N?Y:^V S14QP/OTJX_-6WF+7_O8*5! ?P:B\VLO; 3E*:M:#+CI"\;GJQ*E
MCA.Q 1 % _B!;X26A6**7 J&>83MSB=Y,T[LMGX& 3;L(EA;XG'55QX2D4?S
M]4BGD2S\QX#> 1X58SPYXDU4H30287N313@N,6/6MGX?9"5A\Q\GQ3)_1X$#
MUTA:8VI%(B,<J!^[%BXW $931X(^IG&&=F4#MBD3"'\B=T,#D7]N\T(K"']0
M$ 16 '-Z=2%) S0S2 31QA05TFHWQ7B>9UH-H5UGUD]Z,R!!J$0OAG,P,3+&
MLH7" 7WVA"J)1B)J.!(E,5R;43@9$H?79U8WPG:R$8=51VH]Y!<*%H=R1STR
M 2V*T7K Q1!E:&02]BZ&!GF+N%H;\4(+1F'50XA#\%.&\Q/OHG0\IS3"T8*6
MA2,Z-Q9CN%(W-TC_45GFDH3"T7Z-02@HE46=MWYK&'K"Y!5K<8,+$X=51CT?
MP3\E(XJ@MUM*,T8.$RZT9UI0,"P#A85[4QI;F$YCEX5!=Q L,WZQ!T&!(Q=B
M07J\5QY D7(XIRBN-CO5B$V[YDWA.!Z$HHBQUSE/12:RXCO%2(Z7(G$$1Q8,
ME!M:LXY6-7(%HQEJM8[0=W]EU$?FPHU D7D+]SL-8T[C&'OJM#O$,20/,X!*
M Q3\=H#IT8N5(X/Z6!AK%WU<DG0.M'Z=Q(2W!U@=N8X0R4['(7-ZMXZ*ET''
ML4%W)9!M=C-BI'V,0Y*Q-S=Z!")/DF\Q@I#E]RAR@D4'X7%!"$QWL5T$45QD
MLH'ZV"^F=$0DIVX]49$()5U9PU0.=7CK%T_BU3T6DU9:EI;>(2PA-!]<TU]P
M66\G^5YC)B(O))9\U965DTI-47K)" *RR$[!@6@SQE2%V1Y>:&?5]16MM84M
MT015 &[Z1U27,R#R&%!>=AD_@1[JT8Q&E4:.)A7I@S%6LWX+T66OTD3WTC/(
MHF2L>2EDZ8BE\6\ATXR$$01N!1R0V)=;6!=5"3]UU"DOQ(V1I7! =1R983SE
ML8#+-Y 4H1("\EKQ4IOVEWQO9HO<-9SLB'UO,@ 8DYS@"3N8"52-,V"VHYR&
M>3]6]Q]-9#M)J%H@-EG,QFW.J9U5.!YY@E9VTU'RN!"\,5%'%!Q&%$;UR8A=
MZ7%>!Y"& IZ$MEWNI2-]6)L%&D*E43AD$H0+ 9'^B9IV2&,86@3,:3C&,S(5
M$H21X8WQZ2([IH7K1V3SQ4<Q)11;R"%]I9?Q45PX1']>XBT!M#"F%CTSRE<G
MRF(O$ILYRJ!#>DY?!SI-BGI9]A%LU$O<:&-!\)AVLZ+Q5EI-6FEL^1&%YSU-
MZIIK0W$_5(1-.J%C$B-P]HI-NITO]1PMX'%:B47F6"J[\CUNTTO->&$V11YE
M0C;&-*4F&F!' R/*<J221W;XIAF,(X]@\D4Q51IY<V5OJ30GDI-="J>?>FOK
MER0_AB"?A6B$VHR4UFBX*9NY5"Y;>"+G)H!)<TE$P8U[!I\@:82&YARQ>A6P
M\SGB\B[$USB_:I*[4RX,U!1HQZE49*"?57%HZ:P9!V.+H7,]D80GDI#G921_
M%DM!R"]K::N9XS+RT8SB.EIN1A8BXD@5*2K\"(_54Q]H(H^YMB042A4N&$1*
MTRJ)BG/B4GBSMX66LJ<Q*AOQIA+<>"M2\#$?(D+#AQ!FLWZ6T@1%H$+R2A -
MTT9<0K!"(P5%1G8XDG2D\:Z2$:^.,;$N4232B6PGF4L$<2@%,:V,=Q7- C_E
MLK&QLH4<(RP&>E9*U4O2>3)>E6 +PW*TJ30<\WH99![+NCI#>XQ#NJ%V<QG-
MZ'.Z6"J)LDM,88\\*W:#^D+CDH7HJ+2,R*44@:?/T7?B\K5N&DI. 1?C9#Q?
M2X^BAVE3TD'KAW(> V/F45R<Z7DRXJG52:*:<:JF)R./FH45 111!#.)^S^[
MA5I1IS_C)R,@FK+P=Y8YU!4%^)/ ]U@CDW61^Y</V$-9M)N":Q!=%CA@1399
M,H$R0HDZTHHN80,L0WLR0H6!$RX-IT4>=[D%2#>[0UFI>UREFZ%&:R1@,2(3
MZ[G0MFJ_<R@<1+?)FS8A]B!O6!&KNQOV=H 9D1U])ZK0.S'J&GVY@6B&PYB?
M JQY.0#--$)PT[V$2V#=I1A:*2,#&47[<R9^)[@?Y&2.*!LYHAXKB+KG=D16
M>EJ_ \ OES4L47C2-(ZH:X 3QW'JIAX4', 8ZT=CBU;_E+@!_+[F4BL4H6@.
M/ 1.0"Q11'CD0BBRVX#82VIHMJ:--2GA%& B 522B+J+2QY&4G<*HKL-. 6=
MMBN8-K.^*L*[X9*P@IK9X2(,Z,!/T+?"6%V612!,[(%LN1)PYA_Y*Q%OV[6\
MTQAR<KD2\:@*^1>9,50XFKAKV)01F3V-D25 FBV+"U7YQR=;);C"L;_<.15P
MH9_Y^\>^B1@XQ1@'L3J%')?(UZ^VT1.7*QR$"RG&([Z)(KMK&*]'%(B&A%YP
MO(]YQX#C]HNAG,=9XCAAD2QW+!Q+V(1Z*!1PT11:?%NW=(&_.U7\6H17P<E 
MM!E5&\+-(;6&&%:6=4_#S,6L%;"RYQ&"6X[7Z)58)JEC]LP/G'I2HY@U9,U;
M9W5D>K D&9JTNRE<2RZK.<S89FG$QL _8<TJS,(6"J!\!SF)"Q2\BWUN8:= 
M6\^&>;,+=1&AJ3?M0L$>F;5,T1;"IS>TI+M (:;!7$?-);'YVTDS[)1[N*9S
MQ<]88:F%FZ(V3,$1E05=&7S980.;$LZ5>9D*(\N9R;X^1 2W:85:,Z*PFK@]
MI:OZI2=(B\P0(S3^]\0P8#.B@])(:JT7 W!+7#S ZE:L5A\K*KA&M1]A@Q&;
M^7Y0K6I.&,0RG9@V[50KK6-A 2(@W<2PK%_TD7MH,M:^-Z1B!!92-L5=7<4.
MJWL.TD<:>-7O_$FM91LKJ=2R>$KSD2.DH;N>*4YN(GP/.SJ)NQ!%$ 4AFX6E
M$6ZA:!S$_"COI)$O%,XV 6'1DCGU$3+YNQ!CK)#.,<LU([@?^M,X&!RE3(V+
M[=.X1!Z>+#H+>"Q4FDL3%%/[V16MN:,L4A$;E"RA;;H*=!QPMBFUW9M,+9&G
MT4L';!.L.IOB(B*/I[NBO8HR'=2]R#C)+<K8MY-DQ#KDR=L5:*F5"-#NU,"O
M_9%-*\\<A!&H'5V<J!YC1!%;&]_*W"#T\8\M]]JZ-E]P=1I_%=_Y%<R%XC-A
MI(C'DE"(S'A#@KNH&=^CS9W&(V-0*[@VAMWJ>49VHS\*'AE<.6Q>47*WBN'/
M*N)2Y284W!I5!+ V%!#]8^*TRSACNS<9/3_!)DX,)1P;@5.R^V *][@PRB> 
M:N*C!IL:!#*TEKB1 =,XACX,M$M2Q.2JJ$>K9$3W$LXV)L!D)S4VN>0X7N"A
M6T03L7V#([B!DI[D01\)*Z6)NZT&;=^/,1R/I^!@,M<] <PA.,1H+D-/A3R9
MFF-]7AB[QJF7HS^Z*ZOWZ7X"TD<6-^A%VT0XQ.%(TTMWW".FJ7F"54X5U>?9
MI3# #16]9.?7_*D1'']NDNA5#NJH$J(W+"WO.;FJUQ@(W><SR5L W3![4[:P
MWAN<:,?-ZXY]?I$K@CW$%)7TU.=L&(FUJ$J9^.;]W)4XQ+5C'LZDRH.S!XF*
M0<%<YMO^41:W<1FD?F/.PDV>LMLM0MSNMS7-2TOAS+ AJY#T45FS4=NM\KUL
MEXWV*[B6HL8Z@L%N$S7O'BP7.VS!$>7W<KG?-EQ?.1[@R.^Q/J0K841V!_'M
M\;ZQ9%%\\D)PTA7I.I=M RGMG+CW3L*'<X3.G+@<8P4F^,1_P36B*+A8^XT0
M XE%HN H-W;L9!YRNRD4S#&SFN4GY=PR[]VDU5J0J.)%;[! Q1)-I!+AO/(X
MW>$R)7-,JO)":E=.H>O;C/7=K  :"%1225 N0TA2 $D !-2H%   B@^@",TQ
M+1P   Q0EB! (.1($A!4Y*2!PZ8,'A!FWKBA P*$E1@P8(!H 2)&#A!/QM!Y
M(Z:,G(XY<-QHH&#(&SAY%)Y!0Q'%F!0H58(0\D8.FS!NR(!(,M&DFS!TTD@,
MPX8E  V  %"1D@1*JPT! &2%M&'%%P  -F:M " ? $@'"    H , #P Q(4-
M@"H M0 (!/ 0P$< )@'$!% 30$\ @0%B!C :X&^ (@*T"& HH*F N0)T#-@S
M(.. G@.$#H ZH.J  @1V$*A"@"(!G 34$BA1X$J!A06&%OA:H("!&@:T&#!H
M0*2!J@8&'%!R0.&!F@>Z'@B 0 ,"(0C0(%B(("6"F0AN(@B*("F"I@BL(D"0
M($8"*0G\)""9H&@""PJ.*#BC0*&"F@J85.""!9  8($Y%B!Q 2D7H',!#AB 
M@8$I&%"#@049:)&!)AE8DP$)&L"@@1\:0'"  Q)$4($%!_#60 4'P%A!! ]$
M$$&*D!1PP ']40 !!A-0( $%$PQI@0+,_6A!D$'>N.0%$\QX(@(31&! !!.L
M!P$#*O9&@0(@S%CE PZ\&,$%$DCP@ ($).! @6<-$$@%@% "B"2!*#)G((<(
M<LB<@E3BIR 5#$+)()((HN< @ @"2""!- K((($,(H@@E%(J *2"!'*IIX?$
M.6>=@#@2" 6E FJG(XI4D @EB;!*0:RM+@*K(X[$B4@%@>3C2 6'Y!.( H\H
M @@!CA B29R%9% (/XEDD @_C4#02"2,8/N((]M&TL@DC,!:22&"VBD)((\$
MT@@ABRB2"".(-&)((X,P ND#@JS+B"**,))((WU2$ B>!0J2;".*+-)(K(<<
M+(B]B0!22*.< D((((8(DC$A@7!<2"1Q2D*GQ,!.<D@DACQ"B",& U+@G8$<
M.FXEAU"BR"3?%DB)))4X<@ CABS";K[H A+)P(@64F##AU02,@.27'OM(I-0
MW8@DCD3B2(&-/*)PT(,DPN>DCT8Z",:!('*(OZP6J(@DKS9=""7*$O)((8P<
MDHC0IKY\[B2"3&)I )4&DC$B82?BP-N*0/!J(1004F A#1R2<"$L%QA((0!0
MBJG&@ZC-""$28(Y(OX4\(LC1> )N29R#3" (GG_7&8B@E1@Z2"2"/)*JP( #
M3DG,@DBP>^R]APK) (<X>XFA@;R\""!_8NI/(?L$B[SF]F:,Z3^%7$!([HDR
M KK%_6"_2)R 9"#()8108LC2BQQRR,;^"+(/(/D0,H'2 # $T Q1"$$0XA^"
MN, @*J$LO!7"$!<;1#_TIPAF52!^AE!$(1)1B ILL(.&H)L&(R:!@;VK7X"0
M  HE8#1%(&Q?$D@$GA@!"!C64!$JC 0@&E'#1NA* H@(A-@0$4.X14H!D5!$
M)"*F $ D8HE.6]X@ N"H2#V*8I8:1!81V ] \",0F_*4ISIUJ<[]8XJ"Z(?R
M&(5$)3+1B5 4%:.J&"E'9>I2F0(CI\8(JI!E@'^]DD0&)I&)7D5Q (8HU/!T
M2$.Q$8)2A@ $(@"Q"'6M+%:,F!HE$%$)0^1.=D=K1-H,:*E%"&!TC8A7([)%
MM43&#U'Y$@3B!L&Q2"(" 'I:1+T0D<E%2$(1FZP$R);GOXL5XG^&JT D$XFH
M0.@0EQ:CHL4$<#9#". 0& O )!\AJ@A$#P""*-C1CB:!V1VO8.GRW<N.)CQR
M):(2X?I6UKC5"(0M8H.A,QS9:C@!J3TBDXFH@*VRQ0BO+>R>$=O4():'B(<9
M3(L#"**]&H&IB-9PAX%PQ" <\;%N?C.<X!QG(,HIB7.",YTN X#1 M'.2KPS
MGE'[Y\(8L0@*,$(2!578KH#IRT44*Y5 8\"[%J$PACD,8A*CF*<L)C'#@:X0
MM,14I1B1 (#I2Y8,2%B[\C:Z2D8L$ 7HF $%48C-#7, B8@A(.J32X%2DD[S
M"Z A . ()P8 FXD0P"1-2<-%!("'RUH>H2B9+],Y0F&-6(0C$.&(>0VBDI.<
M6*>6:DRG&F(04"6$5.NU@(4U F^A6UQB&>$O1A1B$8I*VZ/"JEG-EK6 %6"$
MH"@ 3$%,P!"3 *9LS[H("2P"6]B2A"\9,0&J,2X2BR@0([CF+9S:C&8,I,3L
MOGE10U0*DI*DI+HV:@A'',*>\)*7OAXKB$0,HIS<<ZH6'S: SP)5$8?P(-T$
MQSN*7I:6^KQE+A^&-T00M5_Q.BL@Z+2M"C@BIHE0!"+41@AL(B(!]H-@)!OQ
M@-,9XA"%(,3$L D(;PIN9F^[J3P%-0%#S>T0D^@PTB91B-Q*XJP=%,3P\*2Z
MSY8VDUV[6KC>2:Y!4&!VO1M$8AM0T)O:JH.O+*G*;)R(K";6:[\45R$8((A*
M&FN2'/O4Q"(V48.M+%[]6L2[!*& M(GU80)8UWNG3-Z&/G)S3@1 )4<'+Z*^
MZZR"( "F($& UC*" >URUX(-@3BQ3:^NZ2JI_"K!25M=C5N.^!=H]83-BTV6
M4J[%K.0&L%X^+T!='Q7N!$3\B)F>=A"&0  AS*N(6!9H$)/ (*,KP%.<_M._
MA&BUV+!YUD X8(<U# 1J=<D((1LLHX%H0"#,9SY1BG*.99/4'3>K1S%^RD^B
M^C4/[37L>AG;5*92-K/SM5UI6K&.E<+4%M/HQ6J3\=UF1*,:XU0@%B;B991@
MGP.TYBU :+O?!D!9)"9F (D-_) I+%#$ZB0J"#AS=;TK&CME/+Y&4X(1./.6
M3!>1MX2-&J>'326M*=%35OEK$890P(7YK(@,&F( !2QK)!T\RD.@&M4"L.Z?
M^I0Q."WO$0W@UG(!<&\ '.(1W3UM(1!A"$(K75Z+300$&A8T0M\/$:F#P&(;
M.SE)G+@2BH G)1XQB4A$8A*/N+A+.SG?U07"=XUT*B$T:UTNH^OA)2T0!!Z!
M"*1/#A-Q"FBGB%C7M/HNH"\CA 'D%95(KN]<@B!<HP)P,4<$@(:.2#.Z!*##
M2<"N4!:+W.8\"(@!RS;M!2K[S[GV3YH^8@(%BD2!'E%J1AAX[)+8EB-(>\\%
MN%X1"H_$R21WTF6[; "/2,#2"F2WARV 57Q_Q$:-/R=#$0K6B6QQ?.<V1;,)
MP%&%R+G$[LKPY3E" H^H!.T/'*ZP-RU^TWT9#X-80/QBTUCVTNC=S@M24#<4
MJH.P?8=27[)$2V6%38'%::!'"*+701,S8&'7"+A7(+%W+8@P.=(G2L9B?NA'
M@0#0" 72=Y@S"*T2+EE3:GR7+/9B+-4G784R"=EG,O+5?9/R?1(C?H5 ?ODF
M10O8@*0W8 52";-7" N07 /P /43%2]3(-:E2-<'@QXD@W.S"!6@,XU0A0 P
M";]2(+F'A5[S %IU"(O0 'LC9HO  &+8+C0X"#88?I&4@]BT/IKC0P63*Z_&
M34SH>3QX-@SH,3^(A4(( '=3A,N#A-@$ )/4@D\8@P)(A5:(A5J(A5TX>XL 
MAD0EAF1H9V>8AHJPAFV(@^27@.>7?NOG7.X77?&G4O.W.9C",?<7;*;B.WS'
M?W,X2@ H@+L32XBC86/C,RS3" A 42N( )+@7\&X-L$85PB =)&PC#7S>7SH
M@Q/S"!6@3@!  9H3"16@0P/&2;9'">.R %X3%9/$" !@)XKX@HPH7U>8=K]"
M=B)S=I.PC8<B>6P(?J"(38_P5YM75Y$@ .<2"0&08J^SAZ'GAP]8 9Q$CH_B
MA.H8A;AHCY_XAN170<L37X= "-8U,8A  8C08$+D*H1 ?V0#*60C<T\557G$
M6F/U6H006^,"+/)3,JV2"%7C*I1@APH8C0B94A2P08@@CDZT "^3" W C0I9
M"5<X"97 D.:88NF(?1 I7]2H,R*C,YZ(CQ2ICYKW" !9?CMYD*.7D LIB.C2
MA-;WD-HW@Q*IE>-W?X*X;(*8+X*X48(85]!8*;1F,;2&60*U.WNIC3HD"130
M.A608@-&+MIH"4T90*4" );0D(9""8?)E(=9CV83 !,CD+[SCR\S"0)@)Y,0
M $T)>'NHESKTDJ_609&P.Q2 E.3R*^#8>)(Y=O0XCY& F9.BF8!0D,QS0=)%
M,"H5=_7GBDX$BX-P-PJG7(]0(.PG+DU#BP#@?V2E18TP !P5?8VP-1\H";A(
M@+MX@'%62>NR=?6$7.*BAV'9AV-9>C")>EDH>]C)G!RG08KP>K'GG*UW>X^0
M>]M9GPP9E5"XEMS7EC>XE6 97_ GG!<E-L4Y-ER64<D)0$574,[I7.\4G>@U
MG:+T?]:)G:G3=]O)-=XY@^!I@! J9Y9DGIKT3H0 <X5P=1ET:HS0#XVP#X^P
M#P72#P7R#XSP!XW0#X[ #X_ #XO07O[@"/WP"#P* /Z@GH/0@SUI>NI'":DG
MG\WY@:UW3SX%>P @>X)8>_R9>[C">XE0A #&,IUY)[.S,@2@.MDH; K@+](G
M3N84H XIE02JF_=XH&\)EHT@ 8[0,Z4F7,%$+C)V)W>W+NWR+O'B6/82"/BB
M+_SB+P C" (CG%YF3POC74<E1!@S*9!23:57*0)&8!@I21X9DA%3(%X(A # 
M0 ! 0Z.B.G124G3"8G1"<EA("5>8>EL( ),HB(? FX<@?GEE+(D0 -.3@%&*
M:H]4=Y24*J\F<'03.84 50[X0'X"JMW8,Q4 C@*ZCG-#C;F)FY3@FX02,5%J
M7A'SDIU8(+/BGDUC>SQ3?;I*"% 8/\%*"=JH,U *+'R)8=C405A'A5@7A]58
M0]68.CN$A2V&C0#@L-]*A8T0B!7 F',"?Q<TH%+HKY=9"9=Y"7%"*'45I;ZC
MFBKU"!1 *0-6KQ7 ,[3Y> VIKTBVK[Y:C2";=FO(FY:'>9J7>9U7LJ[B+I-"
M:\O3,0*5,$9# >WRLN *CG-55RWH2K9YKO2XK'BE5Y1T2I3$CX?T*X#0E/\T
M,E<8*;_B*%%15XU5JX.%JX"@JW62"'0E;'3U,'0E9'1E" (V 8#P#X$P 8'P
M#X#P/RGV!X7P#VLT8$JJD\4$/O]#N(8+"(C[#[>T/(!P +RT-)GK7TNCGDJH
M4GC&*^:24F_7?RA3L@OP,-ZF)WK2;%_&*J.U+\4F2G6E"("6,/62-@[P+PG3
MB96$:&N5 (GPD7\221$$*1>#5WEB*0;0,>DF1 @0HZ@V5EK4,48#C19C.!T3
M.8[B0>.R.;B12JSB"/7D-2'(A!F8)]FUD1LECHEP-QJE" Z 8XP0:1PEC.PK
MH.K)"'.:7 3P+_]"5)W:74(F;.U[7?FE7?0B")_FH)AB" Y "/1B/HE0G0:D
M3SXW %0X/2_#"#:5-A5PL3RT" O@0HQEP*(T/9-D7==K2VLE;);RP*R(:A-<
MP>6%P;7D1 )E,P*%,P)05XT0 +Z3@((0C&#&>^2KP@C<P@H,P^19+PFP+QSG
MP$)4PXN  /^UQ#=<+SD,51D<21O,5K "*\)EJ*<X-_JZ4)TC,1- ?*ZH3)10
M"%Y7>KU;5XBXF][GEG!80W'2"$%74-MIOB'7+Q),P5[<:H@#00\TDKEV6@+$
M2PFS+TN<+ Q @J&CD8I@ (O@7Y4JP87 J V6K1"$" %<"/"5,/_"6(-@ &15
M.)<R*?]@"/Z@"/X0I$,Z" 'T#XKP#XW@#V#4*1-C+(WP#XU++?J@"/TC+/K@
M18#0#X-[,820!X*@#X'P11/T#Q=S5L\JEHDY+A*C<GG3J?=KOO^TG"KE" SP
M"/&[; Y03^5;>GF\/E"9IX)CH&[XIS];*II7()R74@%P+H?TK"S&8KG#0!WK
M8]SG 'S8 !SC;YCS@'GL:\;&T,6&S_FX5G&22+B%")/ 29Z$D3#HD?+C (:0
M/OI "/EP")7C#X:P#X/@ (R%"/YP"/M@""DM+/D ",W,#X+@T]9LS?M "";]
M629-6MK+GM\\,8[0 !F6" A0E ?@.XAP '6U" Z -0Q)LP+*" Y@OI'PU?2"
MT0B:>334"/^\@^LI>DLMSXEHSUGIIWULD9S&T!;CT)'B !$=S@+T79B$*UTS
M=$57*NO<SEX-SXI05P6"1"*6DY?@")G0")K ")N0")L ")G  )J0")H0")?@
M )C0")F@")G@UI24A;T) )[P* Q-418=U_G<Q_N<>3SDSSI4( &-V0%P"9CM
M%X"P"0+ ";\= )T "*  .W9-"'@-T1S%U^/\U^8LV"^CSNR<+H>]G8EMVO3,
MVA7M;62MSY?'S[4- /^,VP*]T:W=Q&CSPMD5Q8VU6(FE4^]MQ1!<+^T5RD-U
MR#A\P6"\P_HE;/QU<I3,6-S,T/WCT,VLUQR5#T0X+XR5V.>;7(BHO@=\96@#
M58X O_)+@O5;3_<;*Z'\,.P+"'F ",+2VH+PVGK0*X.P!X+ X'M@" RN!\&B
MGF.X"/GP9XR0S$0&SXV0#R:,PN]]P"R\WM@U2;DTPU=<?_KMQ?QM*?Z=!P4"
MY'J0"$"^!\K<"'O@"/G0"'KP"/E0X W]T H^,3J>6/&-YJM4OH]Z3Y,TT2C^
MVM_=QWCH&(!V6)7Z+PTS?=L6PXAS"$RG0:B5;#&< *&C-BVW" 6@)X#  ,U;
MO*<CAJ>56EBF5(YR,8]B,+!38AGVRGBE7<563!J&*?\S+AHY-OX6*W18UYKF
MZ6L5;!25+,H]=P7$W!FF<Z7RU7&++@V0+ECMG"]#T:Y=+[8-T.<M6#(]*3)M
M0+UK,&0H2W;<,/3KG+Y&"$!SPUYMSF)=X)7F #97"#+]6.$>APX =^4N[B/:
M.9/0 '=HQXQ5( Y@":9RPX>@U]?B #A3"?C>""2+[#04TSQ$U$+< "[K[:SR
M)G1%FW0;[*VMWUA]ON\\UIEIY@% S$1\)\C]KLT.[JT&=*UV"/Q0"/HP"#K-
MTU[TT]4<"$+M:XR%U5J3XGA3[Z'<".4.@@!0\PE(OZ6'U9'BU8[BU:7RZK-:
M0QSS:ZWV:[KT:Z:E;:$",;.J*+/Z6+-J-\R2 8. ">]S.RRU.FR\,M:N*(. 
M 8)@"3*&*(0P<'?#J$XTRE+$,6<C"/G##X.@#T>LD7-G*9,%N!,$T_I0"/E 
MUP-V40E0>H3 /NZ#"8, /PQ$7_UG*L76:A@P")9@?7BB0[ZSPALT-A-#*4LU
="/XP"$ ]" C O9HE50=$"/TP"/M0S?RS\ 4 &@!@
 
end
======================= piece ends here =============

jsin@CS.UCLA.EDU (05/13/88)

In article <478@cimcor.UUCP> lee@cimcor.UUCP (Lee from Minnow) writes:
>	Cosmos was written on a UNISYS IT with EGA graphics and a 80287.
>	The program is intended to run on any DOS system that has
>	VGA, EGA, or CGA graphics.  Although the program will run
>	in CGA mode, the display is very poor because of the lack of
>	resolution and colors.  The program will also run with or without
>	a math coprocessor, however it is painfully slow without one 
>	because of the intense floating point arithmetic involved.
>
>	uudecode and then de-arc.

Thanks for the program, but maybe you can help me with it a little more.

I got the program running on my IBM AT (Original 6MHz version), but it
dies occasionally with a message "floating point error: DOMAIN"
I'll try to see if it dies consistently on certain settings, but it for
now, it appears to be random.  

I also tried to run it on my PS/2 model 60, but it dies after the main menu
with a message "Please rename to (sic?) program to cosmos.exe".

For what it's worth, my PS/2 is 100% IBM, and so is my AT, execpt it has 
Samsung EGA monitor CD-1453M1. THey both have a math chip.

From what little I saw, it seems pretty interesting.  What's the difference
between Full-Function version and this demo version?


John (Jonghoon) Sin
UCLA SEASnet Facilities   InterNet:   jsin@seas.ucla.edu
2567 Boelter Hall         UUCP:   ...!{ihnp4,ucbvax,{hao!cepu}}!ucla-cs!jsin
Los Angeles, CA. 90025    VoiceNet:   (213) 206-6864

Disclaimer: Above opinions are mine, all mine; they do not reflect the
opinions of any organizations/corporations/associations/institutions/etc.
other than myself, unless specifically stated as such.

keithe@tekgvs.TEK.COM (Keith Ericson) (05/14/88)

In article <12214@shemp.CS.UCLA.EDU> jsin@CS.UCLA.EDU (John Sin) writes:
>
>Thanks for the program, but maybe you can help me with it a little more.
>
>I also tried to run it on my PS/2 model 60, but it dies after the main menu
>with a message "Please rename to (sic?) program to cosmos.exe".
>
I get the same result with an 8MHz 286AT Clone that is usually very
reliable and compatible.  Just what is it checking that results in
such a message, anyway?  Why should it care if I call it ralph.exe?

Anyone else with the same problem?

keith