+p* Q@K 07O@ - O+*5|5tth{U*@2@@5Q85X86*8)+c0J0220 x2y b@-@@0Q80X81*8b+x &~ Y Vi i+h/ +x\" ,B,B,>  $~,>,> , B& G A  H * J0j+,> ,>,>,e B6@+x\, ,L,L+ 1.+ 0p+ .2/2,>,,\,\+ 14+ 0`+ /"." ,>,,\,\+ /$6 0$,+,< ,< +,< ,< +,< ,< +   ,\,\,<,<,<,<,e,\,\ 9 q,<,<+/ +xap5['}(+( .+( V+ 9 +!/ +x   H1 * J12j +*0*0j2b ,>(0,>1, B1 19 $ .,0,0l2b L12N00+/!"+0+0 1+0,~=N&XL|27@ +4,> ,a+<,> ,< ,< ,> ,> ,> ,>>,>>,>>, I,> ,< ,< ,>>,3L  +=,~  7@ +B,> ,<{,<{,^7@ +E,> ,<{,<{,^,~+QZw/2"RR\4p,TR,TQ $ D 2dR+O,< ,< ,<Q,<R,e,\R,\Q9I/ ,<Q,<R+Q,~pK NdSQZw0F+V+[+Y,< ,< ,,,e,< ,< ,e 20*0j2b ,>(0,,F,e,< ,< ,e 4(L,>,,T,e,< ,< ,e,<1,<1,e,\{,\{,? 2.. N2 3.0 P3,~,< ,< 3,>,,e,< ,< ,e 4(T,>,,T,e,< ,< ,e,<1,<1,e,\{,\{,?,< ,< 3,>,,e,< ,< ,e 2." 0$0d2b ,>0,,F,e,\{,\{,? 2.& F2 3.( H3,~ 20*0j2b  (0 J2,> ,>!,> , B3 2., L2 . N3 30p+ 23r ++ 2040t2b ,>P0,>!,j,\1,\1 0@+,p+,[+\" ,B{,B{,?,~42 20$0d2b ,>0,>P,j,\1,\1  0F+@,< ,<  4(H,>,,T,e,< ,< ,e,<1,<1,e,\{,\{,?,< ,< ,>  20*0j2b  *(0,>,> , BP,P,>,,e,< ,< ,e 2.. N20.0n2b ,>80,,e,\{,\{+M,< ,<  2000p2b ,>@0,,F,e,< ,< ,e 4(R,>,,T,e,< ,< ,e,<1,<1,e,\{,\{,? 2.4 T2,~47@ +S 1` +W,< |,< },> ,,e,\{,\{+  /" 6 0$ ,+,< y,< z+ ,< w,< x+ ,< u,< v+ ,< s,< s+ ,< q,< q+ ,< o,< o+ ,< m,< m+ ,< k,< k+ ,< i,< i+ ,< f,< g+ ,< d,< e+ ,< b,< c+ ,< `,< a+ ,< ^,< ^+ ,< [,< \+ ,< Y,< Z+ ,< W,< X+ ,< U,< V+ ,< S,< T+ ,< Q,< Q+ ,< N,< N+ ,< L,< L+ ,< J,< J+ ,< G,< H+ [\^_abdeghjkmnpqstvwyz|},\{,\{,< ,< ,<{,<{,e,< F,< F,e,> ,,e,< D,< D,e,> ,>0,> , B4(4,>,,e,< B,< B,e,> ,>0,> , B4*4,>,,e,< @,< @,e,> ,,e,< >,< >,e 0,0ltb <,>05,,e,< ,< ,e,< ,< ,e,\{,\{,? . N2 22p +0  1r+/, +/,"++,~ 4t{g51S,< 8,< 9,> ,,e,< ,< ,e  .4040t2b ,>P0,,e,< ,< ,e,< ,< ,e,\{,\{,?,~ 2@ +E+[,> ,{ B 5"H   B +[,> ,>\,> , B\$\ D ,> ,>\,> , B\&\ F ,>  (0,>.$,>,t .*0*0jtb < 0,0ltb < 05. ., L(5," B 4B[,E,6,~ 7 +_  2. +b  .0 P ,C+b,~  1r+f  /4 T +g @ ,>   0$0dtb <,>5,n,C,~6 +m,b+n,]#2F +p\"+w  0H+s7 +u 2J +v7`+v!"+w+k/ +x,8,> ,< 7,< 7,> ,> ,> ,>z,>z,>y, I,> ,< 7,< 7,> ,> ,> ,>y,>y,>y, I\, L !. N \0 6,P ,P ,> ,< 4,< 4,> ,,> ,< ,< ,> ,,> ,< ,< ,> ,,> ,< 2,< 3,> ,,> ,< ,< ,> ,!2 R  R  R \4 T ,> ,< 0,< 0,^,> ,> ,n,\|,\|Z|4d8,>y,> ,>z,@,\},\}  0F+!\(},H ,H +8 0J+(,< .,< /,<},<},e,< -,< -,e,\ ,\ +8 1L++Z|5N67@ +3\0},P~,P~\2\4~,<~,<~,<,<,\P,\W,\H,\O+5\  @ \"},B,B+8,> ,< ),< *,^+,> ,< ,< ,> ,> ,> ,>y,>y,>y, I,> ,<~,<~,< ,< ,e,<,<,e,< ,< ,e,>x,17@ +L,> ,< (,< (,<~,<~,e,< +,< ,,e,<,<,e,^+,> ,> ,n,\},\}Z}5DQ,],E+LZ}4FS }0F/+V,b,E+LZ}4HX }0H'+Y+Z }4J[ } 0J&+^,2 B +LZ }4L` } 0L*+bL  N +LZ}4Pd }0P(+f+wZ}4Rh }0R+k,> ,< ,< ,^+L,<},<},I B #4Bp# 1t +r,> ,< ,< ,^+L,> ,k4Bu,E+w,> ,< ,< ,^+L,@,~ |   yF=h 50~@RJn( 8{5')$  <H NOT FOUND H  ?CH  ? TYPE THIS SCRIPT INTEGER PRINT FIRST BLOCK OF THIS TYPE N NEW FILE L TOGGLE LINE PRINTER SWITCH T TOGGLE TTY SWITCH Q QUIT H )FNF: H *HUH? H , H .]H /[H 1 FILE NAME:H 3 H 5 :; H 6DSKH 8TTY H 9************** CKS ? H =BLKORGH ? BLKORG=H A BLKNUM=H C COND=H E ADR=H G WC=H HHIGHSEG(30)H KINDEX(27)H MLVAR(26)H OLOAD LIBRARY(25)H RLOAD FILE(24)H TLINKS(23)H VPOLISH(22)H XFIXES(21)H ZGLOBS(20)H \.LIFEND(17)H _EXTERNAL(16)H aENTRY(15)H cLIBDIR(14)H eHLFKIL(13)H gEND LCND(12)H jLDCND(11)H lDDSYM(10)H nGPA(7)H pCOMLOD(6)H rLIB(5)H tPROGRAM NAME(4)H vREL(3)H xABS(2)H zLOADER COMMAND(1) H }ILLEGAL BLOCK TYPE H H  H  H  H  H  H H TPL.OUTPUTH TPLH BLOCKH %H $H .H 0H / K? p @(ip 0@)O~ @L  (   & '@L   ,hY~N0 L + \6^ $-< "+ T-< Z(+`g"8 X @@ -< ; " RXB( " Q B*, , O, +h m+  ZSOME FORTRAN ROUTINE HAS SEEN FIT TO COMPLAIN ABOUT YOUR STYLE. COMPLAIN TO DEC THAT THEIR ERROR MESSAGE PROCEDURE IS NOT SUFFICIENTLY GENERAL TO ALLOW GRACEFUL INTERFACE WITH SAIL.:KILL Q8A`,>  4B r+ p,^,~@ h ,~, s@@,^,~, s, n+ vB" h `BB,^,~B@" h  h ,~@B@B,~: CANNOT OPEN TTY  :KILL   X  ,,>, }, O,  D 51D)+ !0D,+ @@ 5, O, , -  ( F , O, , -  ) F , O, , -  ) F , O, , -  , F "+   *8 "  51B'+ !, , O,  , O,  , O,  , O,  ", O, ,~ : *: 6xQ6 : .Xh=z %6^x+ $4b ) B (4d * D )4f + F )4h , H ,  *8 "+p6@ 5,~@f1D?+ 91D + 91D>+ 71D+ 80$0d+ /O@$&.&h+ /O@ 5, O6@:x,~ 8 , n+ -  X  ,  ,/ , Z Dh ,>  ,/ , Z Dh   ,/  Dh. Fh  FhQ$A` Dh"8$ XhT`h  ",/  Dh, Z,$  Dh\8 %,Xh,Xh,Xh,Xh,Xh,c 8 Xh 8hQ8 Xhz@@ 6 6 $ "7VX,~7XX+ U*QB/4X U2X" + U"`/$Q,~ ^ ? > 7*> >   $ 0D1D1, }`Dx+ f+@ f$ ~0D1D1, !> 7*>+ N, n, o, +, &, , o, n, , n, , , m, n, n, }+ 7 x " u , n$ <($ D 6,  ", O, tZ N/", , q  Z>, , O  Z2$+ m6@ 6+  "7 6 "/0$0/$1D"+ B1DO@ 60d+ 0D7 6,~, b+ {1D)+ 1D,+ _0D"+ !> 7*>h ], \+ {, O , n, Oh MZ(+, L" I, , H@@ 6, + s      [, Z+  Z + =$ ,~  7Z N" F." 7+ h Bh ?Z &+ "  &5" ", =#`&G$QDx6@, "[x,~aBx." 7 %$j$*(.+ /,~aBx." 7 &$6@h$Xh&6" < D 7,~  Z8h~*8h  Xh,~!8h~*8/+h!8  .xhPhX8 ;.Xh68h.8Q8A` Xh,~.-,> 8 =+ x: AUTO NOT IMPLIMENTED  :KILL : EDIT NOT IMPLIMENTED  :KILL . FOR ARRAY ,> 8 F+ x.INVALID INDEX NO. ,> 8 J+ x:KILL ,> 8 N+ xREPLY [CR] TO CONTINUE, [LF] TO CONTINUE AUTOMATICALLY, "D" FOR DDT, "E" TO EDIT, "X" TO EXIT, "S" TO RESTART ,> 8 P+ x: DDT  !> 7*>h MCAN'T CONTINUE ,> 8 `+ xALL BETS ARE OFF, FOLKS! STRING SPACE EXHAUSTED UNEXPECTEDLY. WILL RESTART NOW,> 8 d+ x, l+* LAST SAIL CALL AT ,> 8 n+ xCALLED FROM ,> 8 r+ xPDL OVERFLOWILLEGAL UUO  wWELL ONE FLOATING PT NUMBER IS 1.0 ,> 8 y+ x6$6$~@ ?VERSION NUMBER MISMATCHCAN'T GET CORE FOR ALLOCATIONCAN'T GET CORE FOR ST(USER) ALLOCATION- N^U % ARRAY STACK = ,> 8 + xSTRING SPACE = ,> 8 + xSTRING PDL = ,> 8 + xPDL = ,> 8 + xALLOCATION:,> 8 + x% ALLOC? ,> 8 + x- NMM,>  7Dh+ *,>,>,>  (Q('] " Q*@@'*)6D+ $,^,^,^,^,~  7@h,~ \x |, t, 0 &,/+ f  6/ L,^,^H,^H,^H,^H7@x+0,^H,^,^dTx -`n"* NH@@H *H,>6@"'[H0XM1X + m Shz[H@@H@AHaN, ]+ 3aN+#7@ &@A& $(,/  DHQHHaN ( HH $Q$` DH,~Z*XX(+,,,7@h}h 8x +@h}1X)+ h !,GLH .BnHQH  t +@h   t `N+ Lh}+ YO@(, 0  L dTx 7Shz+ 3 H[H0FM1F +haD,@Ahz t+@ZH,Z,e+ 35De,~`D+@@h}+ {@@h~+ {.@RELEASE&: INVALID CHANNEL NUMBER Lh~+ Y. :KILL \h}: TTY NOT OPEN FOR INPUT?,> 8+ xTYPE "R" TO RETRY, "X" TO BLOW UP ,> 8+ xOPEN: DEVICE NOT AVAILABLE ,> 8+ xTOO MANY CHANNELS OR I"+`OPEN: NOT ENUFF CORE FOR BUFFERS & (aN6 H+ ` &@ (@+ `OPEN: INVALID DEVICE NAMEOPEN: INVALID DATA MODEOPEN&: INVALID CHANNEL NUMBER,^x+ Q, 0 "] $+4, 0 "\ $  M ,%@A@@H@@H@AHZ HaJ+Yd F 1J,4+CY HQ H,>,>h{,>h|6Jh|vX XtW+@+V/ M@@H+ 3ZH"R7QZh|\Y+ 3  ,^h,^7 _"L _28Q2xP"L 8XQ6h{*6`+hPASS 6 WORD INTEGER VECTOR TO FILEINFOLOOKUP OR ENTER: INVALID FILE SPECIFICATION/ M+D. @p,>[HaJ $,#,^+9ENTERLOOKUP, 0  L  "m,% H`H j^w,\/ L+f? H+i JH=.d HaH,+ 3:H,+dOUT: FILE OPEN IN IMAGE MODEOUT  6@h, 5  "[,%*[@AHZH.Bh6`h,i6&0f  WZ.",<W,H`H`H`H`H:H+ Hh9 ,^.Dh.H[h.&Q Dh Dw/ M+x6@H+T7 H+66@H+S,+z,>,>,>,>,>,>,,^,^,^,^,^,^,~ H`X O[aX+/H4DO H`X+*Q"`/" NtNaX+&+@=d![H DH H $Q$` DH,~ DH+@F4&11F+1>`H+&+#&$4F,.$,c[`X+#,#? H+"H0H+.O@H[/H=# HH H ('Q(` HH,~,G MtM (,3+@1H?+<HH1H+A:H+8? H+D(H+@(K.(0(+KhK+8:H (HH:H,3+z (+@ (+@+7!&Z7@h~,~ &fJ h~,~\h~<H>H (+@..,~CHRIO: CHANNEL OPEN IN IMAGE MODE@@HO@HOAH+ 6 H+~+ :IN: THERE ARE ONLY 18 BREAK TABLESHIN, 0  ~ ",%8h`X ,a+ 3 ~7$,4D"`QaX7  t+@aX*bf7 BH,~, 0  M  ",%8h`X  \",d+ 36DH+q7DH,~,^x@@H DH EH+ 3, 0  M ~ " ,%@AH8h`X ,o,a6BH C+ 3, 0  L " ,%@AH8h`X \"h@@,o,d+ 3WORDIN: CHANNEL OPEN IN IMPROPER MODE HWORDINARRYIN: CHANNEL OPEN IN IMPROPER MODEARRYINWORDOUT: CHANNEL OPEN IN IMPROPER MODEWORDOUT.,~ARRAY IARRYOUT: CHANNEL OPEN IN IMPROPER MODEARRYOUT , 0  M/ L6b0b  [Rp. Z*ZeJ7 ("[ ("+(p/3`5`46`2&x&"W+ 37V!`!(@X(h:+@*h) V1J' U.&hZp p+.+@="-+ 3g $ D0+ 37U!$ D0+ 3O@'+ 3g $ D'+ 3O@h+ 3Zw~4X;,>,T,Z`w? w+@,>p,>,,>_#`$_.""/&,/ `,>Q$.&*$,^ h,&7@h FhZ`"`.".B.~XB ~7 >,^,^/ L+x, 0O@h+, 0@@hZ $ &<" .(/7` b$/$+7 (F,>Z$".&,>,/ `,^ h,(Z.,^,>@@Q`.$*$gZ 7@h HhZ7 "`Q,>.$Z~ (V.6Q` (~ & *<"2  X.8/' F$ ' X$. .$/(++,^.$,^ZDg7 \$ Dh5$6(J/Ph D`+ 3   h,8_ Xh,~Z,^7 /$_#`$_.$Z`+e, 0  L h,J6  [7 (+Z,JZ`,e+C 7 /"78+Y4XX(8"6$6`7 /6Q" / M+xZ~Q>.6`*8X/ M+xZZ6 g+T/8/6QZ_Zg2vZ.6g*8X/ M+xZ+L_+L Jh+ 3DRYROT -- ARRAY STACK SCREWED UP~NO ROOM FOR ARRAYLOWER BOUND  UPPER BOUND  ,^h 8h~*8hZw~4B Zw4B w~3Bh+t.wZ".Bh6`h,i"8.Xh/"6@h, 5[h.$Q Bh w~ h*w,{+wZw.Bh6`h,i.w~XBh,\,\,{ h Bw!8h~*8+h^`+}Fh=$|,~  , 5,<,<,e/,^h7Xx!p1X#p0X+ /p/ L+hH/ L+y,\w,\w+y "/("} ~xX/ M+x0  6@h, 5,^h,> ":`h,i,^Rh*x Xh,<,^,?+  ,^,^h,^h+`   h Y h Y/ M+x+B , 06@h, 5  M>~Z.Bh6`h,i,<,40t+d Pp.4h@AZ . `<"R >bI+PJh9L"4+IRcX+L K7XP'+Y48X>````6A:+YJh.. w//.Ph*n[ Nh Nw"`.Xh D+ 3@A@@p+ 3(:SCAN: THERE ARE ONLY 18 BREAK TABLES"`+O *,i/ L"`.Bh x+x   Th 4h*4hZh3xh38h  /h.8 Xh6@h+rO@h &H,/7+t@@h,z,/  @@h Dh@@Q`.$ 8 *$` h.$ "&s5&eQ/ L DhZhQ"A` Bh@@h 2h,>,> 7S+/ZR,O+Zh."+,1"p+,~7Rh,~ZO[O+,=.ZH5R,~Zh6@34h+ 62P,= 7Th,~ P,ZP5T,~ZO6.,~Z`(N+,=.,~R4D.Z^4F4&3hh3(h"RX$/h$(. D.ZF $(&h.h h2(0(` " Z(7@+([ 3$`+(2D`+"3f`+" h*x,,> h &2,G ,^/ XhQB`XH`XX(.",~/ L@r . h @ /0,E[ +A,D[ 3t0+8,H34 +4..".7@h+<.$&$$$.Dh ,L h4D@H=d> Rh4BN 0 0 / h,H+4Z5BL:3"+D/ L "+8 0/0Q*0 0/,L F0,~&&.hP ~,~7@h+R /,L Fh,lUNh:h&"h$$.h.h Dh5$} h,eS4h*4,~,>,]  ,^h,^,^_QhYVXXVh+x  ,^h,^ 6h 7Vh+x2X_+_ZXXXh+x6@h,l7Rh,~,>S$ZO[O<.jbD@@."+gZH5Rf,^,~6"h."@@Q`." h*",~@ @ @ @ @ STRING SPACE EXHAUSTED, WILL RESTART"y+*H:,NO CORE FOR ALLOCATIONDRYROT AT SGSLUPDRYROT AT SGSORTDRYROT - STRNGC CAN'T GET COREDRYROT AT STRNGCZ[ 7@ *hXB(6@QJ,~ZD7 F6BhQDZBZDh,~!8h*8,~6Z +) 8 X(v  Z Q:!Z( > 8hw38+ ,* @@hQX8h*8h $h Dh,$+)Z @@., Lh,> /,,^,~ 8h*8h,~,>(X{.8l`+-:v>,^,~,.&6@h+> $hZ4D>2f+2:xZDh, 1,+ FZ./  . Q8 X,,F@@"`.$,~6@h+F,>Zh7 +BZ, .8,^,*+F,$2f +4+,)" +I, /$Z / 3,h+N4@["`.Z`7+>780+d/82f+\4@["x,>,>,>.Xx Z,. . ,,^,^,4 ,^:x,~:x+.8038h+c4@[,> &g~/".Xx,Q ,^" +I/807 & Fh+7Z   ,)/$" . 3$h  2Dh7 +mZ,.2lh"2Lh7 0+r,>Z,. .,^7@h3l+y1&+y 8,*  ., Lh /,+F7Z   & $hZ4D~3& +|/&,~CORBIG: INITIALIZED WORLDDRYROT --CORSER&LNKRETYOU ARE ABOUT TO GET AN ILL MEM-REFDRYROT -- BAD ADDRESS TO BUFRELDRYROT -- CORREL CALLED WITH INITIALIZED WORLDDRYROTDRYROT -- EXPAND CODE GLUBBED UP!8. PX7+;PDRYROT -- NO ROOM FOR USER TABLEP  ,^h6"+h",~DATUM OF ARRAY NOT THERECASE INDEX OVERFLOW, VALUE IS dTx+(6Shz,~ 1 .  .. "7A,~1"9* "6A\",~: CHANNEL NUMBER INVALID: CHANNEL OR FILE NOT OPEN/ L@@h|@@h|@@h} *h{,>4L=0L+9 *h|,>4L=0L-+=@@h| *h|,>1L.:x,~Z`p (@@(Q*A@ ,? p,~ p0L1L-,~1L.,~4H@eL e l L=@, 0 "+J, 0 "@d  LZw p<&T 1j+L1Ji,1J+L0*0*+T$.$/h<&T +P+0WG V+@/ L+ 3 Dh1Bh$+TUp50_p w]!" w]k w^X w\gH w]y7 w]lY w]n w]:S w]lD w]!g w]  w]G w]U4 w^  w^+ w]?& w]m & w];<& w]<{& w^g' w]~|( w].@( w]~) w]y8* w]v* w] + w^N+ w]h., w]"- w^:/ w]!0I<;$ 6?* L KKB OKd 7A2 M .Hg"  *c -K<.x ??7M 5 *e , MPG{ % VTu$ $GZ (?z L rv" Y f4 7JA:  v$:; Y@J( M ;]t4  ^,, Y \} ` A^6 6 T46 $` NGOw 5,Lz KBuQ " KM` 0 ^{48 5KFUd \?(  L6*)  nw@ x?9: ; 5p 3 V8 + jZ r:\ I 5 KJ t }).3 (a1 H hF u]<^ HfrV# HfrX HfrT ^v*8n5-CCi  vc\5-BH{  uht 2\\Tc 6%. MP 77 VD[:A K` KLa K(^ DBlnc54nc4<n 5(3s h$8 *F~  WuQ m(~  y@ O;  fGM  HF ~ *4(} DF|ec':~ )8X ,YL$  (T$< MP$9 Q'  Q-R MP`+9 L$@ NW8DX V`PZi V`$$f VCzc NhI,] M T[/ D<FH M 7e M 6z M bFG )5U O))0 (T% YT|4' (T ( HCg4 @> Q,G Q%jI^h h#P0X[6X[;de5'iexUHFHFsT|&T|&j:e^HFjOoY\tHF HMRHMVJR.@JR4`JR; JRA  JSJS""JR"1Oo1rLOSrLOZ4 Z8 ZJ2 hX hj?pfDGpfDRFb56mR5<Q a4 a>[ jg jnpWvDWvJV?6V?6* exiPYG-YG-"exj4(y[(yb*(yK(yNQ5-?@2Ln$2W}3Lnb/3 d4Y\t1pfDGFpxzT a4[ jgpV?6 YIks"JQNVJQNZ6exk\4v@4v $C+qj+qjbM+_ M+_kSLxBkL!pL!z^h h^h zx2]X 2]b52dD 2dV0o#H4 )9&4 o"]: ex@ 2\|w (`e @dz 2\mx JR" '[8 )U8 U&@B }[0 2]#  &){5 Ui|V_8}&t~(nRjP _80 SNiMHL&39@wX[6eT|&jHMRJS" Z82 hX?(yKEJT 664v@C)8 ]+qjbM+_ kZKP0zbSp q0`88@^d`w]!+ 5dEMC+ YIks"JQNVJQNZ6exk\4v@4v $C+qj+qjbM+_ M+_kSLxBkL!pL!z^h h^h zx2]X 2]b52dD 2dV0o#H4 )9&4 o"]: ex@ 2\|w (`e @dz 2\mx JR" '[8 )U8 U&@B }[0 2]#  &){5 Ui|V_8}&t~(nRjP _80 SNiMHL&39@wX[6eT|&jHMRJS" Z82 hX?(yKEJT 664v@C)8 ]+qjbM+_ kZKP0zbSp q0`88@^d`w]!+ 5dEMC+ YIks"JQNVJQNZ6exk\4v@4v $C+qj+qjbM+_ M+_kSLxBkL!pL!z^h h^h zx2]X 2]b52dD 2dV0o#H4 )9&4 o"]: ex@ 2\|w (`e @dz 2\mx JR" '[8 )U8 U&@B }[0 2]#  &){5 Ui }[0 2]#  &){5 Ui }[0 2]#  &){5 Ui