?>2CBPA8CHIKP$L<OLHLJD$H<<BULH0	D((/LH83D((/H,	H? >/ ZD	,HH>P(H4(XHS<ZLZ=OT<A:DJ$D?P.NT2 2B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"BE$%>/"DW1Q"+8H1U<$XJ>RLE
IF"/D1W"Q8+1H<UX$>JLR
EFI/"DW1Q"+8H1U<$XJ>RLE
IF"/D1W"Q8+1H<UX$>JLR
EFI/"DW1Q"+8H1U<$XJ>RLE
IF"/D&K
B+O6DW^-H.<[XU1>8"+51E
+B6OWD-^.H[<UX>1"85+E1
B+O6DW^-H.<[XU1>8"+51E
+B6OWD-^.H[<UX>1"85+E1
B+O6DW^-H.<[XU1>8"+51E
+BHS;&[	K5XJXC/9F8F8F[)XC/K)\JS	*E.
6K4[*H^8 [+*-W6K*XK;&[(K5XJLK8!LJ> **S(*!RR.R;&K*[*S+*Z.RH^9DH^8!K4XJK,\JK-\JK.\JP^H^
6.0K1[	K7[(K0[)2AO	?H+M
	
(S	S(S)+H2I/2""R"0/S	3[*K*H]X]K*/XLXXYHYC?XZ/ ??B%K$T1<9+7*CYK/:2+?+\X=8 >2LK\ZKKW8![EKX[CKDZ
8.CY[A0\KZ>(0Y*W2K/[2LK\Z?KF> +S2AR
<B*<*9KA9F8FC]OB
BKA9J8J8HC]OC
CKDZ
SCSE*>K^	"*?"*>KC[BSCKA
CRM<B.M*
2LK\[Q2IO
C K![AOA<B/G2C	2C	TVC?==>72C<4>O?/<+AIG8B0 U  ?=?B6?6-$T1<7X7EB?/%=> -L%V/;3&P5$%"3T>2LJ5Z]K"ZTK/ZO2INA<(*)	=AV/>NA	=C>A*
[
1JTZ:	2R<B.NAC3>(*	NAC4^A*Q;X*]W1*]Z8(K[K9PJU>0+2C2I&OV+(J:Z:R+:.+2LJ5[&2IO1> +%K5	6+&	6+&	6+&	7?HK8K9G:> +OO:K;<(+
K<"++&NA	=D>A<HSB<B/BJ89F8F8FC4/(R?;F:?0OBZ:M;GA?;ET B;U>GE$%>/"DW1Q"+8H1U<$XJ>RLE
IF"/D1W"Q8+1H<UX$>JLR
EFI/"DW1Q"+8H1U<$XJ>RLE
IF"/D1W"Q8+1H<UX$>JLR
EFI/"DW1Q"+8H1U<$XJ>RLE
IF"/D&K
B+O6DW^-H.<[XU1>8"+51E
+B6OWD-^.H[<UX>1"85+E1
B+O6DW^-H.<[XU1>8"+51E
+B6OWD-^.H[<UX>1"85+E1
B+O6DW^-H.<[XU1>8"+51E
+BHS>G??G?888?AAB ?	?>PA?DC?? >AO?;?8  

?>=?K=4)5"?WA
>>$B?5EW>>E?>FD:MN/==K/BAK\KKN2JAH$LKUK$K)D,NM K!K
<=?I/A/=B-KH<6=P4^<]:&<L<K;W1OD*D,=&H,H;IDILIDIVH4I
I$I.I.H;ALAWRAPRAPEVK^KQEKKY/A0?/G8>PE[DDGD)=?<!P-?2J$"E*I5ZX2IL!L>(*QIX0H>X=8 HKX.2A2J$"JDTA0!IJX8!XT2IL+<(*0SX	H	HT?H*0H	I6ZXNX2AA7I8> !IH	HT9J8JX)H)M+]+2IL 2AY4I49H>X,;2IO62A>(+2J%D?<H!II49J>P$6H.XXP+2IL+8!VX	L+WH	2A]GP+QGPX+RH.XX$/!I\$H)M*]*%-$0HX		?+
H	2J$1<H+)?H!I!I>FX JA2I/\%-TOO MAOZNJ%ZR"QHG< *L"QHG9PH
<PHHHI.P-*VH&*^: X-"!X&H&8J8J8JB9.QP,2AL,2AQE.!<(!I",*"\$H(8!L$H9HZ<X*9H(\$%-X	$<H]X,HYYE.,H]X,KWX(HYYEH\[X9KW8!H^X	H	H>P+U$<8![X$9DH)5"?!I/[&HU>(+0(-[&J2J%0B+5K	I=H:9F8FA"2IH\OK&/[HY>(H">(+<PY(2%!%- NOTIFZR[6H.XXHJ[5HOI)Y2S6I2Y42IM4Q48!I/RR> *YPX*N*1HN2I
AI2Y2IFZRH.XXS5*KM22A<(.%AO?*DHRX	$<I	Y)*DHNI2Y22IM22A$=*ZY0H.HO> +AHM]C$6K68![6K6Y/HKY1HB[4H%[5I([72IO72AC4I/>(+1S7Q0S5+NI/9F8F8FAY/HAQ1+I:2IO72A<(.%AR+DH%X	$<I&Y(+DI0R.2AH IP<(%)X -OM92AI.X7: IIYIX	I$H	X,L,IIP	> *GI%H	X,L,X,X-YE0&	:X	H	J*>(*!H	$7*WX-"$,
J+$7J,$7.$=\BJBMFILE OPEN ERR$OUT DEV FULL$INPUT DEV WRONG$INPUT READ ERR$IN FILE NOT FOUND$OUTPUT WRITE ERR$BAD EOF$FILE CLOSE FAILED$OUT DEV HANDLER ERR$DLN<(+	%M+;<:NA[DRAKDBKG767<KE
F8F8D:PJG<PKH747;*T=H*M718F8F>XKJOE8 NA8 > *Q<X*RRANA
ERANA
FKD7<8ACD9F8FKI747;*3RA=RA?HKD8J>P*?NAZA71BGKJ74.A?,?-HDAXB0!+L0&:/K0Y+Q/T>EH	9J8J8JH	/U$9HA?-7O?!I/\9D?PS$/$%H%>(S)/)P*<H,2: ///	I680!+80&:H:[7/6K3X72J%D?<H/4$6HJYII	KIY)2IM)2A<(*)$=*)H.9DX(KGI)X,X-KX*H*KJ<(*&HP>(*)H*$7P(*[$:KHI)QI*LQ):2IM)2A<(+D%AO?*HHR
*H*9J8J8JH*I	X*HJYIH**KI	Y),2?<EG= P-+QK
P,+[: X-2IL,2A[
K
8J8J8JBHQH"/K[KKKK1?H+-O ]BS KK]C$6/ S S KK/ =8?4OUCJ%,SAVE ERRORZ]8H/?G52IRC*C*L*]J-ZCQEL,B,*)P,L,Z.J.8J8JB,QE*):L,2A<(*/$?2I*LJ.
9F8FZ.P,L,9F8F8D
J.2AR.C?*C2J%H!IHKXXKQX+KPYGM*C]*M+C]+I	Y)I&Y(X-KRX=KSX0KT]BHM]CJ-ZCI.X7,5A/>EK$DO?2J$1<B/UH	<(/ZH3>(/ZH	K?>(/ZH	H[>($4X*SZ/ZHQ8DXQ/(LL>(/<%	BAF,(A/5K[XO+-L2CG<A:JDY?.DN2X*ARGL4\JANDX+BLOCKVX*CALLLX+COMMNNYJCIA8!XJCLA:YJCLL9YJCMA8 YJCML8PX+DECIM	]X+DUMMY-
\JDCAXX*EAP37X*ENDE\X+ENTRY62X+FORTR[3ZJHLT<BX)IF3[X+CPAGEV[\ZISZP\JINCPYJIAC8AXJIOF0BXJION0A\JJMP(\JJMS XJKRB0^XZKSF0YX*E$%>/"DW1Q"+8H1U<$XJ>RLE
IF"/D1W"Q8+1H<UX$>JLR
EFI/"DW1Q"+8H1U<$XJ>RLE
IF"/D1W"Q8+1H<UX$>JLR
EFI/"DW1Q"+8H1U<$XJ>RLE
IF"/D&K
B+O6DW^-H.<[XU1>8"+51E
+B6OWD-^.H[<UX>1"85+E1
B+O6DW^-H.<[XU1>8"+51E
+B6OWD-^.H[<UX>1"85+E1
B+O6DW^-H.<[XU1>8"+51E
+BHS

Note: Lines longer than 256 characters were wrapped