"l&fe>B @& fE@xYl B xY-xY4xY;xYDxYI _ zY_ Y_ [_ |\_ ]_ ]_ ]_ 6^_ __  `_ $`_ b_ b_ \b_ b_ zd_ d_ d_ 4e_ 6e_ De_ e_  zY_  Y_  Y_  [_  \_  ]_  ^_  `_  .`_  6`_  >`_  d`_  l`_  `_  `_  a_  a_  6d_  be_  e_  e_ zY_ Z\_ \`_ `_ Lb_ d_ f_ zY_ \_ \_ ]_ ]_ ]_ ^_ ^_ ^_ __ 8__ @__ X__ `_ ^b_ ]_ ]_ ^_ `a_ a_ a_ a_ 6b_ Jb_ bb_ b_ b_ c_ c_  c_ `c_ c_ c_  e_ e_ 8f_ bf_ 2g_ g_ h@B1111111111         "$&(*,.02468:<>@BFJLN P RTVXjZh\n^`bdflprt  DD)<LE=>]OR&NE%,+./0123456789([;#:\NGALDEDUFLEPUSDLLDIOSO'BXABENLO*?ROCENTDAUUOMLU^RU_RKGOGE-DMABCDEFGHIJKLMNOPQRSTUVWXYZLBLKRB$????????????????????????NRNNDQ!CSTRCBIB"Z@ZAZBZCZDZEZFZGZHZIZJZKZLZMZNZOZPZQZRZSZTZUZVZWZXZYZZQDGDGUQQRVLGCRIQOQPDXQOUPTT(T)L+K._/O?_?NBJCHFaFbFcFdFeFfFgFhFiFjFkFlFmFnFoFpFqFrFsFtFuFvFwFxFyFzFLGMGMHLKOMPO_O[L]LTG)(uoYL  =~+)K:"P-,_./0123456789><#%&Q_abcdefghijklmnopqrstuvwxyz;?'Y[K c_ c_  e_ {M}T BCG@M [u+p>#= p=ף9Xe+3w̄a%ľMO E9L> R IA!hmmddmd"@NnDD!X]1 I䔶Txة3OLX2DK-?GbqhIgN5&L%d5@3e?ØGe3h@B#"laXUB,k$@l1@rzϸ@;\)=B.pBԝ`E=sMiD(/zCF:|+e@3d?ϒy"?D{Av#OP#C"+C|]2CU*j 5xBJh{CW*TsCL~Sz2CU*j 5@!hI@!hAy24X|HMoIj(=DFz/K{Ħ³x5Կnk~QXG:Q1ǹ-q8x*x*VE8<9 D;8h=8ABR;88x*x*x*x*x*x*x*x*x*x*8x*x*x*x*@A&ELA<BE"Ex*x*x*x*x*x*x*x*49R9p99h8P898<>7A 8BDfE48AAD;ADAEBL:B8x*DZEx*^E DbEx*x*x*98x*x*99AA*EPAx*x*x*(DA>E.EFEx*@ADAHAx*x*x*x*x*AAA%AAAAAAclearcontinuedigitserasefns fuzz loadofforiginreadsavesisivsymbolvarswidth write"wsid$drop&rename(run*assign,create.closeJ:"B*1 x*21& &R& $R’ӕ ߋO>¥a¥z ¥./ 'az t˥ az 8  "  •.EE@2#̥ tӌ( "D e=_Lc _Z5.`' !&R&RDы  C &fєD _Z!$R!&R&R _Z -_(RCՕ qE2[ v#5ՕՕ 5ՕՕՕ& fe6    ¥  E2¥. 28%0PP@ՕE2_E5`ds5ՕB(RAU 5ՕՕՕfe ¥  ¥K   @ f 5S % JCՕ  W 0PP5Օ@Օ Օ_f ¥ 5Օ@Օ& ¥H  __&0We` a*RE2  : E @` ) `` 5E5@U5U`ES551   ."@ @& $e  *  @e``% 5ze} -5>5@}ĥ[  5_A ` ĥ'}  5O@I%E5@Bĥ;? 565@3RU 55@ ĥ'%"%._!5 %5  "   PR``% Re  @;ES5 5@ĥ'_ 5 5  _& 5@ĥH &5@ĥs%t 5EAfAb%I f5 `s33   5@6ĥ'X  5@Pĥ;M  4 &5A@;5&@ ."e +}55 U5 ReeE5 }5@ĥ"  55@ĥ:DC% US5}&&5  IDC%  : ES@  5@ĥ; 5 Ep*@x5@ @&b&& 5 t  m  & e & & _ -& 2R 4RUSDC% 5L5I5 5C5? IoB@%;5@ 5.@Ab2R_4R%$ 5@e`S5Ab6R_8R5 : 536R5( v$&`S5,0 B8R: 6RS D~@ d~_:R_R FR@R%!_>RHRÜ@R v$LRNR&bS5,0 3HR%@Ree$~ _FR@R v$DRNR&`S5,0  DRM LRJ@RHRf@x5 :   BRJR@RR >RR FR  NR@  >R@ FR  NR_:R_ߋO#5_-E ߋ\S%DPPS e)& - -E% 5&. - -E ¥ E&fCߋ\S1@+ -5HOPS5@ W f - -E~ C`CNS ~0EB2  `!,-/PS5@ -ӕ NS ~0 e\SPS C -_/E@OߗOO LR 5"R@RS%Q f4DPNS5SES5S< P\S_'=5;%DP -5@5 3 5@ 3 43     f W WpeDPB `5S Q ."2 DPPS&¥   2 0Q X5NS/ P5@5PSPS - -D~PS 3E2 U@OOߕOUS_' 0PSOO&OOOPS%DPU ߕO Rp 5  T V2OOPSߗOO 5 5 V2 -2Y &5E _0SPSE PSU  z*[ z._vRe+   z.I~K z. b@& z. z. z.p & *%f2Y & bP f4eE~f5; 25 &"2 22 e *E `=>; 2et2`U %Qf5;5l25 et2E` 22 e *E `=>;et2`2 2f&DP r  &255@%DP%QPSPS5  - -D~PS 352 e L--    5 ." B~ ."    & ㈀5O ."  P P f5OU f4 j 2e5O5 5@ U t rU X6nSbS  dS`S`S/*E `97 dS fS`SbS   ee :`S*E `962P2 2 U 5OUf&`SnS8`SEE P dS`SDP4  2eM~&bSe5O * &"2nS& 8C5SQPSQQO R FR R&eHR FRe5 @R  e@C   FR%FR   >RC%>R:RbS 2R?RO@@@ @  >Rہ FR؁ bS  bSC:R :RbS :R >RRp FRp@f`_R FR >R& :RLp  :R Jp FRp :Rp$ >R FR _,? RBRg`_  d`_  l`_  `_  ` 1_p6A($ 5\@T/HH($ 5\ T0X ' G `S_Y `S6R  Ĝ _jS!jSfS bS[pSPbS@[pS_tbS_lS_pjS_hS * hSlSHHfStPe &"p*ЕЕfSfSdSfShS8RP`~ nSdSe nSnS fS  gdSD    gdS  nS nS)dSC ~ nS &     gdS  `S fSdS ` D~fS tPgdSgdS8R rhSgO#~&&jS& 2P glSglS ~ V&&jS glSglS~ ,%?le JRLR5 zfE -~HRES_,EzS_,,  tPe &"p*zS~_zSzS~_zS_,, , @x5 $bcE@R& bĤ~@R gO^~@RT&B2Pb~ ,xB $b5~W@&JRLR@~  JRLR @2P~S~ +׬ +  s _,&&5 *S6 JRBRDRSRB~ B~Е C~~ S%@RHRpS3p&f`& e&_tP@` &"p*Еe P~_dS eP~%Bb_tPB`fStP`JR tP`BRs _dS rdSdS rdStS tPlS4p_nStP jS@lSnS`fS`JRBR@RfSHRtSrS@RHRdS?`@BBa~gjSHR@R rS pS a ,DCB &@RcBRHReDR S@BT~_$` a ,f Wp@ &"`S@` be``tP`bSdSC ?  f FRtP  Bppp   0 pdSJp"dS0bS HR `S ."_,, FRtP e&` &"p* 5U FRP@Rc~@m FR_tP ҐB~ `SJR a`S ." ,5œ    _FREFR _,,  FRB~C~%J a`` %J +\ *T6RbgSS>SPSS~gS S P/ P % P 5S @`e &"p* RCߋOÜА~ ,5 , `ShS e`HRPfS fSdpC~bShStPgBR#&~dShS & % ~    _nShS jSHRelSdSlShS& %gjScjS" ~&W~`SdSnS$@p~f_tfSnS& e&@` &"p*PЕ fSE C~:RzR |RfSR~RnS& & && &~e JR t :RtfSfSnS t fSB~fS&`S , +_]6R +_b6REtPe &"p* UЕА& 8R  "`S `S P ~ `S  ~@e C ,_He ,x5bc5 D~  _`S`SC~ @ &"p*ЕЕ ,@x54 EtPe &"p* UЕP  (&b DR "Р C~&JRLRРC~ ސ ~%@00 CD~&JRLRD~  ~ [(\j\\C ~ nS &     gdS  `S fSdS ` D~fS tPgdSgdS8R rhSgO#~&&jS& 2P glSglS ~ V 55 xSnS_YUS& xS  nSe5@;e@b5 &5A D @  ~0E5 ~0`S ~0aS`S ' ~0!&&`S ~0~`S&&`S ~0~`SNS ,5`b % peDP 2R%?% H]PSPS@e 2Re&f ,p-   ft559c ` ( z.D~f2Y &% -E~`S t^H~ -D~`S t^H~`S t^H~PSf`S@ -~ H]%DP_ _5;`S5%c O@ @5rr5  etf@ O&e &"p*E5 etff@E@fWE Wp`r '5@ 3 2 eEWtN`U    &"2 43rlre`S_^@e f@ jE@@ F@ 6F@ 6F@@ 6F@ H  H@ H HCD_FRx555B xSbJRbBR`%@ ef&_DRLRBpB_tP@` &"p*PЕœ  e~e e~eBRJRLR5FR @ F~S E~ DRCe &eB &US@@RAb_BRA_ `SA_ bSA_HRBbJR dSDx5 5_dS5D dStPuP`BRaJRJRfSlS@R  ahS jS% lSpS rpSHRC @% nSrSrtSrS nS  hS lS hS @ `&% pSprStPe&` &"UPЕtP`Bm:R@RB e P~HRB e P~  dSPlS@t_lSnS@t_nSjS@t_jShSBRfS d  d :R :R dS PfS fS rSJRfStSrSgjSBR pSDCB &e & dSK@glSgnS .@RHRp*HRp*p*@R e`%3& HRpчtPͅ e` &"p* Е@ReP~@ $ `e %rtP`@R tPgBR@ `!~  a e@@ eBC@ e@ C@  B@@ e@ jEAҁ@ 6F F2P6RW _,tPe@`@` &"@p*E_vS``& & fKp~& 6R & & AC`C` [&G@GTG`GGG$`EE F&`^GtGG $4 Д> ~0E5 ~0`S ~0aS`S ' ~0!&&`S ~0~`S&&`S ~0~`SNS ,5`b % peDP ES&fC /¥G¥US /2 v# / JS5PER 51  JSA¥;' 0Seg P ." 0S2S04S@ BdHSe /   &fRt ESG USʕUS  4SS c?g P HSe m& &"2S   4SHSP PP2S B~4S c2S4t01R5 E5S_Z\_a /2 ¥. ¥L¥H_^_8_ /2¥.-  /¥' c0SA 1 Lb0S_2S14S@ z. z.Ab d2Y & /¥ ES¥G¥USUS /¥ 0S  2d 1@AB  BdB2&@ ."g JS%&f&S2Y &h &2Y & O LEUS JSe  PS S  @2  `  C` e  S`D PS S @2 z. ` 3NT  f B`BAbK z. D PS S@K z.K z.K z.f_vR B`BAb  z.  f A z*f B`  z. D PS S@\SEOESQ f4 L-/ PߗOOQ  f45@SR5  LR_S_R"-eE_ S%c5S5O_fgf2Y & AiW gUO &f2Y &R5SUS `N& q Ab*R  df2Y &PS   z.E~Y z.f2Y & L S5S_Z\O5SRE &" ЕЕ   SUS_)5@S_'_':nO at bad error found _ this calls for an sprsyntax errorvalue errorcharacter errorlength errordepth errorrank errorsystem errorindex errordomain errornot yet implementedws fulldefn errorsymbol table fulllabel errorcommand errorsi damageexecution stoprestarting aplno odt availableillegal file nameline too long...device not foundfile not foundi/o errordirectory fullreserved instruction trapchannel already opendevice not availablechannel not openend of file on deviceiillegal channel numberggRhhhhhh_hGh.hhgg;hkhgghgghggghxhhgggghghgggggggggggggggggigQi8i'iziiigiGiggggggggggggggggggggg`igggggggggggiig0 z.' z.e g P z*[ z. z* z.A z* z. z* z.CH< z. z*~?PS&; z._vR1 ' z.PSe E z.~ e6R% ?,e@btPe &" y~b)&% @,ttEpdE`CEeHA05O@ߋO@RS5 3RSAA5 @p0 C 2R~ O_LR   -% ``e&tP` &"p*ЕЕ  %  ``@PT(WPbC~ CdC ~REOUOb~¥ ¥  ee g P ~eg P eg P ~58fRS5&BfA  ``&- ~ee``(  ~A  @ f ¥ E2&   [ T \Ex  z* z.f2Y &f& [RS`S5L z.05@35E5$& `N5 z.P z.  ] [  z. z*f2Y &`S  Rp 5 5 \& ." 5RE51!fb & z*f2Y &Aeg P@ ." qA@ ."D  ¥  ¥.E2  [fc &_vR f2Y & V^_2P2P@_^ V^@@ O@ 5_OO_^ V^%%  PP POPNP_^ V^% AOO B~O_^ 3 -旐O 3 p,OO_ #DC3,R .Re0R ,R'0R0Rœe0R@pއ`.R%&e~ ,R .R@C 5tP E.R `e &"p*5EeЗ.RЕ5P@b ~ !@e A@b& t   t DC & &OSfa &/ P % J&f D~Npa D~ e  la %`  fa & O - -f^b & Sfa &4013helpla36tty terminal..type h for help give the appropriate response for your terminal response your terminal la36 la36 with apl character set option 4013 tektronix 4013 tt any terminal not having apl font welcome to apl/11 v1.00 [[X[2Zx*Y,Zx*.Zx*YVZzZBZPZZx*x*ZJZr[-x*x*[[.Z.Z.Z -vOOPS T2WR2not erased> was < z. z*~?PS&; z._vR1 ' z.PSe E z.~ e36tty terminal..type h for help give the appropriate response for your terminal response your terminal la36 la36 with apl character set option 4013 tektronix 4013 tt any terminal not having apl font welcome to apl/11 v1.00 [[X[2Zx*Y,Zx*.Zx*YVZzZBZPZZx*x*ZJZr[-x*x*[[.Z.Z.Z -vOOPS T2WR2not erased> was < z. z*~?PS&; z._vR1 ' z.PSe E z.~ e4 005067 000452 CLR XRB+10+ 000720 005067 000454 CLR XRB+12+ 000724 005067 000456 CLR XRB+14 000730 104004 .WRITE 141 142 000732 GOTO WAITING$ 000732 000655 BR WAITING 143@ COMMON COMMON DEFINITIONS MACRO M11 18-MAY-77 10:03 PAGE 34" 145 000000 .PSECT IMPURE,D 146 000015 CR = 15 147 000012 LF = 12 148 000000 GET.T1::1 149 000000 000000 .WORD 0 ;MODEL FIRQBB 150 zL=G+)P.,#;:`,`,`^r^_saved was not saved, ws is clear ws r`&v~&f ^54&&nSz]e&@`&&ZR ~ ɋMW  BE] ȋQ2._R_] x] |`2W'W,+E |`$W'!E`5^RU5fRU|]¥~•Gȋ_H`4 |`W&5UߐoR_nR tR *_ jR *_ hR *_ۆ_D^ |`0lRPlRW,W"lR  BEQ(2H  QtPlRQ `   ` ߋlRW> 5@1`R/bRU@lR_D^ 5 "dRU ×lREtP5 pRUlR?lR e _^W  ߕlRWP _\_ZR lR &"p*ZR  C~f BE 2p E` V f@`& r(    ee"ee ee`\~E0:"az5`Q .G 4p(`   ]5` 4f] &P& a B~ `S ` `Е Е f`S &f] & `c Nff2Y & /&    /   c Nff2Y &4 Nff2Y & c 045 X59&¥   2 05Q X5%Q  22 &"2e2 3 f4 0 f4] &"B~ P c - c_ e ]D ] ]Q f42 X6vSnS```` ] &$e & f4 ]5 g ]Q f42 X6fS nSe f4* G`97 f4R f4 3EO ] ]nS@5 v ]P5` 45`&f] &_a ,, e&~5 g U UO 3Q f4U ] 2gA X5 OvO zY ~OOeEr 3RReE2r 3 f4EO Vff] &_a ]UO 3Q f4U5 g ] X5OO 43OOKezYOeE2Oe2 43RReER2r 432  f4 L-OOCezYOO B~EO Vff2Y &_p,Q f4U2 ] X6dS nS2 2 ] e_J]_e 2g_bff] &fS0P.PvEr< f Е>K~e Е Е 0PtE fЕ_tEeg `Е_EeH f`Sɥ0ɕ 0  1 & r e0e0А并>J&zQQAA wL^Y&f,0PE0PbSdSH5 BCr rtB P0P.P  J&zQQAA wL^Y&f,0PE0PbSdSH5 BCr rt 000455 124 103 110 000460 040 077 040 209 .EVEN# 210 000026 ASKLEN=.-ASK.KB& 211 000464 000000 KB.NO:: .WORD% 212 000466 000000 DDB:: .WORD' 213 000470 000000 I.PTR1:: .WORD' 214 000472 000000 I.PTR2:: .WORD' 215 000474 000000 I.PTR3:: .WORD' 216 000476 000000 O.PTR1:: .WORD' 217 000500 000000 O.PTR2:: .WORD' 218 000502 000000 O.PTR3:: .WORD 219 220 000000' .END STARTB COMMON COMMON DEFINITIONS MACRO M11 18-MAY-77 10:03 PAGE 34-2 SYMBOL TABLEVASKLEN= 000026 FQFIL 000004 PTPHND 000012 UU.CCL 177750 $Y$ = 000000\ASK.KB 000436RG 002 FQFLAG 000024 PTRHND 000010 UU.CHE 000023 $Z$ = 000000VASSFQ 000024 FQFUN 000003 P.BAD 177754 UU.CHU 000010 $$S = 000000VAUDHND 000032 FQJOB 000002 P.BPT 177756 UU.CLN 000002 $$T = 000004VA3 = 000002 FQMODE 000022 P.CC 177770 UU.CMN 000030 $$TT = 0000