GW@ $.
@	wH,{.
Copyright (c) 1994 Unisys Corporation.  All rights reserved.Ver Pascal s7.0.11 Linker s1.00.0008$_) >@C_F?IPJ@No0OPRO SpY?r0s?u@uo@uvvvw? wwwwwwx0x?Pxoxy yPy?pyy_y0zzzz?z{_  @Po? @PP?p00O@pO@_0@?_pPPP?0o ?@PO0PO@
@0*'()+7*
8N,)+++=	Sq)qqrqq.*9ct455[5555A9AA$'A''b' b'3
3
3
3
4
	4
4
4
4
''a'''''	''
'T'g''5(5(5(5(5(5(5(5()5(L5([5(5((_(((((\(((((((((F(((0((	({(((y)Ay))C)5))) )))G))G)'**j***]****F*v***++M++++F+X+5+)5+<+D+i++y+ 7
F.,.,.,_l,yl,3v,rv,7,H,0,C,c,,,,,l,,,,v,,,,,,,+,B
,{
,
,,T,,,k,,,1
,g
,
,
,,,h.+.F.f....U........;....=APA,S2*+QeW$$+,.0268:<>ACEIPRUW[]cfhjmq45AM''b'f''''''5(((((((y)))**C*f*****+++5++++,,.,l,v,,,,...d.t....6AS3******(*_*p**************p*x****3*S*e*******A*$
*
*f***l
*
*
*D*c***r******************=*W*y******;*_*{*****.*=*L******7*^************6 *e * * *$*'*]****6**0*0*'4*X6*V9*9*;*Y@*o@*@*PA*A*B*B*B*C*D*D*uE*zE*E*E*E*F*rF*F*G*:H*H*0I*MI*fI*^M*N*N*N*O*2P*,T*T*.V*V*W*W*W*X*Y*Y*JY*tY*Y*,Z*Z*Z*W[*[*]*^*^*_**a*b*2c*e*e*f*ah*j*l*
p*ap*|p*p*q*@q*r*u*v*:v*|v*v*v*w*w*w*w*e{*{*{*{*|*\}*}**Q*r**)*|**;*******7*******6*y***.*_******M****0*{*.*j********3*I*R*W********;*j**h****D*[*h*m**i***9*T****(**:*{*U***^*X*n**********9*D*V****8*C**O***P*f*|****$****$*)*^***k******H*w*|***	*1*m***0*U**X*****$*1*6*V*a*f*****'*N****=*^******>*s***5**;***C*v*K***,*8*k*p********|*****a*n*s****T***>*I*i*****9*D***$**^***9*I*****7**w****J********O**]***N*Y**q**C******P*m*****f**p***(*8*=*X******[*l**** **E*S****F*T****I*q************6***.*3*Z*i***'*p***********5*E*}*****;*C*^****9*n*****A***Y****$*7*J*q*****
*,*J*}***I*h*****F*v**@*k*t********G*^*p*V*k********]*p*********F*Y*r****e**********
***	*7*<*A******4*S*^*c*h*m*r*w*
4HVdiw|\*8=W\'5CglOXA\w7?P|N}				
a





m;V
=
j
y

SLox4BGaf	w;G?Q*5].Yw>J^lNo
Kny|  6F'$J$$$[x|'H(N)	>FZaf (gm=\5F]rDYn++(++A+U+k++7+P+Z+b+{+;+Q+V++eAeTeeeeeeVbNJtps	N.P.38=0(
4(
8(
<(
@(
D(
H(
L(
P(
T(
X(
\(
(
d(
h(
l(
p(
t(
x(
|(
N_WWWWWWWWWWWWWW2WhW}WWw$$$1l'I2I=IHISI^IiI]2]?]L]Y]c7qnqqq(qqq?qqqq5qqqqFqSqqq[qqqJqjqh=Ul45+5c5555aAAMpMMMMMFM_MnMxMMMM
MM0MMMMMM	MM<MRMkMMMMMMM3MIMVMMMMMMMMMM'M@MHMaM{MMMMZ	Ib}*4C9e{'I'h'''('<'P'U'i'}''''''''''	''G'L'e'''''''''4'X']'s'''''')'1'T'Y'o'''''m'''3
3
3
3
3
3
3
3
f'3
=f'3
kf'3
f'3
f'4
f'4
f'4
Qf'4
f'*4
.4
24
64
:4
?4
C4
G4
K4
O4
T4
X4
\4
4
d4
i4
m4
q4
u4
y4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
5
5
5
5
5
5
5
5
5
5
*5
.5
25
65
;5
?5
C5
G5
K5
O5
U5
Z5

U
U''''''?'''Q'''''}'''s'''5(5(;5(h5(5(5(5(5(5(5(<5((<(f((A((((m((I((l((*(P(t(	(o(s(((6((((((y))=))))()))N)))I)OC*C*f*)f*f*f*f*Cf*f*g**A*D**?***7*Y***v**6
6
5+85+T5+r5+5+5+35+i5+n5+5+5+5+5+5+5+5+++9+Z++7+p+++B+++++,C,\,,,,.,Q.,.,.,.,b.,l,av,v,,;,,,A	,
,
,03..3.z..9.k.F..d.4t.ut.t..R......y....,.b.U<UBad argument to fremqqBad argument to dismqq700A01BW00|9 }9  @ @0.$ IWCB WRNW     A.0*+,>=>?@PQRSTUABCD
 $.0LIJKEFGH1234CEQSCEQSCLTSCLESADDSSUBSMULSEQCLNECLLTCLLECL@@




:)BW	         	         >>>>>> Fatal Program Error STACKCK   RANGECK   MATHCK    NILCK     INDEXCK   TAGCK     INITCK    LINESIZE  PAGESIZE  5PAGE      LIST      INCLUDE   TITLE     SYMTAB    SUBTITLE  ERRORS    WARN      BRAVE     PAGEIF    SKIP      DEBUG     GOTO      ROM       PUSH      POP       ENTRY     LINE      OPTBUG    REAL      INTEGER   FLOATCALLSSTANDARD  EXTEND    SYSTEM    SIMPLE    SIZE      SPEED     MESSAGE   INCONST   RUNTIME   IF        THEN      ELSE      END       KANJI     OCODE     :Integer:Word   :Char   :Boolean:Subrng :Ordinal:Real   :Intger4:Pointer:Adrptr:Adsptr:Array  :Record :Set    :File   :ProcTyp:FuncTypValue Const StaticOriginExternPublicFar   RegistSegmenValuePVarP  VarsP ProcP >>>>>> Error Count ExceededOffset Length   Variable  (function return)          Return offset, Frame length128 Forward Proc Missing:  129 Label Not Encountered: 130 Program Parameter Bad:  Compiler Cannot ContinueErrors  Warns  In Pass One          +* =ELSEEXTERNRORRETURNTYPEREPEATTHENNOTENDRECORD	OTHERWISEORORIGINTODODOWNTOFILEFORFUNCTIONFORTRANFORWARDOF	PROCEDUREPUREPORTPACKEDSUPERSHRSET	INTERFACEISRINIMPLEMENTATION	INTERRUPTIFEXTERNALROLNILSHLLABELCASECYCLECONSTSTATICPUBLICMODULEMODPROGRAMPLMVALUEVARDIVVARSWHILEADRANDADSREADONLYOVERLAYLIBRARYARRAYBEGINUNITUSESUNTILXORGOTOWITHBREAKCONSTSFAR
,.A18EUAQ1TG@4VP<ZD2W35R=(C0$K 7_8OL,)+'\X[9>IE:.J;]?NB6FHM^*h,7zX].K}a0Qxb*(AAN$7=ErDj IZR2ns
;,=:+*()[]<>.^@?:=<><=>=(..)..
	BWBWBWBWType Extra Hexadecimal Too Invalid Line Number Long , Truncated In Meta String Not Insert Out Expression Identifier Value Character Of Zero Assumed Wrong Skip To Or EXTERN Variable Command Integer Range : Expected Skipped Constant Assign Cannot = Unknown Static Memory Ignored Symbol As Real Overflow Supertype Array LSTRING For Operator Function Compiler Size Assignment Compatible Identical Index Use TO Word Field Record Dereference VAR Parameter Set With Many Components List 255 Types GOTO Statement Procedure Considered Harmful Label Loop Ordinal ; CONST File Procedural Forward * THEN END OF WITH Numeric End Pointer Declared CASE Previous Already Boolean := DO [ ] .. FOR TEXT Begin Contains PACKED Attribute Section Origin Initialize Unexpected Found UNIT Program ( ) NULL Designator Stack INPUT . Levels OUTPUT Module ROM Segment Address Incorrect Control                               					]
sr]T*'*'\2TET}qS{rr6.).().z)..=.
2?E5O5E}55b_r]T  ddfvvfwggwRR+RdZgwfve |hY<XW+k]]oC3434234565
8D=I
78I
8

0kQ;mF
?>*>T@MN@Q
2CHlTk0F*?F*5F2.HF
;x$D1
H4$;,SB'kAB[?k$L4BkT{2T{1TBkCrBk
jT6
9UBG
8;LDnrBk;L4,BB
L4k0B
85ASBI
9BG6kUBC2'

B:>k\\kk.=.=.b
;+OOO_
c]K5R* 2iKk
iKdJJMNO
PO
P?kOb
;a;*;L4B'KKK
47
srY5nnm?pR'k55aVBG
nD4Bn
L45bV2L4+DnQklTq
H21;;yy
slTq
0RCHTlTm*rmRR;oD)tL4
0k
?k>
73RqR;o'V^^V;OonlTqplTqtRqqtG]tG*t5
tG
_utu
sT]]u
sV^BWC(=Rg|A_}	'Ec{.CXm)GeKi@@?2	k
	zzxxxzk
zzxxxzzqxxxz@Bzzzzzzzzj((((((((s2+INTEGER WORD CHAR REAL INTEGER4 REAL4 REAL812929READLN WRITELN READ WRITE PAGE READFN READSET NEW DISPOSE7PACK UNPACK EVAL FLOAT FLOAT4 ROUND ROUND4 TRUNC TRUNC4=SQRT SIN COS ARCTAN EXP LN EOF EOLN CHR ORD ABS SQR PRED SUCC=ODD WRD LOWER UPPER LOBYTE HIBYTE LOWORD HIWORD BYWORD BYLONG,DECODE ENCODE SIZEOF RETYPE RESULT {$REAL:4}>CONST MAXINT=32767; MAXWORD=65535; MAXINT4=2147483647; NULL=0;?TYPE BOOLEAN=(FALSE,TRUE); TEXT=FILE OF CHAR; INTEGER2=INTEGER;:STRING =SUPER PACKED ARRAY [1..*] OF CHAR; SINT=127..127;=LSTRING=SUPER PACKED ARRAY [ 0..*] OF CHAR; BYTE=WRD(0)..255;=ADRPQQQ=RECORD R:WORD END; ADSPQQQ=RECORD R:WORD; S:WORD END;CLSTLQQQ=RECORD LEN:BYTE END; ADAPQQQ=ARRAY [WRD(0)..32765] OF BYTE;<ADRMEM=ADR OF ADAPQQQ; ADSMEM=ADS OF ADAPQQQ; INTEGER1=SINT;ENDINTERFACE;  UNIT RUNTQQ;(FCBFQQ,INPFQQ,OUTFQQ,FILEMODES,SEQUENTIAL,TERMINAL,DIRECT,8SENFQQ,RESFQQ,REWFQQ,ASSFQQ,CLOFQQ,CLDFQQ,GETFQQ,PUTFQQ,8CONLQQ,DELLQQ,INSLQQ,CPLLQQ,POSLQQ,SEQLQQ,SNELQQ,CPSLQQ,MOVEL,MOVER,FILLC,MOVESL,MOVESR,FILLSC,EMSEQQ);0TYPE FILEMODES = (SEQUENTIAL, TERMINAL, DIRECT);<FCBFQQ = RECORD TRAP:BOOLEAN; ERRS:BYTE; MODE:FILEMODES END;VAR INPFQQ,OUTFQQ:TEXT;+PROCEDURE SENFQQ (VAR F:FCBFQQ;N:INTEGER4); PROCEDURE RESFQQ (VAR F:FCBFQQ); PROCEDURE REWFQQ (VAR F:FCBFQQ);0PROCEDURE ASSFQQ (VAR F:FCBFQQ;CONSTS N:STRING); PROCEDURE CLOFQQ (VAR F:FCBFQQ); PROCEDURE CLDFQQ (VAR F:FCBFQQ); PROCEDURE GETFQQ (VAR F:FCBFQQ); PROCEDURE PUTFQQ (VAR F:FCBFQQ);2PROCEDURE CONLQQ (VARS D:LSTRING;CONSTS S:STRING);.PROCEDURE DELLQQ (VARS D:LSTRING;I,L:INTEGER);<PROCEDURE INSLQQ (CONSTS S:STRING;VARS D:LSTRING;I:INTEGER);2PROCEDURE CPLLQQ (CONSTS S:STRING;VARS D:LSTRING);7FUNCTION  POSLQQ (CONSTS P,S:STRING;I:INTEGER):INTEGER;FFUNCTION  SEQLQQ (L:INTEGER;C:CHAR;CONSTS S:STRING;I:INTEGER):INTEGER;FFUNCTION  SNELQQ (L:INTEGER;C:CHAR;CONSTS S:STRING;I:INTEGER):INTEGER;1PROCEDURE CPSLQQ (CONSTS S:STRING;VARS D:STRING);PROCEDURE MOVEL  (S,D:ADRMEM;L:WORD);PROCEDURE MOVER  (S,D:ADRMEM;L:WORD);*PROCEDURE FILLC  (D:ADRMEM;L:WORD;C:CHAR);PROCEDURE MOVESL (S,D:ADSMEM;L:WORD);PROCEDURE MOVESR (S,D:ADSMEM;L:WORD);*PROCEDURE FILLSC (D:ADSMEM;L:WORD;C:CHAR);PROCEDURE EMSEQQ (CONST MS:LSTRING;EC,ES:WORD);END;  USES RUNTQQ:(FCBFQQ,INPUT,OUTPUT,FILEMODES,SEQUENTIAL,TERMINAL,DIRECT,0SEEK,RESET,REWRITE,ASSIGN,CLOSE,DISCARD,GET,PUT,:CONCAT,DELETE,INSERT,COPYLST,POSITN,SCANEQ,SCANNE,COPYSTR,4MOVEL,MOVER,FILLC,MOVESL,MOVESR,FILLSC,ABORT);  END.<8087>[VID]   [KBD]   061A01BWBWBW[Kbd][Vid][Lpt]t[Nul][Debug][SysIn][SysOut]>TL>,)*L]7u8T|T|a]y]yBt.t\tttBt\ttBt.t\tttZ]y|Oy]y]y
{y2LL;4|	
[KBD][VID]>4>N	

=070F01070F01061A01061A01061A01070D01    0	Hard Data	Disk FullFile AccessFile System
 Error In 	;  Code: ;  Status: Compiler Cannot Continue0>@@((PCISSCINSRCIERCWELSTLQQQADSPQQQADRPQQQCLOFNEWFNILEBUFF RCWESETEPPMFDE_CEN_CRTQFEOFFWTPFEOLF_T_FGETFPUTFGETHNILEDISE   DxDxZERSONESTWOSINIEINJEINRE@ DxxMICEB  @LNTEDPPINIFBRTEENTEINUXUNITQQREADFN PPEFEXTEERTE  |JD,0 @ 0FCBFQQ [NUL][VID]BOOLEANTEXT   STRING LSTRINGNULL   INPUT  OUTPUT FCBFQQ Source File:  Object File:  Source List:  Object List:  [SCR]<$>PASIBF.SYM[SCR]<$>PASIBF.BIN.LST        .OBJ  [vid]FCBFQQ 	Hard Data	Disk FullFile AccessFile System
 Error In 	;  Code: ;  Status: Compiler Cannot Continue   Pag  JG IC  Line                              Warning    Symtab  Pass On Warnings Detected.
 Pass One    No Errors Detected.	Inconst:  =     0Eqq Error: Compiler Eqq  Out of MemoryEqq  Internal ErrorDzwOvwDziOviDznOvnDzrOvrUnrGhsNorGhvSovDnrPreUer062E01700A01PascalOpt.RunPascalLst.Run1NAN1INF1IND?@@@@@P@$@@ @(k@	 @
@C@@**@
 @1_0@4@.7@@v:k:@>@bxA@zD@n2xH@W
?hK@N@@aQYR@oU@: 'X@fPK@7pdeAlD> iyB ?
d'@B;TvHrN	@zZo]xEcd
2|0|,|.|
 ||||K1ql+9C_isQz 700E01C700E01700B01[scr]<$>TmpQQ062E01VNVN062E01@ No CASE Value Matches SelectorString Too Long in COPYSTR'Lstring Too Long in Intrinsic ProcedureSet Element Greater Than 255Unit Version Number Mismatch
Illegal PcodeUnsigned Value Out of RangeSigned Value Out of RangeUninitialized 16 Bit Integer Used Uninitialized 8 Bit Integer Used1REAL Indefinite (uninitialized or previous error)NIL Pointer ReferenceUninitialized PointerInvalid Pointer RangePointer To Disposed VarLong DISPOSE Sizes Unequal@ Set Element Out of Rangell[KBD][VID][]}[Scr]<Spl>]$$.Tmp}[Scr]<spl>[Scr]<spl>[scr]<$>BsFilter.tmpVNVFp

		
 {}MASTERSERVERLOCAL{}[]{}[]<>[sys]<sys>LptConfig.SysPress NEXT PAGE or SCROLL UP to continuep(Press NEXT PAGE to continuePascal s7.0.11U>tt  .+zptvx03<>t<8BFtv
F30BF3FFHFu]F
Fv|uFFkv2=|Av|u@v|uB
s9vD2FFv|u
nvD2VFFFPv2+F@PvFPFWuANvFVT^
WvT|uAvTN|ANsQvTFVvTvFV|u^
W^
WF]
PkHPk]h*v|uv\2@	PPW	PPGPP7PP'wr.=
PPv(PFPFF2PFPvt	PPPCPv|t'vtPPPCP7PP7Pu],v
Dv
Dv
Dv
FDv
Dv
F4Dv
Dv
FDv
Dv
v2PF@Pv
v

}u@Dv
>]P06PPP66v
vP46|t@F];vDvvt
vDPYvE
Dvv]vvFPtrF2PFFFF]vvFPrF2PFFFF]vvFPdrF2PFFFF]JvvFPrF2PFFFF]uF2PFFFF]v<t@vsv]vFPFFF]v<Zrv0v<9uvAv2v]Vv<0wvZv<Auv9
v2Hv]F;FwAF;FwBF
4F;FBF;FNAV

VVF]F;FsAF4F;F}BV
NF]FV^G<u^GWFVF^G<u^GtANF]=^G<u^GWFVFVFVFV]^G<uA^GNF]^G<uA^GNF]^G<uA^GNF]^G<u^GW
FV^G<u^GW
FV^G<uA^G<uB^G
^G<uB^G
FV+NuA
NFV+NuA
NNF]vvx+tAFV+NtAN^G<	tB^G<uB^G
=NsA^G=sA
Vs(tFF(tFFF]
vv^G<u^G
v^GvFV
+u
vFV
+u
vFV
+u	vk^G<rA^G<
wBFV
+NuA
Ns	v^G<u^Gv	P]
FVFV+uGWTFFtL^GW+FVu$^GW^WFF^GWFVvv]ov4Ds_v4G<uv4GW
RPUv4G<uv4GW
RPU	v4t4Uv4Dv4FVT]>uv P0vv6Dv4D
v4Dv4Dv4Tv4Dv4FDv4Dv4Dv4D]Rv4Dv4Dv4Lv4LuBsv4ttv66v4Dvv]v4DFv4LFv]F22P^WF2^WFVtuFuFuF^WFV^WFVF^WFVW^W]uFPP}$uFPP}FPP}^FVW^vvK^^^^^^^^FVFVFV]^GW+tA^G
=vB^G=NvA:u@
Fs^G
^O+^G^O
6P3PFF]y^GWFVFFt_vT+uAQvt^GP^GPs^GWFV^GW
FVPFV]FPP}^^^G^^G^^G^^G^^GW^W^FVW^SP}^GW
FV^F^GW
FVG
^
^F^GW
FVGW^WFVFVFV]vvvDTvFDvD
vDvDv]vFFFFt6^GsFVFVFF^GWFVFV]V2F2FF]vt4vT+uXFPFPbuAs	PvNBFsF
2FvT+uvNvDFsF
2FO>wvD wvDT 
vDT Fs F
 2FF]FP66avDvDvD]>rPFF]FPP}^^F^F^
^SP}^GW
FV^F^
F^F^F
VWFVFVFV]
F;tANF]>}@>}As<Pvv4FtPP]^><<PZFt6h6h$	P]*FFvEBvv| tF2FF@F=uFPP PFPhFVFVFVFV+u	PFV]t
F2P	PFPsj>u'
u	P
tF?9Fv:u4v2P	PFPsvFPdF@F=
uF2P	PNQ4uA
2P	PNQV2P	PrQV2P	PrPV4
FF
F
sFu	PFQFv:FuFF@F=uPIF|Ft	P] :Ft9FPTFPF2PTvv
;>w] :Ft9FPTFPF2PTvv
;>w\]5 :FtA:FtBsHFPTFPF2PTFPF2PTvv
;>wV] :FtA:FtB:FtBsWFPTFPF2PTFPF2PTFPF2PTvv
;>w]]62P	PFP4>tAsFu>t@>tAsu>t@>tAsz]v
;>wUKP]
r FPTFPF2PTFPF2PTv
;>wI]3PPP66h]	^G<t^G<ul^G^Ot^GWRPv^G^Ot^GWRPv+FVuvDFVTV^SXP^2HHPHP]K>tFtyFV^G<t,^G<t^G<t^G<u^Gu
vvU^GW^^FuU]HPR]>uktF2PPP>vPFF
FFFPFF]
vv
vvvc]
vvv3PPHFF]vvv3PP']PvvP3PFF]Pvv3PPFF]cvv3PPPFF]Dvv3PPP]+vvv3PPFF]
vvv3PPl]kPv3PPPR]Pv3PPP8FF]hPvPP3P]hPvPP3P]uhPvPP3P]UhPvPP3P]5jPvQPP3PP]PvvPv3PoFF]Ft7vv
4PvD22P3Pv
4PPv
v|wvDHFFFFvD+FFvFvv
4vv]22vF]22PvFF]22v]22Pv
4vP:v
F@FH;Ft[]vDrvDvDsvt4yFvG<	tvT+u<FPFPbs	PvPvv3PPvDvT+tPPPvPvQFVPvPvQFVPPPPvPvQFVPvPvQFVPvPPPvD	Pww8vuvDuvPu3PQPvD9u*vPEUPEUR3PPvD	Pv|t6:vDvt4svDvDvDtv]DPPFPvt4PvDvDuvttvt42FvPE+FPEFPPvD].uFgFfvv22vD22PvD22vD