Directory of image this file is from
This file as a plain text file
??2CBP >DTSDDXEL:DF<TDV: A"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"BH??%)8 H^H99 H8H+?4JDJD>PKHEDNZ58P2??BMN LY? ?<-2OBJT75=N\ NR6<C\B)=WFDB(?1= H?YIKKS?UJ=F?4ZK ?0DD?:F ?<=VGPUF-LAKLB0 B>">&F;"?M/G <%E[DDGD)=?<!I?2J ?HH,X+0&0V0L>D?*MK> =K<K"> *TH*> $)$W0!*U2J$:E0& ; :K9X/K8XHH/YGHXYHH]HQHH.YE2IO78D?*2X]XZO6C5> ;XYF;(G4IF< XZO4YFO3< X]O6YO7YDO2YC 1IF?+WK0YFID9T8DQF=+O:MF["$W/"H ^ MBMBMBMBMBMBMH+6XP;&X JA9DXSHR8D=H-3XRHSCWD>$>&>"P>>%>.SRT8R6?O?> *MID?H*MQGQHQE*G2A.2ILH2A]GMG]HQGQHQE*M."70I0JX&0LH&.XX4"70QH40V:. "70Y0^X&H&.(X4"70!H40&:./N7[R7K8F8DC>H+:.70Y/D0\K=> /D0Z$WK< ;K: ;$W0!+R/U>EP]-3PZI$*2B1[&HU>(+0(-[&J2J%0B+5K I=H:9F8FA"2I \OK&/[HY>(H">(+<CCD/C^==G>AH*>(*F8A ?K>K=X;O?YN0L$<RHXXHH/YFH.YELH]FQFQE*SPHLHZ4H8> K<K;%M9H J4<(* >X+)J4X X?H 8![( :IAL>Z4$"6,(P?S(*<K9%M,"$<<H*.;&H^>(+ER*-H8> ,"%L,0%L,8$W: $)$<R*-;$[ H^K8YEME[[%L$W: $)$;:$<<H/RS +U,(K7%KH/%J%L,?IN%K,"%Q9F8FA"LZN(^DPC??DXP)>$=) L/>(/?O>YNH*>(K=K<YO0VK;%MH8>(*[9H]H >P*Z%L-,,"H]YEIEIAZ9IE]HH 8!QH]HQH]HH8< X H*>(*/: $)H,8!H+> *6NN$B6,(R9 :T>P +DH\>(X,"P+*6XH*> $)%L,0$W*-KWYEH:%O$VQE+Q/N>,K9%ONNNH,X+/X: XTHMXPLP$6: HM*DPT+AIQ+IYPT+3IQ$6XTHU$6/.K\MC?LBD/?1)>F$;<(*AK?<(*A9H>(*RK>H&>(8A8A8AX^. =[*"&PU*T$;8!HP> *P$;8!HQ> *PK*?H*OR*QH*>($VX6H.[+;&[,$;\!P!H&$YS,*/;&H!X!MS+*-$;$YH&8!H6>(+I: [*K-?H*O;X &\7P7.&L!9F8D\TP!L!9J8J8H[.K.C<LT8D\TLT ;K.C:P!L!PT\TLT ;P!PT/M??>(/ H;]HXS/ I680!+8<MQGLM<A>"M ?K>%O"^PU*EHP%OHQ%O.K=X!K<X7HXXTXPXQK;XU.M<B0L:.YX6H.[NLTQLT9J8J[OKOC:[PKO8HC9[OKP%OKP$YPTLTQLTC99J8JKO8J8J%OH4$YLTC:%OH4$YPTSN*"H6%OH6$Y$V.^YEK8YFIE8J=H8P8HQF W8$:H68DX6/Q2I\=,.S*/%%0HH??[(A/%$V!AF+9K0$YK2[2?5<C?? -2.XBAINNYERME8J8J8J"O.ME"O.QE*DC?<(.OROK>=HK=K< ;.OK: ;K9 ;.Z%L-[,"YGIGYE;&YFME8J8J8J"O*5ME"O*5QEQF*)KEIGYEME>(+FKB ;ME8J8J8J"OB.ME"OCK< ;.8DYEH.YFIE8F8DYE8DYGIEC8K7 ;IG9HQF+NK< ;/IK[7K][]S)+M2J ,G<D<?2?>GCYCSB+CLCICSCTB B<B0GBJBMD/B A? ?H8> .H.YEH*>($VH XHH/YFLH8!MF> *(QFQE*MH?8!L>>(.%L-"H? ?%L- L> ?$W: $)$< >*D%L-"H/%J%L- HX8A%J*"YEK=YFIEQ8!9DIEHQ9J=H8P8HQF*==H+GYFHP+KYFHP8H8TXQIFC<9FXPHPQ8!9DHPHQXQIF9J8JXPHP9H9HYFIFP8!9DHPIFXP.22A<P%$=XGH"9H<X5>P9QX"HG/"P:/5K%H;[%/50?9GROIK?XHLH>(*OK>YEPHLH> *OQE*H: X- K=YEK<XHLHQE*VH[> *!L/>(*!RQ: X%.QYEIEZ(%L$W>D?.;$YFQEME> *%QF*/.[BH/[CH [DIN ;2JIN9$:+KKCYAKDX .6%L-WKB :IN%KH/%J$W,"-KX P7H78!K!?H%NH \7/VD=HO9T[&-KWKH,%JK.%J];/ BJM3C5> S///DH%?H% OI\*W?6?8*D"L=?)=D?="L>N*DA?7.YEK?XINLXHRLNLYFRLNLYHRLNLYG2ILH< QE2A\IHHIHXHQG*[IE>(*5IFXIK?XHNLYELH\I\IQE*/\IRL.LN7YER79K>AIC>8.7ME<(.7YF: ]FQEMEQE<(+AYGMGEE8!ME> ]F+G =("K=YBK<X K;X K:[) 9+" 8," 8QBP P S)+","K5%JP+(-KAU0?2?$?V?HB ?<HXZRQ?6*,*"*X?/)4[INYERME[KQEME[MHR[LHRX2KI<(.KL=(*Z:KI8![LKLX2[I ?WK.KLKM[MK>X5;&[JL5< **P5*8X1P58AL5>(*8L5X3 =1*<H2H3\5P5SJ*%*NL/>(+DX H1YNK<%MP$<H.: *7<(+XSFSF8A>(/FSF/F<1%)/F8SF/FX %)<H+&H %U 5/];$M6]6H 9F8FX H 6H 9F8F6%&/]-;ACXG >AAHGDX)>XEJZE;X*FZ7$VNEZ8REN8 ?R8N899F8F8F8DHSJ7Z[R8N8Z]$P*!RE.E:%L-[;$J8YEME%KL/>(*.H/%JJ] >J7?*5K= <$W.EACZN AC9J8JJN9J8J*.=&-;%(<H+S% 88%* X$ X% X&-K -K*%(%NH+H->(+% %*88" /VI2>(%T+]X[5IIXJH9XZHZ>(-KP:+5K5H;[5Y5L:2A\JP9<H-KD/C OI\H-?*FK?<HL [[H%> *SH[?H*QMB?.L X/O[<(.YNK>%MK[8AYEIA]EH [;&X0K=X5X$L5<(+PYNK$[%K$?*6K>%MK8!H >(+C[%K<%MH ?+K8!H ? +&K8!X H58AYEIA]EK>K%K$>(+OK;%MP$P5P5P0*%H$<(+\8!X$K :K;H/X/L/> *S.??L %KH/%J%L,?L5%K$WH58AYE: ]E+PC8]3/1< VDC)>B*E9YFIFK?YE2IME2A< *X;$IF>(H:K>ZUIF2J$:A*ZJUX.%L-WK= <,"9K;YEMEZ&%L. %]I:&;I=H%X"% H">(*4&;\<&;I:% .%\\<*60AP%]I1%]I4H%Z?X4 I%\CG2AH%<(/9?+SJ?>(/<J?>(+5%]I7" ;I7H%> /7%\I7H%Z? =%]I7%\I7 ;\<%]I7H%>(/8%\I4 :I1%]I4+%% -K^K^^H.(NOIA:>&$=),O?YNIN[ K>X L/>(*VK=%MIA["L [2IO<2A[%"W," ; ,"K: 9 ; +]: [&;Z 9K8XHK7XIK6[)2ILH8!LI> *8S)*+2AS"S%P *X.W2AS&+DK %KK" 5K%KK% 5$WK(> ,"K > +ZK4K) 5HHYE2IME2A 5HIYE2IME2A 5$W$V2I*0;Z 9,"AA9DK>[>H(8DK=[=;$[;P"DOI<S?O?X\TXE>PB*E)>O?9YNL/> *MINK>YEMEX YA*OK=%MX;: X6X!INX18AX2 < ; :*&Z5K9XHPHLH8!J5> *^LHZ(&(*X 7RXW]C <S&O$=E+ 7K8 7$W.7H? 6H!>(+DK5 7H$>(+IK4 7K3 7HU 6H; 6H6 6$W.<"9&1$H%]I=&5&0$K&7$N&0$Q&4I=%]I:%\I=P$8&2I:&0\<&5KKH$X$/PTW3BB CBCFOID/B? "O$DB ?)>LTH^>(.LTX&PTH&K?>(.RH&.".OC>9F8F8FYE"*"C>I YE"*""?"?"?.OIERO.OHTYG".%"?YF"*<K=YEIEC<>(*7IGXT.%IF9F8DIE*+R%IF.%: HTXT.?YE9H IE>P+M ;/DIEX?H?IAX3 :1,(X$XU/D"%H?D/XH$>(+% 91,(: X!H?8ADX$/]H$>(," 91,(,",3 30AYH XXE 7?8=P?=TH,X0K?XT >K=<(*5K<<(/;K:<(*4K9< *XK8 7K6 7$W*AK5> *)H,8!H0>(*E: H0X0: HTXTK4 7*EH& 7H&K3>(*EH&\TPTP0*E8A\TLT8!X^K?XT$W. 2+BC1XUMH^> .=HU8AC1< +A 0+BW /K. 7" 2/M /MHUO-YE2IME2A/WYEHUO-YFIE2I]F2A: X$/ X%X$X\B/OI]C?"%= C\>VCUD/C^?8?6ELG=6D(6 ?<HX; ?<HX6H^Z9Z8H;68!XP: Z7 >6HP>(*$PUHUC=> *PK=XUJ9> *3 <HU>(*N*3J7>(*)H? ;: Z8Z7HU ;$W :H^>(*UJ8>( 9. E EK X H.> +[ KZ+ 0:0/H$?(/F \+O8 K [ +G)(N.)0):(>) ??G?0?90/R.1]F%<H[K =: KWH/8! \H0<(8 O\=/S[F+4KY PSF+2;&O^ P 7%MOI]C?%W"%MPMP4 4 4 4 4 4 4 4 +4+8+<,,D,H,L,P,T,X,\, ,$,(,,-H-H-P,0*XAHAC *YACAA *ZAPA*[AAA*!AAACD*\ADA*]ACAP*^AC AB* AHACH* A ACP[$AC [AB\AB*AA8ACD AP (A AE*E*G*G*G*I*K*K*K*K*G*6+G+L+Q+V+[+ +%+*+/F4SVPASS2SVPASS2OSVPASS3SVRALFSVLIBRASVFORLIBRLLOADSVFORRTSFTMRKRTSSVFORIOSVEZGENSVFLAPSVSYS:DSK:TTY:LPT:DTA0:DTA1:DTA2:DTA3:DTA4:DTA5:DTA6:DTA7:PTP:PTR:CDR:END OF TAPE ENTER NEXT IS TOO BIG FOR PARITY ERROR L/ ERROR USR I/O ERROR NEED: FOUND: BAD =BLK>,?X&Y=1?0?"M3H>]3/;%-N <H$X$[%X"H%>(X$"H(X)"H"X&K%X%P. ;.8 H$X$&"*X0/K=X H)< *,X!.H)8HX)<P*69H"H&X"8DH%K%8H[%H"8HX"8HX!P *+.X)H"<P+G9H&8HX"H)8HR+A9!X&8T/Q-D%-OR <8!H$X$H(9!X(%H&X!K>Z+IKRZ*WH%H(>X/?K>X"+5H%8DX%H%H <XX%:H&8DX&P"+-/%1],(?4?33-%-N W2AH(>(*WH%>(*SH$9!H = *Y8!"\":H X$/ >R.":"\*S8 X H(8D:H(8HX(H)8HX)8HX"P 8P * .\H!9DX!H&8DX&H%8DX%./8 X H%8D:H%8HX%H&8HX&8HX!P$8P *=.:;/=%-OO W&KOZ*D2?-=O-2?<>NH&9!X&8TH%9!X%/]H)9!X)8TH(9!X(/&9H"H!X!8DH)H&X&8DH(H%X%//-\2MX"L"X HL"88X(HL"X).H%<(H&<(H!>(+!;ZH%< *[H&> ?H*^+\X!.M0/%-N!"H X$H)X&H(X%R!2A.!%-N.Z!H$^!"=H%^!"=H&^!R.2A..R!.= HZ=2LKG[E3E.=2IP"/HKH+A8!X%9H(H%<P+XX%8 H!X!;H%/[-]90H$X$& *UX$*^>;>?><MV +$/ .%N%N- -K%N[ HM?H+<K 9!HM>PS1/1K ?H+6/1<H%+J+%RM4]6%&%H*HJ*0Y+Q;H?0\X+H+%R0ZH+J&>(*BH+J(<(*,J >(+FH+%%% .)8*H=+A2<A6<**B?M68!M4>(*HJ;%R%)*<+A%&: M6]6*HC\M3AEH?]3*HM3AEH>]3*7%+KPJZH+%%M4]6%&.DPO<H84*KH49J8J</UH7K ?H%NL7X : H7X7H /[;V[8A <[]M-K 5X$ 5X% 5X&-KSIM3MODE SELECT IS /(DIGIT)$MODE FUNCTION0 PTAP I/O1 FED2 COMPAREH SET HI BIT =NY CLR DEFAULT NAMEZ 0 TO =NNULL SECT REPEATS---PTAP I/OL LOW SPEEDP PATCH MODEE DONT PUNCH EOT=N REL BLK TO PATCHNO OUT FILE IS READ---COMPAREA AB RTB BAD BLOCKS ONLYDEV:F1<DEV:F2---FEDR,N1 READ BLK N1W WRITE CUR. BLKO,N1 OPEN LOC NS,N1,N2 SEARCH FOR N1 WITH MASK N2C CUR. STATUSE EXIT TO DECODER---FORTRAN I/OCM COMPRA RALFLB LIBRAFL FORLIBFP FLAPLD LOADRT RTSMK MRKIO F RIOGN EZGENE EVERYS COPY SAME IN PLACEINIT COMMAND ISSYS:<DTA0:/E/SFOR ARBITRARY FILE ITSDEV:F1<DEV:+ARL*OS%<??P<N??P<O??0<^??P< ??P <.??P</??P >^??P<>?>P<???0=N??P=O?=P 0=^??P= ?=P0 =.??P=/??P =>??P=???0>N??P> ??PBASICSVBCOMPSVBLOADSVBRTSSVBASICAFBASICSFBASICFFBASICUFBASICTM\JR+7 C/%** Note: Lines longer than 256 characters were wrapped