REDUNDANT CONTINUATION MARK; IT IS IGNORED CONTINUATION MARK NOT IN RANGE 1 TO 9; IT IS IGNORED ILLEGAL STMT. NUMBER, NON-NUMERIC CHAR. IN COLS. 1-5 ILLEGAL TYPE OR IMPLICIT STATEMENT, INTEGER IS ASSUMED. NON-DECLARATIVE STATEMENT IN BLOCK DATA. SYMBOL TABLE FULL STATEMENT TOO LONG, REMAINDER DISCARDED MISSING END STATEMENT, END ASSUMED z`':y:΁~z ~ ~ z v r7 r7 pwn7l^7 Zf eeDD&  7 2w,7o&" $~j w xw7w P    ~       %Z%*%6- -$- Z&>%>%׭ L&. ѕ?ѕ ѕ ѕ `&whZ&Z%& f,L%/ zrW 7 4F%/ D<W 7 R%/  d,W Z%>%d% n%n,%n%7 x%~,%x%7 %d%(  ) w4 w 7 07 7 7  )Е **Е *Z*8|**6p8.,t/ |w' 7( F ++   6 : d,xd, e d,؄ +   Å  &f(( ( 7 &^,   ~+ + ~+W # +++++++++,,,,,",+,2,A,G,N,T,Z,^,SUBROUTINEFUNCTIONBLOCKDATAEXTERNALDEFINEFILETYPEDIMENSIONCOMMONEQUIVALENCEDATAIMPLICITENDLOGICAL*1LOGICALINTEGER*2INTEGERDOUBLEPRECISIONDOUBLECOMPLEXREAL*8REAL ILLEGAL UNARY OPERATOR, ONLY +, -, OR .NOT ALLOWED. COMPILER ERROR - IMPOSSIBLE OCCURENCE MISSING LEFT PARENTHESIS IN FUNCTION CALL MISSING RIGHT PARENTHESIS IN FUNCTION CALL ILLEGAL CHARACTER(S) TERMINATING STATEMENT ILLEGAL FORMAT IN A NUMERIC CONSTANT INSUFFICIENT INTERNAL COMPILER SPACE TO EVALUATE THIS CONSTANT INTEGER CONSTANT TOO LARGE. REPLACED WITH LARGEST POS. VALU .8BLV`j~Z& 4,  2 7 `&C    `& נ 0נ S~W &9 f&( 0&נ 4נ`1%&%& $ . ѐ&eC å1å9 %&((~Jw`&7 P( נ נ0נ9Ԑנ  7 נ נ f&f&!(~Z&d%d%5`(`&% (4w7 7 7 %n%7 %x%d%d% n%n% x%x%>%Z%7 • !•S. -   -- w&Z%# 0000 ERRORS 4d N(f     `A  w 0& \ 8FA P X5@ z E m C 6 6 @ @ @ EC n ,&  f * L5   2w &2 "X { 2  rw 1 @ 7 fg-7  ~ *4REAL++7j8|,8z6L+.@0F+P7ɋ ,(( $( 0N e 6 6  F % E5 W( e e    E *  e6 6 6  ! g { b `  eW,W)X    E?E2Q < . @. 4 A X  E & )& E    xen Ze& E. ILLEGAL SYNTAX IN LIST ITEM. ILLEGAL LIST ITEM TERMINATOR WARNING--LOGICAL*1 IS USED IN AN EXPRESSION TOO MANY SUBSCRIPTS IN AN EXPRESSION MISSING ")" IN SUBSCRIPT EXPRESSION. UNRECOGNIZED STATEMENT ADJUSTABLE ARRAY NAME OR INDEX IS NOT A SUBPROGRAM PARAMETER LIST ITEM IN DIMENSION STATEMENT LACKS DIMENSIONS.  &     Օ^e@Օ ĕ  %fTN~:NJ f >| Rt H x >&n%&x%n%0000 ˕/DDe d ~s  x%,@ @ > ?& 7  &x%fՋ D w _~*0 7w @ww @ 00   CaCa` 7!wp &P w 2  NL$ w5  bw 2w %2  5 @ Ee  R     & w 7t 55 2  22  (wew # Lj @b :T325 w ng2 32  w XE2CF Zw Hd2 w b#  CF 8 .w  @2 l"w 1w 1I *w  r >5 5 &E ww .GLOBL $ADJ  l6 v6ve  0   2* EE82Q \+ E8 E3QU ɋ ɋ W, e&  4m$" C C C E$ v3  7E E E Eve wa-  EE sQ e@w f  ARRAY DIMENSIONS CONFLICT WITH THOSE IN AN EARLIER STATEMENT MISMATCHED PARENTHESIS. NON-ARRAY REFERENCE TO ARRAY ITEM. CANNOT ASSIGN TO A CONSTANT CANNOT ASSIGN TO A FUNCTION ILLEGAL CHARACTER TERMINATING A STMT. OR POSSIBLE BAD OPERATOR SUBSCRIPT ON NON-ARRAY VARIABLE VARIABLE NAME MUST BE 6 CHARACTERS OR LESS. ~ T&5EEV!3`&$ :&w:6 &6v ~"e ""a |v6   @߁W. W'5 e:w"ev Nv , E ~E%6(  e:w" 60) W(U5"~ %E  "  lf"\EEE!"0 (*, w 1O  w 1 X 2w 1 w \B7aR?& 7 w tk2>F t w ^L2w XL2  F L 7 7 w L2w L2w %2 @ 7a& *7 $w y2F r7 w @E bw _2))Jw 1 Jw ,w 1 J w ,w r1 ~JJ .GLOBL $READ,$WRITE,$DC$IC$LC .END MAIN. .GLOBL $EXIT $EXIT : MOV MOV -(%0),-(%6) JMP @(%4)+ +10,%0 BR +4,%0 BR MOV -RXl h0 jven] v 6F @B,¥/ Rɋ `ɥ, 0 J F \0 27 .CSECT $TR: c&f7 7 D7 D < v ,, v  ,  , / / ed ɥ//7 nv P  m*7 &h<Ĝ E%2*  2  z hww e<@U@ 2  @  ILLEGAL SUBSCRIPT IN AN ARRAY ASSIGNMENT ILLEGAL OPERAND TOO MANY SUBSCRIPTS OR NO CLOSING PAREN FOR SUBSCRIPT. NO FUNCTION ARGUMENTS PRESENT, FUNCTION IGNORED. UNRECOGNIZABLE PARAMETER IN FUNCTION CALL. FUNCTION CALL MISSING A ")". ILLEGAL ROUTINE NAME. MISSING END STATEMENT, END IS ASSUMED.  & ~wT>! 6F!( &v (v$e  d$I "UUw0v$e  *$I~ "  U0 "e "n *  0?h De$ыW', 2TN 5ԕ u i~r7& / BU w" * W'ы $ы DeT N  6 6 Z~6  6 P6 6Da hWHc w(W.a S(%0),-(%6) (%5)-4,%0 ADD #10,%0 ADD #4,%0 . = .+: 0 : 0,0 : 0,0,0,0 -(&f&f 8 7 444( 44  @ ! eW &&4% D ! ҕ^e@ % % x"W0Օ 7x7u  LeB5 82  a 44 4 e@ %W!<&Օ Օ B le-xLJ-(%4W!&Օ Օ % 4 KFn 2 4  R L5 =. . =. = b 5  f &+ j aC 7`gh L*B 7 <V3 F  $mn V3 +  P | . =  m*G7 ɥ(PɥOGɥZGɥ-=ɥ+ nD Bɥ*#%A ;7 7ɥ(*ɥ-ɥOɥZɥ+ " ZT 27    bi7 $jEE 0w6  SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER DO LIST OVERFLOW, NO MORE THAN 10 NESTED DO'S ARE ALLOWED. ILLEGAL SYNTAX IN COMMON/EQUIVALENCE TABLE OVERFLOW IN COMMON/EQUIVALENCE DUMMY VARIABLE USED IN COMMON VARIABLE ALREADY IN COMMON, CANNOT BE RE-DEFINED. ILLEGAL DO STATEMENT SYNTAX DO CONTROL VARIABLE NOT SIMPLE INTEGER VARIABLE. l - & v$e P $I~b B "UUU" E0Q  w$2( e "e2e(w,~wF6 0wf4" 6넃 tT  6 06Da6WEWDv @ @ @ @a &  2 @ @ @ @ @a  (5w(f! x@ >%; pѥ,6&& N' %%"ѥ)e44e E8U(  W( PC3) W- 6 BAD DO PARAMETER BAD STEP VALUE IN DO, IT IS ASSUMED TO BE 1. ILLEGAL CONSTANT IN PAUSE/STOP ILLEGAL OR MISSING STATEMENT LABEL NUMBER ILLEGAL SYNTAX IN GOTO/ASSIGN STATEMENT ILLEGAL DO STATEMENT NESTING ROUTINE NAME CANNOT BE A NUMERIC CONSTANT SUBROUTINE OR FUNCTION STATEMENT NOT FIRST STATEME"$2w .... &e(E FT ~Bd $D V "U UE 555    Eǯ & h~ )f B)e `) `)  E Em    5 E 5  W(b~2 5 Uf 5E fE`m4 w!. $*  E ~  1ww7v~ U    /#   cw& 23   w e. vv    w(EDN " v!$DE+- v!$DE 0090 ` av!$  ` "w   4 4f& ( " mB A @ mA @ m@ c  e   e=-9B6 C B A @ #"B A @ C6v "$e΋V w  J &f CD3) W,W)ɋM fI 67 j=7 ^ hV <  `W( Z D  FW, @ *ᅗ  ,J7 Dׅ ԅ   W)  z   .GLOBL $DEFIL ,U,F7I7  w |7 >wf݂77FILEYB7 P y j70e ݃ fU  E8 PE ( -~ ꗠ( 7 :Ue-( ꗠ,)!NT OF ROUTINE ILLEGAL PARAMETER IN SUBROUTINE OR FUNCTION LIST TOO MANY PARAMETERS IN ROUTINE LIST ILLEGAL ARGUMENT LIST IN EXTERNAL. MISMATCHED PARENTHESIS IN FORMAT MISSING COMMA OR ) IN COMMON/EQUIVALENCE. MISSING ( IN COMMON/EQUIVALENCE DUMMY ARGUMENT USED IN EQUIVALENCE INCONSISTENT EQUIVALENCE "w>ff&ff&& 7 m  E%  ( |~"!F .TRUE..FALSE.0!6!=!&fBW!( UE5!w$-(wB09~!AZ!ĕ:ĕ,ĕ f)f wf w)7 w "~" .GLOBL*" v"J"K"L"N"O"P"T"Y"^"b"f"j"n"r"v"+-***/.OR..AND..NOT..LT..GT..EQ..NE..LE..GE.  # 8 2&f  eB A @ eA @ e@ e B A @    ()   () !) e$$r9 , , ,ĕO ĕP 7)7)   H  < ~ 0 rCF 5 5       $ENDD  p > xɥ0  f  D z%ɋ3 .TITLE .CSECT .GLOBL : JSR %4,$POLSH .GLOBL $POLSH,$NAM,$SEQ $NAM,0,0, w 9 (% 9  EUU7 vU7lTƩ 9678 pꗠ,) `  EUw X8 ( V 0ꗠ,  : .GLOBL  "7w-~zrww  ", 6& &% TWO OR MORE COMMON ITEMS ARE EQUIVALENCED I/O UNIT IS NOT SIMPLE INTEGER VARIABLE OR CONSTANT. ARRAY OR FUNCTION NAME IS NOT ALLOWED AS A UNIT IN I/O STMT. ILLEGAL SYNTAX IN I/O STATEMENT. MISSING ARGUMENT IN FIND. ILLEGAL RECORD DESIGNATOR IN RANDOM ACCESS READ/WRITE. MISSING RIGHT PARENTHESIS IN I/O CALL ILLEGAL FORM OF END= AND/OR ERR= &~"   U x    C å å$ נA   e`  ~#B¥ ɥ ɋ  D &f DW R  &&f~z##  Ëנe ee e ѐ  @(&fe B e~#m&ff&e Z  e&f $2 e \w 9 w 9e Rw , F އ(Z*4|*0*...(/~)3 Pb f @  0Q PRT!f. p1  f w  0Q PBE@C%FK   (  ww&&f n)"  T)"   :)" U7z7V& & wEpU  j,&f84& F(  #Ff 2  5$ ,)0‹% + EP   ` 4& < ¥,¥)7e  =< &e7 " <   B B B E ``> +\ B<1 DmC D11 aw ;@  @* 7  .0 7 7 l1 6B D lDl7!7 e  J"& eLlL 1v &DB1 J"@ ?w 0;@ 7 4.22 ,Bm^< J 5 ILLEGAL OR MISSING DUMMY ARGUMENT IN ASF SUBSCRIPTS OUT OF BOUNDS IN DATA OR EQUIVALENCE. ILLEGAL EXTENSION OF COMMON ORIGIN BY EQUIVALENCE. OPENING "/" MISSING FROM DATA GROUP. WARNING - UNEQUAL NUMBER OF VARIABLES AND CONSTANTS. DATA NOT ALLOWED IN COMMON EXCEPT IN "BLOCKDATA". SUBSCRIPTS ON UNDIMENSIONED ELEMENT IN DATA. ADJUSTABLE ARRAY NOT ALLOWED IN DATA. 6 @)2~ *4*.$$$$.Z*:.2455589$:J!& !~*@!>%Z%*%6- -$- Z&>%>%׭ L&. ѕ?ѕ ѕ ѕ `&whZ&~*Z%& f,L%/ zrW 7 4F%/ D<W 7 R%/ 7! f bUrlH&  & H `5\5VX5 # 8 R " E 1  @uuE   '5#R5 ݵ ~A p CF  ^P CE 11ĕ Lĕ$ D1 <Ĝ1 4)))) B \ , TBIIRDC5h5f5d& 77^ ĕ$ E i5 j5  ' C EĜ1 1 ﳼG@w ; w , D7.tm 2 f BmU2 E2*   73x (w :t3l w N+Xm ". w*D7!8(mp5@"U@^ ~w u3 pw +CZ j  Fb. =w 3FF 3 pw 3m xF r w \4wzCm5@U@ Cmf 2. =.+ $TR, =. &eAf& e& &A mE PRESETTING NAMED COMMON ALLOWED ONLY IN "BLOCKDATA". ILLEGAL FORM FOR CONSTANT IN DATA. ILLEGAL REPEAT COUNT. MISMATCHED DATA TYPES. DATA MUST FOLLOW ALL OTHER DECLARATIVES. SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGF~r+ d,W Z%>%d% n%n,%n%7 x%~,%x%7 %d%i~+(  ) w4 w 7 07 7 7  )Е **Е *(4wz~b,7 7 7 %n%7 %x%d%d% n%n% x%x%>%Z%7 • !Z~,•S. -   -- w&Z%# 0000 ERRORS 4d N(f     `A  H)))) Mw 1 \ )))) h R zEwAA d5 1 ﷼)) * D  <E537`.3   CF wD $SVSP[3 Ee0 7)a7)Y @E X BA F h 5^5 0>, X r BwE5 e0 )) ( B w $SBSf&@ 5@w <5 w 5 w 5E e w """"""" """"""DDDDDDD@DDDDDDDD""""DDD """"DDDDDADDB C'%&u'{f(N| #(O| (P|$G(Q|'P(R|K o(S|T x(T|j'ƈs(Nƈy (Oƈ|(Pƈ(Qƈ(Rƈ (Sƈ (Tƈ$D"Bƅ8a ͋,L w6B ` 5 &  }E >u   d5cU@  Y*  & * D &( 5I'4b Q$ BBB"   U@ e  "U%Gef. U U Bb 0 * BIE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSJw 0& \b~R- 8FA P X5@ z E m C 6 6 @ @ @ EC n ,&  f y~-* L5   2w &2 "X { 2  rw 1 @ 7 fg-~B.7  ~ &P w 2  NL$ w5  bw 2w %2  5 @ m~.Ee  R     DC !ee R$ V*  < @*"&@ Bw l3& 0  2 w. 4 Pw44FILEL+5 w@E%@5 Tw + T" rCEF w 5F w z5 w n%57 .w d+5-5K5 e0 ))  8  0w~  .+2 JSR %5, BR .+: 0 ADD #,%6 JSR %4,$POLSH .GLOBL $GET $PSHR $SVA $SVP $SVE $CMORANNTADSBMLDVPWNGLTGTEQNELEGE( r$ "   ^ (& @& f $ W  ɋ &5 5U& w7 fB= x &  W  ɋW)MAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MEN & w 7t 55~2/ 2  22  (wew # Lj @b :T325~/ w ng2 32  w XE2CF Zw Hd2 w b#  CF 8 .w  @2 ~"0l"w 1w 1I *w , w 1O  w 1 X 2w 1 w \B7aR~0?& 7 w tk2>F t w ^L2OZ*;** L w' 6 B & *  @+& ؅ x@+*****+ ++++++#+(+-+3+<+@+ENDFORMATDOASSIGNCALLCONTINUERETURNGOTOIF(PAUSESTOPREADPRINTWRITEREWINDBACKSPACEFIND;f+D-*-H-N-wJ & W) W= EW!N l - L v - < f F Z P * R! eF+@+ @+7   $F:   7 f b , ,ePC @ A 11ĕ hĕ$ `Ĝ1 X넜1 P)))) ^ x H p   <엠=(     w7 &  7 ^7 Ee0 근)x)p  $PUT $POP7 b7 X&5ĕP ^e0 P갼)))) ^ x H 5  $ R $POP)  ! )0 f)&   S @ L N=D >QSSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC Rw XL2  F L 7 7 w L2w L2w %2~1 @ 7a& *7 $w y2F r7 w @E bw _2))Jw 1 ~1Jw ,w 1 J w ,w r1 ~JJ .GLOBL $READ,$WRITE,$DC$IC$LC .END MAIN. .GLOBL $EXIT ~2 $EXIT : MOV MOV -(%0),-(%6) JMP @(%4)+ +10,%0 BR +4,%0 BR MOV -(%0),-(%6) (%5)-4,%0 ADD #10,%0 ~z2ADD #4,%0 . = S      . :  pe W, ~Se   ! U P  .GLOBL $TSI .GLOBL $TSR .GLOBL $TSD ,,, .GLOBL $TRTST D f(- *4 f<-5 &  B (  A B J# |,)¥'6 C D& ]EB2 ~AD @7   w <2w X$ c2 b2\ E%  w 2v #  ,U•)  ,< < :BW=5 9 7.W,2 / - ɋ hW,# l  Nɋ1f8 J1)./B?=0 ) BEP (  Lf NCF  (!)Ć eTTTTTTT $POP2Da<65ÜE ` x wt 9 w6۲99FILEUMESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIV.+: 0 : 0,0 : 0,0,0,0 -(&f&f 8 7 444( ~244  @ ! eW &&4% D ! ҕ^e@ % %@~j3 x"W0Օ 7x7u  LeB5 82  a 44 4~3 e@ %W!<&Օ Օ B le-xLJ-(%4W!&Օ Օ % 4 44.W),Fneg] C ` ` C f2 6w)3w)+ X r B  )w V2 A 2  wB2 L +w N. " )w 40 ,B2  w .  )G w 0 p@ . 2 jygq_ z b7 ` n -( w T) '9Cנ נ= |  T J7  , ) 7 H X2   Cנ נ(   w 2XZ*<*7* L w' 6 B & *  @+& ؅ x@+*****+ ++++++#+(+-+3+<+@+ENDFORMATDOASSIGNCALLCONTINUERETURNGOTOIF(PAUSESTOPREADPRINTWRITEREWINDBACKSPACEFINDT<5:8f+X;R;77wJ & W) W= EW!N H- L v - < f F Z P * R! eF+@+ @+7   $F:   7 f b , ,eYC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSZ~Z4((  f 4 (4 TwB[] ERROR ;***DIAGNOSTIC TABLE OVERFLOW ~44&4'%&&n%&x%   -%  P  5 e0 췼)z3~J5)r 5 pzkrc |  $RET $POPR& & &f&f& & & A& & $m"p~5$    DE v!$w+--  'DE 00L    [A bwZ f& ( , )  Bw  f T   D= * $)ӝ ą7 N  N 7 =[ )wZwJ  )w 2 Tv 2 L:2 X)B): f P x&  NwDR2 5P   , E  BLIRDCXAJ2N2R2END=ERR=\      . :  pe W, ~Se   ! U P  .GLOBL $TSI .GLOBL $TSR .GLOBL $TSD ,,, .GLOBL $TRTST w҅0$  3-F0-B) $)&f 7tW  W)  R T v!wv- p( ft {&E P Jp7 O$4   4&gU{$ eu#CEEBPBeᷣW[PBCCBEE]TIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGN^9Q  0 $ F~:6aB A @ v!$N    /#   cw& 23   w e. v~6v    w(EDN " v!$DE+- v!$DE 0090 ` av!$~*7  ` "w   4 4f& ( " mB A @ mA @ m@ c  e ~7  e=-9B6 C B _ $PSH $PSHR1 0 t2{222222 $FIND $INRI $INI $INFI $OUTRI $OUTI $OUTFI0,0 $PSH, $IO $IOF 7 .3 5ĕP e0 ))))  " 5  $POPw̅0$ ~ 3-"0-) $)&f\ 7PW  W)  . 0 R!w- L( Bt {&E P &p7 O$4   4&gUW$[ eu#CEEBPBe` Pb f @  0Q PRT!f. p1  f w  0Q PBE@C%FK   (  ww&&f n)"  T)"   :)" U7z7V& & wEpU  j,&f84& F(  #Ff 2  5$ ,)0‹% + EP   ` aOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAbA @ #"B A @ C6v "$e~8΋V w  J &f 8 2&f  eB A @ eA @ e@ e B A @    ~8()   () !) e$$r9 , , ,ĕO ĕP ~ 97)7)   H  < ~ 0 rCF 5 5       $ENDD ~9 p > xɥ0  fc37PBCCBEE P> f @  0Q PRT!f4 L1  B w  0Q PBE@C%FK   헠(  ww&&f n)"  T)"   :)" U\7V72& & wEpU  F헠,&f& "헠(  #Ff 2  5$ 엠,)0‹% + d! f bUrlH&  & H `5\5VX5 # 8 R " E 1  @uuE   '5#R5 ݵ ~A p CF  ^P CE 11ĕ Lĕ$ D1 <Ĝ1 4)))) B \ , TBIIRDC5h5f5d& 77^ ĕ$ E i5 j5  ' C EĜ1 1 ﳼeGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO Df  D z%ɋ3 .TITLE .CSECT .GLOBL : JSR %4,$POL~9SH .GLOBL $POLSH,$NAM,$SEQ $NAM,0,0, w 9 (% 9 \w 9 w 9e~r: Rw , F އz ;H; f&  ef;fD;d` P~:P wp0;&./  FTN000.OVL ;:;z;.;8;B;L;V;`;0~b;j.8BLVgEPt   ` ! B >UNH$&  & H `5\5V|;   . E 1  @uuE   '5#v; ݑ ZA L CF  :P CE 77ĕ (ĕ$ ꄜ7 Ĝ7 과))))  8  0BIIRDC5h5f5d& 7k7o^ ĕ$ E ; ; h)))) Mw 1 \ )))) h R zEwAA d5 1 ﷼)) * D  <E537`.3   CF wD $SVSP[3 Ee0 7)a7)Y @E X BA F h 5^5 0>, X r BwE5 e0 )) ( B w $SBSf&@ 5@w <5 w 5 w 5E e w iIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO`j(N 6 D;w 647 F 2 $ ! B  ^+ )f 8) w ) m DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -nZ*7|**, 7 |w' 7( F ++   6 : d,xd, e d,؄ +   Å  &f(( ( 7 &^,   ~+ + ~+W # +++++++++,,,,,",+,2,A,G,N,T,Z,^,SUBROUTINEFUNCTIONBLOCKDATAEXTERNALDEFINEFILETYPEDIMENSIONCOMMONEQUIVALENCEDATAIMPLICITENDLOGICAL*1LOGICALINTEGER*2INTEGERDOUBLEPRECISIONDOUBLECOMPLEXREAL*8REALow 5;E e f w O; w@E%@5 0w + 0 NCEF vw d>;" w VB; w JI;7 w @O;-o; e0 淼))  ށw~  .+2 JSR %5, BR .+: 0 ADD #,%6 JSR %4,$POLSH .GLOBL $GET $PSHR $SVA $SVP $SVE $CMORANNTADSBMLDVPWNGLTGTEQNELEGE 4 L wH ; jw ;;FILEp엠H: , )D+ ¥'" ~Dĥ' j) Zw f)K bL d @7    ) ¥(¥) '7 ( $TR^ .ASCII ^^ .EVEN DEFGIOL R  B-r% ^h `P 7 Pe0 Z근)*)" h R z7 *" B \ , T $RET $POPR88R8l8   J P  D  I .GLOBL $RWIND $RWqNO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR - -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER SYSTEM ERROR -r*4REAL++|,L+F+7ɋ ,(( $( 07 >7w b ɥ( 8%5EaU@EǡB w \. F  ~ w b.& b= V 8ɥ,$ɥ)! 6E $ U0 0  6ɥ,ɥ)S hɥ=P ɋ]Ep]&  t.     Ee0 07)7)  w {. ml2 2  F w .7^^tIND .GLOBL $BCKSP $BCKSP .GLOBL $ENDFL $ENDFL 1 T ɥ(= #wf 8 $ : T $ w b.  4 4 $TR $TRX . $TRA 0 $TRAL f 8 B,)& ɥ, $хɋ :8 ~y݃q J P ߁ &wf 4 EP ~߇w p9 ۛ lѥ, U@ ɋ'ɥ,9 2ɥ(3 9    ɥ)w 9w9 ݩ u -NO DIAGNOSTIC MESSAGE HAS THIS NUMBER v_ $TR,: JSR %4,$POLSH $POPR .+2 RTS %5 : wjх0$  n3-0-) $)&f 7W  W)    !w-t ( t {&E P p7 ,O$4   4&gU$ eu#CEE"BPBeᷣPBCCBEE P f @  0Q PRT!f0 1  w  0Q PBE@Cwz`'By:΁~z ~ ~ z v r7 r7 pwn7l^7 Zf eeDD&  7 2w,7o&" $~j w xw7w P    ~       ;   w O; ̅ vJE   $ASP $AS,.<< B¥'E xP¥O¥Z7   ~?< 2 (>< bݢ @^$ %¥1 <B ܅ D N & w 2< .GLOBL $PAUSE $PAUSE .GLOBL $STOP $STOP .ASCII ^^ .BYTE zr%FK n  (  Vww&&f:VR n)"  T)"   :)" U77& & wEpU  ,&f& (  #Frf 2  ,5$ ~,)0‹% + EP   ` !  U&  & H `5\p5V6 ݙ {.8BLV`j~Z. 4,  2 7 `.C    `. נ 0נ 3~W .9 f.( 0&נ 4נ`1%.%. $ . ѐ.eC å1å9 %.00^~Jw`.7 P0 נ נ0נ9Ԑנ  7 נ נ f.f.!0~Z.d-d-5`(`.-0 .EVEN  w < :wb؆<<FILE}Z2B6:<===@A$BJ)& !@!>-Z-*-65 5$5 Z.>->-׭ L.. ѕ?ѕ ѕ ѕ `.whZ.Z-& f,L-/ zrW 7 4F-/ D<W 7 R-/  d4W Z->-d- n-n4-n-7 x-~4-x-7 -d-0  1 w4 w 7 07 7 7  1Е 22Е 2~ `E b1  @uuE P   '5#6 0;+3# R l < A ` CF P F P : 0 CE Z3Z3ĕ ĕ$ Z3 ĜZ3 )))) BIIRDC5h5f5d& 7 7^ `ĕ$ XE 6 H6 @ ' C EĜZ3 Z3 )))) & @  8 Mw Z3 )))) EwAA 6 턜Z3  .     Օ^e@Օ ĕ  -fTN]~: NJ f >| Rt H x >.n-.x- n-0000  ˕/DDe d 9~ s  x-,@ @ > ?& 7 ! .x-fՋ D w 7~*!0! 7w @!ww @! 00   CaCa` 7!wp ~Z2@|22>p@64t7 |w' 7( F 33   6 : d4xd4 e d4؄ +   Å  &f00 0 7 &^4   ~3 3 ~3W # 33333333344444"4+424A4G4N4T4Z4^4SUBROUTINEFUNCTIONBLOCKDATAEXTERNALDEFINEFILETYPEDIMENSIONCOMMONEQUIVALENCEDATAIMPLICITENDLOGICAL*1LOGICALINTEGER*2INTEGERDOUBLEPRECISIONDOUBLECOMPLEXREAL*8REAL04w7 7 7 -n-7 -x-d-d- n-n- x-x->-Z-7 • !•S. 5   55 w.Z-# 0000 ERRORS 4d N(f     `A  w 0& \ 8FA P X5@ z E m C 6 6 @ @ @ EC n ,&  f 2 L5   2w &: "X { :  rw 9 @ 7 fg-7  ~ )x)p E47`j4 RZMRE t ^ CF wD $SVSP[p5 Ee0 7)7) " < @E  A &   56  w6 e0 췼)e)] w $SBSf&@ N5@w 6 ^ w 6 Pw n6E e  ` ,w N6 w&@E%@5 w J+  CEF w 6 w 6 w 67 w 6-6 ~! T&5EEV!3`&$ :&w:6 &6v ~""e ""a |v6   @߁W. W'5 e:w"ev Nv , E ~"E%60  e:w" 601 W(U5 ~ #%E  "  lf"\EEE!"0 (**4REAL33?j@|4@z>L36@8F3P?ɋ ,00 $0 0N e 6 6  F % E5 W( e e    E 2  e6 6 6  ! g { b `  eW,W)X    E?E2Q < 6 @6 4 A X  E & )& E    xen Ze&&P w :  NL$ w5  bw :w %:  5 @ Ee  R     & w 7t 55 :  ::  (wew # Lj @b :T3:5 w ng: 3:  w XE:CF Zw Hd: w b#  CF 8 .w  @: l"w 9w 9I *w e0 뷼)\)T w~  .+2 JSR %5, BR .+: 0 ADD #,%6 JSR %4,$POLSH .GLOBL $GET $PSHR $SVA $SVP $SVE $CMORANNTADSBMLDVPWNGLTGTEQNELEGE&f5 \7, ,W 7 `7 B7E8P *v ؚ-\@N&?dd++0WWvGv ss<p< (( ( ( ( ( (  8 w4 7 Vw77FILE & ~#wT>) 6F)( &v (v$e  d$I "UUw0v$e  *$I~# "  U0 "e "n *  0?h De$ыW', 2TN 5ԕ u a~r$7& / BU w" * W'ы $ы DeT N  6 6 R~$6  6 P6 6Da hWHc w(W.a S r >5 5 &E ww .GLOBL $ADJ  l6 v6ve  0   22 EE82Q \+ E8 E3QU ɋ ɋ W, e&  4m$" C C C E$ v3  7E E E Eve wa-  EE sQ e@w f , w 9O  w 9 X 2w 9 w \B7aR?& 7 w tk:>F t w ^L:w XL:  F L 7 7 w L:w L:w %: @ 7a& *7 $w y:F r7 w @E bw _:11Jw 9 Jw ,w 9 J w ,w r9 ~JJ .GLOBL $READ,$WRITE,$DC$IC$LC .END MAIN. .GLOBL $EXIT $EXIT : MOV MOV -(%0),-(%6) JMP @(%4)+ +10,%0 BR +4,%0 BR MOV -l - & v$e P $I~b% B "UUU" E0Q  w$2( e "e2e(w, ~%wF6 0wf4* 6넃 tT  6 06Da6WEWDv ff&ff&& 7 m  E%  0 l~")F .TRUE..FALSE.0)6)=)&fBW!0 UE5!w$-0wB09~)AZ!ĕ:ĕ,ĕ f1f wf w17 w *~* .GLOBL** v*J*K*L*N*O*P*T*Y*^*b*f*j*n*r*v*+-***/.OR..AND..NOT..LT..GT..EQ..NE..LE..GE.  >k z%%z< 0    %%Ü2  E && & = 2E  e  .&, . .WORD & # > @ @ @ @a &  2 @ @ @ @ @a  05w(f! x@ >%; pѥ,6&& N' %%"ѥ)e44e E8U(  W( PC31 W- 6   /#   cw& 23   w e. vv    w(EDN " v!$DE+- v!$DE 0090 ` av!$  ` "w   4 4f& ( " mB A @ mA @ m@ c  e   e=-9B6 C B A @ #"B A @ C6v "$e΋V w  J &f&    D  za w 6e v =.+ .CSECT .=.+.$$$$.&f P  *e   m mD D D EE 2&f m\&f& 4 6 m<  @ T` @A @ 4` r "       f @a  b @2 & $   ‹¥, <l& ¥(&  & N ¥,~*   U x    C å å$ נA   e`  ~+B¥ ɥ ɋ  D &f DW R  &&f~z++  Ëנe ee e ѐ  @(&fe B e~+m&ff&e Z  e&f $2 eCD31 W,W)ɋM fI 6? j=? ^ hV <  `W( Z D  FW, @ *ᅗ  ,J? Dׅ ԅ   W)  z   .GLOBL $DEFIL ,U,F?I?  w |? >wf݂??FILEYB7 P y j70e ݃ fU  E8 PE 0 -~ ꗠ( 7 :Ue-( ꗠ,) 8 2&f  eB A @ eA @ e@ e B A @    01   01 !1 e$$rA , , ,ĕO ĕP 7171   H  < ~ 0 rCF 5 5       $ENDD  p > xɥ0  f  D z%ɋ3 .TITLE .CSECT .GLOBL : JSR %4,$POLSH .GLOBL $POLSH,$NAM,$SEQ $NAM,0,0, w A (- A& < ¥,¥)7e  =< &e7 " <   B B B E ``> +\ B<9 DmC D11 aw ;@  @2 7  .0 7 7 l9 6B D lDl7!7 e  J"& eLlL 9v &DB9 J"@ ?w 0;@ 7 4.2: ,Bm^< J W0W7!~j,E0W0 W9WAWFE7 X&0̋w .w f0, H X: $SEQ,,~,f& ɋɥ,ɥ= ɥ(ɥ)       ; FORTRAN V001A &EL.n--L.x--L.d--~Z-&E&(''y' N'^;~-;  EUU7 vU7lTƩ 9678 pꗠ,) `  EUw X@ ( V 0ꗠ,  : .GLOBL  "7w-~zrww  ", 6& & \w A w Ae Rw , F އ@w ; w , D7.tm : f BmU2 E22   7;x (w :t;l w N+Xm "6 w*D7!8(mp5@"U@^ ~w u; pw +CZ j  Fb. =w ;FF ; pw ;m xF r w \@ L w' 6 B . 2  @3. ؅ x@3222223 333333#3(3-333<3@3ENDFORMATDOASSIGNCALLCONTINUERETURNGOTOIF(PAUSESTOPREADPRINTWRITEREWINDBACKSPACEFINDA?=f3wJ & W) W= EW!N H5 L v 5 < f F Z P 2 R! eF3@3 @37   $F:   7 f b 4 4eZ2C22 L w' 6 B . 2  @3. ؅ x@3222223 333333#3(3-333<3@3ENDFORMATDOASSIGNCALLCONTINUERETURNGOTOIF(PAUSESTOPREADPRINTWRITEREWINDBACKSPACEFINDCf3D5*5H5N5wJ & W) W= EW!N l 5 L v 5 < f F Z P 2 R! eF3@3 @37   $F:   7 f b 4 4eDC !ee R$ V2  < @2"&@ Bw l;& 0  2 w. < Pw<<FILE~*0MAIN.DATA.~0~16~1      . :  pe W, ~Se   ! U P  .GLOBL $TSI .GLOBL $TSR .GLOBL $TSD 444 .GLOBL $TRTST w 0$  3-F0-B) $)&f 7tW  W)  R T v!wv- p( ft {&E P Jp7 O$4   4&gU{$ eu#CEEBPBeᷣW[PBCCBEE      . :  pe W, ~Se   ! U P  .GLOBL $TSI .GLOBL $TSR .GLOBL $TSD 444 .GLOBL $TRTST D f(5 *4 f<55 &  B (  A B J# |,)¥'6 C D& ]EB: ~AD @7   w <:w X$ c: b:\ E%  w :v #  ,U•)  Z2D2?2 L w' 6 B . 2  @3. ؅ x@3222223 333333#3(3-333<3@3ENDFORMATDOASSIGNCALLCONTINUERETURNGOTOIF(PAUSESTOPREADPRINTWRITEREWINDBACKSPACEFINDTD=B@f3XCRC??wJ & W) W= EW!N H5 L v 5 < f F Z P 2 R! eF3@3 @37   $F:   7 f b 4 4e @1"~ 242.$$$$.Z2B6:<===@A$BJ)& !Q~2@!>-Z-*-65 5$5 Z.>->-׭ L.. ѕ?ѕ ѕ ѕ `.whZ.2~2Z-& f,L-/ zrW 7 4F-/ D<W 7 R-/ Pb f @  0Q PRT!f6 p1  f w  0Q PBE@C%FK   (  ww&&f n)"  T)"   :)" U7z7V& & wEpU  j,&f84& F(  #Ff 2  5$ ,)0‹% + EP   ` ),Fneg] C ` ` C f: 6w13w1+ X r B  )w V: A 2  wB: L +w N. " )w 40 ,B:  w .  )G w 0 p@ . : jygq_ z b7 ` n -( w T) '9Cנ נ= |  T J7  , ) 7 H X:   Cנ נ(   w :      . :  pe W, ~Se   ! U P  .GLOBL $TSI .GLOBL $TSR .GLOBL $TSD 444 .GLOBL $TRTST wʅ0$  3-F0-B) $)&f 7tW  W)  R T v!wv- p( ft {&E P Jp7 O$4   4&gU{$ eu#CEEBPBeᷣW[PBCCBEE~r3 d4W Z->-d- n-n4-n-7 x-~4-x-7 -d-~30  1 w4 w 7 07 7 7  1Е 22Е 204w:~b47 7 7 -n-7 -x-d-d- n-n- x-x->-Z-7 • !~4•S. 5   55 w.Z-# 0000 ERRORS 4d N(f     `A  ! f bUrlH&  & H `5\5VX= # 8 R " E 1  @uuE   '5#R= ݵ ~A p CF  ^P CE 99ĕ Lĕ$ D9 <Ĝ9 41111 B \ , TBIIRDC5h5f5d& 77^ ĕ$ E i= j=  ' C EĜ9 9 ﳼA bwZ f& ( , )  Bw  f T   D= * $1ӝ ą7 N  N 7 =[ )wZwJ  )w : Tv : L:: X1B1: f P x&  NwDR: 5P   , E  BLIRDCXAJ:N:R:END=ERR= Pb f @  0Q PRT!f6 p1  f w  0Q PBE@C%FK   (  ww&&f n)"  T)"   :)" U7z7V& & wEpU  j,&f84& F(  #Ff 2  5$ ,)0‹% + EP   ` w 0& \2~R5 8FA P X5@ z E m C 6 6 @ @ @ EC n ,&  f q~52 L5   2w &: "X { :  rw 9 @ 7 fg-~B67  ~ &P w :  NL$ w5  bw :w %:  5 @ M~6Ee  R     1111 Mw 9 \ 1111 h R zEwAA d= 9 ﷼11 * D  <E5;7`.;   CF wD $SVSP[; Ee0 71a71Y @E X BA F h 5^= 0>, X r BwE= e0 11 ( B w $SBSf&@ 5@w <= w = w =E e w $PSH $PSHR1 0 t:{:::::: $FIND $INRI $INI $INFI $OUTRI $OUTI $OUTFI0,0 $PSH, $IO $IOF 7 .; 5ĕP e0 1111  " 5  $POPwą0$ ~ 3-"0-) $)&f\ 7PW  W)  . 0 R!w- L( Bt {&E P &p7 O$4   4&gUW$[ eu#CEEBPBe! f bUrlH&  & H `5\5VX= # 8 R " E 1  @uuE   '5#R= ݵ ~A p CF  ^P CE 99ĕ Lĕ$ D9 <Ĝ9 41111 B \ , TBIIRDC5h5f5d& 77^ ĕ$ E i= j=  ' C EĜ9 9 ﳼ & w 7t 55~27 :  ::  (wew # Lj @b :T3:5~7 w ng: 3:  w XE:CF Zw Hd: w b#  CF 8 .w  @: ~"8l"w 9w 9I *w , w 9O  w 9 X 2w 9 w \B7aR~8?& 7 w tk:>F t w ^L:+= w@E%@5 Tw + T" rCEF w =F w z= w n%=7 .w d+=-=K= e0 11  8  0w~  .+2 JSR %5, BR .+: 0 ADD #,%6 JSR %4,$POLSH .GLOBL $GET $PSHR $SVA $SVP $SVE $CMORANNTADSBMLDVPWNGLTGTEQNELEGE( r$ "   ^ (& @& f $ W  ɋ &5 5U& w7 fB= x &  W  ɋW)37PBCCBEE P> f @  0Q PRT!f< L1  B w  0Q PBE@C%FK   헠(  ww&&f n)"  T)"   :)" U\7V72& & wEpU  F헠,&f& "헠(  #Ff 2  5$ 엠,)0‹% + 1111 Mw 9 \ 1111 h R zEwAA d= 9 ﷼11 * D  <E5;7`.;   CF wD $SVSP[; Ee0 71a71Y @E X BA F h 5^= 0>, X r BwE= e0 11 ( B w $SBSf&@ 5@w <= w = w =E e w w XL:  F L 7 7 w L:w L:w %:~9 @ 7a& *7 $w y:F r7 w @E bw _:11Jw 9 ~9Jw ,w 9 J w ,w r9 ~JJ .GLOBL $READ,$WRITE,$DC$IC$LC .END MAIN. .GLOBL $EXIT ~: $EXIT : MOV MOV -(%0),-(%6) JMP @(%4)+ +10,%0 BR +4,%0 BR MOV -(%0),-(%6) (%5)-4,%0 ADD #10,%0 ~z:ADD #4,%0 . = C @ A 99ĕ hĕ$ `Ĝ9 X넜9 P1111 ^ x H p   <엠=(     w7 &  7 ^? Ee0 근1x1p  $PUT $POP7 b? X&5ĕP ^e0 P갼1111 ^ x H 5  $ R $POP1  ! 10 f1&   S @ L N=D >EPt   ` ! B >UNH$&  & H `5\5V|C   . E 1  @uuE   '5#vC ݑ ZA L CF  :P CE ??ĕ (ĕ$ ꄜ? Ĝ? 과1111  8  0BIIRDC5h5f5d& 7k7o^ ĕ$ E C C += w@E%@5 Tw + T" rCEF w =F w z= w n%=7 .w d+=-K= e0 11  8  0w~  .+2 JSR %5, BR .+: 0 ADD #,%6 JSR %4,$POLSH .GLOBL $GET $PSHR $SVA $SVP $SVE $CMORANNTADSBMLDVPWNGLTGTEQNELEGE "? BN=F5 d ~ N F p fw |$w T0 *? > 6 D;w 64? F 2 $ ! B  ^+ 1f 81 w 1 .+: 0 : 0,0 : 0,0,0,0 -0&f&f 8 7 <<<0 ~:<<  @ ! eW ..<- D ! ҕ^e@ - -~j; x"W0Օ 7x7u  LeB5 82  a << <p~; e@ -W!<.Օ Օ B le-xLJ-0-C" w VBC w JIC7 w @OC-oC e0 淼11  ށw~  .+2 JSR %5, BR .+: 0 ADD #,%6 JSR %4,$POLSH .GLOBL $GET $PSHR $SVA $SVP $SVE $CMORANNTADSBMLDVPWNGLTGTEQNELEGE 4 L wH C jw CCFILEIND .GLOBL $BCKSP $BCKSP .GLOBL $ENDFL $ENDFL 1 T ɥ(= #wf @ $ : T $ w b.  4 4 $TR $TRX . $TRA 0 $TRAL f 8 B,)& ɥ, $хɋ :@ ~y݃q J P ߁ &wf 4 EP ~߇w pA ۛ lѥ, U@ ɋ'ɥ,9 2ɥ(3 A    ɥ)w AwA ݩ 9Q  0 $ F~:>aB A @ v!$N    /#   cw& 23   w e. v~>v    w(EDN " v!$DE+- v!$DE 0090 ` av!$~*?  ` "w   4 4f& ( " mB A @ mA @ m@ c  e ~?  e=-9B6 C B *4REAL33|4L3F3?ɋ ,00 $0 07 >7w b ɥ( 8%5EaU@EǡB w \6 F  ~ w b6& b= V 8ɥ,$ɥ)! 6E $ U0 0  6ɥ,ɥ)S hɥ=P ɋ]Ep]&  t6     Ee0 07171  w {6 ml2 2  F w 67^^ ww ɋ %  $<  N f fѥT \ѥO 4 fޢ ɋU@ <DCÝ.CJCÝ>C   w OC ̅ vJE   $ASP $AS,.DD B¥'E xP¥O¥Z7   ~?D 2 (>D bݢ @^, %¥1 <B ܅ D N & w 2D .GLOBL $PAUSE $PAUSE .GLOBL $STOP $STOP .ASCII ^^ .BYTE A @ #"B A @ C6v "$e~@΋V w  J &f 8 2&f  eB A @ eA @ e@ e B A @    ~@01   01 !1 e$$rA , , ,ĕO ĕP ~ A7171   H  < ~ 0 rCF 5 5       $ENDD ~A p > xɥ0  f_ $TR,: JSR %4,$POLSH $POPR .+2 RTS %5 : wjɅ0$  n3-0-) $)&f 7W  W)    !w-t ( t {&E P p7 ,O$4   4&gU$ eu#CEE"BPBeᷣPBCCBEE P f @  0Q PRT!f8 1  w  0Q PBE@C0 .EVEN  w D :wb؆DDFILE  D z%ɋ3 .TITLE .CSECT .GLOBL : JSR %4,$POL~ASH .GLOBL $POLSH,$NAM,$SEQ $NAM,0,0, w A (- A \w A w Ae`~rB Rw , F އz CHC f&  efCfDCd` ~BP wp0C&./  FTN000.OVL C:CzC.C8CBCLCVC`C~bCj.8BLVr%FK n  (  Vww&&f:VR n)"  T)"   :)" U77& & wEpU  ,&f& (  #Frf 2  ,5$ ~,)0‹% + EP   ` !  U&  & H `5\p5V> ݙ `j(N 0;+3# R l < A ` CF P F P : 0 CE Z;Z;ĕ ĕ$ Z; ĜZ; 1111 BIIRDC5h5f5d& 7 7^ `ĕ$ XE > H> @ ' C EĜZ; Z; 1111 & @  8 Mw Z; 1111 EwAA > 턜Z; 1x1p E<7`j< RZMRE t ^ CF wD $SVSP[p= Ee0 7171 " < @E  A &   5>  w> e0 췼1e1] w $SBSf&@ N5@w > ^ w > Pw n>E e  ` ,w N> w&@E%@5 w J+  CEF w > w > w >7 w >-> e0 뷼1\1T w~  .+2 JSR %5, BR .+: 0 ADD #,%6 JSR %4,$POLSH .GLOBL $GET $PSHR $SVA $SVP $SVE $CMORANNTADSBMLDVPWNGLTGTEQNELEGE&f5 \?, ,W ? `? B?E8P *v ؚ-\@N&?dd++0WWvGv ss<p< (( ( ( ( ( (  8 w4 ? Vw??FILE