Google
 

Trailing-Edge - PDP-10 Archives - decus_20tap5_198111 - decus/20-0137/infop/infop.exe
There are 2 other files named infop.exe in the archive. Click here to see a list.
?p0@0 0?hX8?x " 
 
<++;2	`D~/ - `8:2 X@-INPUT.DAT           (34X,'WMU'/28X,'FILE MANAGEMENT')(1X,'ENTER OPTION.'/)(A5)(' ','INDICATE YOUR METHOD OF GENERATING NEW FILES BY '/1X,'ENTERING  1 TO TRANSFORM AND/OR GROUP,'/1X,'          2 EDIT, '/1X,'          3 TO COLLATE, '/1X,'          4 TO SPLIT INPUT FILE INTO SUBFILES.'/)(' ','INDICATE YOUR INTENTIONS AFTER THE CURRENT FILE HAS',' BEEN PROCESSED.'/1X,'ENTER 1 TO TERMINATE ,2 TO PROCESS A FILE AGAIN.'/)(I)(' FORMAT FOR INPUT?',/)(16A5)(A5,FINVALTR/GRCOLLAUNCOLALLQ 6.0) EDIT 0FG.INP    + -<$L <J,% <I,(F $ D0Od0 $ D1 <M,,@d2@f2 D <P,, <S, <V,
33D4+L3D2+~3D5+3D3+3D4+^,
@d6b0b+T+R4V4V4V4V <%,`+N <_,, <b, <e,
6b0b+\+[4^4^ <%,`+W6b0b+b+_4b4b4q4 $ D1 <E, <B, P3d +h.$2 D3+i $2.  D3 <@,,7D+l <%,%J6b0b+p+n4x4{4p <%,,[ <?, <g,+t <i, <>,%6b0b+x+w4p4L  $ D0 <9,
E+s  $ D0 <6,Z+s $ D D <3,% $ D2 D1+d $ D & F D2+q $ D & F D2 </,% $ D1+d $ D2 D <.,!m <-,%+u $ D D <*,% $ D2 D1 D $ D <l, <o,
 &2.  F3 DP6D2+ <p,,(.$ D0 <&,#` 0 DQ 5 DQ+i <%,
P0060P1111x1xP1111P1111X	0 PQ @	0Q  Px1x`3` PQ H10012xP31611X1X0X0	$X0	X0,$X0
`X0,$ X0,INPUT.DAT (1X,'WE NOW START GENERATING A FILE. INDICATE YOUR CHOICE OF COMBINATION'/1X,' OF GROUPING AND TRANSFORMATION BY ENTERING'/1X,' 1 TRANSFORM WITHOUT GROUPING,'/1X,' 2 GROUPING WITHOUT TRANSFORMATION,'/1X,' 3 GROUPING BEFORE TRANSFORMATION,'/1X,' 4 GROUPING AFTER TRANSFORMATION.'/)(I)(1X,'TYPE TRANSFORMATIONS.'/)(2X,3I,A5)(3X,4I,A5)(3X,2I,F,I,A5)(3X,I,F,I,A5)(3X,2I,F,2I,A5)(10F)(3X,5I,A5)(1X,'ENTER CONDITIONS.'/)(A1,I,F,A2,A5,I1)(A1,I,A5,A2)(1X,'ENTER BOOLEAN EXPRESSION.'/)(I,A3,I,A5)(' ','ENTER IDENTIFICATION.'/)(16A5)(1X,'IF YOU HAVE MISSING DATA,ENTER A SYMBOL FOR IT '/1X,'FOLLOWED BY COMMA AND A 1. OTHERWISE ONLY ENTER A RETURN.'/)(1X,'DO YOU HAVE HEADER CARD TO BE BYPASSED? YES OR NO'/)(' ','DATA BEING PROCESSED.'/)(1X,'THE FILE CALLED   ',A10,' HAS ',I5,' RECORDS.'/' THE FILE CALLED    ',A10,'  HAS  ',I5,' RECORDS.'/)LT   AND  OR   NE   EQ   GT   CARD#YES  LE   CNO   DELETEND  ALTER00000,GE             [M` \
9 !p @0 !p @	J !p @`p	W p @_ p @	 p @` p @1"3 $ .0@j'.$8&
N 
B Dz 
D Dz $ D,3D`+
]3D2+
W <6,,@d{ D <9, <<,
7D1+0$0d+
a6b10b+
a+
^4
b4
Q4
b4
b <,`+
X $ D	V3D2+
f <=,, <@, 
B_D^ZD	X 	X <C,
:	X; ^+
h, u3D
@+
L <E,	 	V <H,
 G F	6b	0b+
~+
r444444444444448484848484Q4f4844
 <,`+
f <J,	 	V <M,
 G1&+
~ G0f+
~ y1&+
~ y0f2+
~ {1&+
~ {0f2+
~7F,+ 03F
A+3F
@++
~:	V+
f , 	V y Fb , 	V { H{ y Hy G HG+
f"$.	V D/"&.,// , z Hy H HG.$8&"$.D	V+
f <P,	 	V <T,
 G1&+
~ G0f+
~ y1&+
~ y0f2+
~ {1&+
~ {0f2+
~ b1&+
~ b0f2+
~7F,+ 03F
A+2F
@+
~"$.	V D/"&.,// , { H{ b Hb.$8&4+ <W,	 	V <[,
 G1&+
~ G0f+
~ y1&+
~ y0f2+
~ {1&+
~ {0f2+
~7F,+ 03F
A+G3F
@+J+
~ , 	V 	 F	+"$.	V D/"&.,// , { H{ 	 H	.$8&M+ <^,	 	V <b,
 G1&+
~ G0f+
~ y1&+
~ y0f2+
~7F,+ 03F
A+]3F
@+`+
~ , 	V 	 F	+"$.	V D/"&.,// , 	 H	.$8&c+ <e,	 	V <h,
 	J F	b <l,"	b $ H` D	X 	V$$
.	X <o,
:	X; `+l <q,
 	V 	b G1(+
~ G0h+
~ y1(+
~ y1h21&+
~0f
+
~ {1(+
~ {0h2+
~7D,+ 03D
A+
3D
@+
+
~ , 	V 	 H	 	J H	J"	b $ &
$,. *
$
	V.
 
( J.$8(
+"$.	V D/"&.,// , F	J D	X { F{ 	 F	"	b $ (
$	X. 
  J .$8&
:	X; 	J+
+ <s,	 	V <v,
 	J F	U <z,"	U $ H	I D	X 	V$$
.	X <},
:	X; 	I+
 <,
 	V 	U G1(+
~ G0h+
~ y1(+
~ y0h2+
~ {1(+
~ {0h2+
~ b1(+
~ b1h21&+
~0f
+
~7D,+ 03D
A+
53D
@+
>+
~ , 	V 	J F	J"	U $ (
$,. *
$
	V.
 
( J .$8&
8+"$.	V D/"&.,// , F	 D	X { F{ c Fb 	K F	J"	U $ (
$	X. 
  J .$8&
F:	X; 	+
B+"$.	V D	a6b10b+
Q+
O44
Q4
Q $ D	V3D`+3D2+
V <,, <, 
B_D	ZD	X 	X <,
:	X; 	+
X, u3D
@+uA
A3D
?+
v <,	 	V <
,
 `1&+
n `0f2+
n c3F
>+
q c3F
C+
q c3F
9+
q c3F
<+
q c3F
=+
q c3F
<+
q <,	 <,
 <,`+
V7D,+
A+
@+
 <,`+
V <,	 	V <,
`1&+
>+
q c3F
C+
q c3F
9+
q c3F
<+
q c3F
=+
q c3F
<+
q+
p:	V+
V , 	V ` H` , H, c Hc"$.D	V+
V"&.,// , a H` - H, d Hc.$8&
"$.	VD-$D	V3D2+!,
 1&+
;+13F
;+-++
C+$, <',
 	X3D
@+,`+
A+
@+	V+	V+"H.1/H1+,, H,2 H1.$8&
 ,(s3 <1, <4,
6b10b+ <:, <=,
 <?,, <B, <E,
 `2D
>3D
?+2D
>+F, <I,
 <L,, <O,"_ $ F	b D	V 	V.0 <R,
:	V;:	b+10b+ 0 
=+Hd6D++	a D	V 	V.0 <V,
:	V;:	a+3.0@f+
+<`,:,3$3D`+
D D	 3 Da!$ D- 
< Dd $ D+@d1+
Z 21D+ <!,7D	+3d_+.$2 D3+ $2._ D3 <,,7D^+ <,%J+
V 
9 _ Ap 	 Ap 1 Ap,~`3^	V	0`_			J	`H
:a00
:12@	0-2a-d	U0	aHz{b		0	b	UH
:a00
:12X0	cX0	$1X0	X0
(tP	u$GP
u$y${$,$0P
u$y${$b$,$0P
u$y${(	$,$0P
u$y(	$,$0P
u$y${(	$	J$,$0X0
	($,$0P
	u$y${$b$	J$,$0X0
	($,$0X0

X0
(tP
u(	$`(,(c$0$,P
u(/P
u(	$`(,(cX0
X0
$$1$,$0X0
(	XX0
X0
@	YX
@	YX0

X0
	(3(2X0
%X0
(`X1
@	YX0
+X1X		J0(`
X1
.
0s${0	W$`(' ','THEVALUEOFDVARIABLE',I3,'ISNEGATIVE,EXPONENT'/1X,'ISkFRACTIONAL,ANDjYOUREQUESTEDXK**C'/)('+','X(K)**CFOR VARIABLE',I3,'ISTOObLARGE'/)('4','VALUE!OFVARIABLE',I3,'ISTOOLARGE.4ITSHOULD4BE'/1X,'POSITIVEANDLESS THAN OR EQUAL TO 1.7E38.YOU ENTERED CODE 5.'/)(' ','THE VALUE OF VARIABLE',I3,'IS TOO LARGE.'/1X,'IT''S VALUE IS',E17.8,'. IT''S ABSOLUTE VALUE SHOULD BE LESS'/1X,'THAN OR EQUAL TO 88.02905. YOU ENTERED CODE 06.'/)(' ','VALUE OF VARIABLE',I3,'IS TOO LARGE TO BE A SINE'/1X,'ARGUMENT, IT''S VALUE IS',E17.8/)(' ','VALUE OF VARIABLE',I3,'IS TOO LARGE TO BE A COS '/1X,'ARGUMENT, IT''S VALUE IS',E17.8/)(' ','VALUE OF VARIABLE',I3,'IS TOO LARGE. IT SHOULD BE'/1X,'POSITIVE AND LESS THAN OR EQUAL1.7E38. YOU ENTERED CODE 11.'/)(' ','VALUE OF VARIABLE',I3,'IS TOO LARGE,IT''S '/1X,'VALUE IS',E17.8,'IT''S ABSOLUTE VALUE MUST BE LESS THAN OR '/1X,'EQUAL  38.3045. YOU ENTERED CODE 12.'/)(' ','SOMEONE GAVE INSTRUCTIONS TO DIVIDE VARIABLE',I3,/1X,'BY VARIABLE',I3,'AND VARIABLE',I3,'IS ZERO'/)(' ','VALUE OF VARIABLE ',I3,'IS EITHER LESS THAN -1'/1X,'OR GREATER THAN +1.0 ;THEREFORE IT IS OUTSIDE OF RANGE '/1X,'OF ALLOWED ARGUMENTS. YOU ENTERED CODE 14.'/)(' ','C TO THE POWER OF VARIABLE',I3,'IS LARGER THAN'/1X,'1.7E38;THEREFORE TOO LARGE FOR PDP-10.YOU ENTERED CODE 18.'/)(' ','ENTER POSITIVE VALUE FOR VARIABLE ',I3/)(F)(' ','ENTER SMALL ENOUGH VALUE FOR VARIABLE',I3,'.'/)(' ','ENTER SMALL ENOUGH ABSOLUTE VALUE FOR VARIABLE',I3/)(' ','ENTER NON-ZERO VALUE FOR VARIABLE',I3,'.'/)(' ','ENTER AN ACCEPTABLE VALUE FOR VARIABLE',I3/)(1X,'ENTER VALUE FOR VARIABLE  ',I3,' FOLLOWED BY VALUE'/1X,'FOR C SEPARATED BY COMMA SO THAT EXPONENTIATION IS LESS THAN '/1X' 1.7E38. BOTH MUST BE ENTERED EVEN IF ONE IS DUPLICATION OF '/1X,'WHAT YOU HAD.'/)(2F)?|Ly!vv~!!S>;%f     iJ
 <P,(K+! c.d@f+6 j.d $ D! <O,'Sdi2d#+h c.d j.d & F! <N,&_ @+6 <V, <Y,
 <M,(K+0 c.d i.d j.d ' H+6 c.d i.d j.d ' H+6 j.d7f+y 3&"+| <Z, <],
 <L,(K+& c.d j.d & F! <K,'Z @+6 j.d 3d"+ <_, j.d <b,
 <J,(K+& c.d j.d & F! <I,'5 @ c.d j.d k F+6 c.d j.d k F+6 j.d#3$$+ <d, j.d <g,
 <H,(K+& c.d j.d & F! <G,( @+6 j.d#3$$+( <i, j.d <l,
 <F,(K+& c.d j.d & F! <E,' @+6 j.d7f+0 3&"+4 <n, <q,
 <D,(K+&+6 c.d j.d & F! <C,'S @+6 j.d 3$#+@ <r, j.d <u,
 <B,(K+) c.d j.d & F! <@,&_ @ i.d7D+J <w, <z,
 <?,(K++ c.d i.d j.d ' H+6 j.d!&}2f+S!&2&+W <}, <,
 <>,(K+. c.d j.d & F! <=,& @+6 j.d 2$k+` c.d@f+6 c.d!& F+6 i.d j.d 2&+h c.d@f+6 c.d!& F+6 c.d j.d & F! <<,&1 @+6 j.d <;,'S3 #+w <, <,
 <:,(K+0 c.d j.d & F! <9,&_ @+6 c.d k F+6"l $ Dk $
$j.k.g j.d '3Hu+:k8&+6 c.d k F+6 j.d 2D$+6 c.d k F+6 j.d 2D$+6 c.d i.d  F+6"j $ Dk $
$j.k.g j.d '3Hu+:k8&+6 c.d i.d  F+6 c.d 3 F+6 <, <	,
 <
, j.d <
+B <, <,
+# <, <,
+# <, <,
+# <, <,
+# <!, <$,
 <%, j.d <(,
+B:f; h+2  ,~pk	!x0xkx	!x	!x0x0p#	!x0x	!x0x	!x0x	!x0x	!x0x	!x0x0p	!kx	!x0X1m
$jX1w$jX1|
$jX1$j(X1	$j(X1#	$j(X1,
$jX19$j(X1I
$j$i$iX1S$jX1d
$jX0p$jX0u(X0u$jX0{$jX0$iX0$jX0$jX0 ((k(' ','INVALID SYMBOL IN CONDITION',I3,'WITHIN GROUP SUB'/1X,'ROUTINE.'/)LT   NE   EQ   GT   LE   GE   OJ~\ \P !p @+ p @* #p B, #p B+ #p BH #p BF #p B, p BG@dG"* $ F- DG@f-.H  FH G., 3DQ+t G., 3DS+y G., 3DS+ G., 3DT+ G., 3DR+
 G., 3DR+ <, <!,
 <,,[ G.F H.+ 2&+ G!& F-+ G.F H.+ 2f+ G!& F-+ G.F H.+ 3f+ G!& F-+ G.F H.+ 3&+ G!& F-+ G.F H.+ 2F+ G!& F-+ G.F H.+ 3F+ G!& F-:G; -+` <,2 P * Ap G Ap,~X-G,+*X1I$G(' ','INVALID SYMBOL FOR OPERATOR NUMBERED',I3,'WITHIN'/1X,'SUBROUTINE BOOL'/)AND  OR   E>}@ \/ !p @& p @# !p @% !p @$ p @$ %  D#.&  F#1 +R"$.& $ D' '.%  D# '.$ '2H0+C.& H# '.$ 2D1+H #.& D# '.$ 3H0+L 2H1+M:'8&=+R"$.' D% <U, <X,
 <T,,[ / # Ap,~X1'$%(1X,'YOUR RESPONSE VIOLATED A LIMITATION. TRY AGAIN.'/)KK \_ <f,, <e,(K _,~x0X0Z(1X,'INDICATE NO. OF INPUT AND OUTPUT VARIABLES SEPARATED',' BY A COMMA.'/1X,' ENTER ''END'' TO STOP GENERATION OF FILES.'/)(4I)(' FORMAT FOR INPUT?',/)(' FORMAT FOR OUTPUT?',/)0S:~] \} p @i p @j !p @j !p @i 21D+ <,, <", <%,
 $3Dj+2D2+.& F~ <,#`6D2+ <*,,(.$ D~ <,#` } i Ap j Ap,~P00	jk~~P00	ik~~X0k
X0x$i$jX0xX0{(' ','ENTER IDENTIFICATION FOR EDITED FILE.'/)(16A5)(1X,'THERE ARE  ',I5,'  RECORDS IN FILE CALLED ',A10,'.'/)(1X,'ENTER NUMBER OF RECORDS WITH MISSING DATA TO BE'/1X,'ADDED TO YOUR FILE. IF NONE ENTER 0.'/)(I)(' FORMAT FOR OUTPUT?',/)0     KN@ \V !p @- p @2 p @3 !p @3 !p @2 21D+e <,, <, <,
@d. <, 21D+m XZD4 4 42FY+k*dh+m <, <!,
 <#,"2 $ F1 D4 4.- <&,
:4; 1+p, <(,"3 $ F0 D4 4.- <+,
:4; 0+w,:.+m <,, </,
 21D+
 <1,, <4, <7,
7F/+
5D <9,,(.$ DV <,#`"/ $ <<,,.$8&
 V,~P00	34XVHW/00W.2X0=X0B@5XB@5X1|	20(X	30(X1C$.0sX0I
X0S$/X0SX	30(1X,'ENTER NO. OF FILES TO BE COLLATED.'/)(2I)(1X,'ENTER FILE NAMES,ONE PER LINE. FIVE CHARACTERS OR',' LESS PER FILE NAME.'/)(16A5)(1X,'ON EACH LINE ENTER SEQUENCE NO. OF FILE TO BE '/1X,'COLLATED FOLLOWED BY COMMA AND NO. OF CARDS TO BE COLLATED.'/)(1X,'ENTER NAME TO BE ASSIGNED TO MERGED FILE.'/)(1X,'FILE  ',A5,'.DAT HAS BEEN COMPLETED.'/)OUTPT
DSK  G>eH: \ p @# 21D+
 <>,, <A, <D,
 (.? &2f ".&/& $ FW DX <=,(4:X; W+ 21D+57D?+! <F,,"? $ <I, <L,
.$8& 21D+#6D?+" # D? <M,, <P,"? $ FV DX X <S,
:X; V+&, 21D+2 <U,, <X, <[,
 <9,S <], <`,
+6  DX <8,%+/ $ DW+ ,~pXPq??X$YpXX0aX0e$?X0fX0n(qX0o
X0e$?$#X0{X0n$XX1$X     .    (10A1).         CB-i \mpj <,	 <,
"& $ Db b b2Dn+x>b8&t+
"b b Dj j b3Dm+
>j8&y b0d $ Db <,"b $ Fh Dj j <,
:j; h+ <,
 b.$ Dk k/& k Fg Dj <,
:j; g+	, mjp,~Plj@bPlj$b$i$a(' INPUT? (TYPE HELP IF NEEDED)--',$)(' OUTPUT? (TYPE HELP IF NEEDED)--',$)(50A1)(12A1)(2O)(10A1)(5A1)(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    INPUTDSK  OUTAAE    A.AAAH    K    N    OUTPTTTY  F    I    L    0/    A    DTA9 D    .DAT [    :    XCDR  `M         P    LPT  DSK  S< \
 p @* p @' p @J p @ p @% p @$ p @1@+F6D%+) <k,, $2D%+, <n,, <q, <t,
+-2F+3+.2F+3+.3F+A+-2F.2F+L .2F+L /2F+L /2F+L:02F+L 02F+L.%6b0b+L+D4I4Q+L. D-". $ + H-/$8&\  &.  H-*d^ $.D+R $. DL"&. $ ( H-/$8&e"&   H-.$8&h $.D+R  D+R7DL+y <v,.$ DK"L/&.K K F) DK K <z,
:K; )+s, <{,	 <,
 <, $.& DJ"&/&.J J F( DK K <,
:K; (+~,7D&+	 <, _D'ZDK K <	,
:K; '+,7D+ <,.$ DH"/&.H H FH DK K <,
:K; H+, <,	 <,
+2D'+3Ds+  F'+"$1D+ ,D'+6D%+1+F'0D++ F' <h,(4 '3D+03D+%3d3$ Fs0D+6  Fs  Fs %1D+? <b,(V7D++? <,,"$0D+> <X,,[+' <a,o <],%+S %0D+D <\,% %0D+F <Z,*+ <X,,[ <,+S <,, <, < ,
 <Y,% $.%6b0b+Q+P4'4) <",,+L 
 * Ap ' Ap J Ap,~xJ`I(xGP*&sFxsX*s+Fh*s+p*p'*x*XJLXJPXT@-PU$-PV$$FPWs$-PX'$-PX$-PX$(XJY`*XJ[zXJU=$G$-XJz(' ','ENTER IDENTIFICATION TO BE OUTPUTTED WITH MERGED ','FILE.'/)(16A5)(1X,'DO INPUT FILES HAVE HEADERS TO BE KEPT OUT OF MERGED ','FILE?'/)(1X,'NO MORE RECORDS ON FILE CALLED  ',A5,'.'/)YES  NO   
.DAT 6     DSK  TEMP2TEMP3TEMP2.DAT TEMP3.DAT TEMP3.DAT g?Hw \F !p @( p @& !p @% p @0 !p @+ !p @1 21D+m < H,, < K, < N,
 < F,% HZD0 0.1 2FK+d*d`+f < P, < S,
 < V,, < Y, < \,
 .2DH3DI+m < E,(K+f@d( D1 D/ D+@d/ < D,(4 < B,%7D1+t < A,%@d( (.&/+ &2f ".&/& $ F- D0.+.( } *% < @,o < >,%:0; -+z + D)7D/+ 	"1 $ D' < ], < `,
 < c, < f,
:'8&  (.&/+ &2f ".&/& $ F, D0:).+  F' (1D.F/ $3D2+ !$3D/+  .2DH+  < h, < k,
"' $ D' < n, < q,
 < s, < v,
:'8& :0; ,+  $ D(+  ) D) < =,% < :,)!$ D/ / D1 $.+2d& & D+3$&+q < 9,% 0 D* J D* < 8,% < 5,) < y, ).( < |,
 F 0 Ap,~XIGQ*
JxIxGXIGNP
JxIp0%x%pGMpILpKGx0pI0X02X09@1X
9@1X0:X09(.X #9@1X
9@1X09@1X0 "9@1X
9@1X1A(INPUT.DAT (1X,'WHAT IS NAME OF INPUT FILE ON DISK?'/)(A10)(1X,'ENTER NO. OF OUTPUT FILES AND INTEGERS WHICH INDICATEHOW '/1X,'    MANY RECORDS GO INTO EACH OF OUTPUT FILES?'/)(21I)(1X,'ENTER NAMES OF OUTPUT FILES AT RATE OF ONE PER LINE.'/)(A5)(16A5)(1X,'THE FILE CALLED ',A10,' HAS ',I5,' RECORDS.'/)6DSK  TEMP1TEMP2TEMP2.DAT TEMP1.DAT k:{ \!dp!;@d! 21D+!t <"k,, <"n, <"q,
 <"j,o <"g,% 21D+!y <"s,, <"v, <"y,
"! $ F! D!< !< <"z,
:!<; !+!}, 21D+" <"|,,"! $ <", <#,
.$8&" (.! &2f ".&/& $ F! D!< <"e,(4:!<; !+"
 D ~@d!+" <"d,% (.!/! &2f ".&/& $ F! D!<.! 1 * } <"c,o <"a,%:!<; !+" !/!1d+"! <"`,% ! D! (.!/! &2f ".&/& $ F! D!<:! ! F!"! $ D! <#, <#,
:
! <#	, <#
,
:!8("+:!<; !+"( !/!1d+"! $.! D!<"&/!.!< !< F! D! ! F!E"!E $ D! <#, <#,
 <#, <#,
:!8(";:!; !+"9+"! (.! &2f ".&/& $ F!: D!< <"_,% !< $3 D!d <"],):!<; !:+"H <"\,% <"[,% $.!2d! ! D!2$!+"T <"X,)+" <#, <#,
 !d!;p,~X ~!f!j!k
!fx ~x!ep
!f	!dx!<p ~!ip!< }x }p!e!hp!g!<P!e!e!!;!e!ex!;X0!EX0!J0!;X0!J
X0!V$!$!X0!WX0!](3X"B!]@!=X!<!]@!=X"B!]@!=X ~!]@!=X0!^0!;$!I    F    A    (' FORMAT'/)(' FORMAT: (',A1,'-TYPE ONLY)'/)(80A1)(80A1)(' ERROR IN FORMAT, TRY AGAIN.'/)S    (    A    )    {M         O$ky \#[ p @#N p @# !p @#N p @#O p @# p @#@d# @d#O D#O &( F#P D#M2D#+#l <$3,,[ #0D+#o <$4,,0d+#r <$7, <$:,
 <$<, #^_D#%ZD#P #P <$?,
:#P; #%+#t, #O1D+$ #%2D#\+#~ #&2D#]+#~ #&3D#_+$1"# $ .#N 
#_ J'.$8&# $ D#O #0$+$(.# D#P"#P $ D#P #P #%2D#_+$
:#P8&$ $ D#O+$1 #P #%2D#]+$
 $ D#  # .#N <$@,"#P $ F## D#P #P <$D,
:#P; ##+$,"#P $ #%3H#]:#M #%2H#^+$"(.H#M.$8&$ $2d#M+$1 &.F# .# 3f#+$#.#/#  (. F#P #P1$+$+ <$E, #^_D#"ZD#P #P <$H,
:#P; #"+$',+$ # 0D+$. <$3,,[ <$J,, $ D# +#g #[ #O Ap,~X#N#QX#N#R$# X##V$#%P#P#W$#%X##V$#%X#N#X	`Z(X^. >[.~(3~+$Q	~+$\Z. \x <x*<x .->(ez+$X!"	b+  "$Y	b+Z. h+ggM?Th
&$^	b+$L,
?NO CORE AVAILABLE - CAN NOT PROCEED
!*%**,^,~*x,> <%*<%  pZ@$x@@$x@@$y %9`|+$lPw,~ "p h a`~+$qh  ``~+$r$%9!$sd%:/"+$lP,~@@@ @@0@x@@@`edX91,>,],>Zp @$x\`$w <$x,,^,~SMI 1,>,],$e %; B$x+%_MI 1,>,],$e %= B$x+%I5R1,>,],$e %> B$x*\%&7ApX"%? B$x/& pd"~l" B$x*\%&/& pd"~l"$ B$x*\%&/& pd"~l"
 B$x*\%&Sp*\%&/&Xp B%@@% %@ B$x*\%&/& pd"~l" B$xRF$w <$x,+$cEV4i91,>,]+%4S,i@1,>,]+%4_,i@1,>,]+%4K>21,>,]+%4K>401,>,]+%4[<I71,>,]
&%@ w @)@. 
"5B%5
&%F,~`.
.4SEQIN^%:SEQOUT^%<RANDOM^%=SEQINOUT%
%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS: 
a.3@1,>,]O@&+%KgR~@1,>,]@@&,>,>@6 w+%X"&0B+%S!"A`X#p5@%P/#p!"X#p+%X\p+%Xa.9'1,>,],>,>O@&+%X,>
6+ _4`%`"`Q@,> <&,,^,> <&	,
,^*b%]+%k,> <&,,^7@&+%f,> <&,
,^+%h,> <&,
,^Z5"%k,> <&,
,^,7@&,
,> <&,,^,,> <&,,^,> <&,
,^(@qd1@,,
1@#+%y0@*+%k,>&<&,,^+%k,^,^,^,~('eTypeGtohContinue,Xto Exit,TTotrace.'/2H*,$)(A1)(1H@14A5/)(1HA5,1X,O6)PAUSESTOP.pX&pX&p&pj&p]X%{X~&pxCNM`1,>,]#p2b&++&("pp+ &+4@&& @&*,> <&,,&L,^ p B&*,> <&,,&1,^,~ &+7ap"`,~+P$^0&-@,~ 9~j 0x&*ASIN OF ARG > 1.0 IN MAGNITUDECR
&Z#p+&N  ,~>attempt to take SQRT of negative argKc3@ p p+&jKc3K  ,&j 
,~Kc3J  ,&j ,~Kc3I  ,&j ,~Kc3H4B'5@&m5"&+D$^0
&lU ,~,>,># $)D/$@,>4d&wX $(F) + &w5F&w5"&u"` ,'+&~#  ,> <','Z,^@,> <','5,^5&&~",^,^,^,~! ,~xxKc#@ p p+'Kc#K  ,' @,~Kc#J  ,' @,~Kc#I  ,' @,~Kc#H4B'25@'5"'+D$^0
'U ,~ D'1!$ @'0 B'15"'#`+ '.,'!"B,~+ '(BdB+ '5B'  '1,~ +7`'1+'%`d +D$^0' +D$^0
' U `d @6 '0+' '1`B"`+'/'3id +''+D$^0' #'0,> <'4,'Z,^ @`'1@,> <'4,'5,^+'"U",''0+ '+'! ,~xKc1,>,] p3"'P+':3b'P+'<+D$^0
'9U ,~+D$^0';  ,~ D'Q F'R@@'Q%"j"%'O)/;`:XD'K5f'CaF+'C.&@(|h&f'Q 'M'N 'N 'Q'MD'O@ 'Q 'R,~!t0_'"S'qf!um.	.#Y% !vyO^	RXC2|t(1,>,] p4@'j @'Y,> <'r,'Z,^'X,~{e^bC2|p1,>,] p5`'^4@'j+P$^0's#p3@'m+'l)r. !@'q! n@'q(|h"'m 'n B'q 'n'o'o'q'q'p,~+D$^0
'k 'p,~  ,~ 0_i/X3 6P'M 5( bB W
R`@x'YATTEMPTTOTAKELOGOFNEGATIVEARGG?@1,>,]p((+(+(g&t@1,>,]3p(+=+(G?1,>,]Rp(+(g&p1,>,]hpB(#`3b(+(hD((3b(+(%"(D?d$H"@($)BYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
 M?L@INXINXINXINXINXI2I2 I20I2@GiSHI4:1,>,]Z.@6kp2j8M+(D !pQ A` (=\$}
4L(</,L8$(9.
8L F(,~H?FRSDVC - ILLEGAL DEVICE NUMBER IN CALL TO DEVCHG

&(> <(D,
iSN,>,]@ApO
,7 OAp,~I5r1,>,]O@
,4"(O,){``,~ <(P,
44(R4(~KbN=1,>,]O@( p4B(Z,){4@(Z9(^9(]KbN=1,>,]@@(!$Lu 	`@Ap``a`+(|a`+(~ D(UA (`(c/"#B(T@@(U !pX@(Q,> <(Q,)^,^7@(~+(iOAp+(} #pQ"A` $1@+(n0`=d(k! H: @(S@@(Ta|+(t[pd0@ +(y[pd0@ +(y+(w_w6@(_w#`1 +(ySpXp @(T
(T+({@(R+(|+(}
&(+(}   Ap ,~ ERROR ON OPEN!
h44)@4)OX4)P4)P44)P4)PX4)P4)Q44)P4X4)P4)Q444)PId]1,>,] !pX@),> <),),^,~aJ~I51,>,] !pX@)	 !pX@),> <)+)et21,>,] !pX@) !pX@),> <)
,),^,~et91,>,] p4B) ,){5@)!!$Lu 	` D)IA (`)#/"#`XB)I ^)O@@)B p4x)?0x+)?,`)(+)?),)2)2)2)>)> #p1 #pXB),)K,)I@)@,~@@)@@@)A@@)B )@+ ,~ #pXB),)K,)I@)@+)E@@)B1x+): pXB),>)A,)K,^X@)A & 5B)< p`)R )@+)D,~,)++)2 )O ,~
&)R+)?
&)T+)?
&)W+)?R)A5@)H! H: @)A+)4
&)Y+)? +)C,~,> <),)^,^7@)O,~+)B6$)AILLEGAL FILENAME. DEVICE NOT AVAILABLE.
RENAME ERROR!
NO SUCH FILE.
HH)]H)]G.t21,>,]@@Ap! A`.!p @)[ )[ @)\@@)]@@)] & ")[<1D+)j-)u=b)e)[<0D+)rO " )\ @)\)[<-)u=b)l7@)]OAp !p<, )], )],~<&)n)[1D+)q   Ap+)n1D+)q1$+)n1d+)z0$ 0d-+)n $D)\+)u"*,*$0@+* p4B*Lad+*`b+* $0d"+*&$$&(&}Z.G*.&$.$ 7F+*	  ,~ A$&$(DG$1$((D(D
 	`5@* .2bM+* L.&7D!$Lu+*2"*+* &p,* 	`,~
