Google
 
Trailing-Edge - PDP-10 Archives - decuslib20-05 - decus/20-0137/financ/financ.exe
There are 2 other files named financ.exe in the archive. Click here to see a list.
?p00`0?hX?x " 

 

<+++2	`D~R@?%0*+2%(@-	EXIT      HELP      INFORMAT  FINISH    PRINT     TYPE       0FREE      DUMP      RULE78    NETPVALU  NETPRATE  DEPREC    ANNUIT    NETFVALU  NETFRATE  EFECTV    ADDON     z~(/,' WMU FINANCIAL CALCULATION PACKAGE',/)(/,' TYPE "HELP" FOR HELP')(/,' *',$)(/,1X,2A5,' IS NOT DEFINED',/)(' OPTIONS AVAILABLE:',/)('+ ',A8,$)('+',/)(/,' FOR MORE INFORMATION ABOUT AN OPTION, TYPE',' "INFORMAT"',/)(/,' TYPE NAME OF OPTION FOR WHICH YOU DESIRE',' INFORMATION.',/,' TYPE "ALL" FOR ALL.',/)(A10)(/,' ENTER NAME TO BE FREED.',/)+ -<" <z, <y,\ <{,, <~,, <,, <w," $.g6b0b+!+4444!4/ <u,07Dj+5d& <, <,
+ j0d+R6bj0b+/+)4/414B4G4G4I4J4K4P4Q <t,\ <j, <	,,@df"[ $ ( [4H< <

