Google
 
Trailing-Edge - PDP-10 Archives - BB-D480C-SB_1981 - forprm.unv
There are 32 other files named forprm.unv in the archive. Click here to see a list.
x,5

tP C

v*7P C

v*7P C

v:7P C

v:7P C

v;zP CQ CV< 

ps
FIF2,<ITKOV,<EXT
PFIB,<ADD A,[
	  JUMPGE A,%STKOV>
  IF0L  B,<SUB A,[-B,,-B]>
 ,[-C2P CJ<Q CJ==rQ `CJ>N8Q CZ P DG<,Q bE0um6P E0w)9P E2]`P 	E2^>@Q  E2u0Q EC8Q EV4Q @EV4=Q EV5P Eg%`P G

Q G

tI;P G

tkyP G

uJ9PG"D Q  G;D@Q @G; P H@ H

Q H@Q @H P"HL@P#~H-h`P H-iQ H-z Q H-|@P HM`Q HMmQ HMpP  He@Q @He}:Q  Hf9P HmyQ  Ht;P$Hu[P H~	7Q H~]Q H@Q H+@Q HyQ HQ  HP!HHyP @H&+QQ H-i@Q H>-Q @IP I4.: v f

  IFG v@<$P+^D<B>-^D35>,v`<
	$P==-1
	$LOCw==$LOC+1
	>
  $w P==$P+^D<B>		;Fiw@nd end position iw`n word

	DFN (xA,$LOC)	;Plain Ax  is offset
	%A=x@=$P	;RH (%NAME) =x` rightmost bit
y
  %%DONE==0
  Iy FE <B - ^D18>,<	y@;Halfword
	IFE <y`$P - ^D35>,<	;Rigzht halfword

		z A==A+1B0
		%%Dz@ONE==1
	>
	IFE z`<$P - ^D17>,<	;Le{ft halfword

		{ A==A+1B1
		%%D{@ONE==1
	>
  >
{`  IFE %%DONE,<			|;Not a halfword
| 
		A==A+1B2
	|@	%A==%A+ <<B>_|`^D30>	;Byte size in LH
  >
ze I6;W } r

	DFN	}@A,B	;Check for n}`ame conflict
			~	; and define it ~ the same
	%A==%B


	%A==%I6= r0
	$LOC==0
	$P==-1
	==0I6N p/
 IRP A,<
  IRP B,<
  0 DEFINE TXAB (APC,E) <
0 IFE <p<E>&777777000000>,<TRAB AC,<E> ;0>     IFE <<E>&00P0000777777>,<TLApB AC,(E) ;> 			    TDAB AC,[E]
   > ;END TXYZ
P  > ;END IRP B
p > ;END IRP A
> ;END IRP A
I6y t0.0X

IFGE $t`P,<
	$P==-1
	$LuOC==$LOC+1	;Jump u to next word
	>@

	DFN (A,$LOC)u`
	%A==^D35

	$LOC==$LOC+B
1B

IpQ I0P Ip rp

	IF1,<s
	IFDEF A, PRINs0TX ?A ALREADY DEsPFINED
	>;END IF1

	A==B

I5 `I5  I5M `I$tLuP I$uZP I$u]P I$u}P I$vMP I'Q I2-`P %I6|@P I6|I Q I8rHP I8r$P I8rU+P I8rdJP I8sP I8tI3P I8v>9P I?,+	 _ IJ&i@Q ILtI6P ILt^P ILuJ9P ILvQP ILv

WP ILv2P ILv)7P ILv8;P ILv=1P IN.NV >0s
	SETZM	A
	SETZM	1+AIZL9 P I['Q K:$P K>5`P KJ$BP KJthbP KK Pps

 IFN FQTSHR,<
  IFN $NAQ0ME$-'ERR',<			;SHQPARABLE FOROTS IN QpWRONG PSECT
	PUSRHJ	P,E..A
	XLISR0T
	.PSECT	F.ERR
  > ;END IFN NAMRpE-ERR

  IFE $NSAME$-'ERR',<			;SS0HARABLE BUT CORRESPCT PSECT
	PUSHJ	SpP,[
  > ;END IFET NAME-ERR
 > ;ENT0D IFN FTSHR

 ITPFE FTSHR,<				;NOTpNSHARABLE IS ALWAUYS CORRECT
	PUSHU0J	P, [
 > ;END IUPFE FTSHR

E..AUp::				;DEFINE THEV ERROR


 IF2,V0<IFNDEF %ERARG,<EVPXTERN %ERARG>>	;AVpRG STACK
 IFNB <WD>,<		MOVEI	T0,%W0ERARG-1	;STACK IFWP ANY
WIRP D,<
   IFE <<<Z D>_X-^D18>-P>,< PUSH X0T0,-1+D >	;FIXUPXP FOR STKVAR
   IXpFN <<<Z D>_-^D18Y>-P>,< PUSH T0,DY0    >
  >; END IYPRP
>p;END IFNB

 IF2,<IFNDEF %ZFORER,<EXTERN %FOZ0RER>>
		PUSHJ	P,ZP%FORER			;ERROR CZpALL
		BYTE	(7)"[B"(19)0			;'ERROR[0 ARG BLOCK'
		XW[PD	'A',0
		ASCIZ[p	\C\


 IFE F\TSHR,<			]	>	;FIN\0ISH LITERAL

 I\PFN FTSHR,<
  IFN\p $NAME$-'ERR',<
]	.ENDPS
	LIST
 ]0 > ;END IFN NAME-]PERR

  IFE $NAM]pE$-'ERR',<		]	>	;^FINISH FOR OTHER ^0CASES
 > ;END IFN FTSHR
END IFKKP KK`P KO P Kc P L@ L

IQLHPP!LL`QLMQ L$=QL%6Q@L&)LQL&<`P$L&=QL&LQL.,@QL.LQ L/
e0P M&dPP M&eD Q M&eD@Q #M&eD`Q $M2

