PDP-10 Archive: decus/20-0003/pform.rel from decus_20tap1

Trailing-Edge - PDP-10 Archives - decus_20tap1_198111 - decus/20-0003/pform.rel

There are 4 other files named pform.rel in the archive. Click here to see a list.

`[0`[@

AND

E
A

5Error in block structure: BEGIN expectedMissing   'END'  statement              Missi

=ng   'THEN'   for   'IF'           Missing    'OF'   in    'CASE'          Missing

F'EXIT'   in   'LOOP'          Missing right parenthesis               Missing closing

N quote on this line      WARNING: This file has no main body     Missing closing poin

Wt at end of program.Line too long. I'm gonna get confused.

aMissing  'UNTIL'  for  'REPEAT'

]Missing right bracket

eMissing close comment at end of program.	 HHHH"HFHHH$0 @BDFHH	( R\Q|> Dp Fp174 p2dp+4

 p Dp+	(4 p Dp4Q~Y|,~          @s?|@NA         @#@T@u	 B         ?{@S@%@PdMIN       ?{@T@f@?| @?{@h	-pS	( P(",R\Q|> Dp Fp4 p3$p+)4% p Dp+*4' p Dp	(H*4)Q~Y|,~          @s?|5@NA         @#@T2@uB         $3?{@S@%MAX       ?{@T/@V@=a4 @(?{@M"-@" 9H	(9XXwXwXwXwXwXw \Q|>4*Z$, xXw D4>	 
BXw Z& ( *Z,,4AXw Z& ( *Z,,E4EXw	 "J Z& ( *Z,,I4I^$d9Z&) "pf4MXw Z& (p	 Q@S *Z,,M4PZ$,? xXw D4TXw Z& ( *Z,,T	(@ ([4WZ$,U xXw D4[Xw Z& ( *Z,,[4^Xw 	  dZ& ( *Z,,b4bXw Z& ( *Z,,f4fXw Z&	  l ( *Z,,j4jZ$	,\ xXw D4nXw Z& ( *Z,	*@u,n4qXw Z& ( *Z,,u4uXw Z& ( *Z,,y	(
}4yXw Z& ( *Z,,}4}Xw Z& ( *Z,,4	 (
XwZZ& (Z*Z,,4XwZ&(Z*Z,,	4	Xw	Xw(ZZ& (Z*Z,,Xw Z&	  ( *Z,,4Xw Z& ( *Z,,!4!Xw Z& (	 P( *Z,,%4%Xw Z& ( *Z,,)4)Xw Z&	 ( *	"@P0Z,,-4-Xw Z& ( *Z,,141Xw Z& ( *Z,*@9,545Xw Z& ( *Z,,949Q~Y|,~	 ?STARTRUNERUNHELPUPPERCASESAMECASELOWERCASECAPITALIZEVERSION:TASMANIANSUPER	 HSTRING-CASE:SAVE-COMMENTRESERVED-CASE:QUIETPROCEDURE-CASE:PRESERVENONRESERVE	 PD-CASE:INDENT:FORCEELSEIFDENNYCOUNTCOMMENT-CASE:CASE:BEGIN:BAR     	$@P@Y     @3?|e@INVISIBLE @c@S@4@RSTRING   ?{@@e@.ad9@<b@(G@8ADEFINEOPTI?{?{@^D
G=_
R:_
S9@	@<?@|@@	<@@A@

A@

LB@

C@@<E@|F@<G@|H@<I@|K@<L@|M@<N@|O@x@<Q@|R@<S@|T@<T@|U@<V@|W@<X	(*hXwXwXwXwXwXw \Q|>4=^$ Di4m@@

'4n@@

)	*E(U
p4o@@

*4pZ$ D

,4q@@

+4sZ$ D

.4t@@

(4uZ$ D

,4v@@

)	(Q*U
y4xZ$ D

-4yZ$ Dk4z@@

*4|@@

+4}@@

'4~Z$ D

-4Xw	"U*@@@4@@m4@@l4@@l4@@

(4Q~Y|,~          ?{?|
 
@!SETDEFAULT?{?{@!.DMPtkMP~hMPh	((i	(U
"4Z$ D

'44 k0$+4Z$ Dk44 m0$+"4	*U*U*"m Dl4 l Dl4@@m4 +%4!@@l4"@@l4#4$

)4D,	*U*&4% k Dl4&@@m4( k Dl4)Z$ D

.4*4,Xw 1D+A	(((/4,Xw 1d1$-  D

.4/Xw 1d1$- 1 D

-42Xw 	 TT71d1$- 5 D

-46Xw 1d1$- 8 D

,49Xw 1d1$- <*@@@ D

,4=4@Q~Y|,~wXwX?{?|E@(6GETOPTIONS?{?{@(^D(T\7(T\:"@@P,4P4QQ~Y|,~V?Qd?{?|V@*>ERRCHECK@?{?{@*fD]lK]lH]lH	(XwXwXwXwXwXwXw\Q|>4Q	,4]Z$,4	(P*a$&,4`$4D4	4Xw 	** 
|4v
|@`@1d#HH	($XwXwXwXwXwXw^\Q|>	4$1D	 (5@ ( 
p	0*@A4FE4/ p	/$0$0d- 2^$d# p	/&	 D@*>0&0f- ;^&f$ "p& "pf49 p	.$ Dp	4B+04D p		 P
F/$0$0d- ?^$d$"p$1D+N4E p	.$ Dp	4K4M p		 @O/$0$0d- H^$d#Z& "pf4N p	.$/$0$0d- P^$	(Wd#Z&7 "pf4S p	.$/$0$0d- V^$d#Z&2 "pf4Y	 ` p	.$/$0$0d- \^$d#Z&; "pf4 p	.$/$0$0d	(@(h- b^$d#Z& "pf4e $
q+4p$$&,4q,4s~$&,g4u|$p~&,4w	*U*y$@NEW          @A?|!@@^JFNS      @B@S@A@

FIELD	%pLENGT@Ac@S@A4@FLPLUS5   ?{@S@Ad@OLDNAME   @C,@C[@B	  NEWNAME   ?{@Bs@BEH@Bpd#@C

b@CFPTR       ?{@S  @C-@CXd$@Ctb@CpFSTARTNEW  ?{?{@DDV?Qd(V?Qj%V?Qk#@~@>$@>D@>\	( U#.R\Q|>4,=4% $ &,s4&,4( pB$4D.4)	 U Q*, $ &,(4+4-,\4. pB$4D34/Z$,4142,k43	(T@ 444,44,{45 p, x Dp46, x Dp49 p1D+	*@A*=4;,K4=, x0$0d	++4>, x Di+4A4D $	 E(UE &,4DZ$ D

)4F+4HZ$ D

*+4I4K p, x1d	"U Q*N1$- ? D

,4K+4O4P $ &,F4QZ$ D

+4S+4T4U	"*E(V p,L x1d1$- N D

.4V+4ZZ$ D

(+4[4] p,W	 *E
_ x1d1$- Y D

,4]+4a4b $Q &,R4cZ$ D

)4e+	*
U
g4f4g p,^ x1d1$- ` D

-4h+4l,B x Dk+4m	(*E(p4o $ &

*4r+4sZ$ D

++4t4v $ &	*(@*x,q4wZ$ D

'4y+4z4{ p,i x1d1$- k D

-4|+	(@"Q*4 p,} x1d1$-  Dp+4,m x Dm+44 $	"E*U*	 &	,x4Z$ D

(4
+ADIKPU[]bg	*U*U motv{4

+44,K4$*PQ* , .O ",4,4,(4Q~Y|,~	 !Oldsource? FORMATINDENTATIONNEWLINES IN STANDARD PLACESPROCEDURE AND F	 	*UNCTION DECLARATIONSFORMAT FOR COMMENTS/E          @V?|j@UnCASESCOUNT@f4	0`2@S@V@CASES     ?|7@W$&@VECALLTABLE ?{@W$>@Vu@W R;	!D0;@W02d@WL@WHG2OPTIONS   @X@W$4@WmRESCANNING@!,!@XK	 xC@X8@XHAETRUE      @YLH@XLa@X\@TIME      ?{?{@Y@RUNTI	 8@LME   TTY       @Z<O@\@YM0
hTRUNC     ?{?{@Y~@(SQR  @[;TTYOUTPUT	4 `T@Zk@\@Z=@{@[>WRITELN   ?{?{@[f@\dbFALSE     @btd@XK@\@CLOSE     	8`e@]4g?{@\NCHR       ?{?{@\v@@ORD       DISMISS   @a

m?{@]6DELET	"pnE    ?|p?{@]^CURPOS    @`t@P@^@?hdCOS       @_@`@^F@	 @v?` COSD      @_C@`@_@?Y COSH      ?{@`@_F@?W	 8 @`dDATE      ?{@`S@`@?gd @`Pd@`lb@`h@	 DISPOSE   @a3?{@aEOF       @as?{@a6@XSUCC      EOLN      	0@b3?{@av@`EOF       EXP       ?{@`@b6@?_ INPUT     ?|	10@\@bu(GET       @cK?{@c&GETLN     @dD?{@cNGETLINENR ?|!?{	 p!@cvGETINDEX  ?{?{@dGETX      ?{?{@dFHELP      @el)@W#@dm 	!`@)EACHCASE  @(\e@eK@e0@eHCI         ?{@S@em(OPTIO	'

02NCOUN@fL&@S@f@	SWVERSION ?|7@S@fL@SWTAS     ?|:@S@f|@	 `

:SWSUPER   ?|=@S@g,@SWSTR     ?|@@S@g\@SWSAVE_COM?|C@S@h

@	 `CSWRES     ?|F@S@h<@SWQUIET   ?|I@S@hl@SWPROC    ?|L@S	 K@i@SWPRESERVE?|O@S@iL@SWNONRES  ?|R@S@i|@SWINDENT  ?|U	0@T@S@j,@SWFORCE   ?|X@S@j\@SWELSEIF  ?|[@S@k

@SWCOUNT   	,p@\?|^@S@k<@SWCASE    @l|a@S@kl@SWBEGIN   ?|d@S@l@SWBAR#e     ?|>@S@lL@SWCOMM    ?{@S@l|@	STARTFILES?{?{@m.@V?Q`$V?Qk#H @QP@H@x@Dt!@ED!@HT#@L<$@N

%@N|(@Q,@S.@S$.	(myR\Q|> Dp4 pQ$X$p*$p4o#p#p/#&$r1fr	"

u1&-  Fp4rQ~Y|,~          @o;?|@oSY        ?|~@q@o=$	 `~HACK      ?{@p@om@pd@qxINT1      @qL@T

@p5@ALF  	!8@     ?{@q@pe@@qd@q,b@q(@INT2      ?{@S@qM@	 a`@qxA @XH@rA$	@r4@r0A$?|HASH      ?{@s{@rV@ =[t @mX?{@sJr@#]-mm	( "<R\Q|>4w $

%,m x0$0dr- h r Dp4@@p4! $	 ( # p1F@ pB&A4D54" p0D1D-  $ &

%Q$H`Q&H` (	  P,3B=h,2B+14'Z$ Dp+44/ p0D1D- )[ Dp	*EA441+#44 p4D945 p Dp+:47^$ Dp49Q~Y|,~     	$@0@=     @ws?|[@wNPOINTER   ?|B@xS@wuFOUND     ?{@XK@x%@xP	(@8`ERF@x`dG?xSTRING    ?|J@qJ@x}@NEXT      @y[@{$M@y-pSTACK	!"dN     ?{@z@y]`@zRQ@zdS?xTOP       ?|V@XLV@z5P@(NEXT 	!"V     ?{@{@zeP@ @{RQ@{ RFFIND_SY   ?{@xS@{6@=Yt @s8?{@KyfKyk	((Q_	R\Q|> Dp Fp4: .$ D4b $p,m x1dr1$- v	"g Dp4d $, Dp p0F1F- 3 $,>,i,^XD4h p0D	"@ p1D- kQ(pX(*(4n p0D1D- pZ0D1D- tZ& "f	(x4r p0D1D- vZ0D1D- z^& "f4x p0D1D- |	    p0&0fr-   rQF4~ p0$0dr-  p Fr4Q~Y|,~	!

P	          AC?|ASY        ?|@qAEPOINTER   A#@xSAu  @POS       ?{@sA% FIRSTDEF  ?{?|

AV@TA_TB_	(*U
-R\Q|>4
Q$X$r*$d4@@f@@e@@f4Z$ De@@g@@g	*EU" 4@@h@@hZ$ Di4 Z$ D

0Z$ D

44"@@

0@@

14%Q$X$

%*$

&*P(Q$'X$

$*$

%4&Q~Y|,~ ,                    ?{?|/AVREINITIALI?{?{A~@55@`A

,	(*U2R\Q|>4*@@

344@@

245@@

.46@@

/47Z$ Dp0dr+>	 

: p0$0dr- ^& Fr:p+948  ,_  ,_4> 	"C ,_  ,_4B  ,_  ,_4E  ,_ 	"AAK ,_4I  ,_  ,_4L  ,_  ,_4P	 A A T  ,_  ,_4S  ,_  ,_4W  ,_	 P P \  ,_4Z  ,_  ,_4^  ,_  ,_	(((e4a  ,_  ,_4e  ,_  ,_4h  	(m,_  ,_4l  ,_  ,_4o  ,_  	*

v,_4s  ,_  ,_4v  ,_  ,_4z 	"~ ,_  ,_4}  ,_  ,_4	  ,_ 	"AA	 ,_4	  ,_  ,_4	  ,_  ,_4		 A A 	  ,_  ,_4	  ,_  ,_4	  ,_	 P P 	  ,_4	  ,_  ,_4	  ,_  ,_	(((	 4	  ,_  ,_4	   ,_  ,_4	$  	(	),_  ,_4	'  ,_  ,_4	+  ,_  	*

	1,_4	.  ,_  ,_4	2  ,_  ,_4	5 	"	: ,_  ,_4	9  ,_  ,_4	<  ,_ 	"AA	B ,_4	@  ,_  ,_4	C  ,_  ,_4	G	 A A 	K  ,_  ,_4	J  ,_  ,_4	N  ,_	 P P 	S  ,_4	Q  ,_  ,_4	U  ,_  ,_	(*Q
	\4	X  ,_4	\@@4	^Q$rX$*$q4	_Z$ D

i0d/+	h

i/$	 E(Q"	d0$0d- <Z&

i:

i+	b4	aZ$ D

m4	hZ$ D

n4	iZ$"D
(	mZ$DD

w4	nZ$ D

o4	oZ$ D

p4	qZ$ D

v4	rZ$ D

x	(D(	u4	t^$ Dp0dd+	| p.$0$0d-- 	eZ& F	v:p+	w4	uZ$ Dp	"""	~0d+
 p/$0$0d- 	zZ& Fm:p+	~4	|Z$ D

i0d +
4
	((*

i0$0d?-

i F	64

i0$0d?-

i Fv4
	:

i+
4
	"E 
Z$  D

i0d-+
4

i0$0d?-

i.& F	64

i0$0d?- 
	*UT

i Fv4
:

i+
4
Z$- D

i0d0+
%4

i0$0d?-

i F	6	**Q

 4

i0$0d?-

i Fv4
 :

i+
4
#Z$0 D

i0d=+
04
%

i	 U Q*
(0$0d?- 
"

i F	64
'

i0$0d?- 
)

i/& Fv4
+:

i+
&4
/	"U
1Z$= D

i0d?+
;4
0

i0$0d?- 
-

i F	64
3

i0$0d?- 
5

i*U 
9 Fv4
6:

i+
24
:,4
;Q~Y|,~	 
>GET       GETLN     PUT       PUTLN     RESET     REWRITE   READ      READLN    BREAK	 
G     WRITE     WRITELN   PACK      UNPACK    NEW       GETLINENR PAGE      PROTECTION	 
OCALL      DATE      TIME      DISPOSE   HALT      GETSEG    PUTSEG    MESSAGE   LINEL	 
XIMIT REALTIME  ABS       SQR       ODD       ORD       CHR       PRED      SUCC      	 
`EOF       EOLN      CLOCK     CARD      LOWERBOUNDUPPERBOUNDEOS       MIN       MAX  	 
i     FIRST     LAST      COS       EXP       SQRT      LN        ARCTAN    LOG       	 
qSIND      COSD      SINH      COSH      TANH      ARCSIN    ARCCOS    RANDOM    SIN  	 
z     ROUND     EXPO      OPTION    TRUNC     LENGTH    GETCHAR   POS       STRLT     	 STRLE     STREQ     STRGE     STRGT     STRNE     GETFILENAMGETOPTION GETSTATUS ASKFI	 LENAMSTARTFILE GETPARAMETGETNEXTCALFILNAM    REENTER   SETTIME   TIMEREPORTRUNTIME   	 ELAPSEDTIMPUTCHAR   ASSIGN    SUBSTR    CONCAT    SETRAN              A3C?|A3  I         ?{@SA3EINITIALIZE?{?{A3v@^hLA2^hLO2@	A|
>At
?A
?A

@A4
@A,
AAL
AAD
BAl
BAd
CA	
CA|
DA	$
DA	
EA	<
EA	4
FA	\
FA	T
G@	A	t
GA	l
HA

HA

IA
,
IA
$
JA
L
JA
D
KA
d
KA
\
LA
LA
|
MA
MA
NA<
NA4
OAT
OAL
P@	At
PAl
QA

QA

RA

,
RA

$
SA

D
SA

<
TA

d
TA

\
UA

|
UA

t
VA
VA
WA
WA
XA
XA
Y@	A
YA
ZA

ZA
[A$
[A
\AD
\A<
]A\
]AT
^A|
^At
_A
_A

`A4
`A,
aAL
aAD
b@	Al
bAd
cA
cA|
dA$
dA
eA<
eA4
fA\
fAT
gAt
gAl
hA
hA

iA,
iA$
jAL
jAD
k@	Ad
kA\
lA
lA|
mA
mA
nA<
nA4
oAT
oAL
pAt
pAl
qA

qA
rA,
rA$
sAD
sA<
t@	Ad
tA\
uA|
uAt
vA
vA
wA4
wA,
xAT
xAL
yAl
yAd
zA

zA
{A$
{A
|AD
|A<
}@	A\
}AT
~A|
~At
A
A

A4A,ALADAlAdAA|A$AA<A4@	A\ATAtAlAA

	A,	A$
AL
ADAdA\

A|A<A4@	ATALAtAlA

AA,A$ADA<AdA\A|AtAAA4A,@xATAL	(E(!cR\Q|> Dp4

< p0$0d+a+4$4' e/d/$ e	 @
*/& Fp Dp2dp+5 p.$0$0d-- 
8 p.&0&0f-- . 	v0&	"Q*T 20f?- 1 v F	v:p++4'+a4546 e/d/$ e/& Fp Dp	" ;2dp+E p.$0$0d-- 3 p.&0&0f-- > 	v0&0f?- @ 	6	(U**C F	v:p+;47+a4E4F e/d/$.$0$0d-- B e/d/&	 
U L.&0&0f-- J 	v0&0f?- M v F	v4F e/d e/& Fp Dp	" T2dp+^ p.$0$0d-- O p.&0&0f-- W 	v0&0f?- Z 	6	(U*@] F	v:p+T4Q+a'a6F4^Q~Y|,~          A<c?|l	  eA<>WHICHCASE ?|i@eKA<eJ         ?{@SA=SETCASE   ?{?|f nA=F@MP
"MP!H A;xA4h	(
Un

	R\Q|>4a i.$ Di4p@@h4r@@h4s $ &

$ (Q&H`	  wQ(H` *3B=jx3B@

(B&A4D

4t $h 0@7,	(
 @iZ(,& * (,4} $

Q~Y|,~

          ..          ?{?|

AANEWPAGE   ?{?{AAF@SMN$oSMN/n@xA>d

A@


XwXwXwXwXwXw \Q|> Dp4

 f.$ Df4

$	 @((

 0@7,

 & * (,

 p0$0d+

,+4

 $0@7	*T

% * (,

5 * (,

!+

 $0@7,

 p0&	"*A

(0f- \$& &

5 * (,

#+

$ $0@7,

& p0&0f-

(	"*U*

0$& &

5 * (,

++

,	*AE

$4

, $0@7,

. & * (,

2,4

9 $h 0@7,

;,

>	*D

A4

> $h 0@7,

@ & * (,

=4

A $ &

$ (Q&H`Q(H`	 (

J2B@ & (

$ *Q(H`Q*H`2B@G4D

U4

F $h 0@7	*(

R,

C hZ(,

Z4

P4

U $h 0@7,

R &

$ * (,

E4

U4

Z	(@(

[ $h 0@7,

WZ& (, iZ(,

T & * (,

Y4

Z p0$	"

c0d+

s+4

b $h 0@7,

\ &

% * (,

a &

5 * (,

i+	**

l4

e $h 0@7,

g p0&0f-

0$& &

5 * (,

k+

l $h	 @"*

t 0@7,

n p0&0f-

p$& &

5 * (,

r+

s	*U*A(

l4

s $h 0@7,

u,

A4Y|ORAAT-----:!r	AQS?|kAQ.ERRNR     ?{	0X

bAXD	L@XLAY5AY`d?|bAYxdXELSEHERE  ?{@XL

ATHENDODELS?{@XL@XL	9dRESCASE	<EA^4RESSY     ?{	1

@OPENBLOCKS?{	1

EQLSYA |@A`,ERRCOUNT  ?{@TA`-

h	 2VARIANT_LE?{@TA`]

pLEVEL     Aa;@SAa

xLINE500SIOAak@TAa=	0,@"bdbAb`	(dCPAGECNT{?{@TAc@Ag@LINENRTY  ?|AgkAgDAghc?LPARE	%@pANT   @SA^|CAh

@POINT	AcdFA^|NAh<@PAGENRTY< AiAiCAhlPM   	! I     ?{@+Ai`Ai@c?COMMA     A[|6A^|QAid@SEMICOLON 	>pRAjD3A^|hAj@STACKTYPE Al\V@zAjDSPACEPRESE?|l@TYAjm

@	 "@kRTIME     ?{@SAm=hRBRACKET  ?|qA^|
Aml@QUIET/AnK@XLwAn	0HtEQUIT[@?{?{AnNBARRING   ?{@XLzAnuEDENNYING  Ap<}@XL!Ao%	0AD|EDELSY     ?{ApAoUMAp dAp

bALPHANUM?{ApkAp}[PWHILESYAk?{A^|

@STRGCONST ArlQA^|4Ar<@	 8H

 AvA^{ArlSYLENG    ?|@TAs

HSY        ?|*@qAsE	0@bDXBUFFERPTR ?|"@T+Asu

PBUFFER    ?|%At{At%`BLOCK     ?{?{	 1

A'AtVAtx.dAubAud-BUFFMARK  ?{@T.Au5

XBUFFLEN   Au4	1D/@SAue

`SYTYT  ?{A^{AvDhIDENT@?{A^|7AvD@

INVARSEp?{@XL   ?|

GOTOS	'@x@YSY  @rTA^|CAx@FORWARDSY ?|
	!r@IRELEVANTSYAyD/AAlFF         ?{AY{Aym$	!p@QIFSY      Al,4A^|TAz@
REPEATSY  ?|FA^|WAzL@	LOOPSY    A{TZA^|aAz|@	 Z	LIST      ?{@xSA{,LOWER     ?{A|A{U`A|@d@,bCASESY    	&xdb?{A^|dA|@BEGINSY   A||_A^|pA|L@BEGSYM    ?{A_ljA|}[pDECSY	!H xkM    ?{A_lmA}-\PROSYM    ?{A_lIA}]\EOBSY     A_|sA^||A~

@	!` sENTRY     Av@xcA~<ENDSYM    ?{A_lgA~e[`EOB       ?{@XL:AEh	!p|DOSY      AfA^|AD@DEFINITIONAo$@SAupCOUNTING  A}+@XLqB%	0,pDxOFSY      AU{A^|BT@EXITSY    Ar

A^|B@ERRMSG    ?{Bc	$

8@PB`4dARBxdBbBFTHENSYSY  ?|CA^|B@UPPER     ?{A|]	$<BE`ENDSY     A~

A^|"Bt@INITPROCSYAvtQA^|%B$@PROCEDURESBC	8D

&A^|,BT@PROCTABLE AUB3BN B0rd@sEFUNCTIONSYAX,CA^|/BL@	 <"/PROGRAMSY B,%A^|5B|@PROG_NAME A}[@qB-DHVARSY     ?|A^|8	 <7B\@TYPESY    ?|A^|;B

@CONSTSYGBtNA^|>B<@LABELSYAg"	0D@A^{Bl@BFB8ISSGPOINT?{ARPB	T@MISSGMAIN 	&x`Q?{ARSB
@MISSGQUOTEBtMARVB
4@MISSGRPAR ?|SARYB
d@MISSG	%@xYEXIT B
AR\B@MISSGOF   B
dYARBD@MISSGTHEN ARD\ARbBt@	!pbMISSGEND  Bt

$@BEGERRINBLA|LhARB

T@BARETABLEjAnsB4(B    ?{?|

^8b

^8c

HAO0ALHHAF8ACP@|AC

AGD
	(mkXwXwXwXwXwXwc\Q|>Dp4w p.$0$0d--

w & 	v0D@ (	 E~ 
p2jp@A4F p.$ Dp+y4y p De4 p.$0$0d-	(@- { & 	v0D@ ( 
p2*p@A4F4 p/$ Dp+4

	 T*U* p2dp+b4

1B$4D4 j Dj4

)4D4 k Dj4	*P U*

34D4,$

^4@@

34+,4 $
00@7,&mj&(&*,4j&$1f++4$$ Fp Dp2dp+:4, $
:+.49 $

& 
 )H0(@A

)4DF4:

&0D+C4?Z$	*Q*A*B D

3+E4A4CZ$ D

34D+J4E,$	 DDK.$ &2$f@ e.(.(0(0h-- 4 *  	v0H@
A4FV4J	(U*DS e.$ De4S+J4U e3df+b4V $ &

$ (Q&H`Q(H`	 
U*\2B@ & h1(P@G4Da4X,o4`4a4a4b4b j Dj*U d4c@@

14d@@

24e@@

24fQ~Y|,~	pi,@ ?{?|mBnB[?|vB6POSITION?|p@SB]I~BLB;0`r@SB%XwXwXwXwXwXw \Q|>4g, x Dp4~ p1D	*E"+#4 p0D1D- Z0D1D-  "$4D#4 $,m Dp	(

4 p0D1D- Z& "f4
 p0D1D-

@p0F1F- 	PZ"f4p0D1D- pXF4$,	Dp4 p0D	"1D-pF4p0D1D-XwF4pXwD4!	(H#4#Q~Y|,~ x DpB%?|;B$^POINTER*UB&|+@xSB%P         	$,?{B%cB%5B%`R/B%pd0?xPOINTER   ?|3@xT3B&

%,_4G $, Dp4I p0D1D-  Dp, p	 @ 
O x F4K p0D1D- MXw  F4P pXw D4T+x p	 @""W0D1D- RZ0D1D- X "$B$4Dx4V $,J Dp4] p	 A `0D1D- ZZ& "f4_ p0D1D- a p0F1F- eZ "	*hf4c p0D1D- g pXF4i $,^ Dp4l p0D1D- k	 @ 
q p F4n p0D1D- pXw  F4r pXw D4v4xQ~	 	`yY|,~          B/S?|B/.POINTER   B0D@xSB/UP         ?{B03	 B0B00R/S         ?{B0sB0EB0pRQPROCDEF   ?{?{B1D

}?A

}J>

}K>	(
7XwXwXwXwXwXw \Q|>4

xXw  Dp4 p1D	*@"+54 p0D1D- t 0D1D- Z0D1D-  "$0D	*@ +$4 p0D1D-  0D1D- Z0D1D-  Z& "f	*@ $+04 p0D1D- " 0D1D- & p0F1F- ( 0F1F	(",- *Z0F1F- , "&XF4$ p0D1D- .  Dp40+	(H544Q~Y|,~          B7?|=B6vP         ?{B7KB7B7HR/ =POPOFF    ?{?{B7^D
7h
7r
7s
	(U @:XwXwXwXwXw \Q|>4

5@@k4D4E$	"THA4&4F $

$	*
AQ4M$O 0D+f4Q0$+^4X  D

$4\4^,$Z,4De	**Ppb4^4$f ] D

$4j4l,$h,d4l4o $

$ &kQ$H`Q&H`	 U*
s2B+v4p,o+4t4v h.$ Dh4v h.$ Dh4x h	"U
@{0Dz+4z@@h4|

(B$4D4} $

$ &Q$H`Q&H`2B+	*
*4 $h 0@7,nZ& (,+ hZ(,

_Z& (,+44	((*

 $h 0@7,Z& (,
 &

$ * (,

zZ& (,4

44	*(U*4h$P+4,o444@@k4	*A+F4 $
)H0(@B&((G5F/4@k.$$Dk4),$	 x Dp48 f.$ p Fp	 @E
?~Dp2dp+E	p.$0$0d--4OZ&QF	v:p+@4="pYDf4E+R	** H4G f.$Z&,,	 x Df4H f.$0$0d-- C &

4XZ$, Df4Z+f4[ f.$.$0$0d-- NZ& F	v4\	(
P a@f.$.$0$0d--*Z& F	v4a4e $
Aj4D24f$

$4j0$7,l 0D+4n	((*r $

$	*A
A*{4y4{$4D4{+$
U 4$ 0D+	4 z D

$44	,$	*Q(T*

,4	4

 h.$ Dh4 h0Dz+14@@h4	(Q

(B$4D14 $ &

$ (Q&H`Q(H`2B@ & (

$ *Q(H`	 *
Q*H`2B@G4D(4 $h 0@7,Z& (, hZ(	(((%,	Z& (,$+04 4( $h 0@7,"Z& (,' &

$ * (	(*".,Z& (,,4(40404141Z$ De42@@e43Z$ D

444 6Q~Y|,~	 H
8     -----0          BWK?|BBW&I         BW{@SBWMTABSTOP   &@?{@T<BW}READLINE  ?{?{BX.D4v	C4v	
@4v	@@@BSD8BR|8BD$9BD9	(*EeXwXwXwXwXwXw \Q|>46

04DW4J e,p4K	"P Q*MZ$ D

i4M0$7,*6D $4DT4NZ$ D

.+V4R4T,C	*TA*V4U4V+`4V e.$0$0d-- d 	v0$0d?- Z v D

i4W e	"QP^.$ De4]4_ $ f.&2fe@ D

04`Q~Y|,~          BX+(g?|hB\^READBUFFER?{?{B]D4v?H4vBE4vCE	(D
j@XwXwXwXwXw \Q|>4c $ e0F@A

+4Dv4o	*U( s k Dj4r k Dj4t4u

-0$0d+"+4v e.$0$0d-	* U {- \ e.&0&0f-- { 	v0&0f?- ~ 	6 F	v+"4yXw 4D
4 e.$0$0d--  e.&0&0f--  	v0&0f?- 	 v F	v	*P

+440d--  e.&0&0f--  	v0&0f?- 	*UP
4	6 F	v40$0d--  e.&0&0f--  	v0&	"U*U0f?-  v F	v+""y4,G4" e/$ &2Df@	( @& e.(0(0h--  *  	v

 $")L 0,@
G (

i 	"(.

 
,*)L(0,@A4F44#Z$Xw D+;42 $

i 
 ( @7 /)H0(@B$4D;44Xw@@4:Q~Y|,~ @=          ?{?|CBhNEXTCHAR  ?{?{Bh6DSOaMmSOaVkSOaWjH BdB_@|Be$=Be>Bel>Bed?Bfl?Bfd@	(QEXwXwXwXwXw \Q|>4;4J@@p4JZ$ Dp4KZ$	"T(U N Dp4M,G4N

i Dp4O

i1D+^4Q,G4S e/$.$0$	"@
*V0d-- ( e/&.&0&0f-- W 	v0&0f?- Z 	6 F	v4T4]

i	 A(P*_   7)F0&+s4^

i0D*+f4bZ$ Dp+q4d

i0D!	*"A(g+j4fZ$ Dp+q4h

i0D&+n4jZ$ Dp+q4l

i0D)+q	(*
p4nZ$ Dp4p,G4q+4r

i   `)F0&+|4s $	(*
x

i0F@ Dp4w,G4z4{

i   u)F0&+4|4	 @*  p$$

i/&. Dp4,G4 $

i 
 ~)H0(@	"A A*	B$4D4 pB$4D4
Z$ Dp4

"p Dp4444 p	 D
*0$ 0d-+~+4 p1d+4^$ Di4Z$ D

'4+4	"U"P( p Di4@@

'4+~4 p D

++~4 p1$+,4 p Dk	**U(#4! k&$ Dl4#@@m4%

)4D)4& k Dl++4' k&$ Dl	*A"U*+4)+~4+ p0$+34,"p Dl4. l Dl40@@m41+742	*Q*E*4@@l43@@l44 p Dm45+~4748Z$ D

)48 k Dl4:@@m	*Q*E"<4; k Dl4<Z$ D

.4>+~4?4@ p D

*4A

*Gp D

*4B	*
E"E+~4D p D

*+~4E p D

(+~4G p D

(+~4I p D

++~	(TTM4K p D

)+~4M p1d1$- g D

.+~4O p1d1$- Q D

-	***V+~4S p1d1$- U D

-+~4V p1d1$- X D

,+~4Z p	 U ^1d1$- \ D

,+~4]4a p1d1$- _ D

,4a p1d1$- c	*( g D

-4d p1d1$- f D

.4g p1d1$- i D

,4j p1d1$	*U*U*o- l D

-4m+~aG8KE,~~~~V	*U*U(xS~MIO@~~~]~Z4p

i1D+J(4~Q~Y|,~	 @p

           C?|C^OCH       Cd@+C	  OCASE     ?{@eKC5 OSWITCH   C@XKCeOVALUE    ?{@SC OPTIONS   ?{?{CFDrWf`HrWffFrWfgEH B~Br8@|Bk|BktBnTBnLBo\BoT	(
eXwXwXwXwXwXw \Q|> Dp4Z$ Dp4 j Dp	*(U*4

1B$4D$4 j Dj4!Z$ D

14"4$

+A

44D*4$ k	*U*E ' Dj4& k Dj4(+.4) j.e/e/$ Dj4*4- p  	((U*0 )F0&+E4.,m42

i0D+643,H454646,m47	"D8 $

i2Fp@ e/&.&0&0f-- \ ( 	v0F@AG

.4D7	*Q*DA48

.4DD4AZ$,

4B4D+P4D $

i3Fp@

.B&A	*U*"I4DL4E,m4J+F4K

.4DO4LZ$,

4M4O4O $ f0F	"T*QR@A

(4DU4P j/$ Dj4S4U,H4V $

i1F@G

04DV	*U"Q*Z4W

0A

44D]4Z,H4\ p Dj4]

1B$4Db4 j Dj4a cQ~Y|,~	 	`d          C

^FINALCCHFICSTSW?{@XKmCe!awe!a~e!a@xC|dCte	(D(s"XwXwXwXwXw \Q|>4

b@@p4x^$d "

%$/$y	^QA|0$0d

%&0&?- o.&/& 0&0f
"-}B&A4D4~ p/$0$0d- $$ $

%	&"A3B=h2B+4Z$ Dp4 p/$0$0d	*T
T-

&4

.1d1$- ,"4+4 p.$ Dp44	*$+4 p Dp4Q~Y|,~          CK?|-C&I         C{@S	 &CMJ         C+@T$C}LOCAL     ?{@XKC- RESWORD   ?{0/@XKC^@=4d`Ch?{D5"v5&t5's	(D
1NXwXwXwXwXw \Q|>4  $

&0F@G

/4D;46	"TA :@@p+L494;, x Dp4;@@p4= p1D+L4> p0D1D	(*B- 2Z0D1D- B "$4DK4@Z$ Dp4F

,1d1$- ,"	*P

K4H4K4K4LQ~Y|,~          C?|WCnPOINTER   ?|T@xSC  SFOUND     ?{@XKCEPROCCALL  ?{@XKCv@=1$`CH?{D

})4

}62

}71	(([XwXwXwXwXw \Q|> Dp4L j Dp4`

1B$4Dg	(U*Q(c4aZ$ D

14c j Dj4e4f j.e/e/$ Dj4g4j,4j	(*E*l

&  )F0&+t4k,k4o

&0D4p,@4r+x $	(*t

&0FA

/4Dx4s,{4w4x p1h#1(- J"S$@)D 	 A"E"}GG

&)D 0$+j4x p Dj4Z$ D

&2Dp+4	*A"Q ,o+

4 p0D+
4Z$,

4Z$,

4
Q~Y|,~	 Hp~`p          C"+?|C"WHICH     ?|A^{C"-OLDSPACESM$?{@SC"]PARENTHESE?{?|C#DtiO^tiR[tiS[@@CTCLC\CT	(xXwXwXwXwXwXw \Q|>4

@@d4  $

i 
 	(
A
# 0)H0(@

.B&A4D

i0$0d=+^+4'4*,H	* Q*,4+

i0D+34, $ e0F@ D

44.Z$,4142+

43	*Q"
444,H44

i0D+<45 $ e0F@ D

447Z$,+D4:	(T(U*=4<Z$ D

&4= g0D+B4>Z$,^4@4B+Y4B4C+

4D	(A"T*E4E $ e0F@ D

44E@@p4H,H4I

'B$4DW4J

i	*"P*N+W4L

i/$2Di+U4PZ$ Dp4S4T,H4U	*"T*V+M4V pG

'B$4D[4WZ$.,4Y+

4[Z$>,+

4\4^	*U*U*_,H4^+

E^^4^^^^^^*^^^	*U*U*g^^^^^^^^^^^^^^^^^	*U*U*p^^^^^^^^^^^^^^^^^	*U*U*x^^^^^^^^^^^^^^^^^	*U*U*^^^^^^^^^^^^^^^^^	*U**	^^^^\4_+!4

i0$0d.+4+4
E Q$X$

%*$

&44 d.$ Dd4 d0d+4 d/$0$0d	(T*
- ^$d

i "

%f4,H4 $

i 
,N)F(	 P*#0&@B$4D4,v xB$4D74%,4 xB$4D54'

& 	 U + )F0&+14*

,1d1$- z,"+54-41

-1d1$- /	*Q*U
4,"414445Z$

&4547+Y474849 d.$ Dd49,H	(U*<4; $

i 
 ")H0(@B$4D94<Z$

&4B

i0D!	*U"T*E+G4C,H4E+e4F

i0D+S4G4I,H $

i 
 ?	 
U
M)H0(@B$4DJ4JZ$

&4P@@d4Q4R

i0D"+d4S,H	*
U*V4U

i   M)F0&+[4V,H4Z4[

i X)F	"U"U*^0&+a4[,H4+\4`Z$

&4a@@d4c4d4d+Y4e4f	"E*gZ$ Dd4fZ$

&4h4i4j

,0D+u4j e.$0$0d-- 	(U*o e.&0&0f-- o 	v0&0f?- q 	6 F	v4l4u,H4u d.$	**Q"x Dd4v $

i0F@G

.G

04Dj4x

i1D+4|Z$,

4~	*Q(U*4,H4 d.$ Dd4

i1D+j4+Y444,H $	**

i 
,])F(0&@B$4D4Z$

&4+Y4	"U(Q*Z$ D

&+Y44,H4

i0D+4Z$

&4,H4+	(U*E
4Z$ D

&44+Y44,H4 p4D#4@@p4 + 4!	**""+%4"Z$

&4#4$+Y4%4&Z$ D

&4&,H4(Z$,^4)	*E*Q*++Y4*4+Z$ D

&4,,H4-

*4D34.,40 e,p4142	*P
U*3+Y4344

i/$0$0d- s

i D

&44,H48+Y4	*U*U*<4444f444444448888	*U*U*D888888+44444	*U*U*M	*U*U"U&49@@

44Y

34De4Z

1B$4Dd4[	(T
U*^

&1D+d4],$4@@

34b4c4d4d

34Dp	*Q"Uf4e@@

34f

&0D+k4gZ$ D

3+o4i4k,$b*@o4l4o4oQ~Y|,~	 rH(            |          CO+?|CO	!@z1         CO[?{CO/

Y111       CP?|zCO_

I (CP;@SCPCOMPC[@XKCP=INSYMBOL  ?{?{CPnD^|02^|0>^|0?H CG(C1xH C,/C% @@C$4rC$,rC2$sC4tC4

tC5<uC54uC:|vC:tvCA,wCA$w	(E
	;XwXwXwXw \Q|>4

pj Dp4

1B$4D4Z$	*U(U( D

14 j Dj44 j.e/$ Dj4,44

&0$0d	(E
U
++4,+,4,+,4+,44

&0D4,{	*U*U*"4!,4"+,	*TQ"+4#

&  )F0&+4, p Dj40Z$ D

141(U"@3

&0D+643,+845Z$,

46Q~Y|,~	 	 :~w!t          CW[?|@CW6OLDSPACESM?{@SCW]
PARENTHESE?{?{ BCXDtiOtiR	tiS	H CTHCS(@xCUd:CU\:	(Q(ChXwXwXwXwXw \Q|>48 g.$ Dg4G j Dp4I	(Q*U(K

1B$4DP4KZ$ D

14M j Dj4N4P e/e.j/d.$ Dj	*U
U"T4P,,{4T4U

&0D+Y4V,+^4X4Y

&0D4Z	*U*\,{4\,4]4^

&  )F0&+V4^ p Dj4b g/$*e Dg4cQ~Y|,~	 	 g~p          C]3?|nC]OLDSPACESMCX@SC]5CASEDEF   ?{?{ pC]fDDEaFDEb
CDEbC@xC\gC[|h	((p*XwXwXwXwXwXw \Q|>4e j Dp4u

1B$4D|	(U*T*y4wZ$ D

14y j Dj4z4| e/e.j/d/$.k Dj4|,	(@T4 $

& 
 )H0(@B$4D4

&0$0d
+

+4	*U*U
,F+4	,s+44

,|44

&  )F0&	*E*U*+4

&0D+4,4+

+4

1	"U"Q(B$4D 4 j/k Dj4Z$ D

144 p Dj4

&0D+%*Q #4!,+&4#Z$,

4%Q~Y|,~	 H(~p~x@          CeS?|0Ce.OLDSPACESM?|n@SCeURECDEF     1?{?{CfD4y{tt4y{~q4y{pH CbpCa@pCS<EC`<(C`4)Cb)Cb

*	("2aXwXwXwXwXw \Q|> Dp4

&,47

&0D+=48	*U;,4:,84;+94< $ 
p1j#1*- 3"
S&@)F(GG	("E C

&)F(0&@B$4DU4=Z$,

4F $

& 
)0(@	"U(U*LB$4DN4H,4M,<4N

&0D+T4O,4Q,N4R+O4S	*U*U(T+>4T

*4DX4U e/d,p4V

34D^4X@@

34Z0$7*P],n,n4[4^Q~Y|,~	 	 `           ClC?|gClENDSYM    ?{A^{ClEENDEDSTATS?{?|d iClvD}

5}

3}

2@xCh4`Ch,a	(Q"iXwXwXwXwXw \Q|>4

1B$4Dv4nZ$ D

14p	"T*U*rZ$ j/l/m," x Dj4q4u,4v

*G

)4D{4w e/d	*
E
z,p4yZ$,54{

&0D+4|

1B$4D4~Z$ D

14Z$	*Q*U" j/l/m," x Dj44,4

*4D4

&0D+

4		"U(P,4 e/d,p4

4+Z$,

4Q~Y|,~          ?{(?|Cr.COMPSTAT  ?{?{CrVDM-lM-jM-i	(Q"fXwXwXwXwXw \Q|>4

1B$4D#4Z$ D

14	"Q*U
 Z$ j/k," x Dj44#,4#,R4$

&0D+-4%

*	*U*Q*(4D,4',4) e,p4*+-4++/4,Z$,

4-4/4/40	*@
E"1,40

&  )F0&+041

&0D+F45 j Dp47 j	*U
*9 Dj48 j.k Dj4:Z$ D

14<Z$ D

24=,4?,%4@

&	"T*T
B0D+D4A,4C p Dj4D4E

&)0&+04F

&	 
U*J  )F1&+O4IZ$,

4M+/4N

*4DS4O e/d,p	**U*S4Q

&0D+a4S,4U

)4DY4V j/k Dj4W

*4D`4Y	(U*T([

&0D+^4[,)4] e/d,p4^4`+bZ$,

4`Q~Y| d,~	 Hd`            C}?|lC|nOLDSPACESM?{@SC}CASESTAT   m?{?{C}FDDEd3DEd6DEd7@@Cv4dCv,eCy4eCy,f	(Q"n $XwXwXwXwXw \Q|>4
b

1B$4Dz4sZ$ D

14u	"Q*U
wZ$ j/k," x Dj4v4z,4z,@4{

&0D+ 4|,	*U
U
4~,|4+}4

&0D+ 4  e/d,p4 Z$ D

14  j	*U"E" /k Dj4 ,,4 	+

Z$,

4 
Z$,54

&0D+ !4 	(Q"T*

1B$4D 4 Z$ D

14 Z$ j/k/m," x Dj4 4 ,	*T*U* 4

*4D  4

&0D+ 4 ,]4  e/d,p4 4 + "Z$* !,

4  Q~Y|,~          ?{?| &DFLOOPSTAT  ?{?{DnD(a!q(a!o(a!n	(Q" ) sXwXwXwXwXw \Q|>4 " j Dp4 -

2B$4D <4 /	(Q"Q* 1

1B$4D 84 1Z$ D

14 3Z$ j/k," x Dj4 44 8 j.e	**Q( :/e.k/$ Dj4 84 <,4 <, 4 =

&0D+ Q4 >

1B$4D H	(Q(U* B4 @Z$ D

14 BZ$ j/k," x Dj4 D4 G

*4D M4 H, 4 I	*T*U
 K e,p4 J+ N4 LZ$ D

24 M,4 N, >4 O+ RZ$,

4 P

&	"U(Q" S0D+ i4 R e/d,p4 T

1B$4D ^4 VZ$ D

14 XZ$ j/k	(U
U* \," x Dj4 Z4 ]

+B$A

*4D d4 ^, J4 ` e,p4 a+ e4 c	"E*Q( dZ$ D

24 dZ$ D

24 e,4 g, P4 h4 iZ$ D

14 i

&0D+ n	*U"@ m4 k, a4 m e/d,p4 n p Dj4 pQ~Y|,~          Dc?| y  uD>OLDSPACESM?{@SDeIFSTAT    ?{?{DDZ+ ,Z. )Z/ )	(U" {!
XwXwXwXwXw \Q|>4
 q g$k Dj4!Z$ D

14!	*U*!,4!

*4D!4! e/d,p4!Q~Y|,~          ?{?|!

D& !

LABELSTAT ?{?{DND I& ~ I* | I+ {	(Q"!!8XwXwXwXwXw \Q|>4
!

1B$4D!4!Z$ D

14!	"Q*U*!Z$ j/k," x Dj4!4!,4!

*G

)4D! 4! e/d,p	(T*(! 4!Z$,54!

&0D+!54!!

1B$4D!+4!#Z$ D

14!%Z$ j	**U"!(/k," x Dj4!'4!*,4!+, h4!,

*4D!44!-

&0D+!14!.	*U(P!1, m4!0 e/d,p4!14!3+!6Z$,

4!4Q~Y|,~          ?{(!9?|!:DREPEATSTAT?{?{D.D53K!53N!53O!	((!="XwXwXwXwXwXw \Q|>4!6 j Dp4!B

&0D

+!J	*Q*U!E4!C,4!E

&0D+!I4!F, ~4!H4!I

&)0&+!i4!J	(U*Q!N

2B$4D![4!M

*4D!S4!O e/d,p4!Q $

&1F@4D!X4!S	*U*P"!V j.k Dj+!Z4!V j.m Dj4!X4!Z

&0$0d
+!h+4![,l	*U*U*!_+!h4!^,q+!h4!_,+!h4!a, ,+!h4!b,!+!h!^!a!_!d	*U(*!g!b4!d+"4!h

*4D!p4!i

&  )F0&+!p4!j e/d,p	(@U"!p4!n $

& 
 )H0(@B$4D!v,+!p4!p

&0D+"4!v	(Q*U(!x

2B$4D"4!xZ$ D

14!z j Dj4!{ j.k Dj4!}

*B$G

)	**Q*"4D"4!Z$ D

24"4",4",!@4"

&0D+"4",04" e*T("	/d,p4"4"
4" p Dj4"Q~Y|,~	 H"0@          D";?|"D"OLDSPACESMD,"@SD"=CURBLOCKNR>"Clt@T"D"mSTATEMENT ?{?{D#DV?[w!@V?[~!=V?[!=H DXDX@@DD"D<"D$"D"	(""DXwXwXwXwXwXw \Q|>4

0B$ &

i0H@	"U""$A4D"'4"!,H4"%+"!4"& $

i 
  )H0(@

0B&	"""-A e.&0&0f-- 7 ( 	v0F@A4D"A4"'

i0D+"84"3	 U"A*"5Z$ Dp4"5,H4"6+"?

i0D+"=4"7Z$ Dp4":,H4";+"?4"< Q(">Z$> Dp4"=4"? p,4"?4"AQ~Y|,~	 	 "C          D(s?|"JD(NLAST_CH   ?{@+D(uSKIPCOMMENB'<?{ "LD)&DQP"QV"QW"@xD%"CD%"D	((*"L$R\Q|>4"AZ$ D

/4"N^$ Dp4"P4"Q,4"R

&	 T*U*"U)F0&+"R4"S g.$ Dg4"V g$k Dj4"X4"Z@@

14"[

&0D	*U

"]+#4"\ e/d,q4"^Z$ D

14"`Z$ j/k," x Dj4"aZ$	*U*("f D

04"e,4"fQ$

%X$

$*$

%4"g $h 0@7,],]4"i $h 0@7	(A"n,"k &Z( *

,.&*r(,"p&,"t	(
E "w &

$ * (,"v & * (,"x4"l

(B$4D#

4"{ $h 0@7,"n	  " & * (,"z4"}Z$ i Fp Dp2dp+# $h 0@7," pZ(	(*U(#,% & * (,#:p+#4#4#4#

,4#

&)0&	*UU"#+#

4#

&)0&+#:4# e/d,q4#Z$ D

14#	"Q*U*#Z$ j/k," x Dj4#

*4D# 4#,"4# e,q4#4# ,	(TU*#!4#  $

& 
)0(@B$4D#94#!4#&,|4#',4#(

&	"U #*0D+#-4#),4#++#'4#, $  G

&)F(0&@B$	**U*#24D#7

&0D
+#64#-,t+#74#4,+#-4#6,4#7+#"4#8+#4#9	*T
U
#;@@

/4#:

&)0&+#Q4#; e/d,q4#?Z$ D

14#AZ$	*E"U
#C j/k," x Dj4#B

&1D+#L4#F,4#H

&0D4#I,A	*T*T*#L4#K4#L,"M4#L

&0D+#P4#M,4#O+#<

1B$4D"[4#P

*4D#V	*U
U#T4#S e/d,q4#T g/$ Dg4#V g$k Dj4#X $

& 
 	 #])H0(@B$4D#n4#Z $ g0F@ &

&0H@A4D#g4#_	"Q"#eZ$ D

/+#h4#eZ$,

4#g $

& 
 )H0(@B$4D#n,	*E*E
#n+#i4#h

&0D+#r4#n,!@+#w4#p

/B$4D#w4#rZ$ D

14#t,	*E*T*#v4#u4#v g0D+$4#w

04D$

/4D$4#zZ$,

4#| f/$	*Q"P*# Df4#}4#

&1D+$4$Z$,

4$ $h 0@7,#,"l4$ $h	 QU"$ 0@7,$ fZ(,# & *	 (	,#
,$4$4$q4$,4$Q~Y|,~	 $PFORM/LOTS 1.1  4-SEP-80:  [  ] Page..0 @0 @ erro	  8$r(s) detected          DC{?|%DCVPOPLIST   DDT$"B%sDC|I         CPlk@S @$$DD%WHATTOPOP Bl"JDEDDUDER/@UZ."M2dW"L@	D!"D"DL!?CSTrC \D-t$D.$D.T$D/$D/|$D1

$D5l$D5d$D;L$D;D$D=,$D=$$DA,$	(*E*$)4$""  D~4$),$4$+,24$,Z$ D

i4$-4$/,"M4$/

0	 @*U$1B$ &

&0H@G5D$74$0,4$5+$/4$64$$T4$7 $
$K&,84$H+$<4$L $

4$M$7,$O,$

4$P	*UD$S+$74$S

'4D$\4$T $h 0@7,$R Z(,$
 & * (,$

,$R	**$\4$U4$\"" /~ D~4$\ $h 0@7,$W & * (,$[ ~	 A(T
$d&&j0Z(,$YZ&*(,/4$|5~&$j0 F~4$gO~&$t0$+$p4$iZ$h	 A*$m.0@7,$aZ&"(,$g4$l4$p $h 0@7,$n ~&&tZ(,$eZ&	"Q(T*$u@(,$o4$p~&$tF~4$v`~0$2+%4$x+~0$+%4$z $he	"*A$~0@7,$rR&m*0(,$c4$|+%4% $h 0@7,$~Z& (,$v4%	*A"Q %4%4% $h 0@7,% ~Z(,$t,$[4%++%

l%*@W3DUNORMAL@	<pES?|DwL%0DqKDU\CMINI%:?{Do4%2?|'9DVCMIFI%>@T?|%5	(	 `h%<? ?CMACT     Dd%B@T&DWf@>zT ?BYTESET   D\t%D?|%xDX&ARRSE	&@9 %ET    DY$%G?|%aDXNANYVERSION?|@XLDXuDpARRWRITE  DYK?|%[DY&BYTEPOS   	.%M?|%P@T%XDYN@>:< ?BACKSLASH DZ;@+DZ

@.BLANKS    Aude@qDZ<@	T`%V%V%VF p&	?{AY{D[$FaD[cAY|%^D[5$STF	!%^@S?{AYcD[eF&D\CAY|%dD\$STSDb.@?{AYcD\E	!p%gBYTEWRITE D]?|%rD\vCAPITALIZED]K@SD]@CASETYPE  D]ta@eKD]LCH   	!%o     ?{@+D]uMF         ?|%uAY|%uD^%$BYTEPOINTE?{@SD^U	 p%xF         ?|%{AY|%{D$BYTEPOINTE?{@SD5CMAGAIN   ?{?{Df	  @&S         ?{AYcD`

t 	 &?CMDEF     ?{?|&Dc.DEFAULT   ?{AYcDcUCMDIRW    DdC@SDd@	  8&"?t ?CMDN      Ddk?|&1DdFCMERR     Del&*@XKDdn@>`D ?CMDO 	!&+     ?{@SDe.@>Q ?CMERRMSG  ?{?{DenR         ?{DfCDf$	 @x`&3Df@d&5?xYEAR      Dk<&8Dl,&8Df]pMONTH     Di&;Dl

&;DgDAYOF	'@ 9&<MONTHDjl&>Dkl&VDg=pDAYLIGHTSA?{@XL&ADgmP@hZONEINPUT ?|&D@XL&NDhP@`	 2@&DZONE      ?{Dh|&IDhMP@HDhxFSECONDS   ?{DiKDi`DiH	(d&MRJULIANDAY ?|&Q@XL&QDimP@XDUM       ?{DjL&DDjP@PDjHH	 @&UDAYOFWEEK DikDk&[Djm`DkRZONEUSED  ?|&A@XL&>Dk=P	0@ &^@pDkhRDlRDl(RCMFLT     Dm|&h@`	 &fDlN@?#T ?CMFLD     ?{@T&lDm@?d ?S         ?{AYcDmM	 &oCMHLP     ?{?|&rDm~HELPTEXT  ?{AYcDn%F         ?{AY{DnU$

&wFv<'DqL%*?{AY{Do$CMINIR'Do[?|'6Do6CMMODEUL'?|'DqKDo^@	`'??d<?CMKEYbDsx?|'@T'	Dp@?9C?CMINT"CMO?{@SDp^@>O@	C`'?TSOUR?{@W#DqDqHA'	!0@'*COUNTCMNODu[@T'-Du-DEST DvAYd'0Du]OFFSETT   ?{@SDvy^S         ?{AYcDzSTUFF     ?{AYc	 
@'UDz5CMNUM8    D{#@SDzf@?)T ?CMNUX     D{c@SD{&@?'T 	 ']?CMNUX8    ?{@SD{f@?%T ?CMQST     D|c@T'jD|&@>} ?	  'fCMREAL    ?{@`D|f@>M ?S         ?{AYcD}%F         ?{	0 8'nAY{D}U$CMTOK     E\'r?|(`D~CMTAD     D,'v@SD~.@?t ?CMT  	!'w     ?{@SD~n@?t ?CMTADN    DS?|(D.CMTN      ?{?|'DV	  'R         ?{DfCD}$R         ?{DfCE-$CMUSR     Ed(	@SE^@	 `(?t ?CMTXT     E[@T(E@>4 ?CMUERR    ?{?|(E^S    	!h(     ?{AYcES         ?{AYcE5GJGEN     E(?|(]EfGJDEV	&@((     E$(?|(5EGJACT     ?|(?|('E6FINDNULL  BL(!@T($E^@>HL ?	!`(!ERRKINDS  B;ARESOURCE    ?{AYcEEDEFAULT_AC?{AYcEu	!@(*GJDIR     EK?|(2E&GJEXT     ?{?|(/ENDEFAULT_EX?{AYcEuDEFAU	!h(2LT_DI?{AYcE%DEFAULT_DE?{AYcEUGJNAM     E(:?|(ZEGJJFN	 @ (;     ?{?|(=E.TRY_TO_USE?{@SEUGJPRO     E+?|(WEHT        	<p@(CE\@@SE,@LINSIZE   E	l(H@SE\@,LINSIZ1PLU?|(K@SE

@,LINNU	#p(LMSIZE?|J@SE	<@LINSIZPLUSE
@SE	l@-MAXINC    B

$(T@SE
@P	!`(TLOWERCASE Ah

W@SE
L@DEFAULT_PR?{AYcE
}DEFAULT_NA?{AYcE-	  (]FLAGS_AND_?{@SE]STUFF     ?{AYcE

T         ?{@W#	 
`(eE

=TABLE     E

lTADRECIZEE|(kDfCEABLEINDEX?{@sETBMAK)UNDE$({@W$)E~@?=4?TBADDE B\?{?|(~E>T)	>8@(Et)@W$)EeKEY       ?|)AYd)EBITS      ?{@SEE(VALUE	!@0)     ?{@T)EuVERSION   Aq,)

PFORM	 `)/LOTSSIZE      ?{@SEINTEGER   E

)@SEDCHAR      @\)!@+El	!`)!BOOLEAN   E<)#@XKEALFA      E$)&@qE<ABS       ?{?{Ef@TIME 	 (

))     ALFALENG  ES@SE$@APPEND    E{?{EVARCTAN    ?|)3@`E~@	 @)2?\ ARCSIN    ?|)7@`E>@?U ARCCOS    ?{@`E~@?T	 ): BREAK     Ec?{E>BREAKIN   ?{?{EfREAL      E!T)C@`E

	!`p)CPOINTER   E,)EE!CE7@NIL       E)HEE\@MAXINT    E

)K@SE

@?	 @@)KMARK      ?|)N?{E>JSYS      E?{EfLN        EK@`E@?]	 )T LOG       ?{@`EN@?[ NEW       E3?{ENEWZ      E[	 D)\?{E6NEXTFILE  ?{@PE^@?|OUTPUT    EL)d@\E HODD  	$)e     E?{EN@0TRUNC     ORD       ?{?{E@8ODD       PACK      	0)mEs?{ENPAGE      ?{?{EvERPUT       E<)u?{E.PRED      	0@)vE?{EV@HCHR       PROTECTION?{?{EPUTLN     Ec?{E>READ 	&@)~     E!*?{EfPUTX      E 3?{E RCLOSE    ?|*?{E 6RANDOM    ?{	0*@`E ^@?S READLN    ?{?{E!E!@dTEXT      @X\*@\E!T	!`*STRING    E'l*AYcE!@RESET     E#\*?{E"&RELEASE   E#4*?{E"NRECSIZE   	 @*?{?{E"v@xROUND     RENAME    ?{?{E#6REWRITE   E$?{E#^SETPO	& * S    E%,*"?{E$RUNTIME   ?|*&?{E$.@DATE      ROUND     ?{?{E$n@	 P*)pEOLN      SQR       E',*.?{E%.@ ABS       SIN       E&+@`E%n@?fd	 
@*1 SIND      E&k@`E&.@?Z SINH      ?{@`E&n@?X	 *: SQRT      ?{@`E'.@?^ STRSET    E(?{E'nSTRWRITE  E(;	 @*B?{E(SUCC      E({?{E(>@PPRED      TANH      ?{@`E(~@?V	 U**K

d%%()bPFORM     S:<PASCAL>PFORM.PAS.8         	 *S                                                                                      *\                                                       P*K@~DK%#DL$%&DOt%'	D"`[%

`[%

@%zINGg{INVT{IN	||

u^c;D	D"|G;2c(TSg+e5kLe5`6"kP`%@O>`D9bKd+'5bKTI;O	D"`%(bKLtD2`
W{v`
X/gx`
XXt`%k6`%_}
`%`w`%-z	D"`%?)q`&=7`%K]`?^=`@)Fo`%@I-d+#4<%dSLxg%g=p"*	D"e

`
Nu$O`-%%`';$Ke5$@%e5!\%`
NsM$H	D"`-%P

`
@c]Ez*%	f73%f7R3#c_"/f7O%
f7r%ev{2%xaJ1ggaJ1gg/8 %

((*a