, ( <,
:f1(+< <,,@jf.$8&47Df+@ <,, <,,+ <,, <, <,
 <s,b++/ <r,L+ <q,\++ <!,, <$, <',
 <p,+ <o,M+"$.dj0d+e6bj0b+[+V4[4\4^44a4b4d4f4g <j,}+ <n,
^+ <m,
^+ <j,W+ <l,
^+ <k,
^++ <j,U+ <j,+ <j,

xxxxxexhxjxjxhxjpXjhggxjxhXikXipXisXit(X(XXwXy0 [Xi{X{Xi|Xi	Xk0hXi

Xk0h(/,1X,A10,' IS NOT DEFINED',/)ALL       WN|R \.p) p D*Od*3@/2B/7+>"[ $ D* *( [3H)2J)7+?:*8&7@d* <A, <D,
+?Od* . * Ap,~X*+0)DSK  SEQOUT    OUTPUT.DATYC%}: \F p @F1@+P <S, $ DF F F Ap,~P~G^H^JOUTPUT.DATTTY  iSM}: \W p @V0@+a@dV <g, <d,D <i, W V Ap,~`YXWWh`~Z(' EXIT  -  TERMINATES THE PROGRAM AND',' RETURNS TO MONITOR.',/,' SAME AS "FINISH".',/)(' HELP  -  LISTS THE OPTIONS AVAILABLE',/,' AND EXPLAINS HOW TO GET MORE INFORMATION',/,' ABOUT A SPECIFIC ROUTINE.',/)(' INFORMAT  -  GIVES DETAILS ON THE VARIOUS ROUTINES.',/)(' FINISH  -  TERMINATES THE PROGRAM AND RETURNS',' TO MONITOR.',/,' SAME AS "EXIT".',/)(' FREE  -  RELEASE AN ASSIGNED VARIABLE NAME.',/)(' BACKUP  -  RETURN TO THE PRECEEDING QUESTION.',/,' NO MOVEMENT OCCURS IF THE PROGRAM IS AT COMMAND LEVEL.',/)(' DUMP  -  DISPLAY ALL ASSIGNED VARIABLE NAMES AND',/,' THIER VALUES.',/)(' RULE78  -  CALCULATES INTEREST RETURN ON LOAN',/,' PREPAYMENT',/)(' NETPVALU  -  CALCULATES THE NET PRESENT VALUE',/,' FROM THE PAYMENTS AND THE RATE',/)(' NETPRATE  -  CALCULATES THE RATE FROM THE PAYMENTS',/,' AND THE NETPRESENT VALUE',/)(' DEPREC  -  CALCULATES REMAINING BALANCE AND NEXT',/,' YEARS DEPRECIATION BY THREE METHODS: STRAIGHT LINE,',/,' DOUBLE DECLINING, AND SUM OF DIGITS.',/)(' ANNUIT  -  MAKES ANNUITY(OR MORTGAGE) CALCULATIONS',/)(1X,'PRINT-PUTS ANSWERS ON LINE PRINTER.'/)(1X,'TYPE- PUTS ANSWERS ON TERMINAL(DEFAULT).'/)S:5|V \apkOdl <,0 $3Dm+ m3d1F+i+k <,,3d1F+m+n <,,3d1F+p+r <",,3d1F+t+u <%,,3d1F+w+y <(,,3d1F+{+| <+,,3d1F+~+ <.,,3d1F++ <1,,3d1F++ <4,,3d1F+	+
 <7,,3d1F+

+ <:,,3d1F++ <=,,3d1F++ <@,,3d1F++ <C,, akp,~pkmXlm	Xlv

XlXl	XlXlXl"Xl)Xl0	Xl9	XlBXlRXlXXl\(' ENTER TOTAL FINANCE CHARGE OR <CR> IF NOT KNOWN',/)(' ENTER PRINCIPAL',/)(' ENTER ANNUAL ADD-ON RATE AS A PERCENT(I.E. 5.5)',/)(' ENTER TOTAL TERM OF LOAN IN MONTHS',/)(' ENTER NO. OF MONTHS REQUIRED TO REPAY, <CR> FOR TABLE',/)(' TOTAL FINANCE CHARGE IS ',F14.2,/)(T15,'BEGINNING',/T15,'PRINCIPAL',T45,'UNEARNED',/,2X,'PERIOD',T15,'OUTSTANDING',T30,'INTEREST',T45,'INTEREST',/)(1X,I5,T13,F10.2,T27,F10.2,T42,F10.2)eVdUl \{OdM@dO <	\,, <	Z," $.K6b0b+	+	4	4~4~4	Q4	Q <	_,, <	X," $.K6b0b+	+	4	4	4	4	Q4	Q6DO+	 <	b,, <	V," $.K6b0b+	+	4	4	4	4	Q4	Q I$H DI <	e,, <	T,"DJ DH $.K6b0b+	"+	4	"4	4	4	Q4	Q $.H$H7 .$(d DI O DG5D	*hH GI&	@ FG@dL <	h,, <	R,"DL DM $.K6b0b+	4+	14	44	*4	*4	Q4	Q M DF5D	7 H FF & FM $2DO+	; <	k, <	n,
 <	p,, DL G DK G FNhHG DO"F $jH"h(hL"GIG HI"
I
N JH2$M2dF+	L <	s, <	v,
 
H/
j
O
IJK HN.$8&	B {,~hL|KhJ|KhI|KhG|KhO|KXMPXMUXMXXM]XMbXh(GXlXw$(K(H(I|-1(' DO YOU WISH TO USE THE SAME PAYMENTS AS LAST',' TIME?(YES OR NO) ',$)(A3)(' NUMBER OF PAYMENTS: ',$)(' ENTER PAYMENTS (1 PER LINE)'/)(2F)(' NET PRESENT VALUE: ',$)(1X,'RATE IS ',G16.8)(1X,'SUM OF PAYMENTS =  PRESENT VALUE.'/)(' ENTER RATE AS A PERCENT(I.E. 5.04): ',$)('  PRESENT VALUE = ',G16.8)(1X,'NET FUTURE VALUE: ',$)(1X,'NET FUTURE VALUE = ',G16.8)YES  ]&
[ p @
.Od
27D
3+
f <Q,, <T, <W,
 
03D
\+ <X,, <O," $.
06b0b+
n+
k4
n4
f4
f4?4?D
1 D
* <[,, $.
* D
-6d
*+
t $ D
-"
-.& $ F
/ D
2 $	x D
[ <M," $.
06b0b+
~+
{4
~4
o4
o4?4?:
2; 
/+
v6$
*+"f
*"
* $ 	y F	x.$8( 
*@f	y $	y D
[ <K," $.
06b0b+

+	4

4
~4
~4?4? 
*7D	y+ <I," $.
06b0b++44

4

4?4? 
.0D1D+ 1D+; <^,, <G," $.
06b0b++4444?4? 
-"D	x $ D
3 
.2D1F++ <E,

U7D
1+)!$HD
1 <a, <d,
+? <f,,+? <i,, <C," $.
06b0b+3+0434+4+4?4?7D
.+?$H D
. <B,

 @
3 
.1D+= <l, <o,
+?+?+? <p,,+ <s, <v,
 
[ 
. Ap,~p
.
.h
.
\
0p
1
.h
-
\
0h
+
\
0h	
[
\
0h	
[
\
0h
1
\
0X
2
4X?
;(
0X
2
<X
2
?X
CX
F(
1X
HX
2
MX
Q(
3X
TX
W(
3g \~ H F D~ p @| p Bz0B+

d
*$	@
+$ Dzh
* |&	@ Fy |&	@& F

 <

7,yz$} Dy+

0@dy!$ Dx z0F1F+

+|!& F| $ D} $.
* Dx $ D{ }/x&{/& } |hx	xHy.{8&

 z0D1D+

' 
*7F	y+

& <

5,^	y	x@y+

0 	xDy+

0 
*7F	y+

0 <

4,^	y@y+

0!$| D| $.
* D} $ DxOd{+

 ~ ~   y,~p|
+p|
+p


*(1X,'A DIFFICULTY IN CALCULATING RATE EXISTS.'/' FUNCTION VALUE IS ',G15.7/1X,'PREVIOUS 2 RATES ARE ',/1X,2(G15.7,3X)/)>~n0c=t5"! t8]z8]P1:Z8]U<c\e$ \

O p @

A p @

?0@+

] 
+ D

:

R D

B 
+

R D

@+

b@d

:!$2D

9+

` 

T D

: 

R D

B 

R D

@ $ D

<!$3D

9+

 @

A,<

 @

C,<

 @

;7D

;+

C3d

T+

B

@#2d

T+

o#

A3d

P+

:

B#3d

T+

:

@#3d

T+

B

@ 

A

C D

<"

:

B 

C

; F

>"

:

@

> D

>"

B

@

>

< D

B"

AH

>

B D

=5$

=,< @

=6$

B+

= D

?#

?3d

Q+

?2$

P+

AD

?

@ D

;5d

B

@F F

; 

;2$

Q+

B D

: 

@ D

B 

; D

@ 

C D

; 

A D

C!$3D

9+

 @

A 

<0d%+

<+

k 

B

= D

?+

@ D

A+

B D

A+

@D

B D

;+

;2d

S+

: D

A+

C2d

S+

B D

A+3D

9+

j 

: D

A+

@ D

A!$H

B D

@,< <
+6 @

A,<6 @

C,<6 @

;+

i,<6 @

A+

O 

A Ap 

? Ap,~x

;x

:x

Bx

@p

;

?x

=p

:

?p

B

?p

@

?X

C

(

A(

A(

@(' ENTER DEPRECIABLE COST',/)(' ENTER ESTIMATED LIFE',/)(' ENTER SALVAGE VALUE',/)(//,T12,'STRAIGHT LINE',T33,'DOUBLE DECLINING',T55,'SUM OF DIGITS',/,' YRS    REM BAL  NXT YR DEP   REM BAL  NXT YR DEP   REM BAL ','NXT YR DEP')(1X,I3,3(F11.2,F11.2))I)1 \

, 



 

,


J 
*
H <C,
"(' ENTER :   TO FIND:',/,'  1		RATE',/,'  2		LIFE',/,'  3		AMOUNT BORROWED',/,'  4		PERIODIC PAYMENT',/)(3I)(' ENTER NOMINAL  RATE IN PERCENT',/)(1X,'NEGATIVE AND ZERO VALUES NOT ALLOWED.'/)(F)(' ENTER NUMBER OF PERIODS TO LIFE OF ANNUITY',/)(' ENTER AMOUNT OF ANNUITY',/)(' ENTER AMOUNT OF A PAYMENT',/)(' ENTER RANGE OF TABLE IN PERIODS(E.G. 1,10)',/)(1X,'AMOUNT OF ANNUITY TIMES RATE SHOULD NOT'/1X,'BE GREATER THAN OR EQUAL TO THE PAYMENT.'/)(/,' NOMINAL RATE=',F9.4,'%',/,' LIFE OF ANNUITY=',I5,' PERIODS',/,' AMOUNT OF ANNUITY=',G16.8,/,' PAYMENTS=',G16.8,/,' TOTAL INTEREST=',F15.2,/)(' NOTE: ANNUITY LIFE HAS BEEN ROUNDED TO ','NEAREST PERIOD',/)(//,' ANNUITY TABLE',//)(T15,'BEGINNING',/,T15,'PRINCIPAL',T45,'PRINCIPAL',/,2X,'PERIOD',T15,'OUTSTANDING',T30,'INTEREST',T45,'REPAYMENT',/)(1X,I5,T13,F10.2,T27,F10.2,T42,F10.2)(T15,'BEGINNING',/,T10,'PMT',T15,'PRINCIPAL',T45,'PRINCIPAL',/,1X,'MONTH',T10,'NO.',T15,'OUTSTANDING',T30,'INTEREST',T45,'REPAYMENT')(//1X,'YEAR  ',I2,//)(1X,I5,I7,T15,F10.2,T30,F10.2,T45,F10.2)(//1X,'INTEREST PAID FOR YEAR= ',F10.2,/,1X,'PRINCIPAL PAID FOR YEAR= ',F10.2,/1X,'PRINCIPAL','  REMAINING AT END OF YEAR= ',F10.2,//)#SD%B C:vZ: \SOdZ@dK <R,, <U, <X,
 U0$0d+Y1D+k <Z,, <P," $.U6b0b+g+d4g4_4_4B4B6dP+j <],,4d_$H DY U1D+y <`,, <N," $.U6b0b+u+r4u4m4m4B4B6dN+w <c,,4dmD D

9 U1D+ <f,, <L," $.U6b0b++44z4z4B4B6d

8+ <i,,4dz U1F+ <l,, <J," $.U6b0b++

4444B4B6d

8+ <o,,4d <r,, <u, <x,
6DP+ $ DP Y$	@ DW6bU0b++44"4/45!$ D

9 $ DR <I,

U@d

9!$	@W DY+; 

8W3$

8+& <z,,!$W DT <H,Y @"

8W

8$ DT <G,Y" @ @

9+;!$W DT <E,"

8

8W D

8+;!$W DT <D,!&}& 

8W D

8 $3DK+A6FZ+? DZ 

9 DV+A6DV+A Z DVd

9

8

8 D[!$HY DM <}, <,
 U0D+J <,, <,, K1D+N <
,,d

9

8$H$D DY!$H

8D DI 

90d+\ U

8D DS&$2$$2/S DM7DM+` $.I DH+` V

8D DK&$'$$'/K DM+Y I DH$

9 DV/Y DX K1D+"$.V DT V2D

9 DT"T $ 

8W(H(H HL"
L.
H JWj*H JOh(H HR"Z.P. 
&
P$
P2J+v<
"OH

8.$8&i V2D

9+B7DX+"X.H FNf&H FI!*
W&H&F FH N/H HLf&H FO F

8+!$H

8$ D DHd$H DO"H.H FL D

8dL$H DR V DO K1D+8 <, <,
+B+B@dJ $ DQ DK 

9 D\+ <,, 

90d+/$ DQ+ $ DQ@dX DJ <, <,
 

91D+z"Q $:J 

8W(H(H HL"
L.
H JWj*H JOh(H HR L.HX W.HJ < , <#,
"
J

8.$8&!"$.d

9fX&H FGfJ&H FL4dz <', <*,
 $.Q3D[+B:Q+ $.Q D[ L.dX H.fJd$H DGf&H FL:J <,, </,
@d

8+3 S,~pT

9pT

9xTxTpWRh

8UUh

8UUhNUUhPUUXZ\
XBg$UXZgXZkXZpXZkXZuXZkXZxXZkXZ|XBg$Z$V$PXZ	X
(M$

9(

8(

8([XXX"

X.$(

8(R(OX.$O(

8(R(OX2XB$$J(

8(R(OXF

8XB$[$J(

8(R(OC; \4 D5 p @3 

8

8 D3 3$ D5 <A,!$}$33 D 4 5,~p5

9(1X,'ENTER ADD-0N  RATE AS A PERCENT(E.G. 5.04).'/)(1X,'ENTER NO. OF PERIODS.'/)(1X,'EQUIVALENT EFFECTIVE RATE IS ',F9.4,'%.'/)K,= \SOdD <t,, <r," 
+$H D
+ $.C6b0b+_+\4_4V4V4m4m <w,, <p,"DE D
* $.C6b0b+h+e4h4_4_4m4m $ DC <o,

U!$HDD <z, <},
 S,~pDChESCh
+SCXDEXDKXN(D(1X,'ENTER EFFECTIVE RATE AS A PERCENT(E.G. 5.04).'/)(1X,'ENTER NO. OF PERIODS.'/)(1X,'EQUIVALENT ADD-ON RATE IS 'F9.4,'%.'/)C%{@ \Od <9,, <7," $H D $.6b0b++4444242 <<,, <5,"D D $.6b0b+%+"4%444242d &	@!( H" H <4,"  


*}!(	@ H!$HD <?, <B,
 ,~phhXXX
(ATAN      TANH      COSH      SINH      COS       SIN       SQRT      ALOG10    ALOG      EXP       ACOS      ASIN      ABS       INT       RAN       SETRAN     0 P X p t x |!!(    +    -    /    *         )    .    =    &    ~('0*',$)(80A1)(12A1)(I)(10A1)(/,' PROBLEM WITH SUBROUTINE EVAL.',/)(' BAD STATEMENT.',/)(/,1X,A10,' IS NOT DEFINED',/)(/,' WRONG KIND(',I2,') OR KLAS(',I1,') FOR ',A10,/)(/,' ERROR ATTEMPTING TO STORE ',A10,/)(/,' END OF FILE ON INPUT IN CALC.',/)(1X,1PE)          9    0    Z    A    9Lf3ANSWER    Gd0 \ p @5 p @ p @@d5@ff F <, <,
 F| FK Fy Fx!( H} Fw Dz FK $ Dx FJ F|:y0d(+C /3F8+/"{ $ D~ y ~  53H/+B:~8&4 y /3&+= /2f+= $.{ D~+B y /3&+4 /2f+4 $.{ D~ x0D+_ ~0D2d{+_ <,"w $ F D  <,
:; +H $.w Dy y/& y F D <,
:; +O,@dw ~1F+[ <

, @L4@7 K1F2D^+9 L p Fz & Fx+_ $ D| DXZ@dx+/ y0d(+C6b~0b+h+b4l4r4r4r4r4/4o4444i44+/ <, <,
@dy+/6Dx+:K & F~+/6Dx+:K & F~+/6Dx+ K ~0D+ ~1D+{1D+4:K y * J ~ (.~ HM+/ K M0F+4 & FM+/:K & F~ ~ FM+/ $ Dx+/ x0d+1D+ & Fx y /A&!&	 zx Fz+/ d} y /A&xDz+/:w1d+ & Fw w y / FD $ Dx+/ x0d+@dx:f z FD!& F}@fz:K ( H~ DM+_L $3$w Dw <!,"w $ F Dx x <$,
:x; +#,@dw"x $ Dx x( f3HL2JM7+-:x8&(+4:K & F~ &.x FM@fx+_ <&,, $ D+ <),, $ D+ $ D+ <,, </,
 $ D+ <1, <4,
 $ D+ <6,, $ D+ x0d+E5D:K ( H~ (
 HM"K $ H Dy6b~0b+M+K4M4O4Z4m:J & F^+o J ^ Dz"&.FJ1D+o0d+W |  D Fz"&.F| z1D+1 <
,A+O7DJ+g y M ^  :2h:+g ^ Fz"(.HJ0f+d |  D Dz"$.D| z1D+1 <,A+Z:J y M H^0h+o:|:
f 

5 L(D J +o y M D D5:y; +I $3$J+4 $3$|+47D|+x <,Q @L4`< L 5 Fp+6D+{ <9, <<,
@<,Q@L4`<L5Fp5Ap  Ap,~X XZhzz5hzz5XXK^DwX{@~@(0PX$D$8X{@~@(0PL$DX^X^X^$K$^0XX^0ZX^X^(5KZ

+R+F4{4R4T4U4W4X4{4Z4[4]4_4a4c4e4g4i4k4m4o4q4s4u4w4y >D=+{ >D=+{ >D=+{ >D=+{ <

,^ @=+{"d=+{ <,f @=+{ <
,D @=+{ <	,2@=+{<,@=+{<,~@=+{<,@=+{<, @=+{ <,R@=+{ <,Y @=+{ <,4 @=+{ <,9@@=+{+<,P @=+{#=.D=+{D=d.D=+{.<,(@=+{D=2D?+<~,%@d= ? = Ap,~x?x@x=x=x=x=x=x=x=x=x=x=x=x=p>=g&= p @ $ Do Do /$G$ Dp"o.p F
r J 
r J 
s J0h+8.$ D1(+?7$.$(.$ D+? $..d3$o+)+?Od  Ap  Ap  Ap  Ap    
,~S:LY \M NP LP JO HO FN DNpJ p DH p FK 	p HG p JI , LL0$+] , LL$I$L.(G( HI <,

o 0p NG.(2hG+{ I.( HK H0p 

o.

K H0p7(o.((.( HM(

J

 o o D q o Fr o G D r o J s o.$ DL L0D+u M.$ DL I.$.do"o.p FG Fp p Fp+{OdL+{@dL MJp N N O 
O 

P P L,~xJSY  \ J
 H
 F	 D	p4@+ <3, @4 -4@+ 0d+"&.f1$+ (/& F  p H.&.3Fo+" &/o..  .  p Hp.$8&"$/.do"o.p F Fp p Fp o.$7 .$( D(@ho@jp+."o.p D+.Od p 	 	 
 

 ,~X(1X,A10,1X,3I15,/,(12X,3I15))(1X,A10,1X,3F,/(12X,3F))(1X,A10,1X,2D25.15,/,(12X,2D25.15))(' STORAGE EMPTY')(' ERROR IN STORAGE AT LOC ',I5)g-\ \K p @:@d: o3Do+ D; ; p F:4f.:2Fp+ ; q H7 
r J; 
r J6 

s L77 .$(.$ D<0(+r 

;., L60H+h <	,( <

,
"6$7 $ N9 D8 6.8 <,
:8; 9+d,+ <, <( <,
"6$7 $ F9 D8 6.8 <,
:8; 9+n,+7$;.$(.$ D6 <, <( <,
"6$7 $ F8 D8 6.8( <,
:8; 8+z, $.:.d;3$o+Q+ <,,+ <, <!,
 ; D: K : Ap,~X<0o$pX?0o(pXB0o0oXEXG$;	`Z(X^. >[.~(3~+'	~+2Z. \x <x*<x .->-ez+.!"	b+  "/	b+Z. h+ggM?Th
&4	b+",
?NO CORE AVAILABLE - CAN NOT PROCEED
C~01,>#p2`I+G4@F+z"`I@J,><K,,^p+@J,><K,f,^7!pJ,~I,~+P40L@,~09~jY~jxJACOSOFARG>`1.0INGMAGNITUDECNM`1,>#p2b`+]"pp+`4@[@,><a,,^pB,><a,f,^,~`7ap"`,~+P40b@,~ 9~j 0xASIN OF ARG > 1.0 IN MAGNITUDECR

#p+  ,~>attempt to take SQRT of negative argg&u1,> p D, @.#2d-+%3d.+,> <1,4,^S"} 7 ."` ,,~+  D//+ 0/+ $ ,,~-3d-+(+D40
'U +*,> <1,4,^7 ."` ,,~ `!vyO9Lf3!~U*U+xG?1,> p DA#2dB+:,> <C,4,^!$  A,~B3dB+>+D40
=U  A,~,> <C,4,^ A,~!vyO `xiu1,> p#3"W+P2bX+V3"X+Q @\" B[,> <],4,^!"B B7 \"`,~Z @[ @[Y YZ[Z [,~6$!Ua#k"5m.	!#7;q_& w
Qlxc3@ p p+iKc3K  ,i 

,~Kc3J  ,i ,~Kc3I  ,i ,~Kc3H4B5@l5"~+D40
kU},~,>,>#$)D/$@,>4dvX$(F)"+v5Fv5"t"`,xxKc#@ p p+
U ,~ D0!$ @/ B05"#`+ -,!"B,~+ (BdB+ 5B  0,~ +7`0+$`d +D40+D40
U `d @6 /+ 0`B"`+/2id +&+D40#/,> <3,Y,^ @`0@,> <3,4,^+!U",/+ +! ,~xKc1,> p3"O+93bO+;+D40
8U ,~+D40:  ,~ DP FQ@@P%"j"%N)/;`:XDJ5fBaF+B.&@(|h&fP LM M PLDN@ P Q,~!t0_'"S'qf!um.	.#Y% !vyO^	RXC2|t(1,> p4@i @X,> <q,Y,^W,~{e^bC2|p1,> p5`]4@i+P40r#p3@l+k)r. !@p! n@p(|h"l m Bp mnnppo,~+D40
j o,~  ,~ 0_i/X3 6P'M 5( bB W
R`@xXATTEMPTTOTAKELOGOFNEGATIVEARGG?@1,>p++g&t@1,>mp++G?1,>p+g&p1,>pB#`3b+D3b+ @>,~%hg&(71,> pd `1@ ) @$,~g6(71,> $ Ap,~!$hX$h@@h*% "4 BhL " BhM+xeX2GiSHYC aSiSHINXGYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
 M?L@INXINXINXINXINXI2I2 I20I2@GiSHaJMm1,> g,0@,{+_Z"6Ap." B` " B` $7cp $1B $dh,a 6`
,J+`6cp0b "bh$ ({."XB`&$@.$
a|+Y[pdp0B +]+[_w#`1"+]6cp 0d $QD`,+ ,~
&i,~
&k,~@b -p\.{Q,A` 
m4Pg1P+n/0P8.c,~``

``
CANNOT INIT DISK!

FILE NOT FOUND!
HH\.~ 
n+cYC GaSa3 S;YC&<G<aS<a3&<E$;w|xu Pp B`1T!"L	b@XB`  @
+~!,2,q@!.~`+""1T""QB 	f+ 1$9*:x,~ 8u@`u *( B` " B`\"

	b@ B`\"	b!"Z(Brb	b

 B	b
+"`B`!"2	b`b`b+F!"2	b!`2B`+F!$2	d!$Lu+I+	b5	d!$Lu B D,~@@ *( B BX B` D DX $	d ` D DX "2D`bd  "b@+  BX@@ 		b$+Y!"X"X*"X!"`
b
b  @
+m!,2,q@ X

  +m JX +/
& "b5 l+T5 l + +l	h	&(2 
Pp . &..0P`bp+td

@ +Ax`L+r +/ (!*Lu@


,~+/ "0T,~ "
&,~@^PuP$` hb

XHXa`,~!"GB`+l@6$.f.h.i
% Cannot do DISPOSE:RENAME. DISPOSE:DELETE assumed.
0
% CANNOT ENTER QUEUE REQUEST IN QUE UFD!
% PLEASE NOTIFY OPERATOR!
KbN@1,>,

,~Y\Q<X\*+66`
GJGK/K`}K)?K`1B:11310.11T1B1	1g1

=1`Y1[1Z31Q|1FB1@(UwS

r9W{1SS0
e'*+J&+Z} p

hfD

hf`D^^xj-)9{`-v*z9LR)qJvRv~9LR0vKY
fRKPQ~Z4~Z`3.G.F.E
.D~I."g`."fc."ef."di	WG"^~J ]>6zD>6z`D)r2)r`1vzvz`ajaj`DRfDR`e|RP|R`Ovv9vv`9

X));b

X)&S

W`+R~w$nX)&4R

+"xJ+"xdJM

(j=R:CA]R&.fG
EC4L{

j_d+oj_d+do

(Q"wX(Q"wdX^},G.^},Gd.9Kp9Kdp).+-!k--!kD
16/e16/Td)

u(Pxd

o<SNf:N<M.?

pX>,



re|Ca

rek

j+~A

j[VF

y+Nf9Ly%.`

_y2 

A'~v_|'p_<G?R|KW^+~uWD[V1uVQ-(+d)		WKM
}
92&
xrRi
d	+q
alm~
ldNf9Jl^.@
K&6
K.8
K"7
K8
Ym~~)	{TAwB/}F
/|N	@\:_<F

zRu6
(J"4
&*

 R	WJ

>
_Bb
_2v	
K^
2b
2(bI|p"zh U')? iG;O!tAzAQ3fGpzi<[}AriBN+	?

Sc

_d

s	qG<p	;*9P59P580KKx9:p
8/E7/So+E3p9:p)|G7&'o(I+60#6vA9MvA9xpL2a" U-tA+tU.zAG.[o3+a	qG	*
h30@FP40Kx9:p05	m306	06
07
/E/So+E3p9:pm3

2a{Uzi{G{[Zo]uac	qGM
h3JI0KMx9:p05N06N06O07O07P/EI08P/So+E3p9:p)|GH
h30@F(IYgx9:p05060607/E/So+E3p9:p)|G&'o0#

(IYg(IYg|0G[	qG0@F

a]

uamoqs)u=wQyG{[DoF

+
?	S

_

s	qG?>za>HN=0K?ogAogyp@
-uxAu1



a/'X)W;hmOb%a6c%u=wM3!"3#bUCS1zir[$?4z} iuAZS6	7{ }{UggI{%id%{I19{9+ K
AE? #
q}
UY<S3 7
im

_4 Ks~@
},ao

s; _	qG}
|a|f{&AQ{zzaz*):p	yw04yyxx9*P5P6P6.?P7.0KD+&X{I~
~Xxhxpw/Ewhxgef

M/So+E3pn[9:pL
KaJ

D0#Dz"zl!h05h04
-G2[o97+<?5S"

_4

s?	qGm%p0Kw7@w7@|Gm[Uotr\+w?pSe

_o

sz	qGE7!?D
+m
*%pC.?C0KS
+
x|Ux||Th045G?[8oA	qG4Q!?4$z

813

80K4055 +$

9



93
Q!?6Q!?~6h05Th04Tug]
&k!ko%& po9'i'#)moM;l+'JABoaOJ,*ou\c

,'7ta`w,;,tuZo,O/u	"ruY3uu12GBSDzi\{Q.[X?AA{e?oRS}{gUx{yNUgX{J}|!v+^ |53?Z #!wSP 7
"5z

_d Kha_

sj _i	qG\l\A[	[}Z%iZYz~'Y'bDX&htX1WiW}VeVU%pUP4T%$-TP5S

8
S.?R<R

=JQ.Q0KS4P~PMO

8	OhNxIN +$

95M(9:M|L"iL



9{4KK2J.iJiI	IHHZtG
J4kWJ4kjWh04&a

_:

s.	qG

\TI
o.2y`

k

C

jU

a

u

i

]

bG

Xo

`

oS

t



sqG

Cl

9Q

CQ

B$z

8

B7!?

A
+R

AR

@m
*

25

@

8.?

?0K

O9

?F@1

> +$

9qs1

>Tv(#

=uK

=



<FFQ

<3F
+Q

;

;Q

:bDv

UHN

8HHN 

82bDvw0

Uh04

5

'I

]

+q

zA

zU

&G

0[

o

7



+

!?

5S

0

_

4	qG~	}}Y|
+b|m
*P4{{.?zFiz0K~x3F
+x7E

7E{

h04
[
v	
f5?
v
4I
FM];
{q
TnU
<=
C
W	n}-)Io
?A
oU
H
nJAu U
B'^JA	

u#oM
M;GJA?n7

+oa
QOn7) 2X1	+c#wEad3fi3CuY
;G0[BolPA?o{3p+szA
a?v{	G?zi
~{[
_oQTW+X?OS
k

_[

s
t	qG
4~2
3
3	
2%i
2HM
17!?
1m
*HN
0%p
0P4
/P5
/.?
.?
.0K
[	
-
-3F
+	9=
+??
,

SGcE
^RM>	xORM>8	xSGcEs`
]ulh	w	k'	n;	pO	Bc	Lw	J	s>a~	v?		?	?1	?E	"?Y	*?m	4@	@	QzAPG	Q[}o	\{U	Z	{9X35	7+	?	X{a]S	

_	bab

s	V	qGPOb	OFWN	NM%iMgLLaK05'Z%pKP4JgJIIbH0K{D+&XH

F}>mKv`|(|'{ '0;+&umOc~ @Xw.31Xu3G4 -59[
-vo	7 F5\+

?:GS U"[d?oS=gg 3UBk{35+i @? #Sn 7

_m KC

s	qGmzam%il
h3k0Ka|e*[:@AaGb[]ogdi	qGWzwV0KW

)9L)9zA7G?zi+[3o6{?7A{9>+D	qG+za*%i*
h3)P4(0K.|e*[

2pW0
2pW}@0(Ru[

Ybd@RU

g';Ocswrq"Ae!3$'Yk3pGos-w[V-yonPAp-)<mPU-={lPi!-Q|+kP}$3jzU/Qt ARGzzi1[yz}Bo{{G~{%G3!{9I35+w{MJ?{aKSu{uP

_aQ

s	qGk&AQkzajzwj%ii
h3h05'Z0@FhHNg%pgP4fD+&X
f|e*[[/So+E3p9:p&'oye
e
)z2oJ)z2>Xo|[H|8[
D8+0JD8+80(Rr`\B:/\>X\>5'\7N+\2g'r'I(\)8*\)7\	\	)\+,\6.\.,[rO.O[mNO[mO[m	O[l|[l{&O[l+O[kO[kO[j]O[jRO[i%r%H([Z[X%[Qgr%0[Ms/[M"-[M	+[L,[FG[@v*r#eOD^w'dw]!+{0%0+%(@@-M&tQ++7+J+
y+@+++++c+e+~+|+G++	|++M+`+\+H+V+h+

u"h[ZB(3b+	b+ h Bh+ h Bh+ h Bh, "h[ .$XD(/$SDZBh X>h,Q>`	b	 Bh

 " Bh# 

!	b@ Bhab+@70xO@h

,h

  ,dX8Q8y! M @`! `X ` @` 

" P` 



"!"RB`,,N \h
S<h*<+p,>Z.,^hha\x.<h Xh 8h*8h,^,^h
,+ !<hXh
!:h*:-|p,>,>,>  ,d,> <!"} Bw NpZh4B<Q"p Bp[h4B>Q"p Bp 

$avX"

$ Bp 

&avX"

'h6ivX"

(`vX"

) Bp,K "h0ipb

*,^,^,^,^+

_B-c@,,-4(+L,A  ,d 6ZNX-4Q+F70@(BQBX,Z 8X,U,~ 6`l6,g+Q7B`Z`,] L`5PX+F70

<7 N`ap+F70
<72

*SLarl8!"AGf`r`p`b+F70<7ar+d"

*1B+F70<7aP+k!$xX$h*Dk6B2N+f,>,I,^[`(B}bh),~ `	n@`nl8`nl0 "8A"1Bl0 P`-4O+F70<7`p +

+@`pX"``pQ"` B`P`l"PX"`+@+F70
<7ap+,@ap +7B`	+eb,

@@`	F"B`	ar+-4G+`rar+

*1B+ar+F7047-4H+F70<7ax+0471J+2 (`	h +@70x 

``LanX

alP

 L`,<X$XDgQ"`p B``p B`ap(+"l8@P* BXB`ap +"Q"A`." B`@@` Xh,~h2hr+/ `&(@   X@`P`7@4J+l x+@R`l"\+@+ l z+@Z`,+l8d8d2!"FB`+1581ax,F`p`l8[`(B}bh)."hl8 Xap7B`,~@@`+

R`l"r+@Zg4B;R`g,

:x,~,>[,>S,7Zx,dX,,><nDZ,d L/"XB7X,=n@,^ L,^,^,~ 

,+J7

- 

-R``
! pA@`R`G`p ."+@7`
+P`B+F70<7+P*

*[,zA( &(F cF`+P &BF`&

.(F`pG(GH`1*l80J1Je8l8+P@4<\"

.""Q<*\f-4i*

/0

/.

01P4LcaLx.,h 00n1J,<,Dk*|]ex+f+il6,Kav,~7 h

+@70p h+e@5Dn,	4Bn 0dD 0+{dd+udd,~dD@ 0dD 05Pz@b@pl6+F70<`v,~,eD +r 

0-4U+s 0 1P+s.

0,<l6@,Dkd6@+j BX,~QBX,~."XBX,~2BX
l6  BX
!"H:dd,	`v+ad+XX
2BX
l6 PBX
,~dv@+@bl6+F70<*,o*,~l6 av1J+7N+`n+QX0:6D0 $9

ed+5dS,
d@ad5dX7BX	Q"ad5dab,

 NX	,~  ,>`b,d,^ZBX	 N .Q.|+Q,
7 4D,>$

1b

12Bl6 ,^d,~."?(B|2BX
l6"BX,~2BX

l6  BX

,~  ,>7BX,d,^ZBX .Q.{+Q BX,~ZLX,~ZLX,~,~ 

1-4U+sh

2,~ 

2-4U+sh

3,~ 

3-4U+sh

4,~!&@BFX[`1By,~0B]R+sGFX,~@!&0BFX3B

4l 3B

5l  3B

5l 04@sG@X,~4LJ *@l6+jl8,~ax +Odv+N*,o*
&

6,@d8+j,	 B86 6@0ede@*nQ@@8,~,>@O(F}bB5FW 
 BF2J*hX5(^6@OX  2B +ZA  ,^4hP/A(+PUdhXy`1K`[ 
S

u	GF\i
B'h(t
1S 5r
:HQ_`|eXY&KnHRY5z] @& W&M$5G>5^}$~$(^-

"'

2>85$'$*>:1

+"-^v4C3^=^A,~1RH	 %PN(V`` ```@xLXRsuLXRpLX_-H{ HK@
qL
V! HWi B$] BW@1h $,~7

;!$A@97

;@$@46`l+Q,A` 20J1J 21JO<R56`x, -4u0@?1@>  
&

<g4@!h0a@0G D  0 0`+1 1`

+#5@ `v+ 4B`d+0`D !$"(D,~ad+%`d`@+0 +$"A .+@,>-4i!$pbDp-4 .0[p(D{5D1Pw*\1-4i &0*\1-4iQ&0 FhZ"85B66Xh%`x@+J70@:x `+
0B0b"+F70@,^&"$$($}G

<.$" Dh)."h6X+P+P&"(B.")Bz+P6B`
,~^`5"C.hL7-4>!"kyY B`
6B`
,~!"H: B`
,~C2G,,-4iaLx.,h7B0-4Q+ 0b+P."h6@+PO@/"hZBh,~Obh,~!"xX"h6@*bR5"PA"/"h+PIG,,-4iaLx.,h6b00b+P."hL5@P@b+O."h@@+P`b+f^f4"c-4>adp(D  

	p5Pg hL.$3fhM7L!,Lu+f 

 	p 	n+ ,~ 

p[A"4Bm."hZ.,d,wel+PaLx.,h 

0+j7``,`x@+ `5@P``>`+p`x@+7``,`x@+>``x+{:` `+P`4@u1@+u1`1 +P ` @h&l8  +P`x +`x +ax@+`p  +	d8@:`R`l \dxX`+@,~+H70,
l8@,~,>Zb`;@+H70,`x@+Q"A`."@@h& B`,>!$=
(1@

=@*D1@+ZD`,^,^,~`x+
,>Z`Z4BQ"`XB` B` "% B`+l8@l8+`x+;,&48%-4p1`1 e8=x`x +s,~@@h*ax ++,|48)m8,+l8 ,~48--4uax@+u,~`x,F  h6iv+2-4D  -4D`x+:! `6@`7`h&+7dx+7-4A+5c@`+9-4D+7d8o `  Z@h&,~ "`58= "` 4=! `axc@,~58uX 48A`x+P`x +D?@h&+_7``,F>`@`+P`x +T,>`x +O`x+

@:`R`l ^dxX`+@+S+H70,Nl8+S! A`@`X`.  @`  C @`
'`,^,~ax +

D.

E Jx *}**Z`Z5B[  ,d " `XBQ"`XB` $%`!*}**/

E,~ax+

E,>,>0@+c  +g/ 4 m0`+m. n ( ax +j7@  ?7 `-4D``D ?4@m( -4D+j,^,^+PLD)%HP) 0@,  	,d " (`-448{d8 ,	Q(X(`*(`!(`X(*(` F`l8 ,~ (`58[`!$X$`*$`-4l8 ,	[  * Q*** d8  "+

 $Q$ *$Q" $Q$` &%  F +Pd8-4udx@,~h8 -4Ah8 +
M&tC@,,-4(,~ 

p-4jaLx.,h 0 @`6B` @,~56lx+"

*0B+F70@-4H+F708d8@-4jaLx.,h7h0 ( H`6B` H/(Z`$(&(@.(Z`52

Fhx5@)0` +)7`Z"6$+)1@ +'d$ D9# B`XH`++,JXH`,<Z` B` /$(`x$$ D` D` $@3D+2/$(`x$$ D`P`d"p."( B` B`ax,~487@d0D,~Z` $@3D+J7082*,~+J708-4Z-4\ `P`l x+@,>R`G

G+@+H58HR`G

H+@,^l z+@Z`Q X @@* @,~l8,^+,>,>-4Z,?`-4\,_` `P`l z+@l8Z`Z`/ 3 ,U  S,>,J,T+e $R`l dX +@d

HR`l `+@,~R`G

I+@+P,>! G@` `,>ZB@ 0D+_,^,^+PK:`,,!8

 6h+gI`,,!8

86h-4i!"pbBp-4 LX Lh&@fh[paB~+n p 

p9rPw*\

I-4i &0*\

I-4iQ&0 

p Fh-4jaLx.,hQ,A` LX "7 BX58. 

J X&"<"y @09

x  4D.@=z]2y`,,!6@+]2I`,,!6A+S8p,,!6+_W!`,,!6+eR`,,!6+oR`,,!6[p(D{5D	[w0D1D}l6-4(,5XN`4<6Fp Fh.<"

*561B+F70@+1B+F70@ `ax,22

*P021Rhb`b+`v+J70@+J70@ F52ax,I`r,;6"`+$"j$

K(

*0H." &&&&"6@."Q"( B``x!"[Bh&av+) 

p7` 

p,ax+eav@+.6 ;*\

K-4i,S+4`480`x,(`d8 Bh&@@h%+:R``ap+7@@`

*0H,Fm8d8l8,~  dx  `

*ax-4O+F70@R`l `X`+@[,zA `Q@`Q@` `58E `4B`x$"ax&" B` B`,~ap(+Khx+F+dZ`4DN58P+J70@R`l"p+@+2-4Zap+F708Z`[

 d

., Z`/, ax+X$,(

L&(.,`ap+`ZD`08P`l$z+@l8+bap+F70@ &-4
J-4\` L`l8d8,~@vd8
`x+

M58m! :!`4Bk. :h&-4AZ`@@h'+u-4uax4@u @h'[(B{1B=t`x4B

P4Bs+J708[m6 Z-4R58
`x+u7j`,*dv2N

Q9_.Nh&6@`6`h&+}/h&l8 
`#h0h( ((/. .2  `Q"0.H`/*  J`."*#`., 5J,*5N}+u 0-4A7j`,*.

`x+u5,u9`x+#5R

Q=_7``,`x@+

Q 
`#h0h( ((0hH (H/. /2 U`."0/* .H` J`., *"74Nu5R,/+#+-4u`x@+

S @0.

5,u=2,/+#+#`@@0S"0X"0.,8*"7+'@@0ev+'.

5,'@@0+%axax@+u6 h)+u+;ax6@`+F RX.h'ZRh'! :-4AX`,~av +5@@`Zh'4@3+J70-4u[ @h':x,~-4u @h'[(B{0B+;A ?r+5:x,~0B+J708l8,~l8  
,d B` B` 2Q2v-4Rd6all,> LH*rA `,

ZBH	+@S>f=,,7Xh
,~!"hX"*"l67Lp+U Th	[p(N{d61.+<O+@70D+N+\+W+X+av+Uav9J`v+{+~ "hQ"*"h
,~m6l6d6-4i!$pbDp-4"Lh"X<p-4iaLx.,h[
p(J}A*av+Sh"0J1J(X.0`vav7

w+h-4j!$pbDw-4aLQ, Lh" 

h"*

0J1J(`v+m6Dp`d~+v  ,>,d

,^mv+

V 
h* $XD/XBh*R`6Dp`d~+`vX<p9\0J1J1+

2N

W+m1Jax++

 

h".lh"4,Pd6av9J Th	 h* 

.lZ6@94,d6[h*,

9Jd6[h*XDh* 
\

1J7

W7

QQ,1J+1J`x+

Q, 

Ql6

h" Jh# h	+PaLx.,hZ

0+PM&q`,,7Xh
,~ h	hl6ax+#`v@+ h!Z"7 ,

`x+

W,&d8 48 Xh%`x d8@, ,=@@h
6Bh) Bh
@@h)@@h*,~ax@ax,~6B`::`,~`x+458,7@`+(@ 4'ax9A7@` RX! Xh'. Hd8-4A+dx+av +1@@` `Z5@,+.4R2-4u=r1,/+,92"

*0B+586,F487, `,

+>2$7Rp+J5|A*\

I-4i 20[pA"p0Bpl2*\

I-4il207,+F 0h!Z@4BF3L+

XZZ5BCZ.7Q.` Nh'[A  Nh(.@h(. $ ,d "4,MZh!XBh!XDLX6.

W LZVh!!, Lh(@l@r@1D+Rd h &&&$WZ`+ Z

ZZ$Z0Z<Z4
*yd@.\cL.]:ukk D@QD , 	mBdmB

	Bd	AlT	A,	A4	Bt	A|	A$	AlL	A$~AT|A||AdsALvA<qA

	A

	A|p	R	o	rQ`/+J70($"."x+Rdj"` 2f9-4	+QQ"X,>100 009

R4Lm-4	,^[/h!Q1L Rh(<l	f9`R,6+Q-4	 2f9+r! GAh!l*`r`-4	7R 2f9+Rm*b:+R-4	Zh(/"?$",6<"	

1D0F	9	 Nx1D9		 xS`f9[X&"pb

ZPRX+Q,68Q.`+Rar`+Pdj+

Z`r?+	0b?Ob:+	0bOb9[x RXFX0BX`r*v	ZX.RX@r+P h(l"@,6[h!(P4B	![1p~+	#,

  @,dQBh! h!7 +	(.

WR5$	(.D"`RD_Z"X,

[h!."@@ BZh!: X9	-ax,s.6 XZRh(&9[`d6@0&+@ev -4R,@?`h(9	- X+	.[h! @ZW0HX+	;>`P+	9/

W T@9	-YWd`.h!+	-,4XVP,4h( T@+	7av+	B-4Rl6 , , Y+	:-4R+J70

 (A6  (Q2  -4 =r	E9	-^Rh%9	-[XA(4H	O"

Z$"pQ2`48	P-4u0F	+	N1@  @=h	L9	-0F	+	S0@+	S`/(-4A=h	P9	-, , >`h(+	U9	-58	Y`xm6l89	-@@h* 0`58	\ 0``x+	a@[
@Z@1J9	aZ
(4J	a9	^7h&$(%/@[`A2?&@f/2 4R	w42	m58	C`x+	Y7``,T>``4@	j=r	f7@  ``=r	C9	-d8`x+

[&&%[@4F

]Z=f	p $ &%Q$`/& &(.$ 4J	u`=j	taxXB@@9	-l6 
h#1*+

^1Jl6e6l6+[R~@,,[

p(L}eLx 

p-4j0l+@70

 60P4

-4(+

a`x+A `ax+

e58
`v +J70D \

`v@,1ap`v+X+,5+


s

r

TH


b@

l
m48,I,6+ap+J70@58
,>`,>`,>`,>`,F,6!6,2,^`,^`"&,
G,^`,^`7j`+ `1*'+
,
4+  [(D{d8
@1D+
9`h`+
+Q(` "$B` H`+
+!&p.hh+
+.

f1*'+
),
4+
2[ (B{1B+
2:` 1`1 +
%mx+
% 1`1 1+
%>`l8 H`+`p,
D,~ 
`Z`.(/Q(`@@`:x,~A(/((/(5h
>Z` &&~.(~,
D+ Z`/&  F`.`Q(	 H`[ (B{0B+J708+@Z`<b.:xXB`ap+<-4Z-4
J>`+l8!  `G@`6 +
NB@ =
L @@``/&R`G

f+@8f
QD +@+P &`x,1`x@+
[-4Z `6 +
Y +
W @@``.& ",
wD"+@=f
[R`G

g+@+
a ",
w,8+ax,2-4p `ab`7 abx+
iax,;`x, +ax+
k>`:`,;,e+#+ap+
oT`l"x+@R`l"\+@;`+

g+
p7

i "ap(+,
waB,
v+ "P`l"t+@,~G2~9',,-4(,~ `ap+
~,0-4G,~6`,>,Z,^ ``v ap +@@`

j02+B12+L,+BB
B@@`
ap +B,>

-4F+B`p-4G,~  ,d 6 L-ZBXRBX 

j BX `XDX	b
+  BX " BX\"

\$+	d@bX `."
?(B|SBX."{(B~XBX ` BX
!6B`	`b+

kQ"X"X
*"X
 BX[`
SBX:X1R7

l 

l&

*1Fm1BH:`xmG$ DX "XQ",>&,

+=YC aSYC ax,~ax+7`x7``+4,J-4Z! G@`G@`+7 "+8g "d8@[``x +=l"p+@d8@@`@@`[`(B}."h X,~edX',,-4(,~`x+@`h)`x ,~R`l"r+@[`(B}-4\Zh%1B`@@h%6B`,

7B`	+Lab,

Z"`+

KbNC@,, 6hQ6xLX4XQ6XX,A*vO6Xh,Fa|x+V[pd0B +Z+W_w5"Z p1B	`0B+Z	b+Y+@70I|G,,-4iaLx.,h7"0,~+

C2|G,,-4iaLx.,h 0,dZBh,~4@

4 

 $h Z4Bl[4F2f9

 Z5Bf,q[2b+e:	f+

	 (XBZ/&SG(.f(+j $h Zh  &h Zh [
.*2B2J+|Z
3D+

mXJZ
 3B+

nXJ[
 [.*SJ,

+q Z5Ht Z5Br,~ZXHS@X(Q('Z
.*@@0@*((2 9/,>.SF,

,^9Zh!4B

R`h!,

+jZx0Bc+@70
xObh:x,~/"Zh 5D

XBh ,~[4F (h [
2*+

 Z 5D

XB ZXD4H +

S ,q[=d[<`,>,d,^Z4F

  $+

XB>,~x\ASCII^

#BINARYSEQIN^

%SEQOUTSEQINOUTRANDOM4`,`,I h+i `	@`	``	<

`6$p.p6 p6

Dk~\a6$XT~4XDv,XT$X$A*U00A
Enter new file specs. End with an $(ALT)
*H
hM `O@`D+,^+

,>,J:`Z` @`,<,^+S,>+N0l8+D58"+!

  

`	`+@70@     0`+@70D<`"

*1B+= 2 Rh&+ul8+t!"axPBh)+ @@0!"axPBh)+'QBh*+r@@h*+."ZBh!+	(8

n2+	 @ ( h&9	r $+	q[,`+@`p`p(+
,~ "8,>,],^aV~+

_+
,2+
9@

`Z`@@,8+$``` BX
+"@ XJ+yXJ+y+

z+

{+=,, $,

o^$,+8,~!`h ,
SD.d(."!`h ,

!`h  ( /$SD.d(.",

,q.$hZ4B7+

1XP+S@` "`,

Q"XX"X@@X*"`g,8!`h,~Zh 5B

.804h!!`hZP4B

++O@g 8,~,

NB0+0,,4F+xX*hS@@hS1&P+(,>* ^p"!$<X$p*$p!@f\$	d+D64d `d+@	d+B6 Dp"
p+F6	d

QDp`p+H6  @,d 0@rQ0@[
&SJ!.4X.*.?`7+J6.,@1,(+ ,

+"S&X&
	f!&LuS(X(	h+L6S*X*	j+N65( 3F^ @ Fp Hp! Jp@@p  x $!&>9`b7 _@j@nX\p 6pXV( 6pZ*4XpXV*+p++,^*,^(7@p +2 p"	d+P6
p+R6@p+T6@@p p+V6 ,^ x,

!<y*</^,^,~-47
&_4a&44T:.4
".6
"
&b	`+!:	z+ X\pX\p.\p	d+ <X\p p" x, < p" p p! p@j@!:	z+Dp4F* $X\pX\p.\p	d+ < p"+* $7O < Dp!+p-4p
&p4p&44Tp.4
".6
"	`	<+Bp<+Fp.W?FRSQGE	QueueegetsegerrorA#INXALZQ@pINXc60j  * 48t  @01B @0-45fq5Dr@f+{-4u=fp4Dy-4u@=jr,~4fv  -4A=ft4D5@x  -4A=jv,~@f)F-4uG=jz)F(H H00B,~0,~ 1J +`= 0@1B 0)F+v+J70ti     Hm648p,>,>,>*:@b@r@l-45jO
,+=+4J=(Rq-4u0 0`+/ G2)R`t7L0[L0at(R{A2(2~+@L=
+9+5G.+$+7=
G.G.=

$+-+91@G21@G20@1@G21@G20@"1@"G2`xh+5B'2d-+'$$.=
2b-9

,$"%$. l$.ed."=
3LeG.0h2=
$(.=
@$

RH$

"XXQ !BXXY &`Xa &	 (`x@+=4*=4*=  (Rq+2J4*=7@h$+J70<-4uax=*;+b7 , x`N+A&9/

^h%aN/

`N"`.

 2c5BF*/2 (`G+b*)/24LQ#0f
 &
7 "`/

46g%&``+O)/2&&&$e.2@5LIl 46m. @d "d`+V).2l `R+`)|rpev+\_({d ~)2d6`N ,^,^,^ @0`v B0,~U 56bU"`R@`+X$$G$G$G6$G$$G$G$G%&  %:l4.%&mt. .eb9M+Ml"."@eb9T+T6$,>,>,>,>,>,> 0@ h#0F56v70 d:@5 y m:4@ [(N{d ~)^0?A$0M({#12
+6 7%"0
46&,,+| )R`t7LG[LGat(R{A2,~4P.",..O@%D& %D:l2.%D&mr. .eb. ``,~)=4P./.O? "3 D&=)'D&,~,460r8+1R82 D&9,(?@+ 0r8+0R893 D&+3@D&2"D:.0,)?@ x*:(9^

h%5J$`v.*Z,[
,av+'2F'2fl6 av+)4l+9+`v++..0p	 0	av10+/ 0ar?/0 ,>'72 2.L466. e`:x% ,> =r4+=.Leb. e`:x*%",>% l .e`:x=r9 28 84T@/2.&`v`v+C6 1(+(@

/* `v+H.

`v+*4lL/*0+L4LL5l+#

2(+K.
/
"

/*`v7`5*W5jW`z+Q`v7`8JY4JYavev+T.*+L ,^ar?l2+J70
1j+Zav@-4~=
Wl:av+m5P\l:/4la-4,>-4=P_l:=L^,^=

b-44jb-4-4}5,e.-48,d4hg-4=Pgl:=he  "`v  "-4A5&jl:-4 * #+4lw6`-4~-4-4=ppl:=lo-4}4Ht-4=psl:=hq av+ *-4~=jv+.-46`-4-4}5(|,-"`@4Lq-49

|  +A  +A  +A  +dz+  dz  +A  `z+A H. 9A && ,>4@
92&+

-4=

,^. -4A=F

,^,^,^,^,^,^,~xP	`CLf3@(zpQ@

$n@46q@@C@@@@@@@@@YLf3ua#kCKc)}zzcD3l#FhxwP-=Yjy/sq

KA>Amy_lvJ/~

A

^3@	8'@47@l@fK@@'
,+|l64LC  

~+s/(+L/(75(L.
+L28&:@j48F-45f3O,+C+34FC-4u1`1 +:l$`d=2A $*+29.
=2l$=2`x+B1@  0@+>5&65$24$@1@m$1@=22F4&C+J70<6ax@5&6d*`d"` J04&,~7@ &7h0"`+ V&(G*,>6@9I:/7 08hP4hP (Q`/+J70
V9hSav@-4A8hQA70-4A,^-4A=dT,~U(&(.*+J(:48i@@0-45h^O,++^4Hh-4u0@1@=]1@#+b0@*+gO@0<Hh-4u5hb0 00`=+e+b0  0`-++b+J70<b,~7` (=hk4Hl  -4A=hk  #7 0  *-4A,~ $&:48@h-45fuO,++u4F-4u1`1 +yl$A (H.=t`x+1@  0@+}5&w5$t4$1@m$1@=t2F4&+J70<xax@5&w`d"` H04&,~!*@c5F &/4f	  -4A=f5&5@9	4$
`v@@,~,,~0@h*,~@7@h*+u*h*+P0@1@+0@:x,~`x,~-4u+/PC;dSv$r.t:.zQH9RY%{$Wg\-MaT8%a	#L`%+}?x/6|ov:".z*yG8F5Wy&W!F{h)xZb46q:c b&t^(zpQu3Lf3 (2>@'0j=@&h/WB;M2@% /H.H;::J(@$0N9(-<bR8kzIF#C<M|,4+a;7A6Yi"Xr+/^$
z!/l4m46GBa2JzOoNl!#kBGLf3
,@hbD	
$dy$*%a>1FIZ8g9t> ("E#I
(L&irDR*
b^Y-KJx`0`@!6@@@h%58M,-4R`v+Md6[,b48QZ,bdv "n,+M!6@X60@58  -4A  -4A X,,.66BX3BR+

,Z

X.D*E4N`[X"`0J1J(Q,.68[,b,9XB-$:B.DB-$:BH<CB-L>BH<CBH<CBH<CB.D>BH<CBH<CBH<CB/\BH<CBH<CBH<C,~,.,*lj,~,~l6,d6,*ll,~,~  *6 0  #-4A,*lp,~,l6,d6,.

E*lt,~,  -4A,  -4A.

E,  -4A,*lx,~g.$ 03@0*l4D.$,  +&$QFx4D,[x. + $+.$03@02B0+.

E*l4D9  -4A,~, X,  +@)@. -4A5B,~  -4A#h&0bax@0b:,   -4A,~-4u-4u@@h%0@1@+`x@,~, +,z2BX+`B-4u,| 2X7@H+C.2.F3BO+%4N!.28+!@l4N41@+*1@+3`x, -4u+&"`!`X.H,.$8. `0@*n,*F0J1J( 

H/00Z

O.,@+7R

H"`*F0J1J(

X

O,!d6Z,b,&`+,d6,

E*l>,~-4u,K,. 0,M 0*L<nD @0+I,M*lD,~1@+Q-4u@@01@*O@0-4u,~-4u-4u@@01@*O@0-4u0@`x,~0@1@,~+S`v@aV,~ @0`v B0:x,~-4u,

E+c0@+d-4u,.

E,\,~,. 0,

E,@+k  7X@ Nh%7*L<n\0.

E+k-4u!"A`X"0G@0,>G56s@0@x*ls-4u0@`x+H@>`x+s,^x*ln-4p0@m6-4u,~`x,-4u0@1@+B00`-+zg-4u0K0`-++00`+h0aD0G$A$(BG5",~(B5",~-4u`x,Wav@+0av@+0`,>1@,n,^XL+Nh%+P<nP462*L4 @0+0*L4*L40+0+P`v@+;0@1@+9,>,+l ~,/-+O#X~#X!8pA+G.7 h8/(+++	+++++ +d8~l8+ +d8pl8+8x..8dl8+ + `h8Zax~+	R+d8~l8*x+@x+ Xx:+,> `h8Z`x~+`XXXx`x+!8?@A++d,^*x,~+D7P6$`1X-+

d1X$+	+.+h`0s ~ x,>_({jbm8~d8~3" g(

,^+d@6%+ 1X-+n1X,+qd1X$+|/(+9~.ggkV|CC`_Bt"I4BI$rcV,[N<YY&ngJ,[k:4k:4k:4kMkM

kM,7. Jx *}**,>Z. |[[A"p(B|A(w((}.,>D(((QHx[(H}A( "DP$/,>Z$/+Z|5FG,h &M
& F|,^x,^!*}**/,~,^+E,^+G x %Q$  aBl$@)@1@+4@Ro   5BT9$N
"5BO5$O,~@)@. 
"5BV,~Q@x[`,[
&[x7 $5 ^
&"`& QBx6@,^[x. 0`. 
",~. & t,>& ,>4@j& ,>4@h,\
&,^,\
&,^,\
&,^& & G 
"  +\`x+
&^`,\
& `,V
&7B`
+,VR`
4Bw
&,V7F`	+~
& af ,Y`f+~7B+~
&,V9{
&"4B
& a@`
&a@|
&,[
&
&,L0b
&",L0

~
&,L0f
&",L0

v
&,~
&,~
6+ 
&"R,V
&,~,

,L0#,~Z
0j+ 
,`j,

aj@+,L0,~H%H'H*JH-
6+ 
&1@	`/h

,c
&4	`	/h ,c	`Z
"`5J$Z
`
 
,0,

aj@+',L0+(,`j+o,~(7(<Z(?@B((5(4(((D(F(H(J <(M(O((R(((T(U((W(Y(Z(](_(a(d(h(i(j(l(o ``b ,L0r`b,L0t,~,L0V
&5PH7H|+Q,L0
&u "v7@} "w
&*,o*,~,L0Da
& | (x1H,\1H,[1H,L01H,V
&y,~,L0{46S7 ` 
&}
"
&},~O{S hY$|@Yq`|DBcgwdo@W|tBZ+T1Bp,L0]
&~ ,\
&~,~'v)a0L|TH}.&@+" :h$? h#,~Z{Z
=*f +[
A*@0(J}dJG* 
,j,

,L0
&  ',[
&,~4k4k? h#+K,

 {
&(,h+KZ
0j+1J+~ 
,`j,

+%@j`x * 
,	,L07@`+oax
&	`x
& `,\+o[h4Bt-4uax@++M@
@vhhhphhH H#h&p8p=H)-0,L0,S,o h' $
"3FQ$2Fh(9
&`d[  <$
"=$
&4,~'v)a0P

ABd.s!Pg 4R] ":  -4A=bA,~,L06,S,oav@@,0 ``x+%Z`.( h&1b1(+%Z`0h+%1Haf`+%3f` &afl&`@b
"2F`++,>"`/$O5B-1@O9'0@9D',^0@
&,+J h! [A"$"Q$A`
"=b3
&,~'v)a0P

ABd.@h,L09+'v)a0
b-&Bd.v
RtP,L0?,
+07tg.nI +s_H^p	:
hZ5HGR`l"d+@(`E0b+SZ(w `h"ib0H7
$V *50H+Nab  ,8Zh4BO Bh),~[h5BM,>dx,A,^,

,L0,o+J `1B

ad,~ *7+O89:;@ {
&(
&+K,

&A },\
&D *{,+@70/*,7E ,V
&E },\
&G |,V
&H ~,\
&,~iJ

9',, *xZh
,,~
&I ,V
&N  ,[
&OaF
&O
&P,>/*,+s*x,u,^+k,^Z(7E ,V
&Q   / ,[
&Q  ',[
&R 'P'_#`,\
&R5("S&" $$( 
"*h}
&S,~ULIUFUOSDUUUCUUK1*h,,~Z(,
 '[1Bax71Bap7=
['0B`=
[1BXX+1h0,~3h+7B&,~1(,~1(:x,~0
? Job aborted
h$+O,-:.
Unit= []6$`<0>/=4`,`
ENCODE/DECODE ERROR

%FRSWw)I8Ry.R,Az.s2Hy$`~<g!-Y$|@#ji.Pxkw 	8
(>)
yrw U(:arPL|OR0WyKIsd  A1TYh)5y
oHP(@.@
END OF EXECUTION
CPU TIME: 	ELAPSED TIME: L\z[7wH(Kp\#myx?B\ qF,sWl

R]!$
%H'vB9 }_^! tBcgdX(`}P.@KrF|DB\=Tg.H{ |F,sSw^!;-I

Y@|8LITWh8'v)a0BeN0>3rBlHe'v)a0ZysdF(tX(0}z\ ;w@"2: yO(Qh<yk%H*hEHtX(0*.^"&$RKr\%dX(R@28&:&pHu@>|@|IrlHegh6;wA# 2#;wAo4d5>@@.R
 _y! 1qV2Iy;wh.>SP/9&
p2@Cpe"!0XccD^p9L@v`9z4E\,1qC"/8p\OP	k2LR
.\	8pLEGeHp\OP
a4dE8J 9w+0SLEGeHLb{OP+DOrChDg 6
2Lb{ENBH<
,

d;w@EB@{@yj> ?.RAy2Iy@@'iHQh|Y@5,0Cy!#Q\A%Jd(=	is not uniquedefined6

Dk	is an invalid argument'w,	
b-&Bd [  ] ()
	PC='w()eHl,F1{@'w()eH2$P(k'v)a0C@~Iv
	or unwritten or destroyed record number:  :  t
`NV@,R> $($%c@.,A#>"&'w!->Z!-1hr #>":'w!->Z!-1hiQk @@nXY&Kn3r4z(+0P
rxEewA1KPV@[pdH"0PN>@(>W.wi,&:xL<5@HY
	|"L|Ede~"B &0c|0\OPdD=PeN0>LXj+T$yI0PW

P>K

pXOH2#|0\OPsJu	@eN0?#`?.vAyI0P21n?1BN%`KAK$(oH@q`|FJ z(+0P
E@*ur&J
p1RHbh

2gHQ_^
;w\.	NB] 

IyI0Pwf@`(_y! B'h(t@rlHeY$|@CpdMY$|@v`Qw@`2PUz8

RH)> 

K:%(tV"@5,0wfdX(Subscript range error on line  of [Mc@
		Subscript  of array  = 
Name	(Loc)	 <<---	Caller	(Loc)	<#Args>	[Arg Types]
	()	 <<---	 +()	<#>	[. ]