Google
 

Trailing-Edge - PDP-10 Archives - decus_20tap5_198111 - decus/20-0137/facto/facto.exe
There are 2 other files named facto.exe in the archive. Click here to see a list.
?p0@0
?hX?x " 
 
<++%2	`D~^ MK8$[2K0@-(' HOW MANY VARIABLES? ',$)(I)(' HOW MANY OBSERVATIONS? ',$)(' ENTER VALUE USED TO SELECT EIGENVALUES(USUALLY 1.0): ',$)(F)(A3)(' ENTER HEADER'/)(16A5)(' SAMPLE SIZE TOO SMALL'/)(' FACTOR SCORE?  (YES OR NO)--',$)(' NUMBER OF VARIABLES OUTSIDE ALLOWABLE RANGE'/)('-')YES  + -<U $ DSOd0"$ D0 $ D1 $ D1 <f,m <b, <, $ DV <[,i <g,, <j, <m,
 <o,, <r, <u,
7dY+- <w,, <z, <},
 U0d+ <~,,6$3+ <Q,( <,, <, <,
 <	,, <
, <,
 &.Y$Y7 .&( $.Y$Y. DV T2D++ Y$Y.DV <Y,N7DZ+1 <,,6$3+ <Q,( Y$Y.W D[ &.Y$Y7 .&(.[ FY.Y FW.Y FU.Y F].Y F[.Y FZ W HX 
T2J+?.Y FX ( [ Hz $[ Dz Y $[ D{ W $[ D{ U $[ D| ] $[ D| [ $[ D} Z $[ D} X $[ D~ <R,* <,,+ <Q,S <Q,
 YUX	z	z	{	{	|	|	}	}	~`VZW\P0032VP1200~3P1\003x3X0kX0m@KX0]X0O`$YX0aX0O`$UX0nX0dX0Oj(XX0qX0j(TX0tX0y(' NO. OF OBSERVATIONS',4X,I6/' NO. OF VARIABLES',I6)('0MEANS'/(1X,5F12.4))('0STANDARD DEVIATIONS'/(1X,5F12.4))('0CORRELATION COEFFICIENTS')(4H0ROWI4/(1X,5F12.5))('-EIGENVALUES'/(1X,5F12.5))('0CUMULATIVE PERCENTAGE OF EIGENVALUES'/(1X,5F12.5))('-EIGENVECTORS')('0VECTOR'I4/(1X,5F12.5))('-FACTOR MATRIX (',I4,' FACTORS)')('0VARIABLE'I4/(1X,5F12.5))('-ITERATION',7X,'VARIANCES'/'   CYCLE')(I6,F20.6)('-ROTATED FACTOR MATRIX ('I4,' FACTORS)')('0VARIABLE'I4/(1X,5F12.5))('-CHECK ON COMMUNALITIES'/'0VARIABLE',7X,'ORIGINAL',12X,'FINAL',10X,'DIFFERENCE')(I6,3F18.5)('0ONLY',I2,' FACTOR RETAINED.  NO ROTATION')('1FACTOR ANALYSIS'/)(1X,16A5)('-FACTOR SCORES')(1X,I4,4F/(5X,4G))(' ENTER DATA'/)('+(AT MOST 20 NUMBERS PER LINE,SEPARATED BY COMMAS)'/)(' PLEASE WAIT, YOUR DATA IS BEING PROCESSED'/)DSK  YES  }(20F)     MV \% p @  p @ p @ !p @ !p @F !p @ !p @? !p @  !p @ !p @ !p @ !p @K <^,7 20D+< ( D3 ( ) F3*d: 23D&+B <c,, 20D+D <f,,+D <i,,@dD <Y, <l,, 'ZDJ J K2F)+K*dG+M <o, <r,
 <t, <w,
 <y,"  $ FA D! !. <|,
:!; A+R,"  $ . 
.
  
/ J'.$8&W <~,"  $ F@ D! !.  <,
:!; @+^, <,,"  $ F? DJ"  $ J2(+l $/7 .((.J HI+p J$J/J7 .((. HI .? 
I.
F 
/ J'.$8&f <, <,
"  $ F> D! !.? <
,
:!; >+x,:J; ?+e@dM <V,	 <S,X" $ $/7 .((. HI 
.
 .F 
' L/.$8& <," $ FG D! !.  <,
:!; G+
, <," $ FG D! !.? <,
:!; G+, <,,@dI" $ FF D!"  $:I 
.
?. 
' L/.$8& <, <,
"  $ FE DJ J.? <,
:J; E+$,:!; F+ <Q,{ <, < ,
"  $ FD DJ" $"(.$ .J HI 
.
?. 
' L/.$8&/ <", <%,
" $ F D! !.? <&,
:!; +9,:J; D+. $3$+C <(, <+,
+i <L,
. $.N D@ <,,,"@ $"(. HN </, <2,
.$8&H <4, <7,
"  $ FP DJ" $"(.$ .J HI 
.
 . 
' L/.$8&Q <9, <<,
" $ FO D! !.  <=,
:!; O+[,:J; P+P <?,,"  $ <B, . 
.
 
.
? <E,
.$8&c T2D'+B <K," $ FM DJ/$$  DH" $ FL D!/$$  DC !$I.J.J@f"  $ I$!.J.J 
.
C.
 
.
H.
 
7
/L .$8&v:!; L+q:J; M+n <H,c"  $ F D!" $ F DJ.@f" $"(.$ .! HH 
J.
. 
I$
J.
.
J 
0
'L/.$8&:J; +" $"(.$ .! HH. 
.
 
/ J'.$8&:!; + <H,," $ F D= <K,"  $ F DL L.? <M,
:L; +!," $ F D!.@f !/$$  DH"  $ .H HI 
!.
 
.
 .? ?7 
.
7.'N/.$8&+:!; +' <N, <Q,
" $ F DJ J. <S,
:J; +:,:=; + <G,+B <F,S %   Ap  Ap  Ap,~xSX 	K	 	xS@ 	N!			?` 	F	X 	F	?`	F	 M0 D		 		F	?		@&K	KJ% I%X0X0X0 X1X1@KX1Q$$ X1V(X1Y(X1]X1`$J(X1b(X1e(X1kX1m$!(X1o$X1s$J(X1
$X1vX1z$N(!X1{$X1$J(X1X1$('(/(7X1hS(X1$=(S;6@ \a p @W !p @Z !p @^ !p @V p @T <p,7!$ DY"T $ F\ DU.^ U F.V U D$^.U._  FU"&/T.U U F[ D_"&/T.U U ^$._._#
 #U2(+ ^$._._   HU U.^ 
_ J' U.V D'.$8&w:_; [+u U.^  DV U.^ 3dU+"T $ ^$.U._"  H` 
^$
 
U.
.
_ V.._ 8 N0 
^$
.
V.
_ H(.$8&	 U.V  D_ U.V 3dU+&"T $ ^$U.._"  H` 
^$
U.
.
_ 
^$
_.
.
_ 
0 L( 
^$
_.
.
_ H(.$8&"T $3DU+- ^$U 
.
.
_ 
U.
.
_"(0 N(.$8&'"T $ FX D_"T $ U 
_2J3D+; ^$ 
_.
.
_ 
U.
.
_ ^$U._._ 80N(.$8&1:_; X+0"T $3DU+E ^$.U._ 
^$
U.
U.
_ 
 
( L .$8&? ^$U.U._ DY ^$U.U._!&F:U; \+l T DU>U4do.^  F_3fU+_"T $ ^$U.._  F` 
^$
U.
.
_ 
^$
_.
.
_"
0 L( 
^$
_.
.
_ F(.$8(S U.V  DV3dU+O"T $ ^$.U._   H` 
^$
 
U.
.
_ V.._"8 N0 
^$
.
V.
_ H(.$8&c+O a,~@b`	Z_aW^aYES  G?+@ \	 p @v p @y #p Bt #p Bx #p Bx #p B #p B #p Bw #p B| #p Bu y$y.y7 .$( Dv <	T,r <	R,r <	Q,rdv D@d v2dy+! v D{+" y D{"{ $ F~ D <	U,"y $ F~ D .| <	X,
:; ~+', T2D
+3 <	Z,"y $ F} D .| <	\,
:; }+/,"y $ .u 
.
| 
/J':. 
.
| 
/ J'.$8&4:; ~+$d{ Dw"y $ .x 
.
u 
/ J' .u 
'
w J'.$8&?@d"{ $ F{ D@d"y $: 
.
| 
.
u. '7 H/.$8&I"y $ Fz Dy.w y.| F"y $:. 
.
| 
y.
| 
7
/L'.$8&T:y; z+Q:; {+H v3d{+	 v/d{"{ $ F D@d <	],"y $ F D .| <	`,
:; +e, T2D
+q <	b,"y $ F D .| <	d,
:; +m,"y $ .x 
.
| 
/J' .| 
.
u"
/J' .w 
.
| 
/J'.$8&r"y $ F Dy"y $:. 
.
| 
y.
| 
7
/L'.$8&:y; +~:; +a@d"y $ F Dy.x  F"y $:. 
.
w 
y.
w"
7
/
L'.$8&	
@d"y $.D .x 
.
#
/ J	 <	P,$ @'.$8&	"y $ F Dy"&/y.y y $/7 .((.y H"*.
y$
y.
 J.
. 
' L/"(.$y.y H. 
.
 
/ J' .x 
y.
x 
/
'5J	3 .@j'+	9 . 
.
x 
y.
x 
7
/ 
'
 J'.$8&	 :y; +	!$} D	 <	O,$ @"y $ .x 
'
 J'.$8&	?"y D"y $ (.y.h 
.
w. 
' L/.$8&	E+	K <	N,S 	 y Ap,~x	x	p	vp	uyp	wyX1	J3(hS(X1	J3(hS( 6OoO0c=tK&<[@ \	{ !p @	p !p @	t p @	h p @	y 	~ D	t1@+
"	h D	i"	h $ F	r D	m 	h.D	i"	h $ 	i. H	k.	t@j' 	m2H+
 	k.	t!* J'.$8&

:	m; 	r+
@d	j"	h $ F	q D	x"&/	h.	x 	x3D	x+
 $/7 .((.	x H	e.	p 
'
'J	j.$8&
:	x; 	q+
7`	j+" <Q,$	} @	jf	h 	j	t D	y@d	s @	zf	h 	z D	z $ D	v $.	v D	l 	l$	l/	l7 .$( D	u 	v$	v/	v7 .&( F	g.	v D	w.	p#3&	z+ $ D	s 	v.	g D	f 	l.	u F	l.	p.	p H H	s 	w.	p 

	s H	| <P,$" F	j7 	s"d	j"	j	j$ D	| <N,$ @ @	| <O,$ 	j D	k	k D	g"	g& F	| <M,$ @	i 	i	i F	w 	k	i F	{"&.	v$	h F	r"&.	l$	h F	m"	h $ $/7 .(( H	i3D	v+
q /	l4H
q5h
_ .	u H	x+
a 	i.	l H	x2$	v+
d .	g H	f+
e 	i.	v H	f 	x.	p"
'
	k 	f.	p '	i H	s 
	x.
	p /	i 
	f.
	p 
7
	k
 L/ 
	f.
	p H/ (3H	y+ .	r H	z 
.
	m J	u.
	t"/	k.	t 
'
	i
 L	s 	u.	t '	i 
	z.
	t 
/
	k
 J' 	z.	t L'.$8&
W 	w.	p D	{ D	s 	l.	p 	g 	f.	p 	w	s D	j 	l.	p 	w 
	f.
	p /	gf	s 	w.	p"
	g
	w
' 
	l.
	p 	f.	p ?/	{ N' 	f.	p D' 	l.	p F 	l3D	h+:	l+
,"$.	h3D	v+:	v+
* $2D	s+ @d	s+
) 	y3$	z+
'"	h D	i"	h $ F	o D	x 	h.F	i$	x/	x7 .$(.	x D	f 	x/$$	h D	v"	h/(.	x 	x H	n D	m 	h.F	v$	m/	m7 .$(.	m D	l.	p 	f.	p 2&+H 	f.	p  D	s 	f.	p 	l.	p ' H 	l.	p D $3D	y+H"	h $ 	i. H	z 
	v.
 J	u.	t 
' L	s 	z.	t.
	t / N' 	u.	t L'.$8&?:	m; 	n+.:	x; 	o+% 	{,~x	|x	|x	|x	|x	jiJ
9  p @S #p BU p BR p BR #p BSdS DW@dV"S $.DV .S 
V.
U 
/ J'.$8&`@dR"S $ DV V.S 3$R+m:R V.S W H:V8&f &/R $ .S 
'J'.$8&n R Ap,~Y>
@ \y p @u p @t #p Bw #p Bt@dx Ds"t $ Fv Du.ds.w $ Dy <
,$ @w"u $:x.t 
wJ'.$8&
:u; v+
 y,~x	y P'@:k|SsYm^ \
* p @
 p B
 %p D
 p D
) %p D
 %p D
 %p D
( %p D
 
- D
)@d
( 
/$ D
 $ D
@d
)d
 D
 
  D
* 
, D
"
 $ F
 D
&.
@f"
 $"(.$
.
& H
& 

&.

.
 
'
'L/.$8&
B:
&; 
+
@"
 $ F
 D
&.
 & F
+ <,$ @"
 $"(.$
.
& H
&.
 

&.

 
'
/ L'.$8&
P:
&; 
+
L+
Z:
.
  F
( 
.
@f"
 $ F
 D
@f
! F
/$$
 D
$"
 $ .
$ H
&.
 
'
' J
J
!

J
.$8&
a 
.
"
!
! 
 

*F:
; 
+
^ $3d
+
.
 
(2d
,+
s:
)0d+
 $ F
 D
/$$
 D
% 
.$ D
"&/
.
 
 F
 D
/$$
 D
@d
! D
 D
 D
"
 $ .
% H
 
.

 J
.
.

 '/ 
'
/
 L
" 
.
 

.

 
/
' J
J J


 
"
H
 
"H
H
 
"H
!J
.$8&
!D

 
 D
 

"
!
!
 
 F

4$

3$
)+
 D
' D
+
#
 D
3$
)+

$ D
+ <,$!$ D
'
 D
+
+
 D
 D
+

# D
3$
)+

$ D
+ <,$!$ D

 D
'+
'!$ D
!$
'D D
+ <,$ @
 
F 
 D
 
&F F
+ <,$ @
' 
'H D
7`
+
' D
 
 D
+

 

' D
"

 

'# D
7`
"d
"
 $ .
% H
 
.

 J
.

 /
.
 
'


 L
! 
.
 '
 

.

"
/


 J' 
.
:L'.$8&
; 
+
{:
; 
+
u+
X"
 $ F
# D
&"
 $"(.$
.
& H
&.
 

&.

 
/J'.$8&
&; 
#+.
 D
)"
 $ .
 
'J'.$8&
 $ F
! D
&.
(@f"
 $"(.$
.
& H
& 

&.

(.
 
'
'L/.$8&
&.
 
&.
( 
&.
 ' H:
&; 
!+
* 
) Ap,~x
+x
+x
+x
+x	
+]    [    (' 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    INPUT.    DSK  OUTAAE    A.AAAH    N    OUTPTTTY  F    I    L    /    A    DTA9 .DAT [    :    XCDR  `M    P         LPT  DSK  S< \u p @ p @ p @6 p @ p @ p @6D+ <m,, $2D+ <p,, <s, <v,
 2F}+ 2F~+ 2F|+ 2F~+ 2Fv+ 2F{+ 3F+B 2Fv+* 2F+* 2F+* 2Fz+* 2F+* 2F+* 3F+H 2F{+8 2Fz+8 2F~+8 2F+8 2F+8 2F+8 2F+8.6b0b+8+64I4R <l, $2D+> $A0D+> <i,y@d@d D D7 D D	 D1  F F F D	 D5:	0d+a 2Fx+H & F5 3F+M 3F+V 3F+`+D $.	 D"&.	 $  H/$8&P  	.&  H*dR $.D	+D $.	 D7"&.	 $  H/$8&Y"& 	  H.$8&\ $.D	+D 	 D+D7D7+m <x,.$ D6"7/&.6 6 F D7 7 <|,
:7; +g, <},	 <,
6D5+w $. D5"5. 5 D7 7 2D+u>78&q $ D7 7 x F <, $. D3"&/.3 3 F D7 7 <,
:7; +|,7D+ <, _DZD7 7 <,
:7;$+,7D+ <2 F2 D7 7 <,
:7;<2+	 <,
 2D+3D++y F+"1D+ },D+,$A5D+ D,$A0D+ ,D <h,[ 3Dy+03D+%3d3$v+T+0+T z D { D $ D  D1 <f,[ <d,} 1D+. $.D+*  D4  D4 2D+8 $A5D4 w D $A0D+7 | D  D $A1D+@ <a,}7D+@ <,,"0D+@ <X,(+
4<Y,,$.6b0b+R+P4 Ap 6 Ap,~x6`4yxx1Pw	1X	1hpp`4yxxX68X6<XBB@@P@
$PA
$	$1P@$P@$P@
$PA
$X6B`X6DzX6>=$3$X6{zI    F    A    (' FORMAT'/)(' FORMAT: (',A1,'-TYPE ONLY)'/)(80A1)(80A1)(' ERROR IN FORMAT, TRY AGAIN.'/)S    (    A    )    {M         O$ky \d p @W p @' !p @W p @X p @( p @(@d)@dX DX &( FY DV2D(+u <<,( (0D+x <=,,0d+{ <@, <C,
 <E, g_D.ZDY Y <H,
:Y; .+}, X1D+
 .2De+ /2Df+ /3Dh+:"( $ .W 
h J'.$8& $ DX (0$+(.( DY"Y $ DY Y .2Dh+:Y8& $ DX+: Y .2Df+ $ D) ).W <I,"Y $ F, DY Y <M,
:Y; ,+,"Y $ .3Hf:V .2Hg+$"(.HV.$8&  $2dV+: &.F).)3f(+,.(/) (. FY Y1$+4 <N, g_D+ZDY Y <Q,
:Y; ++0,+ )0D+7 <<,( <S,, $ D)+p d X Ap,~XWZXW[$)X'_$.PY`$.X'_$.XWa	`Z(X^. >[.~(3~+Z	~+eZ. \x <x*<x .->Cez+a!"	b+  "b	b+Z. h+ggM?Th
&g	b+U,
?NO CORE AVAILABLE - CAN NOT PROCEED
!***,^,~*x,>+<*<,~ "p h a`~+zh  ``~+{$B!|dC/"+uP,~@@@ @@0@x@@@`edX91,>*,>Zp @\` <,,^,~SMI 1,>*,n D B+%MI 1,>*,n F B+%I5R1,>*,n G B*\/7ApX"H B/& pd"~l" B*\//& pd"~l"$ B*\//& pd"~l"
 B*\/Sp*\//&Xp B
@@
 I B*\//& pd"~l" BRF <,+lEV4i91,>*+=S,i@1,>*+=_,i@1,>*+=K>21,>*+=K>401,>*+=[<I71,>*
&I w @)@. 
"5B>
&O,~`.
.4SEQIN^CSEQOUT^ERANDOM^FSEQINOUT

%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS: 
a.3@1,>*O@+TgR~@1,>*@@,>,>@6 w+a"0B+\!"A`X#p5@Y/#p!"X#p+a\p+aa.9'1,>*,>,>O@+a,>
6+ _4`i"`Q@,> <,,^,> <,
,^*bf+t,> <,,^7@+o,> <,
,^+q,> <,
,^Z5"t,> <,
,^,7@,
,> <,,^,,> <,,^,> <!,
,^(@qd1@,,
1@#+0@*+t,> <#,,^+t,^,^,^,~(' Type G to Continue, X to Exit, T To trace.'/2H *,$)(A1)(1H 14A5/)(1H A5,1X,O6)PAUSESTOP .pX
p Xp~
p xgG@1,>*7cp+. (Bdb+).2"+*.2"TB#p@,~4B1+Pg0
2#p+&  ,~>attempt to take SQRT of negative argCR@1,>*,>,> p  p  Ep<b? $Ep$ E. .&+;".!p Ap $Ep,^,^,~!$hX$h@@h*% "K BhL " BhM+xeX2GiSHYC aSiSHINXGYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
 M?L@INXINXINXINXINXI2I2 I20I2@GiSHI4:1,>*Z.@6kp2j8M+k !pQ A` d\$}
4Lc/,L8$`.
8L F(,~H?FRSDVC - ILLEGAL DEVICE NUMBER IN CALL TO DEVCHG

&e <k,
iSN,>*@ApO
,7 OAp,~u|1,>* #p p@@1d,~SX .* ,~44y4%KbN=1,>*O@& p4B,I4@99KbN=1,>*@@&!$Lu 	`@Ap``a`+#a`+% D|A (`
/"#B{@@| !pX@x,> <x,,,^7@%+OAp+$ #pQ"A` $1@+0`=d! H: @z@@{a|+d0@ + [pd0@ + +_w6@&_w#`1 + SpXp @{
{+"@y+#+$
&&+$   Ap ,~ ERROR ON OPEN!
HH*H+G.t21,>*@@Ap! A`.!p @( ) @*@@*@@+ & "(<1D+7-B=b2(<0D+@O " ) @*(<-B=b97@*OAp !p<, *, +,~<&;(1D+?   Ap+;1D+?1$+<1d+G0$ 0d-+< $D*+B"e,r0@+a p4BcLad+``b+a $0d"+c&$$&(&}Z.Ge.&$.$ 7F+V  ,~ A$&$(DG$1$((D(D
 	`5@c .2bM+_ L.&7D!$Lu+b2"f+\ &p,j 	`,~
&f <i,
.p M}ILLEGAL DEVICE NUMBER!
"q,r 'Q&A` q@1x,~180.8X=`m,~.H  a|+u0"0b/ ,~0B1B,~0B/ ,~aJMm1,>* ,e@,/+Z"6Ap." B` " B` $7cp $1B $d, 6`
,+6cp0b "b$G ({."XB`&$@.$
a|+p0B ++w#`1"+6cp 0d $QD`,P+ ,~
&,~
& ,~@b -p\.{Q,A` 
"4P1P+#/0P8.,~``
``
CANNOT INIT DISK!

FILE NOT FOUND!
HH\.~ 
"+YC GaSa3 S;YC&<G<aS<a3&<E$;w|x) P$ B`1T!"L	b@XB` 5 D@
+2!,2,&@!.~`+4""1T""QBB 	f+ 1$9^:x,~ 8)@`) 6*( B` " B`\"
	b@ B`\"7	b!"Z(Brb7	b
 BD	b
+"`B`!"2	b`b`b+z!"2	b!`2B`+z!$2	d!$Lu+}+8	b589	d!$Lu BC DD,~@@E 9*(L BF BX B` DF DX $	d ` DE DX "2D`b:d  "b:@E+; L BX@@L =	b$+!"MX"X*"X!"`
+!!,2,&@ X
F G +! JX +d
&@ "b:5  +5   E+ + 	h	&(2 
P$ F.D &..0P`bp+)d
@ C+Ax`L+' C+d (!*Lu@

,~+d "0T,~ "
&F,~@*P$` hXF
XHXa`,~!"GB`+ @L6$G...
% Cannot do DISPOSE:RENAME. DISPOSE:DELETE assumed.
0
% CANNOT ENTER QUEUE REQUEST IN QUE UFD!
% PLEASE NOTIFY OPERATOR!
C2d;y1,>*6#p0b+@Ap ! $	b2+ "6@&Z&." p4D|.$(B{(D{0d+ B  D  ( & Q&	f2+^4&^1(~9Z H3H +j2( +r.(3(    H@@!@@~S"xZH:~.(3h *bd!$6@!GD "	d2+l3h +c  (F+6@!+nO@!+fOApZ3b+/"* B +r@Ap  :!&@@~!"x H:~GF.(3h*bu "	d2+ 3h+t6Ap++jZ	b+ @gp+6@&+
Z.$1$ $!	d+ $QD&, pZaD $ "	fQ&[[&.&."`b+!."!`aB	b:p	d+/'p.& Gp,~OAp,~G3]x1,>*@	`+,~
&#	` ~p 
Cannot write-enable high segment data area.
KbN@1,>*,
,~+Y\,Q<X\-*+6-6`-
GJ*GK/K`*}K()?K`(
K
)1"N)jgPN1B:H113H10.G1G1TE1BJ1	K1gF1
=K1`YJ1[F1Z3I1Q|L1FBE1@I(UwSP
r9W/1SSe
e'*+&+Z} $
hfy
hf`xrrwV`r
:3Vj:3V`j1IYvI1IYv`I
JI3,JI3`(!h}	W3	W3Pxr`q
9[9`Z^^xjC)9{`CwY:7wY:`6aj$aj`#<:S
(6
8@#x<lJe,(4Df:Da8
_
G
8v:2)4~Pl(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"g
&*
 R	WJ
>
_Bb
_2v	
K^
2b
2(bI|pUA$[U
a4'
ua;
cwM 3"$3'G,[No00Q+73?SG[2o<:p+u?xS=
_{
s@	qGZlY	Y&GXX%iW%u[W+0Kd%j7*/)%[4)
Zo(
(zM'(T$i(T$v@i&W
a@
u>'''
DO$,",'ta8,c31,w0-hbAI3.-TPbUDG--3fYbi>[82d)\b}Mo6234=`l2G7Q<2[a+i2o3izAzu.?H3@{	H
_ K}9"
sp 9#Y	qG8&>7	7w0460?6y5w055g4w05393PH2w062
F|1
Ix39P4P5P5P6%g|P6R!b
P7P70KuP8yqp:gd&.\zvg?

	
F~	zM{/{h3j0h04
+!
^
aa
g
u	na
uE
LnA
{2a
s
{
aA!
RA
oO

X&a
Z&A
rE
!
6A
eo
?	hA
@,a
B+
K
A?
L!
_
Pa
D
s
]	qG
*fL
*f
)av
)
(<G
(Rs
')p
'	
&
&9
%PH
%>
$PI
$PI
#PJ
#PJ
"
"PK
!a
!PK
 L
 

9LM
R
9
P4
P5
P5

P6

32s
p
P6

P7
P7
0K
*P8
h



Rq
:
tK
:

v
	



)ok
%
>4s

9LO
ts
C
Zp]
.Zp]p 
-h04ya
 
G
[o


+
	qGy	xxwQwP4vP5v0Ky
uut
ts,{,}zmf{%if+nai	qGWKW	VVUP4UP5TP5TSSU R
R^~kX^~k|pXh05	|h04	|-%H
DOa
"
W3A
LE
q$
%8A
[.E. %
'?
r
a
9%
]  %a
)e
>a
_ e"&E
*
?E
a&!6,
,e
,)
4zA
b'>GK,e
6[
Ao
!

-!
={%
d

,AF+
2!
C?
%S


_Qa
e
sP	qG	{v	{z&	z>6	z\	yR]	y	x		xC	w)tI	w	v	vY	uz:	u"[	t	tzG	s	sz%	rP4	rP5	qP5	q	pP6	pP6	oP7	oP7	n0K	{P8	nz9	m
	mW	l	l9LQ	k	k@[	j	jRu	i		i
	h
	hE	gy)	g	fC	f	e	9jX		9jXr0	~h04	-%^)	1tA	P-"3)?mG1Sm[gia	F?	dA8)booSr	Ng~	K{~,AU+ ?	T #	
S	R 7	
	
	Q K	
s# _		qG	P]P]P^P^P_&MSyvA	&G2PH%i0PIPIPJPJPKPKLPLP4~P5~P5}P6}P6||P7{.{P7z0K	zU2P8z03
yyKD"WTxj0&/1Cjx9xwg?3g.w
v
vuzM1P\u)m<)m<oS
aO'c
u[Go[hopll+t?uSw
_	
s	qGa`w04`	_w05_^w05^PH]PI]PI\P4\P5[P5[ZP6ZP6YYP7XP7X0KaP8W.?jW
VVU
U
T&)c&)xb-%@!65,AA
9Qc:]YA-aC	na
c&>s<G`2aI	o	Ak!cY&k?/?Um 9tl&?Cc
ao'G'?WB
usa;H+?kEt}R-{v
uB|- {#Hu% GW-3.{7u9D[~2.{KuMJ&!2o]23/{uaK^2G"{suuM2[%zaT+2o9s3TzAi?e39HG`Se3&n*Azih[z?f3+(/oAS3?+CK{l	hAvg3SLW &{x8?,k!,A5+; x8SHM?] #
8g/&S# 7V8{2'W
_< KS94+ap
sF _9#7'N	qGQP]PP]PP^OP^OfNP_NP_M\MP`L&MSyvL"Kw04K	Jw05Jw05I&G2IPHH9H%i0PIGPIGFPJFPJEPKEPKDDPLC9CP4BP5BP5AP6AP6@p@?P7?P7>0K%zU2P8>0=03h!
! K D"WTxj0U &/1QQCjg?3PpPq
PqPr
PrPsPsPtzM1KP\{h05zh04z
'+;YOc?wRtAktUmtiyt}zA3QzU1Gfzi[bz}o_!q[5tg+j?mSo
_ra-
su	qG]]&MS&G2zV\%i0
zk\[}[%pZZzU203Y~YKD"WTXxj0&/1U X~Wg?3d1+WMV
ZoV
UUzM1
2dESJ2dES
2dE0J2dE80(Rt`\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]!+{0K8+K0@@-MK`++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]
	()	 <<---	 +()	<#>	[. ]