|`P 

M2  Cp<A>B<POS(B)><A>B<POS(M2-`P M28 {Y
 %F==%F_-1
 A==%F_1F_M3RP M4tkyP M4v[SP M7%`P M<$P M<$:P M<$;P M<$J;P M<$\YP M<$hvP M<$l{P M<$yP M<${P M<%

xP M<%P M<%Y6P M<&:P M?PQ M?i1 {Xc

X	INIT0		;FOROTS INITIALPIZATION
X	FORER	p	;ERROR PROCESSOR
X	OPEN		;DEVICE0 OPEN
X	CLOSE		;PDEVICE CLOSE
X	RpELEA		;DEVICE RELEASE
X	IN		;FORM0ATTED INPUT
X	OUPT		;FORMATTED OUTpPUT
X	RTB		;UNFORMATTED BINARY IN0PUT
X	WTB		;UNFOPRMATTED BINARY OUpTPUT
X	ENC		;ENCODE
X	DEC		;DECO0DE
X	NLI		;NAMELPIST INPUT
X	NLO	p	;NAMELIST OUTPUT
X	IOLST		;INPUT0/OUTPUT LIST ITEMP PROCESSING
X	FIpN		;INPUT/OUTPUT LIST TERMINATION
X	MTOP		;DEVICE PPOSITIONING/UTILIpTY FUNCTIONS
X	FIND		;RANDOM ACCE0SS RECORD FIND
XP	EXIT		;PROGRAM TpERMINATION
X	ALCOR		;DYNAMIC CORE0 ALLOCATION
X	DEPCOR		;DYNAMIC CORpE DEALLOCATION
X		ALCHN		;ALLOCATE	0 AN I/O CHANNEL
	PX	DECHN		;DEALLOC	pATE AN I/O CHANNE
L
X	TRACE		;TRAC
0EBACK OF ROUTINE 
PCALLS
X	FUNCT		;
pGENERAL OTS INTERFACE
X	DBMS		;DB0MS ENTRY
X	INQ		P;DEVICE/FILE INQUpIRE
X	FOROP		;MI

SCELLANEOUS LIBRA

0RY UTILITIES

Y UTILITIES

MJ,X1@ MO: p
	SALL
IF10,<	SEARCH	UUOS0YM,MACTEN>

IF2P0,<	SEARCH	MONSYMp,MACSYM
	EXTERN	.JBAPR,.JBDDT,.JB0FF,.JBHGH,.JBHRL,P.JBHSA,.JBHSM,.JBpOPS
	EXTERN	.JBOVL,.JBPFH,.JBREL,0.JBSA,.JBSYM,.JBTPPC,.JBVER
	EXTERpN	.JBHDA,.JBHRN,.JBREN
> ;END IF200

	.DIRECT	FLBLST
DIRECT	FLBMQ
QMQxXPMQPMQP MR]Q MR]@P MRuHhP MR}IP MS

@Q MS'P MVt= @P
 IF2,<IF@pNDEF A,<EXTERN AA>>
 .ARGN.=0
 A0IRP B,<.ARGN.=.AAPRGN.+1>
	PUSH	P,ApL
	XMOVEI	L,1+[-B.ARGN.,,0
		    B0 IRP B,<B>]
	PBPUSHJ	P,A
	POP	PBp,L
 PURGE	.ARGN.
 PURGE	.ARGN.NDP NHP NLP NPP OI  @O

@ @O&` `OO OO

@ @OfL@ On @O  `O0  O>|H\ Gp?
	POPJ	P,

	POPJ	P,ONt{  Qf@ +QeK` D0;
 IFNB <DPB>,<
  IFDIF <BDp><.>,<
	ENTRY AE
	SIXBIT /B/
E0A:
  > ;END IFDIEPF

  IFIDN <B>Ep<.>,<
	ENTRY A.F
	SIXBIT /A./
F0A.:
  > ;END IFFPIDN
 > ;END IFNBFp

 IFB <B>,<
G	ENTRY A
	SIXBIG0T /A/
A:
 > ;END IFB

 > ;Qb`  D

	IFNB @<C>,< PRINTX ?HX`L used with more than 2 args - A,  B >

	%%BTS==@<B> & 7B2
	%%ID`X==<<B>_-^D18> & 77	;Get index fi eld if any
	%%LF@T==<B> & ^O77777`7
	IFE <%%IDX>,<PRINTX %Index is  zero for HXL A,@B >

  IFE <%%B`TS & 3B1>,<
	PRINTX ?HXL ERROR -  B
  >
  IFN <%@%BTS & 1B0>,<
	H`RL	A,%%LFT(%%IDX)
  >
  IFN <%% BTS & 1B1>,<
	HL@L	A,%%LFT(%%IDX)
  >
T(%%IDX)Qc r

	IFNB  <C>,< PRINTX ?HX@R used with more `than 2 args - A, B >

	%%BTS== <B> & 7B2
	%%ID@X==<<B>_-^D18> &` 77	;Get index field if any
	%%LF T==<B> & ^O77777@7
	IFE <%%IDX>,<`PRINTX %Index is zero for HXR A, B >

  IFE <%%B@TS & 3B1>,<
	PRI`NTX ?HXR ERROR - B
  >
  IFN <% %BTS & 1B0>,<
	H@RR	A,%%LFT(%%IDX`)
  >
  IFN <%%BTS & 1B1>,<
	HL R	A,%%LFT(%%IDX)
  >
T(%%IDX)QcP 

	IFNB, PRINTX ?HXRE used with more  than 2 args - A@, B >

	%%BTS=`=<B> & 7B2
	%%IDX==<<B>_-^D18>  & 77	;Get index f@ield if any
	%%L`FT==<B> & ^O777777
	IFE <%%IDX>, <PRINTX %Index is@ zero for HXRE A`,B >

  IFE <%%BTS & 3B1>,<
	P RINTX ?HXRE ERROR@ - B
  >
IFN` <%%BTS & 1B0>,<
	HRRE	A,%%LFT(% %IDX)
  >
IFN@ <%%BTS & 1B1>,<
	HLRE	A,%%LFT(%%IDX)
  >
T(%R5]P  RX`P RXhP @R$:P R-j P S
 P "S@Q #Sv@P #S
 FIFN FT10S HIFN FT20SNp @S,t[RP S,t\YP S,tk9P S,tk:P S,u

pP S,u

vP S,uwP S,uyP S,u]P S,uk6P S,v)1P S,v[TP S:'Q S<Q S>.,@ aPa08

 IFN FbTSHR,<
  IFN $NAb0ME$-'ERR',<
	PUSbPHJ	P,E..A
	XLISbpT
	.PSECT	F.ERR
  > ;END IFN NAMc0E-ERR

  IFE $NcPAME$-'ERR',<
	PUcpSHJ	P,[
  > ;ENDd IFE NAME-ERR
 >d0 ;END IFN FTSHR
dP
 IFE FTSHR,<
	dpPUSHJ	P, [
 > ;EeND IFE FTSHR

Ee0..A::

	IFG <ePC>,<N..C==:'A' ep>	;DEFINE ERROR NfUMBER 
					;(LIf0NK CATCHES MULT DfPEF ERROR NUMBERS)fp	


 IF2,<IFNDgEF %ERARG,<EXTERNg0 %ERARG>>
 IFNB gP<F>,<	MOVEI	T0,%gpERARG-1
hIRP Fh,<	PUSH	T0,F		>
 >; END IFNB
 IhPF2,<IFNDEF %IOERRhp,<EXTERN %IOERR>>i
		PUSHJ	P,%IOERi0R
		BYTE	(7)"D"iP(10)^DB,^DC(9)ipG
		XWD	'A',0
j		ASCIZ	\E\

j0
 IFE FTSHR,<			]jP	>
IFN FTSHR,<
  IFN $NAME$-'ERkR',<
	.ENDPS
	Lk0IST
  > ; END IFkPN NAME-ERR

  IkpFE $NAME$-'ERR',<l		]	>
 > ;END IFN FTSHR
END IF0OCJ==r10,O,C|0 IRP BS?P S?X@P SC& P #SJK@P SJY@P SJmP SJd[@P SKL@P X@ YtYP YtI1P YuVP YukwP Y
`Q Y  lP


 .ARGNlp.==0
 IRP D,<.AmRGN.==.ARGN.+1>
m0
	PUSHJ	P, [
	 mPIFNB <E>,<	PUSH	mpP,[-1,,E]  >
	 nIRP D,<	PUSH	P,n0D   >
			PUSH	P,nP[.ARGN.]
			PUSHnpJ	P,FORER.##
			oBYTE	(7)"B"(19)0o0		;'ERROR ARG BLOoPCK'
			XWD	'A',op0
			ASCIZ	\C\
		  ]
 PURGE .ARGN.
 PURGE .AYePQ Y&hQ  Y.P Y/ P Y2-`P Y>

@ ~`.
	IFNB <C>,< PRINTX ?LOAD  used with more t@han 2 args - A, `B >

	%%BTS==<B> & 7B2
	%%IDX ==<<B>_-^D18> & @^O77	;Get index f`ield if any
	%%LFT==<B> & ^O7777 77
	IFE <%%IDX>,@<PRINTX %Index is` zero for LOAD A,B >

  IFE %% BTS,<
	MOVE	A,@B
  >
 IFN <%%B`TS & 1B0>,<
	HRRZ	A,%%LFT(%%IDX) 
  >
  IFN <%%B@TS & 1B1>,<
	HLR`Z	A,%%LFT(%%IDX)
  >
  IFN <%%B TS & 1B2>,<
	%%%@S==<%B>_-^D30	;S`ize of field
	%%%P==<%B> & ^O77	 ;"P"
	LDB	A,[PO@INT %%%S,%%LFT(%%`IDX),%%%P]
  >
X),%%%P]
  >
YB%@P @YJ,8SP YNv[ P 

[DSP @[F[TP 1[tqP [tvP [t*7P [tK8P [tXQP [u3P [&v[TQ |[>$PQ [?7 PI
 IFE <<0B>&777777000000>,p<MOVEI A,<B> ;>  IFE <<B>&0000000777777>,<MOVSI PA,(B) ;>  IFE <<pB>_-22 - 777777>,<HRROI A,<<B>&0777777> ;>  IFE <P<B>&777777-77777p7>,<HRLOI A,<<B>_-22> ;> 			 MOVE A,[B]
 MOV],`P ]?(Q @]J,0P _
 P $_@Q $_v@P %_,tqP _,t{P 	_,t)QP _,t+P _,t+P 
_,t8`P _,tI7P 
_,tI;P _,tJ0P _,tJ9P _,tJ9P _,t\YP _,tj6P _,tkP _,tkyP _,uwP _,uyP _,uHVP 

_,uJ6P _,u[ZP _,u[rP _,v2P 

_,v9P 	_,v

WP=,v)1P[,v)2Pi,v+`P,v-PKP6`JY@P6aJmP Jd[@PQK|`Pa+= 5a2-`P a>Mm C0POINT WID(B),A,POS(B)(aBpP aHt]RP aHuyP aJ~@P aRD P aRFP c}Q @cv@Q c;}Q dU >pw<RADIX50 0,A><RADIX50 0e@P e.`P ek Q e<Q eNO) P 
g6`P 
g6P g=Y7 ?0
  IFDEF ?P$SEG$,<.ENDPS>
	?p$SEG$==1
	.PSECT@	F.AB
	$NAME$=='A'
 $NAME$=g'PP gB`P gPtJ9P gPui;P gPu{P gPv8yP gPv[UP gR-P ?gR@Q gR\I3 =poDEFINE A <-B(P)>INE A gR^h9 Pk
 .L==0
p IRP A,<.L==.L+1>		;COUNT ARGS
 0.N==0

 IRP A,P<
IFNB <A>,<
   STKDEF (A,\<.L-.N-1>)	;DEFINE0 NAMED ARG
  > ;PEND IFNB
  .N==.pN+1
>;END IRP

	ADJSP	P,.L		;0ALLOCATE STACK SPPACE
 DEFINE UNST<pK <	ADJSP P,-.L >=	;DEFINE DEALLOCA=0TOR
 PURGE .N
OR
 PURGE .N
gR~)   h
	IFNB <@C>,<PRINTX ?STORE` with more than 2 args - A, B >

	%%BTS==<B> &@ 7B2
	%%IDX==<<`B>_-^D18> & 77	;Get index field if  any
	%%LFT==<B@> & ^O777777
	IF`E <%%IDX>,<PRINTX	 %Index is zero f	 or STORE A,B >

	IFE %%BTS,<
	MOVEM	A,B
  
>
 IFN <%%BTS & 
 1B0>,<
	HRRM	A,
@%%LFT(%%IDX)
  >
`
  IFN <%%BTS & 1B1>,<
	HRLM	A, %%LFT(%%IDX)
  >@
  IFN <%%BTS & `1B2>,<
	%%%S==<%

B>_-^D30	;Size o

 f field
	%%%P==<

@%B> & ^O77	;"P"

`
	DPB	A,[POINTD%,%%%P]
  >
X),h@@ hD@ hH@ hL@ hP@ hT@ iPQ i4tYP i4tK8P i4uRP i4v>9P i@,:P i@,<P i@,LP i@,LP i@,LP i@,LP i@-ZP i@-HVP i@-J:P i@-KsP i@.<P i@.<P [email protected]P iB

y P iSNpQ iX H0

 TITLEHP A  B
 FSRCH
Hp
 VMAJOR==<VMINOIR==<VEDIT==<VWHO=I0=0>>>
%VWHO==0

 IRPC B,<

Ip  IFLE <"B"-"A">J*<"B"-"Z">,<VMINJ0OR==VMINOR*^D26 +JP "B" - "A" + 1>

  IFLE <"B"-"K0">*<"B"-"9">,<VK0MAJOR==VMAJOR*^D8KP + "B" - "0">
Kp
LIFIDN <B><(>,L<%VMAJOR==VMAJOR
		VMAJOR==0>

LP  IFIDN <B><)>,<LpVEDIT==VMAJOR
		MVMAJOR==%VMAJOR>

  IFIDN <B><-MP>,<%VMAJOR==VMAJOMpR
		VMAJOR==0
	N	%VWHO==-1>
 > ;N0END IRPC

 IFN NP%VWHO,<VWHO==VMAJNpOR
	    VMAJOR==O%VMAJOR>

 DEFIO0NE VER <
	BYTE	(OP3)VWHO(9)VMAJOR(6Op)VMINOR(18)VEDIT
 > ;END VER

 P0PURGE %VMAJOR,%VWHO
%VMAJOR,%VWib :pc
    IFE ;<<B>&77777700000;00>,<TRC A,<B> ;;P>     IFE <<B>&0;p00000777777>,<TLC< A,(B) ;> 			  <0  TDC A,[B]
   DC A,[B]
  ib 8pS
 IFE 9<<B>&77777700000900>,<TRCA A,<B> 9P;>     IFE <<B>&9p000000777777>,<TL:CA A,(B) ;> 			:0    TDCA A,[B]
ibCA A,[B]
 IFE 7<<B>&77777700000700>,<TRCE A,<B> 7P;>     IFE <<B>&7p000000777777>,<TL8CE A,(B) ;> 			80    TDCE A,[B]
ibCE A,[B]
 IFE 5<<B>&77777700000500>,<TRCN A,<B> 5P;>     IFE <<B>&5p000000777777>,<TL6CN A,(B) ;> 			60    TDCN A,[B]
ibpCN A,[B]
    IFE #<<B>&77777700000#00>,<TRN A,<B> ;#P>     IFE <<B>&0#p00000777777>,<TLN$ A,(B) ;> 			  $0  TDN A,[B]
   DN A,[B]
  ibt  p
 IFE !<<B>&77777700000!00>,<TRNA A,<B> !P;>     IFE <<B>&!p000000777777>,<TL"NA A,(B) ;> 			"0    TDNA A,[B]
ibtNA A,[B]
 IFE <<B>&7777770000000>,<TRNE A,<B> P;>     IFE <<B>&p000000777777>,<TL NE A,(B) ;> 			 0    TDNE A,[B]
ibuNE A,[B]
 IFE <<B>&7777770000000>,<TRNN A,<B> P;>     IFE <<B>&p000000777777>,<TLNN A,(B) ;> 			0    TDNN A,[B]
ibxNN A,[B]
    IFE 3<<B>&77777700000300>,<TRO A,<B> ;3P>     IFE <<B>&03p00000777777>,<TLO4 A,(B) ;> 			  40  TDO A,[B]
   DO A,[B]
  ib| 0p
 IFE 1<<B>&77777700000100>,<TROA A,<B> 1P;>     IFE <<B>&1p000000777777>,<TL2OA A,(B) ;> 			20    TDOA A,[B]
ib|OA A,[B]
 IFE /<<B>&77777700000/00>,<TROE A,<B> /P;>     IFE <<B>&/p000000777777>,<TL0OE A,(B) ;> 			00    TDOE A,[B]
ib}OE A,[B]
 IFE -<<B>&77777700000-00>,<TRON A,<B> -P;>     IFE <<B>&-p000000777777>,<TL.ON A,(B) ;> 			.0    TDON A,[B]
icPON A,[B]
    IFE +<<B>&77777700000+00>,<TRZ A,<B> ;+P>     IFE <<B>&0+p00000777777>,<TLZ, A,(B) ;> 			  ,0  TDZ A,[B]
   DZ A,[B]
  icT (pS
 IFE )<<B>&77777700000)00>,<TRZA A,<B> )P;>     IFE <<B>&)p000000777777>,<TL*ZA A,(B) ;> 			*0    TDZA A,[B]
