Directory of image this file is from
This file as a plain text file
??2CBP >DLML DOMHRAR0AFHL $LBDR0F <FR$LBDF 0FAP0D0 OPAHRTDRLT,MD HMK$OX O$RO\NT ZTGNTD XEDE$RSL DO$P DSHMEHINPDLCEI$NTL O4MAPND LIDSLY:P<LTA:T//S8X!0&M?8!K?> />2A%=K=%<XQK?]?K< ; :".%;H[XU%:31H-;J1?L>4LS/.P, R=1!\*2R8;;RF62N*%9*HDGXYI8XL%7HUX[%:<ACS=6C)=3C=%C2<CC2<BC2>B2=1B2==1U=+ %6HU\LHLK9?H*2/8HLK7>(*2I5PY%<: XYHLXWLW%<: HL*1%=\L\LI8XM..\LI8XL%=LL<(+ %<+-K=%<+$V+?.RA81P8+2>A(B$.X"GH%)8 H^H89 H7JDJD>PKHEDNZ58P2??BMN LY? ?<-2OBJ 75=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%M: HM*DPT+AIQ+IYPT+3IQ%MXTHU%M/.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/%$]!AF+9K0$&K2[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?>GH ?H8 X!/+R&%![3/3B0GBJBMD/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.2-*8 >(*\SK+ /VHHXH// 6,F(=1:RB:767:0?9GROIK?XHLH>(*OK>YEPHLH> *OQE*H: X-.K= EK<XHLHQE*VH[> *!L/>(*!RQ: X%.QYEIEZ(%L$W>D?.;$YFQEME> *%QF*/.[BH/[CH [DIN ;2JIN9$:+KKCYAKDX .6%L-WKB :IN%KH/%J$W,"SN+OSNONXV,V(WPRLR[IPRLR2A 8KI 7P"L"H$ 6H 5/[U W(Y2[(]( >D=P22P2!2Q$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)+","K-JI>(*P8*JJ]7<79*R 47<J\[-ZRQ?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+S>8*87>9F>X*.2R+O>X*.K-<B2R*MRGJL7<:X<B.G2CBC<?0?8J,Z&79*B7>B2J-> *B7?J$> *B79*M7>B2J.> *MDX)>XEJZE;X*FZ7$VNEZ8REN8 ?R8N899F8F8F8DHSJ7Z[R8N8Z]$P*!RE.E:%L-[;$J8YEME%KL/>(*.H/%JJ] >J7?*5K= <$W.EKZC K!Z.J.C 8F8G8F1!AB:KZ8DBH[Z;&[\K[K^["O"[K[1!SB8 Z.K "<H<BJ.> +NR:K"[[KZJH<(+W[Z*/J98J8J?H+ES\*1;X<HRG.GGBB8D/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+PNE2I^F2AVDC)>B*E9YFIFK?YE2IME2A< *X;$IF>(H:K>ZUIF2J$:A*ZJUX.%L-WK= <,"9K;YEMEZ&%L. :FKEZ+NGCFZ6NG8DB^8![(: RGNG[)RGJ66M>NGK 8J8JCH6NGK 8J8J8HCG<B2LKCZ66S*/RG6Q<H*9RG<B6A.G;XSD>H*6;&JGZG<H<B*J2B6C8<C?,!D5XX86+> =?B>E?)NE2I^F2ARE(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,"AAK\9PJ)<8+U[\*^:RGRGDOI<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.<M(/G%4OVERFLOW-*I&%)4 :PQK9 8 7/6)X9F8F8F/&:X9J8J8J/+B CBCFOID/B? "O$DB ?)>LTH^>(.LTX&PTH&K?>(.RH&.".OC>9F8F8FYE"*"C>IEYE"*""? ?"?.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,(,"8?H ,*!GXXE 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$/ PT+ 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.?H*>SD*X :IO ERR.K+HK9ZK2LK\[W2AOH[&SHOHZSH2AO&2I^S&RC?2ARK+U/HK3%<H[IV%<-*00\K8>(0Y/&/7- 0U- )H)H-&C^0Y3J1U== 7%MO ]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 =BLKG.H20&Y/SHHCD 2?212Q2!;&[;K87<2C7?9DB [97?[:*&ZJ [<79*P7>*;7>CE> +O[>J K87<: T: [>NTR?S<* T-TT7:> +O2CK9J <(+Y[9*)[[[B*JX[>[ ^RCS<+A[ [BX -*1;2CS;*.+Z 7;+V7=;/T7;+\7?/[8 [?K?C>8!9DK?K>[>K?9 / :K>9&8F8F ;K>BX/-?&2IO?2A ;&O>>(*K"\" /="7"\" ;X"7K<%0WX4/="7"\"=*N"\"=/=0WI1 ;>GK: ;>LK9 ;>G.\2IO?2A AOA 8H 7%02R52%02B4). *6IV%)46.70X;$%02P50;$%024 .=>(+LK6 5O4 3/GH!K2XVLVXV,V0ZO1> 0/6K/ .K- ./[$"P<6<B$!<6<B/,,6BJ9&BM+W+2 ,B"*")>4(51PL (?J)I>J?0>G>G"H"HPHHPBAEJD&Y/S-T"T THAANO>G>G2B"GHG?&2C.?D[ 2LJ=[^2AN<8H2I>X+Q2B"G(HW<B2B"GFHK<B(P2B"GHHW<B/"H"HPHHPMODE 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 ABORTB 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 FORIOGN EZGENE EVERYS COPY SAME IN PLACEINIT COMMAND ISSYS:<DTA0:/E/SFOR ARBITRARY FILE TSDEV:F1<DEV:;P"\OIC[JSI?OIC9J8JKJ8J8JCSI80Y*;0\C2K>> *;2C.[>2LJY[ANBQK;Z08HNR=H+9BG8 [=NR[IN>(<X*TK10&0Y*60Z*TS=.\J0> RR<B.0V0Q+EC /C;KJZ"\ I[C8F8FC OI IKJ8J8J8HC KCSI< I*PJ0>(/0LZ0R0+.K0[J+6K<[JBZC^A?0I+)0J[<KJ/;X*?2A?=5J Note: Lines longer than 256 characters were wrapped