@^UI/0A-13"Ni '/
0j<s	PARAMETER
;-ltk>

0j<fs	PARAMETER 	;>
0j<fs	PARAMETER		;>
0j<fs	D  ;0tt>0j<fs	D, ;0tt>

0j<fs'X	!;	(* ;l-2ci *)0tt>

0j<s		!;0tt0l
(0A-^^C)"Edfs	!(* ;l-2ci *)0tt|l'>

0j<s	!;0ttl-2c.u90l.u1(q9-q1),:s(*u9
q9"E0lfs	!;	(* ;l-2ci *)0tt|l'>

0j<sS!;0ttl-2c.u90l.u1(q9-q1),:s(*u9
q9"E0lfsS!;	(* ;l-2ci *)0tt|l'>

0j<fs='= %X;0ttl>

0j<fs=S'= %X;0ttl>

0jdi(*ldi lfsC--*)0l.ue0j<s
C;.-qe;-di >0j5t
zj-3ldi(*ldi ldi*)zj-3t

0j<fs

C

(*;0tt<l0u10A-^^C"EdMI-1u1'q1;0tt>-2ci*)0tt>
0j<fs(**)(* *);0tt>