icTZA A,[B]
 IFE '<<B>&77777700000'00>,<TRZE A,<B> 'P;>     IFE <<B>&'p000000777777>,<TL(ZE A,(B) ;> 			(0    TDZE A,[B]
icUZE A,[B]
 IFE %<<B>&77777700000%00>,<TRZN A,<B> %P;>     IFE <<B>&%p000000777777>,<TL&ZN A,(B) ;> 			&0    TDZN A,[B]
jZN A,[B]P k;-PQ  kNmP m`P m~+zP o& P ov@P oC& P oJt;ZP oNO P oR

 P q
f@ q6|I Q q6~i4 C 	
dHX xD
		HRLI	x(A,(POINT 7,) ;AlwxHays assume local BP
	ume local 	 pP
	EXTERN ppE..A
IFB <B>,<q	PUSHJ	P,E..A >
IFNB <B>,<	PUSHqPJ	P,[PUSH P,[-1,,qpB]
			JRST E..A] >
JRST E..	Nu ^p
	IF2,<IF_NDEF E..SNH, EXTE_0RN E..SNH
	   IF_PNDEF %HALT, EXTER_pN %HALT>
	PUSHJ	`P,[PUSH P,[-1,,%H`0ALT]
		   JRST E..SNH]
 JRST E
`P 
{P 0Q 	d0P 4@P 
e;@P 
e<}P 
ej`Q pQ 

,h2P ,hzQ 



,jP NK@P QdD@P v;P v;	Pv@P$(2P -`Q 
5rP 6N8Q tH2P |k@P (2P +@P @P F@P J`P MI P MKQ @MK	Q 

MK	Q 

dyP ~+ Q &8@P &:=Q 

&mP &tNQ 	&xQ 
&~82P2&~=1P'L@P'+P2'-3P2';ZP2'I7P3' 6|I Q :Y@P :~PP ;X`P >8@P >:=Q 

>mP ?L@P ?+P ?-3P ?;ZP ?I7P ?yP ?

HtQ B Q C`P C}P C%@P C%

P F=zP FmQ Fv=zQ J=P J$]@P J,9VQ JxQ KRP K[P NlP Nl	P Nl	P Nl
P NO P O@P O$Q R Q 	SrP S'`Q Vd[@P Vv[ P W;ZP Z.+@P ^

L@P ^mP _L@P _@P _$@P bmyQ EH1P F(1P S@P $hhP $hiP $hiP $khP $m(P $m)P %P %{P %LRP %LzP %m6P %y[P >}{woP