PDP-10 Archive: decus/20-0137/evev/evev.exe from decuslib20-05

Trailing-Edge - PDP-10 Archives - decuslib20-05 - decus/20-0137/evev/evev.exe

There are 2 other files named evev.exe in the archive. Click here to see a list.

?p0`0@0
0?hXq?x "

<++K2	`D0Bk	-qJh2	-@-(20G)(1X,'WMU EIGENVALUE AND EIGENVECTORS',/)(' ','ENTER OUTPUT IDENTIFICATION'/)(16A5)(1X,'ENTER ORDER OF MATRIX.'/)(I)(1X,'ENTER DATA,REAL PART FIRST THEN THE IMAGINARY;'/1X,'(AT MOST 10 SETS PER LINE)'/,' NOTE: USE COMMA(,) INSTEAD OF SEMICOLON(;) TO SEPARATE PAIRS'/' OF COMPLEX NUMBERS',/)('1')(1H-,'NUMBER OF EIGENVALUES CALCULATED IS ',I10/)(1X,'EIGENVALUES  ',7X,'REAL',10X,'IMAGINARY'/)(15X,2G)(1H-,'COMPLEX EIGENVECTORS-NORMALIZED TO LENGTH =1.'/)('-','EIGENVECTOR ',I2/(' ',4G))(1X,'DATA BEING PROCESSED'/)(1X,'YOU PROCESSED THE LAST MATRIX OR YOU ARE EXPECTING'/1X,'MORE DATA WHEN AN END OF FILE MARK APPEARED.'/)TTY  0(20G)+ -<9o <p,?e $ D5Od0 $ D0 $ D1 $ D1 <q,, <o,5L <n,5L <t,, <w, oDUZD	 	 <z,
:	; U+, <{,, <~, <,
 60$0d+	+
 <m,?j+ <i,9 0D+ p DV 22Do+Z <,,"6 $ D	 <,"6 $ HT D
 *#$

 	(. <	,
:
; T+,:	8&"6 $ F
 D	"6 $ *#$
 	(.

 .$8&:	; 
+ <
,, <
	ZD	 	 <,
:	; 
	+), <f,*X <, <,
 <,,"	 $ <, ( <,
.$8&2 <,,"	 $ F
 D@d

"6 $ *#$
 (.

 0 	g Pm <e,={@

.$8&; <d,>4 @

"6 $ *#$
 (. 

 2

 	g <,<h

 	g.$8&E:; 
+9"	 $ <!, <$,
"
6 ( J H	 *#$
 	(. <%,
:	; +R,.$8&N <a,1[+z <',,+ <*,,+z <`,

P6
	6	1x

xmX
	65	P00Vpnx0xmxnx3X0,X00X04$	X05X08$6X09X1\V08 	gX1JX14$	X1K$	X1PX1U8 X1VX1[$8 	gX0_X0b1Kf0gh}U<c\C2eX: \*S !p @* !p @*O p @* p @. p @* <0%,?/ * DG D*0D+*g *O *K.*J

  *K.*J!( *+0@d* $ &C G0D++ *K.*J *J(.*K <,<"

" <,<

LN
*T <0#,:j*S <0$,;J

HJ*G5H+ <0",={5@+ *(.*OC *(.*O *J(.*K

*K.

*J0  CC~+.: *(.*OC*G
*H *K.*J *J(.*K *(.*O"" <,<

<,<

'CC <,<h

CC

'~+.:"$.G DI"I $ F* D*F.$ D- *F.& F %@f. *F DI -/&/G - 
*J$
*F (..*K ,  L*S <0!,={

 L*B3l.++, *F D I L..$8&+" *F I F/7H.+,3F-++P *F/(/G *F *J$

-(

*K0*G *J$.*K

-(

 /(.P0 *J$

/(

*K0.$8(+2"G $ 
*J$
- (..*K

*G ( *J$-..*K *J$/..*KP@ 
*J$
/ (..*K

 .$8&+A"&. %/G  % ( 
*J$
*F J*S

-(

*S.

*K .*S.*K@ <0,<n )q (

*J$

*F.

*K )q0.$8&+R"- $ F* D*L $ &*G"&. %/G  % ( *J$

*L(

*K0 < )q,<P*GR*H.$8&+d *J$- *L(..*K*GHJ:*L; *++a"&. %/G  % F* D*L $ &*G"&. %/G  % ( *J$

*L(

*K0 < )q,<P*GR*H.$8&+x *L( *J$- ..*K

-(

*K")q")r <0,<*G*HP R :*L; *++u"&. %/G  % F*I D*L"&. %/G  % *L( 
*J$
 J*S 
.
*S.
*K

-(

*S.

*K" )q" )r <0,<P(R(.$8&,:*L; *I+,:*F; *++@d*N"G $ *J$.*K (  H*S <0 ,;{@*N.$8&, &/G $ F*D D*L@f*/$ D*"&/G.* * 
*J$
 *L(..*K (  H*S <0,;{@*.$8&,) *2d*N D*N:*L; *D+,&dG D*S <0,>4*V@*N6D*N+,8 *V D*N"G $ F*C D*L"G $ *L( ,#$

 *J$..*K@08.$8&,;:*L; *C+,: G0D+,I *(.*O *K.*J

CC

+.: G1D+*j $.*/G D/ *J$G G(..*K5H,S ( H*S <0,={4@,` G("&.G$*J..*K *J$G..*K

 < ,<h

*T <0,={#

 < ,<k#*W4p,h"&.G$*J G(..*K ( H*S <0,={##2(*N+,q /(.*O 
*J$
G G(..*K

CC

@d*"$.DG+,I G("&.G$*J..*K *J$G..*K

 <',<" "  <,<PR

*T <0,:j*S <0,;J

LN

DD5D- <0,={5@- G( *J$G..*K",.

G$

*J.

*K7  E+- G("&.G$*J..*K *J$G..*K"" <',<

<,<

 <D,<h

E *J$G G(..*KE
*S <0,;{ @

*T <0,;{3 +-' $ D*+-( $ D*"&.G$*J G(..*K $ D*S <0,;{2 *N+-8 /(.*ODC
C /(.*OEC
C@d*"$.DG+,C *(BHCJC"G $ 
*J$
 (..*K

*(

"0B"0BP R .$8&-; *1d+-F */G D*+.:"$.G D*M *K.*J* *K.*J '"*M $ F*R D*F.$ D- '

 <0,={ <0,={ @*S <0,>4 @*E5@-_$*J -(..*K* -$*J *F(..*K '+.8 *E ** <,<b*F *E * ' <,<b*Q"$.*F1$ $ D*"&/G.* * *J$.*K

-(

 <0,=~0 <,<

*F(

 <0,=~ <0,<*G *J$.*K 
-(
.
( <*F,<

*F(

"0"0 <*Q,<( 
*J$
 *F(..*K

*G

 .$8&-j *J$- -(..*K* &.*F$*J *F(..*K '"*F $ (

*J$

-.

*K0 <*Q,<

*J$

*F.

*K0 <*F,<*G ( 
*J$
-.
.
*K <0,=~( <,<

*J$

*F.

*K=<0" <0,<( 
*J$
*F (..*K .$8&.

 $.*F2dG G D*"&.-/* - (

*J$

*F.

*K *J$-..*K@ <*Q,<0 
*J$
- (..*K <0

,=~ < ,<.$8&.+:*F; *R+-M:*+,K7D*+0 * DG/$ D*M G0D+.P *O ( H*S <0,;{ @ ( H*T <0
,;{3& *W F*N5F.G *V D*N *K.*J\ *J(.*K *K.*J] *J(.*K"* $ F*O D*J"G $ F*N D*L"G $ *#$
 *L(.

  .$8&.U &#$*L *L(. *J(.*O"

'"'L N :*L; *N+.T"*M $ F[ D*L( ( *)q *L@f0.$ D0 *L$&# *L(. (  H*S <0	,;{ @ ,  L*T <0,;{3`+.} *L &"F0"G $ *#$
 *L(.

*G *#$
 *L(.     *#$
 *L(.

  .$8&.r &#$*L *L(. 5H/ (  H*S <0,={4@/ *L( &#$*L." "
  < ,<e)q"&/G.0 0 *L( *#$
.

 )q <( ,<L( N( .$8&/
:*L; [+.c"G $ (!, .

 *.$8&/@d)r $#$G G(.

  5L/" *(. (   H*S <0,={5@/" &#$G G(. *N *  G( (#$G.

* <  ,<h

*"*M $ FF D*L"*L.G FH"&/*M.H H H(

 0#$."@ ("@ ( <0*,<T *V *.$8&/, &#$H H(. 5H/= (  H*S <0,={5@/= &#$H H(. *N *  H( (#$H.

* <  ,<h

*:*L; F+/(@d*K"G $ ( , * L*S <0,={#

*#

 L*2l*K L*K.$8&/E"G $ ( *K 2

 * <,<h

 *.$8&/M7 )r+/`"*M $6 0+/[ (

*G ( * * (

* (

 )q < *,<L *N * .$8&/TOd)r+/ G1D+/z/$ D &"I $ F ( D*L"$.G/*L D* $.G/*L D*"&/G.* * (

*(

 0#$*.@8 <0*,<T *V *.$8&/k * I F*(**G *(

*(

0**(*:*L;  (+/e"G $ (

*J$

*J.

*K *0.$8&/{:*J; *O+.R *S * Ap,~x*Sx*Sx*Sx*Sx*Tx*Sx*Tx*Sx*Fx*Qx*Fx*Fx*Qx 'x*x*Sx*Sx*Tx*SxDp*T*Vx*Sx*Sx*Tx*Sx*Sx*Sx*Sx*Sx*Gp*T*Vx*S@*V*L**K*V.*J*U(' ','LENGTH OF AX IS SMALL;WE WILL NOT DIVIDE.'/)(A1,7X,'ROW WITH THE MAX. RELATIVE ERROR = 'I4/1X,4X,'ROW WITH THE MAX. REL. ERROR HAS AX = ',G15.8,1X,G15.8/1X,4X,'ROW WITH THE MAX. REL. ERROR HAS LX= ',G15.8,1X,G15.8/1X,5X,'ROW WITH THE MAX. REL. ERROR HAS AX-LX= ',G15.8,1X,G15.8/1X,13X,'THE MAXIMUM RELATIVE ERROR = ',G15.8/1X,'EUCL. NORM OF (AX-LX)/EUCL. NORM OF AX = ',G15.8/)0    :k|S1    G",:` \1W !p @0N !p @0e p @0O p B0M %p D10 p B0O 1Z D0*"0O $ F0h D1"0M $ F0f D1

 $ &0d"0M $ *#$
1 (..0e .#$

0N7\ <'\,<P0dR0d.$8&1i 1

(0d0g:1

; 0f+1g"0M $ ( ,#$

1.

0e 1(.10G <7\,< 1

.$8&1w"0M $ (

0g

 0).$8&2"0M $ ( , 0g L1X <24,;{ @ 0 0) P1X <23,;{ @0Q.$8&2 $ D0N@d0g"0M $ 0Q H103h0g+2 D0N 10 H0g.$8&2@d10 D1

"0M $ (

0)

 0 0) P1X <22,={@10 (

0g

 0 0g P1X <21,={@1

.$8&2 1

2d1Z+2% <25,,+2- 101

 D1X <20,>4 @0g 11D+2* 1Y D0* <28, 0N( <2;,
:1; 0h+1e 1W,~x1Xx1Xx1Xx1Xx1XX0O11X0O16!(0*$0N80g81

80)(0g(0g]    [    (' INPUT? (TYPE HELP IF NEEDED)--',$)(' OUTPUT? (TYPE HELP IF NEEDED)--',$)(50A1)(2O)(I)(' FILE DOES NOT EXIST'/)('-THIS ANSWER DEFINES WHERE THE PROGRAM IS TO FIND THE INPUT DATA.  IT'/' USUALLY CONSISTS OF A DEVICE, POSSIBLY A FILENAME WITH OR WITHOUT AN'/' EXTENSION, AND A PROJECT-PROGRAMMER NUMBER.'//' POSSIBLE DEVICES ARE:'//6X,'DEVICES',3X,'DESCRIPTION'/6X,7('-'),3X,11('-')/6X,'TTY:',6X,'TERMINAL'/6X,'DSK:',6X,'DISK (FILENAME AND EXTENSION, PROJECT-PROGRAMMER NUMBER'/22X,'MAY BE USED)'/6X,'CDR:',6X,'CARD READER  (THIS DEVICE IS NOT APPLICABLE ON TERMINAL'/30X,'JOBS)'/6X,'DTA#:',5X,'DECTAPE UNIT (USER''S DECTAPE SHOULD ALREADY BE MOUNTED)'/6X,'MTA#:',5X,'MAGTAPE UNIT (USER''S MAGTAPE SHOULD ALREADY BE MOUNTED'/30X,'AND POSITIONED)'///' DEFAULTS:'//' (1)  IF NO INPUT DEVICE IS SPECIFIED BUT A FILENAME IS GIVEN, THE'/6X,'DEFAULT DEVICE WILL BE DSK:'//' (2)  IF A DEVICE WHICH REQUIRES A FILENAME AND EXTENSION IS SPECIFIED,'/6X,'BUT NO FILENAME IS GIVEN, THE DEFAULT NAME WILL BE INPUT.DAT'//' (3)  IF NO RESPONSE IS GIVEN, I.E. A CARRIAGE RETURN <CR> IS ENTERED,'/6X,'THE DEFAULT DEVICE IS TTY: ON JOBS RUN FROM TERMINALS; AND'/28X,'CDR: ON BATCH JOBS'//' (4)  IF DSK: IS SPECIFIED AS THE INPUT DEVICE AND NO PROJECT-PROGRAMMER'/6X,'NUMBER IS GIVEN, THE USER''S PROJECT-PROGRAMMER NUMBER WILL BE'/6X,'ASSUMED.'///)(' EXAMPLES:    DATA.DAT'/14X,'TEST.DAT',A1,'420,420',A1/14X,'MTA0:'/14X,'DTA2:FILE1'//' NOTE:  THE FOLLOWING RESPONSES ARE VALID AFTER THE FIRST "INPUT?"'//' (1)  SAME COMMAND.  IF THE DATA FILE TO BE USED IS THE SAME AS THE'/6X,'PRECEEDING ONE, THE USER MAY SIMPLY ENTER "SAME"'//' (2)  FINISH COMMAND.  THE USER MUST ENTER "FINISH" TO EXIT FROM THE'/6X,'PROGRAM.  THIS ENSURES THAT OUTPUT ASSIGNED TO LPT: WILL BE'/6X,'PRINTED.  FAILURE TO USE THE "FINISH" COMMAND MAY RESULT IN'/6X,'LOSING THE ENTIRE OUTPUT FILE.'//' (3)  A ^Z (CONTROL Z) WILL RESULT IN THE SAME ACTION AS THE "FINISH"'/6X,'COMMAND.'///)('-THE ANSWER DEFINES WHERE THE OUTPUT FROM THE PROGRAM IS TO BE PLACED.'/' IT USUALLY CONSISTS OF A DEVICE AND POSSIBLY A FILENAME WITH OR WITH-'/' OUT AN EXTENSION.'//' POSSIBLE DEVICES ARE:'//6X,'DEVICE',3X,'DESCRIPTION'/6X,6('-'),3X,11('-')/6X,'TTY:',5X,'TERMINAL'/6X,'DSK:',5X,'DISK (FILENAME AND EXTENSION MAY BE USED)'/6X,'LPT:',5X,'LINEPRINTER  (MULTIPLE COPIES MAY BE REQUESTED BY USE OF'/29X,'THE "/COPIES" COMMAND)'/6X,'DTA#:',4X,'DECTAPE UNIT (USER''S DECTAPE SHOULD ALREADY BE MOUNTED;'/29X,'FILENAME AND EXTENSION MAY BE USED.)'/6X,'MTA#:',4X,'MAGTAPE UNIT (USER''S MAGTAPE SHOULD ALREADY BE MOUNTED'/29X,'AND POSITIONED)'///' DEFAULTS:'//' (1)  IF NO OUTPUT DEVICE IS SPECIFIED BUT A FILENAME IS GIVEN, THE'/6X,'DEFAULT DEVICE WILL BE DSK:'//' (2)  IF A DEVICE WHICH REQUIRES A FILENAME AND EXTENSION IS SPECIFIED,'/6X,'BUT NO FILENAME IS GIVEN, THE DEFAULT NAME WILL BE OUTPT.DAT'//' (3)  IF NO RESPONSE IS GIVEN, I.E. A CARRIAGE RETURN <CR> IS ENTERED,'/6X,'THE DEFAULT DEVICE IS TTY: ON JOBS RUN FROM TERMINALS; AND'/28X,'LPT: ON BATCH JOBS'//' (4)  IF LPT: IS LISTED AS THE OUTPUT DEVICE, THE NUMBER OF COPIES WILL'/6X,'DEFAULT TO 1.'///' EXAMPLES:    LPT:/2'/14X,'RPT.DAT'/14X,'DTA0:NAME.DAT'///)DTA0 S    INPUTB    .    DSK  OUTAAE    A.AAAH    K    N    OUTPTT    C    TTY  F    I    L    O    /    A    0U    DTA9 .DAT [    :    XCDR  `M    P         LPT  DSK  DSK  TTYDAT.TMPS> \55 p @2L6D2T+5P 1 D2u 2u D1 2LA$5D5S 2 D2M 2LA$0D+5V 2 D2M $.2L6b0b+5[+5Y45[45^45]45` <7,, 1 D2P+5a <8,, 1 D2P <8, <8,
 2T2D5?+5m 2U2D5?+5m 2U2D5<+5m 2V2D5?+5m 2V2D56+5m 2W2D5;+5m 2W3D5G+73 2T2D56+5x 2U2D5A+5x 2U2D5F+5x 2V2D5:+5x 2V2D5G+5x 2W2D5G+5x 2W3D5G+79 2T2D5>+6 2U2D5@+6 2U2D5<+6 2V2D5=+6 2V2D5?+6 2W2D5<+6 2W3D5B+7c 2T2D5;+6 2U2D5:+6 2U2D5@+6 2V2D5G+6 2V2D5G+6 2W2D5G+6 2W2D5G+6 $.2L6b0b+6+647X47a@d2u <7~,:( $2D2K+6 $A2L0D+6 <7|,@q@d2K@d3 D2M D2L D2v D2E D2E D2m 5G F2C F2C F2M D2F D2s:2F0d+6; 2T2F58+6" & F2s 2T3F5D+6' 2T3F5D+60 2T3F5A+6:+6 $.2F D2L"&.2F $ 2R H2T/$8&6* 5F 2F.& 5G H2T*d6, $.D2F+6 $.2F D2v"&.2F $ 2O H2T/$8&63"& 2F 5G H2T.$8&66 $.D2F+6 2F D2E+67D2v+6G <8,.$ D2t"2v/&.2t 2t F2P D2t 2t <8,
:2t; 2P+6A, <8,	 <8,
6D2s+6Q $.2L D2s"2s.2L 2s D2t 2t 2T2D5G+6O>2t8&6K $ D2t 2t 58 F2T <8, $.2L D2q"&/2L.2q 2q F2N D2t 2t <8,
:2t; 2N+6V,7D2L+6a <8, 5E_D2NZD2t 2t <8,
:2t; 2N+6],7D2E+6l <8,.$ D2o"2E/&.2o 2o F2p D2t 2t <8#,
:2t; 2p+6g, <8$,	 <8(,
35G2D2M+6y3D2C+6p+59+F2M+6y"31D+6s 5> D2M+6y $A2L5D6v 5E,D2M $A2L0D+6y.5H+D2M <7z,?S 2M3D59+73 <8),	 5BD2nZD2D 2D <8-,
:2D; 2n+7,"& $ D2q 2q 2T2D5G+7>2q8&7 2q 2S2F57+7 2S2F5<+7 2T2F5<+7 $ D3 2C2D5G+7& $A2L5D7" 57 D2C $A2L0D+7% 5= D2C 5C D2C $A2L1D+7. <7t,?u7D2Q+7. <8.,,"30D+7. <7e,BF+5V@d2v 30D+71 $? D2v <7p,:5+6~ 2K0D+75 <7o,:( 2K0D+78 <7m,@q <7e,BF $3D2u+7UA2L5D7H <81,+7H $2d2B+7H3D2w+7@ <7k,?S $ D2w3D2u+7U D2u <7j,:(@d2v 30D+7G $? D2v <7g,:5 $A2L D2D1D+7Q 2E F2@ 2m F2A 2M F2 2P F1 2C F4 2C F4+7T 2C D2? 2C D2@ 2M D2 $ D2T+7c <84, 2B D2P+7H <86,, <89, <8<,
 <7f,:( $.2L6b0b+7a+7_45[45^45[45^ <8>,,+7[ 55,~x0P2B2v2O5J5656x2Bp5I2B`2r59582Ax2oP2P2v2M2C2E2mX2P2C2Q2E2mh2P2C2Qp5H2Pp2M2P`2r59582Ax2PX02wX02{X0732@2TP22F$2TP32F$2E$2mP22C$2TP22M$2TP22F$2TP32F$2AP22C$2TX03`2P`2BX03zX03~=$2p$2SX04;zI    F    A    (' FORMAT'/)(' FORMAT: (',A1,'-TYPE ONLY)'/)(80A1)(80A1)(' ERROR IN FORMAT, TRY AGAIN.'/)S    (    A    )    {M         O$ky \8~ p @8q p @8A !p @8q p @8r p @8B p @8B@d8C@d8r D8r &( F8s D8p2D8B+9 <9V,BF 8B0D+9 <9W,,0d+9 <9Z, <9],
 <9_, 9_D8HZD8s 8s <9b,
:8s; 8H+9, 8r1D+9& 8H2D8+9! 8I2D9+9! 8I3D9+9T"8B $ .8q 
9 J'.$8&9" $ D8r 8B0$+9)(.8B D8s"8s $ D8s 8s 8H2D9+9/:8s8&9* $ D8r+9T 8s 8H2D9+9- $ D8C 8C.8q <9c,"8s $ F8F D8s 8s <9g,
:8s; 8F+96,"8s $ 8H3H9:8p 8H2H9+9>"(.H8p.$8&9: $2d8p+9T &.F8C.8C3f8B+9F.8B/8C (. F8s 8s1$+9N <9h, 9_D8EZD8s 8s <9k,
:8s; 8E+9J,+92 8C0D+9Q <9V,BF <9m,, $ D8C+9
 8~ 8r Ap,~X8q8tX8q8u$8CX8A8y$8HP8s8z$8HX8A8y$8HX8q8{	`Z(X^. >[.~(3~+9t	~+9Z. \x <x*<x .->?;ez+9{!"	b+  "9|	b+Z. h+ggM?Th
&:	b+9o,
?NO CORE AVAILABLE - CAN NOT PROCEED
!*:%**,^,~*x,> <:%*<:'  pZ@:@@:@@: :\`|+:Pw,~ "p h a`~+:h  ``~+:$:\!:d:]/"+:P,~@@@ @@0@x@@@`edX91,>BH,>Zp @:\`: <:,,^,~SMI 1,>BH,: :^ B:+:?_MI 1,>BH,: :` B:+:?I5R1,>BH,: :a B:*\:I7ApX":b B:/& pd"~l" B:*\:I/& pd"~l"$ B:*\:I/& pd"~l"

 B:*\:ISp*\:I/&Xp B:$@@:$ :c B:*\:I/& pd"~l" B:RF: <:,+:EV4i91,>BH+:WS,i@1,>BH+:W_,i@1,>BH+:WK>21,>BH+:WK>401,>BH+:W[<I71,>BH
&:c w @)@. 
"5B:X
&:i,~`.

.4SEQIN^:]SEQOUT^:_RANDOM^:`SEQINOUT:$
%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS: 
GFGp =p+:lGFI @;@ B;@5@:r5B:r p@5":q+D:0
:qU @,~ p @;A D;A@@;B`;A @;B ,> <;E,>,^,> <;G,?,^ @;C,> <;G,?,^ @;C#;@#;@2d*+ + $ B;@,> <;G,>4,^ ;A ;@+ ;1 @;@!$5";#b+ ;7+;+ ;(BdB+ ;5B;	  @6 ;A+;!"b+ ;;C+ ;<;C+ ;> ;A,~ +h$ +; +6@;B/;G7`;Bh$ ad +;6@;C,;;6@;C,;;@`+;,> <;H,>l,^;B @;D7@;C+;/#;C,> <;G,>l,^;D ,> <;G,>G,^7 ;C"` @;D7@;C+;0#;C,> <;G,>l,^;D ,> <;G,>G,^7 ;C"` ;D+;@@;D+;&@ ;D+;,> <;G,>l,^ @;D,> <;I,>l,^;D+;:;BU",;;@;@+;6@;B+;+D:0;<,~ B;D,;: ;D+;,;:@@+;p;@;@xx;@x;@GO-1,>BH #p   D;v#5B;O5 ;q F;w @;u B;v#@@;w2d;;w*+ + &,> <;x,>4,^7@;w+;_  #,> <;x,>4,^ @,> <;y,>4,^+;f3$;z+;h #;u&+ ,> <;x,>4,^;u#;v"+;n#;u,> <;x,>4,^ @;u;u 7 ;u*7 ;v"` ;v ;w,~,> <;y,>4,^@ ;v,~ 6P'Mxx 0G01,>BH #p##2 *+ <+ <  @< B<,> <<,>4,^<,~ ,~x<Gid@Q<+<G6id@Q<+<GieQ<+<G6ieQ<+<Gie@Q<+<G6ie@Q<+<Gid(Q<+<G6id(Q<+<Gid)Q<+<G6id)Q<+<Gid*Q<+<G6id*Q<+<G6id!`+<Gid,>p,^<_,>p,^<_!`,>p,^<^,>p,^<^,>,>,>,>,<) @<` <^*<^"@<^,<),^,^,^ @p,^,><`,^p,~ <^ <^<_+ <-<_+ <R,~ <_7@+<Bd+ <4Faf+<6 @<`+D:0
<3 <`,~4D<1Faf+<:+<14D<1 <_ <^+"<a@,~ <_<_ <^<^+ <?<_+ <^,~<_ <_<^,~+ <I#3&<a+<E",~$5 <^ 5<_+  5,~4D<K"D<`+<2 <^$5<_+  <^ 5<_+ 5D<H5@<H+D:0<Q@,~5D<V2 <a,~ 5 <^$5<_+ +<H DFab+<Y"D<`+<2 <_&<^+ <],~"F<`+<2,~G!d@Q<+<vGid@Q<+<tG!eQ<+<vGieQ<+<tG!e@Q<+<vGie@Q<+<tG!d(Q<+<vGid(Q<+<tG!d)Q<+<vGid)Q<+<tG!d*Q<+<vGid*Q<+<tGidO@=x+<vG!d@@=x!`,>,> @=v p @=t p @=u =v!` p @=u p B=v4@=4B=6@=t+=6@=u+=@@=w@@+=7 =t=u @=w =u=u+=7 =u=v @=w"=t=v+=7=u+ ==v+ =+ = @=v =u=t+ = =u=v+ =+ ==v+ = @=w =t=v+ = =u=u+ =B+ ==v+=7 D=r F=s H=s =t#=t#=u (3`+=*=u D=t"h =u#=u#=v3`+= *=v D=u$( =vd+ + $ D=x =t=u+ @+ 1H"(.(6 "f&7@"f,=; @=w @=w =t =u3H=y"d3H=z"f  =u+ =U=v+ =X+ =_,=;5(=4 @=w+=5 @=w =r =s =s =w7@=x!`,^ @p,^,>=w,^p,~#=u#=v#3$=y+=B3"=y+=A3 =y+=A=x+=R+=@=x2b=y+=H2`=y+=F3d=y+=KB+"=R+=R3`=y+=F3d=y+=FB+=R B=v+ =NB+=R =v @=v+ =QB+=R =vB =uF=vF7`"`,~=v+ =l   =u+=Y =v D=t4F=l#2"=z+=2&q q@+ f&q+ =b+=2 =u&q$q J=t =v =u#
3*=y+=j#
2*=y+=h qB+=kB q+=kD q 
=t+=3>@=tB=u=v=u+=q=v=v+=3+D:0=r+=3 0C&l`1,>BH #p ,~G>u)`1,>BH #p ",~CR

`@>,>B<>,>,^6->,~52>>,~>,~+``+>4@>>72>"`,~4">+D:0>,~>>7>"`,~>Y~j9~jx>CR7 "` >2,~ &`V-G {G ZCv\ 7f ]V#QI+0`} 9~jgG@1,>BH7cp+>> (Bdb+>9.>B"+>:.>B"TB#p@,~4B>A+P:0

>B#p+>6  ,~>attempt to take SQRT of negative argKc1,>BH p3">b+>L3b>b+>N+D:0
>KU ,~+D:0>M  ,~ D>c F>d@@>c%"j"%>a)/;`:XD>]5f>UaF+>U.&@(|h&f>c >_>` >` >c>_D>a@ >c >d,~!t0_'"S'qf!um.	.#Y% !vyO^	RXC2|t(1,>BH p4@>| @>k,> <?,>l,^>j,~{e^bC2|p1,>BH p5`>p4@>|+P:0?#p3@>+>~)r. !@?! n@?(|h"> ? B? ??????,~+D:0
>} ?,~  ,~ 0_i/X3 6P'M 5( bB W
R`@x>kATTEMPT+TOTAKELOGOFNEGATIVEARGG?@1,>BHp?,?,+?+?g&t@1,>BH3p?,+=+?G?1,>BHRp?-+?g&p1,>BHpB?+#`3b?*+?'pD?-?-3b?.+?%"(D?d$"@($)B?3".!p Ap $Ep,^,^,~!$hX$h@@h*% "?C BhL " BhM+xeX2GiSHYC aSiSHINXGYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
 M?L@INXINXINXINXINXI2I2 I20I2@GiSHI4:1,>BHZ.@6kp2j8M+?c !pQ A` ?\\$}

4L?[/,L8$?X.
8L F(,~H?FRSDVC - ILLEGAL DEVICE NUMBER IN CALL TO DEVCHG

&?] <?c,

iSN,>BH@ApO
,7 OAp,~I5r1,>BHO@
,4"?n,@A``,~ <?o,

44?q4@KbN=1,>BHO@@ p4B?y,@A4@?y9?}9?|KbN=1,>BH@@@!$Lu 	`@Ap``a`+@a`+@ D?tA (`@/"#B?s@@?t !pX@?p,> <?p,@$,^7@@+@OAp+@ #pQ"A` $1@+@
! H: @?r@@?sa|+@[pd0@ +@[pd0@ +@+@_w6@@_w#`1 +@SpXp @?s
?s+@@?q+@+@
&@+@   Ap ,~ ERROR ON OPEN!
HH@"H@#G.t21,>BH@@Ap! A`.!p @@  @! @@"@@@"@@@# & "@ <1D+@/-@:=b@*@ <0D+@8O " @! @@"@ <-@:=b@17@@"OAp !p<, @", @#,~<&@3@ 1D+@7   Ap+@31D+@71$+@41d+@?0$ 0d-+@4 $D@"+@:"@],@j0@+@Y p4B@[Lad+@X`b+@Y $0d"+@[&$$&(&}Z.G@].&$.$ 7F+@N  ,~ A$&$(DG$1$((D(D

 	`5@@[ .2bM+@W L.&7D!$Lu+@Z2"@^+@T &p,@b 	`,~
&@^ <@a,

.p M}ILLEGAL DEVICE NUMBER!
"@i,@j 'Q&A` @i@1x,~180.8X=`@e,~.H  a|+@m0"0b/ ,~0B1B,~0B/ ,~aJMm1,>BH A,A]@,B'+AZ"6Ap." B` " B` $7cp $1B $dA,A
,Aw+A

6cp0b "bA$A? ({."XB`&$@.$
a|+A[pdp0B +A	+A_w#`1"+A	6cp 0d $QD`,AH+ ,~
&A,~
&A,~@b -p\.{Q,A` 
A4PA1P+A/0P8.A,~``

``
CANNOT INIT DISK!

FILE NOT FOUND!
HH\.~ 
A+AYC GaSa3 S;YC&<G<aS<a3&<E$;w|xA! PA B`1T!"L	b@XB` B- A<@
+B*!,2,B@!.~`+B,""1T""QBA: 	f+ 1$9AV:x,~ 8A!@`A! B.*( B` " B`\"

	b@ B`\"/	b!"Z(BrbB/	b

 BA<	b
+"`B`!"2	b`b`b+Ar!"2	b `2B`+Ar!$2	d!$Lu+Au B0	b B0 B1	d!$Lu BA; DA<,~@@A= B1*(AD BA> BX B` DA> DX $	d ` DA= DX "2D`bB2d  "bB2@A=+B3 AD BX@@AD B5	b$+B!"AEX"X*"X!"`

l !"GBX"B20B+B "?d+B	d5DBbB6bB7bB7 B- AD@
+B!,2,B@ X

A> A? +B JX +A\
&B8 "bB25 B+B5 B A=+ +B	h	&(2 
PA B>.A< &..0P`bp+B!d

@ A;+Ax`L+B A;+A\ (!*Lu@


,~+A\ "0T,~ "
&B>,~@A"P$` hXA>

XHXa`,~!"GB`+B@AD6$A?.B.B.B
% Cannot do DISPOSE:RENAME. DISPOSE:DELETE assumed.
0
% CANNOT ENTER QUEUE REQUEST IN QUE UFD!
% PLEASE NOTIFY OPERATOR!
KbN@1,>BH,

,~BIY\BJQ<X\BK*+6BK6`BK
GJBHGK/K`BH}KBF)?K`BF1B:A@113A@10.A?1A?1TA=1BAB1	AC1gA>1

=AC1`YAB1[A>1Z3AA1Q|AD1FBA=1@AA(UwSAH

r9WB'1SSA]
e'*+Aw&+Z} A

hf@q

hf`@pjrwV`@j
:3V@b:3V`@b1IYv@A1IYv`@A
JI3@$JI3`@ !h?u	W3?z	W3P?p
o9(k?jo9(k`?i
9?S9`?R^^xj?;)9{`?;wY:?/wY:`?.v*?
f>eKP>d~Z>G~Z`>Faj>4aj`>3DR>DR`>
4N>4N`>
Mf=~Mf`=~
@mF={@mF`={
G/AG<j
G/AF<g
G/AE<d
G/AD<tM'<hM&<eM%<b
G0J<q
G0I<n
G0H<kM$<vG<jF<gE<d
F%=J<s
F%=I<p
F%=H<mD<t(}P<b%[G<%[F<

KdMJ<
KdMI<
KdMH<%[D<
GAG<
GAF<
GAE<

GAD<G<F<E<
GA]J<
GA]I<
GA]H<D<Sk}P<
O@aj;JO@aj`;J
GG:j
GL%:l(=9P:j:

(:P

8@#x:VlJ:.e,(:NDf:TDa:R
_
G:5
8v::L)4~P:(JD/

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":
&*

 R	WJ

>
_Bb
_2v	
K^
2b
2(bI|p9o9A9>9"8uU929)

a9N'9*

u8{;9*
O9c95w969g9:39<9>39AG9F[9ho9J9J9k+9Q39?9mG97[9Lo9V9T9
+9?9S9W

_9

s9Z	qG8tl8s	8s&G8r8r%i8q%u[8qE0K8~%j78D/8C%[48C

Zo8B

8BzM8A(T$9(T$v@9!7&W8?7t

a2
	u6'5f'6K?W71;5x+6K?k7pg7H36,w6]z{817c-6]{7@bA7X36-8{#7k6*bU3G5-38{77j63bi3~[5~26f{K7G)66b}7[o5|236g{7g=6:5{2G8#{s84Q6l62[8$86+6
36y7f[6z!6pzi7h{17=S63?6~C8>!6<{77{E7Ug63S7H	hU5[56G{%77e{68?7y	hi5]I6Q+7c 68S7w	h}5^]6K?5N #7~8g8)	i5`q6OS5P 768{7	i%5a

_5S K7|97

s5VPI6"9#8-	qG2w~22w{62vol1&>2v&AQ0&M2ub[u@2u	2tw042ty2sw052sg2rw052q2q92pPH2pw062o%i0

F|2m2T

Ix32C/882?

LB2T92SP42SP52R/854

Xm2BP52R2QP62Q%g|2PP62Pp2OR!b
2AP72OP72N0K55P82Ny2Mqp:2M%jL2gd2L&.\2L%jI2zv2K2Fg?3zp2A
2F

F~2E%\j3oi1{/2E2Dzr2@~Ly2D{h32CzZ5L%(Ti2?K(Ti02?zZb@5Lh051Xh041X

_2

s2	qG11:-10z
g10I1

:-1

1m0hP40hZ	w0gw0gP50fP50f0eP60e:0dP60cP70c7:0QP70Q0K1WP80P
0P/C0O{0O0N
0N

0Md0*	9=0*Cn1[Cnw@1[h06*Uh05*Th05*Th04*S-.:
+d&C-j?/M-+K /+t&W0?/TA+P %/+u&k0?//dU+Z 9/+x&.

?C/e

a+dM/,',

u+l{a/=;,+0+

,%u/[w0%,;0
,&/k,&,c.G,0&E/z0-.R,;&Y/{3,1-.T&m0,CG0-3.T,I[,82.U),Ko,923.c=,`,-,:2G.cQ,h,;2[0	e,q+,`2o0y-?,S3.r
!-80#g03S/5-;0${08?/"I-F+*~ -8S/]-~?0" #08g0q."S+ 708{/(.2

_+ K09/(.8

s+" _09#/,	qG*SP]*R8(*QP]*QP^*PP^*PP_*O s*OP_*Nav*NP`*MM*Mw04*L	*Lw05*KN*Kw05*J*JPH*IPI*IPI*H;-9*GU"*F*FPJ*E1t*EPJ*DPK*DPK*CPL*Ct!q*B?s*P4*XO*P5*z-*}*P5**P6*P6*:*P7*Fi*P7*1*0K*SP8*
**{y}*/C*.;')rik)rs )Q (Q (Fi 'Q &A &Q %3	 %	\Pp[zOJMIPqIPqH
HPrG

GPrFPsF}]/CPsB&(a1Pt0zi0|]z/A/

..3	-P\-
)mK*X)mKa@*X(Rqh04muJi&kaVa\UK&'3E

aPVa%b''*Va9z

u2;VaM,au%u;3G
[()+fzA03?zU4GS[*?oVS2{`gp{+q ?o #9Sn 79{u[

_t K;a

sw _e	qG,z
g			3&GPH%i0PIPIPJ%u[VP4UP5U/854P5T
P6
%g|2P6

:

P7
	P7
	P8



/C	{1h>e26g?3zO0

6zM15}hB0H}hBP0(Ropq\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	-q+	-@@-KZ.`++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`[

., 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|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&

*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@

 $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/~

^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(

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]
	()	 <<---	 +()	<#>	[. ]