&* <*,
.p M}ILLEGAL DEVICE NUMBER!
"*#,*$ 'Q&A` *$@1x,~180.8X=`*,~.H  a|+*(0"0b/ ,~0B1B,~0B/ ,~aJMm1,>,] *N,+@,+b+*FZ"6Ap." B` " B` $7cp $1B $d*O,*H 6`
,+1+*G6cp0b "b*O$*z ({."XB`&$@.$
a|+*@[pdp0B +*D+*B_w#`1"+*D6cp 0d $QD`,++ ,~
&*P,~
&*R,~@b -p\.{Q,A` 
*T4P*N1P+*U/0P8.*J,~``
``
CANNOT INIT DISK!

FILE NOT FOUND!
HH\.~ 
*U+*JYC GaSa3 S;YC&<G<aS<a3&<E$;w|x*\ P*W B`1T!"L	b@XB` +h *v@
++e!,2,+X@!.~`++f""1T""QB*u 	f+ 1$9+:x,~ 8*\@`*\ +i*( B` " B`\"
	b@ B`\"i	b!"Z(Brb+j	b
 B*w	b
+"`B`!"2	b`b`b++-!"2	b!`2B`++-!$2	d!$Lu++0++j	b5+k+k	d!$Lu B*v D*v,~@@*x +l*(*~ B*x BX B` D*y DX $	d ` D*x DX "2D`b+ld  "b+m@*w++m *~ BX@@* +p	b$++@!"+X"X*"X!"`
++T!,2,+X@ X
*y *y ++T JX ++
&+r "b+l5 +S++;5 +S *w+ ++S	h	&(2 
P*W +x.*w &..0P`bp++[d
@ *v+Ax`L++Y *v++ (!*Lu@

,~++ "0T,~ "
&+y,~@+@*\P$` h/*x
XHXa`,~!"GB`++S@*6$*y.+M.+O.+P
% Cannot do DISPOSE:RENAME. DISPOSE:DELETE assumed.
0
% CANNOT ENTER QUEUE REQUEST IN QUE UFD!
% PLEASE NOTIFY OPERATOR!
C2d;y1,>,]6#p0b+,L@ApS,TR$	b2+,9x"6@&Z&."Rp4D,..$(B{(D{0d+,LB,SRD,R(S&FQ&	f2+,4&,1(~9,Z,13b,R+,L/"*,Q B,R+,%@Ap ,R:!&@@,1!"x H,1:,1GF,1.(3h,Q*b,' ,T	d2+ 3h,Q+,&6Ap+,L+,Z	b+ @gp+,J6@&+,?Z.$1$ $!	d+,L $QD&,,M pZaD $ ,U	fQ&[[&.&."`b+,L!."!`aB	b:p	d+,L/'p.& Gp,~OAp,~G3]x1,>,]@	`+,P,~
&,U	` ,1p 
Cannot write-enable high segment data area.
KbN@1,>,],
,~,]Y\,_Q<X\,_*+6,`6`,`
GJ,]GK/K`,]}K,[)?K`,Z
K,M
)1",)jgP,1B:*z113*{10.*z1*y1T*x1B*|1	*}1g*x1
=*~1`Y*}1[*y1Z3*{1Q|*~1FB*w1@*|(UwS+
r9W+b1SS+
e'*++1&+Z} *W
hf*+
hf`*+$rwV`*$
:3V*:3V`*1IYv){1IYv`){
JI3)^JI3`)[
gv)
%N?))!h(V	W3([	W3P(Q
o9(k(Ko9(k`(J
_9(4_9`(3^^xj()9{`(v*'{9LR()qJ'wRv'9LR0'wK'Z
f'SKP'R~Z'5~Z`'4.G'.F'.E'.D'.V'	WG'~I'."g&a."f&d."e&g."d&j	WG"&~J &^aj&Laj`&KDR&1DR`&0|R&|R`&<:%J
(%-
8@#x%3lJ%e,(%+Df%1Da%/
_
G%
8v:%))4~P$c(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|p$L
#~$
$1-#W#|A$##RU$$
a$+'$
u#X;$w$$D$3$$3$G$#[$Eo$'$'$H+$.3#v?$JG$[$)o$3$1#g+#l?#oS$4
_#r
s$7	qG#Ql#P	#P&G#O#O%i#N%u[#N"0K#[%j7#!/# %[4# 
Zo#
#zM#(T$#`(T$v@#`h04!d
a!]'"e
u!E;"d""(""+)"=o#="I#Q"T#	+#
3!?"8S"9["V?";o!oS";"kg#"n{#+"q #?"j ##S"g 7"G
_"s K"H
s"v=O"=	qG!E%!EH]+!;PH!:%i0R
5!!P4!XO!P5!P5!P6!sQ23p!P6!P7!.!P7!0K!dP8!
!|!/!{1M3zO0
!%!|G; {42M
2zM1() ~H
}XQc!mXQcq!mAdzUmz
aq' @
ut; > #  +3  "G  0[ )Ao h=  kQ 	 + ? nG 3S q[Z? so HS v Kg = N{ :+ F  9?` # 8Sa 7 5
_ P K y
s S _ |	qG2
]91H1;/0	0%i0T/
Um9/HN.P4.P5-P5-P6,sQ23P6,.+0KFR
3i+-]*/){15)M3/(HCg(zO0
'%'{42M
2zM1/V&H
%SSZ%PrpS'UVn}?B&WS
aT'='4;<+6,c]3\,wD^-\bAI3e-F\bU[Gh-3ZebiU[v2)hb}Los23=ls2GQz2[ +{2oY3uzAzu.?3P{	G
_, K
sn 	qGL&>L	Kw04K0?Jw05JgIw05HPHH9G
F|F-
Ix3s9-P4,P5,P5++P6*%g|*P6)P7)R!b
(P7(0K
P8'y'qp:&gd&&.\%zv%g?$

F~{4zM{/{h3skP
3G
o
q+?tSt
_y
sy	qGlw04kl]+jj%iCiP4iP5hP5hP6g0Km
b
b%\ja
T^'oT^'{ o"
II#I}f:A%oUX:AM'[;9O]:FaaS
_=
sF	qGaH	X;/X%i0&EYWP4WP5VP5VsQ230KR
3i$h#{1M3HCgqzO0{42M
2zM1R!!?/V?
L~+L~+wPh04VC+lJ%I',;/O
w473u2!	S93G
[<3rGyo
	k_{%mj+?S
_h
sh	qG=H	4	0s&G4 493%i0Y/Z
3 492Y/Z	2P41P51P50P60sQ23%g|/0KV2/{1g?.M3Y9a2.u=-zO0{42M
2zM1KZKvPYh04~zAkG[o"%+
?'
_
s	qGkH49j%i0Y/Z
j 49iY/Z	isQ230K}{1M3zO0{42M
2zM1|A|A{05aIZGc[aofe	qGZH
2zM1b`b}P`5LIM]'3TGR[7o;==+C?HSL
_U
sX	qG'Hi0&P4&sQ230K/&./%{1XMs%&.6$M3zO0Y3b${42M
2#zM1(B#X2X{@1ziy[]z}o{`{%
{9+!?S
_
s	qGIHWjH	G":G%i0F5'-P4-sQ230KP,&./,{1&.6+M3u=+zO0Y3b*{42M
2zM1
h	U
h	zTh04!2q#&	9SjO&kU
ak$%J'J'
up$9I;I+	
Ecg,',ct}X&E|F-|um!^?E"%@[n2)A<&q?uG7SBcu'0,e[0?@ha6-q%w'-o1Sw	hABhu`-q9d'A 2gz{%(i	hD{?i+Q Si1?T #}iESP 79!iY
_O K>2]&	%WimMp
sN=	qGm0%lolH9i%i0)TSiP4hP5hP5gg4fsQ230K 
f1ed
oe{1M3u=dzO0
d%c{42M
22czM1;|h%;|hh`%-2q
a s=97
-;VA
	3
<%M9K
+OXU
[%s^9_
*cZ]	13-
A
]&b9s
(w]U3A
E
^&Y>_
'`i
lIA3U

=&/X>s
8$ c$}8m
V8AV?
B3' w 
8U
	
h&Wc?
B!! %
h&ke?/
F2!l1M
V 9Q8}

C&h?C
O)!3 M
9
	
E'l?W
u
Wa)l?k
v99
r,l?
X1
%a9M
5Q
qcJ,'o@
X4%u9a+
py,O}zS?7
X&5>a
>
,c{zg
S:ti
N&1G>u
8!3,wzz{
n?=&EJ-y{
eS?&YN?
F3-x{#
lgB&m]{7
k{E2u{K
i
+l=T23
{_
h#F,`
{s7I,
ZQ,2[
+KL,)c
s_O-	c3
j}a,=ss
aGo}uv
 ,e

?&3+z/
|sR,yfo
ZS$3?
C
43S
W,-!
W8?}k
L1
%-5+ [8S
C(E
b2!
] #C8g
1
~q25S
M 7B8{
0kS2I
]
f{u
m
~3E
.
_
N K@9
/
Q
s6 _?9#
.'!	b0%	bP]	aH	Xl]+	W}	V	V0%	U":	U02	KPH	J 49	J%i0PI	IPI	IPJ	H)TS	P0i	PJ	-	PK	PK	PL	Y/Z
	)Ra 49`HN`Y/Z	_P4_%p^P5^P5]^u~wP6sQ234bP6b%g|aP7a|lT`P7`0K
9P8_
_)R-,{y},1zd
oH&./$*s{1)Rd&.62g?1M3{W21u=0zO0[0
/MD9P/|G;.Y3b-{42M
22{zM1H7{uP\t-=h
E
2dEsJ2dEs-=hSp
D(R8h040{AtBmx@
a	'l;n:Au?wu2Su,39~?	633G/[.o-=:M^*Qd,/le+o3%?,QVGJSp[I?&5
_^u
sT	qGH}&G%i0 49QY/Z
P 49 Y/Z	 %psQ23p%g||lTUJ{1g?M3{W2rWf`zO0u='%|G;{42M
2zM1}
RM>0ORM>\>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 `8+ X@@-S:5|++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]
	()	 <<---	 +()	<#>	[. ]