$ od -c -N 50000 [Indigo]<Casaba>7.0>Saffron3.0>Derived>SaffronAG3Def.Mesa!34 0000000 - - S a f f r o n A G 3 D e f 0000020 . m e s a \r - - C o p y r i 0000040 g h t 323 1 9 8 7 b y X e 0000060 r o x C o r p o r a t i o n . 0000100 A l l r i g h t s r e s 0000120 e r v e d . \r - - G e n e r 0000140 a t e d b y R a u e n . p a 0000160 a t S e p t e m b e r 1 , 0000200 1 9 8 8 7 : 2 4 : 3 2 p m 0000220 P D T \r - - u s i n g 0000240 T h r e e C a s a b a F o u r 0000260 [ 1 . 2 ] o f J u n e 1 , 0000300 1 9 8 7 6 : 0 0 : 0 0 p m 0000320 P D T \r \r D I R E C T O R Y \r 0000340 \t S a f f r o n T r e e D e c l 0000360 s D e f , \r \t S a f f r o n G e 0000400 n e r i c D e f , \r \t S a f f r 0000420 o n A T D e f ; \r \r S a f f r o 0000440 n A G 3 D e f : C E D A R D 0000460 E F I N I T I O N S = \r B E 0000500 G I N \r O P E N S a f f r o n 0000520 T r e e D e c l s D e f , S a 0000540 f f r o n G e n e r i c D e f , 0000560 S a f f r o n A T D e f ; \r \r 0000600 - - Q u a l i f i e r p r e f 0000620 i x o p P r o d \r \r Q u a l i f 0000640 i e r p r e f i x o p P r o d D 0000660 a t a : \t T Y P E = R E F 0000700 Q u a l i f i e r p r e f i x o 0000720 p P r o d D a t a B o d y ; \r Q 0000740 u a l i f i e r p r e f i x o p 0000760 P r o d D a t a B o d y : \t T Y 0001000 P E = R E C O R D [ \r P r e 0001020 f i x O p : P r e f i x O p N 0001040 o d e ] ; \r \r Q u a l i f i e r 0001060 p r e f i x o p P r o d P r o c 0001100 s : \t Q u a l i f i e r N o d e 0001120 P r o c s ; \r \r B u i l d Q u a 0001140 l i f i e r p r e f i x o p P r 0001160 o d N o d e : \t P R O C [ p o s 0001200 i t i o n : I N T , l e n g 0001220 t h : I N T , P r e f i x O 0001240 p : P r e f i x O p N o d e ] 0001260 \r \t R E T U R N S [ Q u a l i f 0001300 i e r N o d e ] ; \r \r Q u a l i 0001320 f i e r p r e f i x o p P r o d 0001340 C o m p i l e Q u a l i f i e d 0001360 E x p r e s s i o n : \t C o m p 0001400 i l e Q u a l i f i e d E x p r 0001420 e s s i o n P r o c T y p e ; \r 0001440 \r - - Q u a l i f i e r t y p 0001460 e o p P r o d \r \r Q u a l i f i 0001500 e r t y p e o p P r o d D a t a 0001520 : \t T Y P E = R E F Q u a 0001540 l i f i e r t y p e o p P r o d 0001560 D a t a B o d y ; \r Q u a l i f 0001600 i e r t y p e o p P r o d D a t 0001620 a B o d y : \t T Y P E = R E 0001640 C O R D [ \r T y p e O p : T y 0001660 p e O p N o d e ] ; \r \r Q u a l 0001700 i f i e r t y p e o p P r o d P 0001720 r o c s : \t Q u a l i f i e r N 0001740 o d e P r o c s ; \r \r B u i l d 0001760 Q u a l i f i e r t y p e o p P 0002000 r o d N o d e : \t P R O C [ p o 0002020 s i t i o n : I N T , l e n 0002040 g t h : I N T , T y p e O p 0002060 : T y p e O p N o d e ] \r \t R 0002100 E T U R N S [ Q u a l i f i e r 0002120 N o d e ] ; \r \r Q u a l i f i e 0002140 r t y p e o p P r o d C o m p i 0002160 l e Q u a l i f i e d E x p r e 0002200 s s i o n : \t C o m p i l e Q u 0002220 a l i f i e d E x p r e s s i o 0002240 n P r o c T y p e ; \r \r - - Q 0002260 u a l i f i e r s i z e P r o d 0002300 \r \r Q u a l i f i e r s i z e P 0002320 r o d D a t a : \t T Y P E = 0002340 R E F Q u a l i f i e r s i z 0002360 e P r o d D a t a B o d y ; \r Q 0002400 u a l i f i e r s i z e P r o d 0002420 D a t a B o d y : \t T Y P E = 0002440 R E C O R D [ \r ] ; \r \r Q u a 0002460 l i f i e r s i z e P r o d P r 0002500 o c s : \t Q u a l i f i e r N o 0002520 d e P r o c s ; \r \r B u i l d Q 0002540 u a l i f i e r s i z e P r o d 0002560 N o d e : \t P R O C [ p o s i t 0002600 i o n : I N T , l e n g t h 0002620 : I N T ] \r \t R E T U R N S [ 0002640 Q u a l i f i e r N o d e ] ; \r 0002660 \r Q u a l i f i e r s i z e P r 0002700 o d C o m p i l e Q u a l i f i 0002720 e d E x p r e s s i o n : \t C o 0002740 m p i l e Q u a l i f i e d E x 0002760 p r e s s i o n P r o c T y p e 0003000 ; \r \r - - Q u a l i f i e r b 0003020 i t s P r o d \r \r Q u a l i f i 0003040 e r b i t s P r o d D a t a : \t 0003060 T Y P E = R E F Q u a l i 0003100 f i e r b i t s P r o d D a t a 0003120 B o d y ; \r Q u a l i f i e r b 0003140 i t s P r o d D a t a B o d y : 0003160 \t T Y P E = R E C O R D [ \r 0003200 ] ; \r \r Q u a l i f i e r b i t 0003220 s P r o d P r o c s : \t Q u a l 0003240 i f i e r N o d e P r o c s ; \r 0003260 \r B u i l d Q u a l i f i e r b 0003300 i t s P r o d N o d e : \t P R O 0003320 C [ p o s i t i o n : I N T , 0003340 l e n g t h : I N T ] \r \t R 0003360 E T U R N S [ Q u a l i f i e r 0003400 N o d e ] ; \r \r Q u a l i f i e 0003420 r b i t s P r o d C o m p i l e 0003440 Q u a l i f i e d E x p r e s s 0003460 i o n : \t C o m p i l e Q u a l 0003500 i f i e d E x p r e s s i o n P 0003520 r o c T y p e ; \r \r - - Q u a 0003540 l i f i e r b y t e s P r o d \r 0003560 \r Q u a l i f i e r b y t e s P 0003600 r o d D a t a : \t T Y P E = 0003620 R E F Q u a l i f i e r b y t 0003640 e s P r o d D a t a B o d y ; \r 0003660 Q u a l i f i e r b y t e s P r 0003700 o d D a t a B o d y : \t T Y P E 0003720 = R E C O R D [ \r ] ; \r \r Q 0003740 u a l i f i e r b y t e s P r o 0003760 d P r o c s : \t Q u a l i f i e 0004000 r N o d e P r o c s ; \r \r B u i 0004020 l d Q u a l i f i e r b y t e s 0004040 P r o d N o d e : \t P R O C [ p 0004060 o s i t i o n : I N T , l e 0004100 n g t h : I N T ] \r \t R E T U 0004120 R N S [ Q u a l i f i e r N o d 0004140 e ] ; \r \r Q u a l i f i e r b y 0004160 t e s P r o d C o m p i l e Q u 0004200 a l i f i e d E x p r e s s i o 0004220 n : \t C o m p i l e Q u a l i f 0004240 i e d E x p r e s s i o n P r o 0004260 c T y p e ; \r \r - - Q u a l i 0004300 f i e r u n i t s P r o d \r \r Q 0004320 u a l i f i e r u n i t s P r o 0004340 d D a t a : \t T Y P E = R E 0004360 F Q u a l i f i e r u n i t s 0004400 P r o d D a t a B o d y ; \r Q u 0004420 a l i f i e r u n i t s P r o d 0004440 D a t a B o d y : \t T Y P E = 0004460 R E C O R D [ \r ] ; \r \r Q u a 0004500 l i f i e r u n i t s P r o d P 0004520 r o c s : \t Q u a l i f i e r N 0004540 o d e P r o c s ; \r \r B u i l d 0004560 Q u a l i f i e r u n i t s P r 0004600 o d N o d e : \t P R O C [ p o s 0004620 i t i o n : I N T , l e n g 0004640 t h : I N T ] \r \t R E T U R N 0004660 S [ Q u a l i f i e r N o d e ] 0004700 ; \r \r Q u a l i f i e r u n i t 0004720 s P r o d C o m p i l e Q u a l 0004740 i f i e d E x p r e s s i o n : 0004760 \t C o m p i l e Q u a l i f i e 0005000 d E x p r e s s i o n P r o c T 0005020 y p e ; \r \r - - Q u a l i f i 0005040 e r w o r d s P r o d \r \r Q u a 0005060 l i f i e r w o r d s P r o d D 0005100 a t a : \t T Y P E = R E F 0005120 Q u a l i f i e r w o r d s P r 0005140 o d D a t a B o d y ; \r Q u a l 0005160 i f i e r w o r d s P r o d D a 0005200 t a B o d y : \t T Y P E = R 0005220 E C O R D [ \r ] ; \r \r Q u a l i 0005240 f i e r w o r d s P r o d P r o 0005260 c s : \t Q u a l i f i e r N o d 0005300 e P r o c s ; \r \r B u i l d Q u 0005320 a l i f i e r w o r d s P r o d 0005340 N o d e : \t P R O C [ p o s i t 0005360 i o n : I N T , l e n g t h 0005400 : I N T ] \r \t R E T U R N S [ 0005420 Q u a l i f i e r N o d e ] ; \r 0005440 \r Q u a l i f i e r w o r d s P 0005460 r o d C o m p i l e Q u a l i f 0005500 i e d E x p r e s s i o n : \t C 0005520 o m p i l e Q u a l i f i e d E 0005540 x p r e s s i o n P r o c T y p 0005560 e ; \r \r - - Q u a l i f i e r 0005600 a p p l y P r o d \r \r Q u a l i 0005620 f i e r a p p l y P r o d D a t 0005640 a : \t T Y P E = R E F Q u 0005660 a l i f i e r a p p l y P r o d 0005700 D a t a B o d y ; \r Q u a l i f 0005720 i e r a p p l y P r o d D a t a 0005740 B o d y : \t T Y P E = R E C 0005760 O R D [ \r E x p L i s t : E x 0006000 p L i s t N o d e , C a t c h 0006020 : C a t c h N o d e ] ; \r \r Q 0006040 u a l i f i e r a p p l y P r o 0006060 d P r o c s : \t Q u a l i f i e 0006100 r N o d e P r o c s ; \r \r B u i 0006120 l d Q u a l i f i e r a p p l y 0006140 P r o d N o d e : \t P R O C [ p 0006160 o s i t i o n : I N T , l e 0006200 n g t h : I N T , E x p L i 0006220 s t : E x p L i s t N o d e , 0006240 C a t c h : C a t c h N o d 0006260 e ] \r \t R E T U R N S [ Q u a l 0006300 i f i e r N o d e ] ; \r \r Q u a 0006320 l i f i e r a p p l y P r o d C 0006340 o m p i l e Q u a l i f i e d E 0006360 x p r e s s i o n : \t C o m p i 0006400 l e Q u a l i f i e d E x p r e 0006420 s s i o n P r o c T y p e ; \r \r 0006440 - - Q u a l i f i e r s e l e 0006460 c t P r o d \r \r Q u a l i f i e 0006500 r s e l e c t P r o d D a t a : 0006520 \t T Y P E = R E F Q u a l 0006540 i f i e r s e l e c t P r o d D 0006560 a t a B o d y ; \r Q u a l i f i 0006600 e r s e l e c t P r o d D a t a 0006620 B o d y : \t T Y P E = R E C 0006640 O R D [ \r I d : I d N o d e ] 0006660 ; \r \r Q u a l i f i e r s e l e 0006700 c t P r o d P r o c s : \t Q u a 0006720 l i f i e r N o d e P r o c s ; 0006740 \r \r B u i l d Q u a l i f i e r 0006760 s e l e c t P r o d N o d e : \t 0007000 P R O C [ p o s i t i o n : I 0007020 N T , l e n g t h : I N T , 0007040 I d : I d N o d e ] \r \t R E 0007060 T U R N S [ Q u a l i f i e r N 0007100 o d e ] ; \r \r Q u a l i f i e r 0007120 s e l e c t P r o d C o m p i l 0007140 e Q u a l i f i e d E x p r e s 0007160 s i o n : \t C o m p i l e Q u a 0007200 l i f i e d E x p r e s s i o n 0007220 P r o c T y p e ; \r \r - - Q u 0007240 a l i f i e r i n d i r e c t P 0007260 r o d \r \r Q u a l i f i e r i n 0007300 d i r e c t P r o d D a t a : \t 0007320 T Y P E = R E F Q u a l i 0007340 f i e r i n d i r e c t P r o d 0007360 D a t a B o d y ; \r Q u a l i f 0007400 i e r i n d i r e c t P r o d D 0007420 a t a B o d y : \t T Y P E = 0007440 R E C O R D [ \r ] ; \r \r Q u a l 0007460 i f i e r i n d i r e c t P r o 0007500 d P r o c s : \t Q u a l i f i e 0007520 r N o d e P r o c s ; \r \r B u i 0007540 l d Q u a l i f i e r i n d i r 0007560 e c t P r o d N o d e : \t P R O 0007600 C [ p o s i t i o n : I N T , 0007620 l e n g t h : I N T ] \r \t R 0007640 E T U R N S [ Q u a l i f i e r 0007660 N o d e ] ; \r \r Q u a l i f i e 0007700 r i n d i r e c t P r o d C o m 0007720 p i l e Q u a l i f i e d E x p 0007740 r e s s i o n : \t C o m p i l e 0007760 Q u a l i f i e d E x p r e s s 0010000 i o n P r o c T y p e ; \r \r - - 0010020 P r e f i x O p l o n g P r o 0010040 d \r \r P r e f i x O p l o n g P 0010060 r o d D a t a : \t T Y P E = 0010100 R E F P r e f i x O p l o n g 0010120 P r o d D a t a B o d y ; \r P r 0010140 e f i x O p l o n g P r o d D a 0010160 t a B o d y : \t T Y P E = R 0010200 E C O R D [ \r ] ; \r \r P r e f i 0010220 x O p l o n g P r o d P r o c s 0010240 : \t P r e f i x O p N o d e P r 0010260 o c s ; \r \r B u i l d P r e f i 0010300 x O p l o n g P r o d N o d e : 0010320 \t P R O C [ p o s i t i o n : 0010340 I N T , l e n g t h : I N T 0010360 ] \r \t R E T U R N S [ P r e f i 0010400 x O p N o d e ] ; \r \r P r e f i 0010420 x O p l o n g P r o d f o o : \t 0010440 f o o P r o c T y p e ; \r \r - - 0010460 P r e f i x O p a b s P r o d 0010500 \r \r P r e f i x O p a b s P r o 0010520 d D a t a : \t T Y P E = R E 0010540 F P r e f i x O p a b s P r o 0010560 d D a t a B o d y ; \r P r e f i 0010600 x O p a b s P r o d D a t a B o 0010620 d y : \t T Y P E = R E C O R 0010640 D [ \r ] ; \r \r P r e f i x O p a 0010660 b s P r o d P r o c s : \t P r e 0010700 f i x O p N o d e P r o c s ; \r 0010720 \r B u i l d P r e f i x O p a b 0010740 s P r o d N o d e : \t P R O C [ 0010760 p o s i t i o n : I N T , l 0011000 e n g t h : I N T ] \r \t R E T 0011020 U R N S [ P r e f i x O p N o d 0011040 e ] ; \r \r P r e f i x O p a b s 0011060 P r o d f o o : \t f o o P r o c 0011100 T y p e ; \r \r - - P r e f i x 0011120 O p p r e d P r o d \r \r P r e f 0011140 i x O p p r e d P r o d D a t a 0011160 : \t T Y P E = R E F P r e 0011200 f i x O p p r e d P r o d D a t 0011220 a B o d y ; \r P r e f i x O p p 0011240 r e d P r o d D a t a B o d y : 0011260 \t T Y P E = R E C O R D [ \r 0011300 ] ; \r \r P r e f i x O p p r e d 0011320 P r o d P r o c s : \t P r e f i 0011340 x O p N o d e P r o c s ; \r \r B 0011360 u i l d P r e f i x O p p r e d 0011400 P r o d N o d e : \t P R O C [ p 0011420 o s i t i o n : I N T , l e 0011440 n g t h : I N T ] \r \t R E T U 0011460 R N S [ P r e f i x O p N o d e 0011500 ] ; \r \r P r e f i x O p p r e d 0011520 P r o d f o o : \t f o o P r o c 0011540 T y p e ; \r \r - - P r e f i x 0011560 O p s u c c P r o d \r \r P r e f 0011600 i x O p s u c c P r o d D a t a 0011620 : \t T Y P E = R E F P r e 0011640 f i x O p s u c c P r o d D a t 0011660 a B o d y ; \r P r e f i x O p s 0011700 u c c P r o d D a t a B o d y : 0011720 \t T Y P E = R E C O R D [ \r 0011740 ] ; \r \r P r e f i x O p s u c c 0011760 P r o d P r o c s : \t P r e f i 0012000 x O p N o d e P r o c s ; \r \r B 0012020 u i l d P r e f i x O p s u c c 0012040 P r o d N o d e : \t P R O C [ p 0012060 o s i t i o n : I N T , l e 0012100 n g t h : I N T ] \r \t R E T U 0012120 R N S [ P r e f i x O p N o d e 0012140 ] ; \r \r P r e f i x O p s u c c 0012160 P r o d f o o : \t f o o P r o c 0012200 T y p e ; \r \r - - P r e f i x 0012220 O p o r d P r o d \r \r P r e f i 0012240 x O p o r d P r o d D a t a : \t 0012260 T Y P E = R E F P r e f i 0012300 x O p o r d P r o d D a t a B o 0012320 d y ; \r P r e f i x O p o r d P 0012340 r o d D a t a B o d y : \t T Y P 0012360 E = R E C O R D [ \r ] ; \r \r 0012400 P r e f i x O p o r d P r o d P 0012420 r o c s : \t P r e f i x O p N o 0012440 d e P r o c s ; \r \r B u i l d P 0012460 r e f i x O p o r d P r o d N o 0012500 d e : \t P R O C [ p o s i t i o 0012520 n : I N T , l e n g t h : 0012540 I N T ] \r \t R E T U R N S [ P r 0012560 e f i x O p N o d e ] ; \r \r P r 0012600 e f i x O p o r d P r o d f o o 0012620 : \t f o o P r o c T y p e ; \r \r 0012640 - - P r e f i x O p m i n P r 0012660 o d \r \r P r e f i x O p m i n P 0012700 r o d D a t a : \t T Y P E = 0012720 R E F P r e f i x O p m i n P 0012740 r o d D a t a B o d y ; \r P r e 0012760 f i x O p m i n P r o d D a t a 0013000 B o d y : \t T Y P E = R E C 0013020 O R D [ \r ] ; \r \r P r e f i x O 0013040 p m i n P r o d P r o c s : \t P 0013060 r e f i x O p N o d e P r o c s 0013100 ; \r \r B u i l d P r e f i x O p 0013120 m i n P r o d N o d e : \t P R O 0013140 C [ p o s i t i o n : I N T , 0013160 l e n g t h : I N T ] \r \t R 0013200 E T U R N S [ P r e f i x O p N 0013220 o d e ] ; \r \r P r e f i x O p m 0013240 i n P r o d f o o : \t f o o P r 0013260 o c T y p e ; \r \r - - P r e f 0013300 i x O p m a x P r o d \r \r P r e 0013320 f i x O p m a x P r o d D a t a 0013340 : \t T Y P E = R E F P r e 0013360 f i x O p m a x P r o d D a t a 0013400 B o d y ; \r P r e f i x O p m a 0013420 x P r o d D a t a B o d y : \t T 0013440 Y P E = R E C O R D [ \r ] ; 0013460 \r \r P r e f i x O p m a x P r o 0013500 d P r o c s : \t P r e f i x O p 0013520 N o d e P r o c s ; \r \r B u i l 0013540 d P r e f i x O p m a x P r o d 0013560 N o d e : \t P R O C [ p o s i t 0013600 i o n : I N T , l e n g t h 0013620 : I N T ] \r \t R E T U R N S [ 0013640 P r e f i x O p N o d e ] ; \r \r 0013660 P r e f i x O p m a x P r o d f 0013700 o o : \t f o o P r o c T y p e ; 0013720 \r \r - - P r e f i x O p b a s 0013740 e P r o d \r \r P r e f i x O p b 0013760 a s e P r o d D a t a : \t T Y P 0014000 E = R E F P r e f i x O p 0014020 b a s e P r o d D a t a B o d y 0014040 ; \r P r e f i x O p b a s e P r 0014060 o d D a t a B o d y : \t T Y P E 0014100 = R E C O R D [ \r ] ; \r \r P 0014120 r e f i x O p b a s e P r o d P 0014140 r o c s : \t P r e f i x O p N o 0014160 d e P r o c s ; \r \r B u i l d P 0014200 r e f i x O p b a s e P r o d N 0014220 o d e : \t P R O C [ p o s i t i 0014240 o n : I N T , l e n g t h : 0014260 I N T ] \r \t R E T U R N S [ P 0014300 r e f i x O p N o d e ] ; \r \r P 0014320 r e f i x O p b a s e P r o d f 0014340 o o : \t f o o P r o c T y p e ; 0014360 \r \r - - P r e f i x O p l e n 0014400 g t h P r o d \r \r P r e f i x O 0014420 p l e n g t h P r o d D a t a : 0014440 \t T Y P E = R E F P r e f 0014460 i x O p l e n g t h P r o d D a 0014500 t a B o d y ; \r P r e f i x O p 0014520 l e n g t h P r o d D a t a B o 0014540 d y : \t T Y P E = R E C O R 0014560 D [ \r ] ; \r \r P r e f i x O p l 0014600 e n g t h P r o d P r o c s : \t 0014620 P r e f i x O p N o d e P r o c 0014640 s ; \r \r B u i l d P r e f i x O 0014660 p l e n g t h P r o d N o d e : 0014700 \t P R O C [ p o s i t i o n : 0014720 I N T , l e n g t h : I N T 0014740 ] \r \t R E T U R N S [ P r e f i 0014760 x O p N o d e ] ; \r \r P r e f i 0015000 x O p l e n g t h P r o d f o o 0015020 : \t f o o P r o c T y p e ; \r \r 0015040 - - T y p e O p c o d e P r o 0015060 d \r \r T y p e O p c o d e P r o 0015100 d D a t a : \t T Y P E = R E 0015120 F T y p e O p c o d e P r o d 0015140 D a t a B o d y ; \r T y p e O p 0015160 c o d e P r o d D a t a B o d y 0015200 : \t T Y P E = R E C O R D [ 0015220 \r ] ; \r \r T y p e O p c o d e P 0015240 r o d P r o c s : \t T y p e O p 0015260 N o d e P r o c s ; \r \r B u i l 0015300 d T y p e O p c o d e P r o d N 0015320 o d e : \t P R O C [ p o s i t i 0015340 o n : I N T , l e n g t h : 0015360 I N T ] \r \t R E T U R N S [ T 0015400 y p e O p N o d e ] ; \r \r T y p 0015420 e O p c o d e P r o d T y p e O 0015440 p I s C o d e : \t T y p e O p I 0015460 s C o d e P r o c T y p e ; \r T 0015500 y p e O p c o d e P r o d T y p 0015520 e O p I s F i r s t : \t T y p e 0015540 O p I s F i r s t P r o c T y p 0015560 e ; \r T y p e O p c o d e P r o 0015600 d T y p e O p I s L a s t : \t T 0015620 y p e O p I s L a s t P r o c T 0015640 y p e ; \r T y p e O p c o d e P 0015660 r o d T y p e O p I s N i l : \t 0015700 T y p e O p I s N i l P r o c T 0015720 y p e ; \r \r - - T y p e O p f 0015740 i r s t P r o d \r \r T y p e O p 0015760 f i r s t P r o d D a t a : \t T 0016000 Y P E = R E F T y p e O p 0016020 f i r s t P r o d D a t a B o d 0016040 y ; \r T y p e O p f i r s t P r 0016060 o d D a t a B o d y : \t T Y P E 0016100 = R E C O R D [ \r ] ; \r \r T 0016120 y p e O p f i r s t P r o d P r 0016140 o c s : \t T y p e O p N o d e P 0016160 r o c s ; \r \r B u i l d T y p e 0016200 O p f i r s t P r o d N o d e : 0016220 \t P R O C [ p o s i t i o n : 0016240 I N T , l e n g t h : I N T 0016260 ] \r \t R E T U R N S [ T y p e O 0016300 p N o d e ] ; \r \r T y p e O p f 0016320 i r s t P r o d T y p e O p I s 0016340 C o d e : \t T y p e O p I s C o 0016360 d e P r o c T y p e ; \r T y p e 0016400 O p f i r s t P r o d T y p e O 0016420 p I s F i r s t : \t T y p e O p 0016440 I s F i r s t P r o c T y p e ; 0016460 \r T y p e O p f i r s t P r o d 0016500 T y p e O p I s L a s t : \t T y 0016520 p e O p I s L a s t P r o c T y 0016540 p e ; \r T y p e O p f i r s t P 0016560 r o d T y p e O p I s N i l : \t 0016600 T y p e O p I s N i l P r o c T 0016620 y p e ; \r \r - - T y p e O p l 0016640 a s t P r o d \r \r T y p e O p l 0016660 a s t P r o d D a t a : \t T Y P 0016700 E = R E F T y p e O p l a 0016720 s t P r o d D a t a B o d y ; \r 0016740 T y p e O p l a s t P r o d D a 0016760 t a B o d y : \t T Y P E = R 0017000 E C O R D [ \r ] ; \r \r T y p e O 0017020 p l a s t P r o d P r o c s : \t 0017040 T y p e O p N o d e P r o c s ; 0017060 \r \r B u i l d T y p e O p l a s 0017100 t P r o d N o d e : \t P R O C [ 0017120 p o s i t i o n : I N T , l 0017140 e n g t h : I N T ] \r \t R E T 0017160 U R N S [ T y p e O p N o d e ] 0017200 ; \r \r T y p e O p l a s t P r o 0017220 d T y p e O p I s C o d e : \t T 0017240 y p e O p I s C o d e P r o c T 0017260 y p e ; \r T y p e O p l a s t P 0017300 r o d T y p e O p I s F i r s t 0017320 : \t T y p e O p I s F i r s t P 0017340 r o c T y p e ; \r T y p e O p l 0017360 a s t P r o d T y p e O p I s L 0017400 a s t : \t T y p e O p I s L a s 0017420 t P r o c T y p e ; \r T y p e O 0017440 p l a s t P r o d T y p e O p I 0017460 s N i l : \t T y p e O p I s N i 0017500 l P r o c T y p e ; \r \r - - T 0017520 y p e O p n i l P r o d \r \r T y 0017540 p e O p n i l P r o d D a t a : 0017560 \t T Y P E = R E F T y p e 0017600 O p n i l P r o d D a t a B o d 0017620 y ; \r T y p e O p n i l P r o d 0017640 D a t a B o d y : \t T Y P E = 0017660 R E C O R D [ \r ] ; \r \r T y p 0017700 e O p n i l P r o d P r o c s : 0017720 \t T y p e O p N o d e P r o c s 0017740 ; \r \r B u i l d T y p e O p n i 0017760 l P r o d N o d e : \t P R O C [ 0020000 p o s i t i o n : I N T , l 0020020 e n g t h : I N T ] \r \t R E T 0020040 U R N S [ T y p e O p N o d e ] 0020060 ; \r \r T y p e O p n i l P r o d 0020100 T y p e O p I s C o d e : \t T y 0020120 p e O p I s C o d e P r o c T y 0020140 p e ; \r T y p e O p n i l P r o 0020160 d T y p e O p I s F i r s t : \t 0020200 T y p e O p I s F i r s t P r o 0020220 c T y p e ; \r T y p e O p n i l 0020240 P r o d T y p e O p I s L a s t 0020260 : \t T y p e O p I s L a s t P r 0020300 o c T y p e ; \r T y p e O p n i 0020320 l P r o d T y p e O p I s N i l 0020340 : \t T y p e O p I s N i l P r o 0020360 c T y p e ; \r \r - - N e w p l 0020400 a i n P r o d \r \r N e w p l a i 0020420 n P r o d D a t a : \t T Y P E 0020440 = R E F N e w p l a i n P r 0020460 o d D a t a B o d y ; \r N e w p 0020500 l a i n P r o d D a t a B o d y 0020520 : \t T Y P E = R E C O R D [ 0020540 \r ] ; \r \r N e w p l a i n P r o 0020560 d P r o c s : \t N e w N o d e P 0020600 r o c s ; \r \r B u i l d N e w p 0020620 l a i n P r o d N o d e : \t P R 0020640 O C [ p o s i t i o n : I N T 0020660 , l e n g t h : I N T ] \r \t 0020700 R E T U R N S [ N e w N o d e ] 0020720 ; \r \r N e w p l a i n P r o d f 0020740 o o : \t f o o P r o c T y p e ; 0020760 \r \r - - N e w z o n e d P r o 0021000 d \r \r N e w z o n e d P r o d D 0021020 a t a : \t T Y P E = R E F 0021040 N e w z o n e d P r o d D a t a 0021060 B o d y ; \r N e w z o n e d P r 0021100 o d D a t a B o d y : \t T Y P E 0021120 = R E C O R D [ \r E x p : 0021140 E x p N o d e ] ; \r \r N e w z o 0021160 n e d P r o d P r o c s : \t N e 0021200 w N o d e P r o c s ; \r \r B u i 0021220 l d N e w z o n e d P r o d N o 0021240 d e : \t P R O C [ p o s i t i o 0021260 n : I N T , l e n g t h : 0021300 I N T , E x p : E x p N o d 0021320 e ] \r \t R E T U R N S [ N e w N 0021340 o d e ] ; \r \r N e w z o n e d P 0021360 r o d f o o : \t f o o P r o c T 0021400 y p e ; \r \r - - C o n s p l a 0021420 i n P r o d \r \r C o n s p l a i 0021440 n P r o d D a t a : \t T Y P E 0021460 = R E F C o n s p l a i n P 0021500 r o d D a t a B o d y ; \r C o n 0021520 s p l a i n P r o d D a t a B o 0021540 d y : \t T Y P E = R E C O R 0021560 D [ \r ] ; \r \r C o n s p l a i n 0021600 P r o d P r o c s : \t C o n s N 0021620 o d e P r o c s ; \r \r B u i l d 0021640 C o n s p l a i n P r o d N o d 0021660 e : \t P R O C [ p o s i t i o n 0021700 : I N T , l e n g t h : I 0021720 N T ] \r \t R E T U R N S [ C o n 0021740 s N o d e ] ; \r \r C o n s p l a 0021760 i n P r o d f o o : \t f o o P r 0022000 o c T y p e ; \r \r - - C o n s 0022020 z o n e d P r o d \r \r C o n s z 0022040 o n e d P r o d D a t a : \t T Y 0022060 P E = R E F C o n s z o n 0022100 e d P r o d D a t a B o d y ; \r 0022120 C o n s z o n e d P r o d D a t 0022140 a B o d y : \t T Y P E = R E 0022160 C O R D [ \r E x p : E x p N o 0022200 d e ] ; \r \r C o n s z o n e d P 0022220 r o d P r o c s : \t C o n s N o 0022240 d e P r o c s ; \r \r B u i l d C 0022260 o n s z o n e d P r o d N o d e 0022300 : \t P R O C [ p o s i t i o n : 0022320 I N T , l e n g t h : I N 0022340 T , E x p : E x p N o d e ] 0022360 \r \t R E T U R N S [ C o n s N o 0022400 d e ] ; \r \r C o n s z o n e d P 0022420 r o d f o o : \t f o o P r o c T 0022440 y p e ; \r \r - - L i s t C o n 0022460 s p l a i n P r o d \r \r L i s t 0022500 C o n s p l a i n P r o d D a t 0022520 a : \t T Y P E = R E F L i 0022540 s t C o n s p l a i n P r o d D 0022560 a t a B o d y ; \r L i s t C o n 0022600 s p l a i n P r o d D a t a B o 0022620 d y : \t T Y P E = R E C O R 0022640 D [ \r ] ; \r \r L i s t C o n s p 0022660 l a i n P r o d P r o c s : \t L 0022700 i s t C o n s N o d e P r o c s 0022720 ; \r \r B u i l d L i s t C o n s 0022740 p l a i n P r o d N o d e : \t P 0022760 R O C [ p o s i t i o n : I N 0023000 T , l e n g t h : I N T ] \r 0023020 \t R E T U R N S [ L i s t C o n 0023040 s N o d e ] ; \r \r L i s t C o n 0023060 s p l a i n P r o d f o o : \t f 0023100 o o P r o c T y p e ; \r \r - - 0023120 L i s t C o n s z o n e d P r o 0023140 d \r \r L i s t C o n s z o n e d 0023160 P r o d D a t a : \t T Y P E = 0023200 R E F L i s t C o n s z o n 0023220 e d P r o d D a t a B o d y ; \r 0023240 L i s t C o n s z o n e d P r o 0023260 d D a t a B o d y : \t T Y P E 0023300 = R E C O R D [ \r E x p : E 0023320 x p N o d e ] ; \r \r L i s t C o 0023340 n s z o n e d P r o d P r o c s 0023360 : \t L i s t C o n s N o d e P r 0023400 o c s ; \r \r B u i l d L i s t C 0023420 o n s z o n e d P r o d N o d e 0023440 : \t P R O C [ p o s i t i o n : 0023460 I N T , l e n g t h : I N 0023500 T , E x p : E x p N o d e ] 0023520 \r \t R E T U R N S [ L i s t C o 0023540 n s N o d e ] ; \r \r L i s t C o 0023560 n s z o n e d P r o d f o o : \t 0023600 f o o P r o c T y p e ; \r \r - - 0023620 D e s c L i s t e x p l i c i 0023640 t l e n g t h P r o d \r \r D e s 0023660 c L i s t e x p l i c i t l e n 0023700 g t h P r o d D a t a : \t T Y P 0023720 E = R E F D e s c L i s t 0023740 e x p l i c i t l e n g t h P r 0023760 o d D a t a B o d y ; \r D e s c 0024000 L i s t e x p l i c i t l e n g 0024020 t h P r o d D a t a B o d y : \t 0024040 T Y P E = R E C O R D [ \r E 0024060 x p b a s e : E x p N o d e , 0024100 E x p l e n g t h : E x p N 0024120 o d e , O p t T y p e : O p 0024140 t T y p e N o d e ] ; \r \r D e s 0024160 c L i s t e x p l i c i t l e n 0024200 g t h P r o d P r o c s : \t D e 0024220 s c L i s t N o d e P r o c s ; 0024240 \r \r B u i l d D e s c L i s t e 0024260 x p l i c i t l e n g t h P r o 0024300 d N o d e : \t P R O C [ p o s i 0024320 t i o n : I N T , l e n g t 0024340 h : I N T , E x p b a s e : 0024360 E x p N o d e , E x p l e n 0024400 g t h : E x p N o d e , O p 0024420 t T y p e : O p t T y p e N o 0024440 d e ] \r \t R E T U R N S [ D e s 0024460 c L i s t N o d e ] ; \r \r D e s 0024500 c L i s t e x p l i c i t l e n 0024520 g t h P r o d f o o : \t f o o P 0024540 r o c T y p e ; \r \r - - D e s 0024560 c L i s t d e f a u l t l e n g 0024600 t h P r o d \r \r D e s c L i s t 0024620 d e f a u l t l e n g t h P r o 0024640 d D a t a : \t T Y P E = R E 0024660 F D e s c L i s t d e f a u l 0024700 t l e n g t h P r o d D a t a B 0024720 o d y ; \r D e s c L i s t d e f 0024740 a u l t l e n g t h P r o d D a 0024760 t a B o d y : \t T Y P E = R 0025000 E C O R D [ \r E x p : E x p N 0025020 o d e ] ; \r \r D e s c L i s t d 0025040 e f a u l t l e n g t h P r o d 0025060 P r o c s : \t D e s c L i s t N 0025100 o d e P r o c s ; \r \r B u i l d 0025120 D e s c L i s t d e f a u l t l 0025140 e n g t h P r o d N o d e : \t P 0025160 R O C [ p o s i t i o n : I N 0025200 T , l e n g t h : I N T , 0025220 E x p : E x p N o d e ] \r \t R 0025240 E T U R N S [ D e s c L i s t N 0025260 o d e ] ; \r \r D e s c L i s t d 0025300 e f a u l t l e n g t h P r o d 0025320 f o o : \t f o o P r o c T y p e 0025340 ; \r \r - - I n i t i a l i z a 0025360 t i o n e m p t y P r o d \r \r I 0025400 n i t i a l i z a t i o n e m p 0025420 t y P r o d D a t a : \t T Y P E 0025440 = R E F I n i t i a l i z 0025460 a t i o n e m p t y P r o d D a 0025500 t a B o d y ; \r I n i t i a l i 0025520 z a t i o n e m p t y P r o d D 0025540 a t a B o d y : \t T Y P E = 0025560 R E C O R D [ \r ] ; \r \r I n i t 0025600 i a l i z a t i o n e m p t y P 0025620 r o d P r o c s : \t I n i t i a 0025640 l i z a t i o n N o d e P r o c 0025660 s ; \r \r B u i l d I n i t i a l 0025700 i z a t i o n e m p t y P r o d 0025720 N o d e : \t P R O C [ p o s i t 0025740 i o n : I N T , l e n g t h 0025760 : I N T ] \r \t R E T U R N S [ 0026000 I n i t i a l i z a t i o n N o 0026020 d e ] ; \r \r I n i t i a l i z a 0026040 t i o n e m p t y P r o d G e t 0026060 I n i t i a l V a l u e : \t G e 0026100 t I n i t i a l V a l u e P r o 0026120 c T y p e ; \r I n i t i a l i z 0026140 a t i o n e m p t y P r o d I n 0026160 i t i a l i z a t i o n I s E m 0026200 p t y : \t I n i t i a l i z a t 0026220 i o n I s E m p t y P r o c T y 0026240 p e ; \r I n i t i a l i z a t i 0026260 o n e m p t y P r o d I n i t i 0026300 a l i z a t i o n I s B i n d i 0026320 n g : \t I n i t i a l i z a t i 0026340 o n I s B i n d i n g P r o c T 0026360 y p e ; \r I n i t i a l i z a t 0026400 i o n e m p t y P r o d I n i t 0026420 i a l i z a t i o n I s A s s i 0026440 g n m e n t : \t I n i t i a l i 0026460 z a t i o n I s A s s i g n m e 0026500 n t P r o c T y p e ; \r I n i t 0026520 i a l i z a t i o n e m p t y P 0026540 r o d C o m p i l e I n i t i a 0026560 l i z a t i o n : \t C o m p i l 0026600 e I n i t i a l i z a t i o n P 0026620 r o c T y p e ; \r I n i t i a l 0026640 i z a t i o n e m p t y P r o d 0026660 A d d V a l u e D e p e n d e n 0026700 c i e s : \t A d d V a l u e D e 0026720 p e n d e n c i e s P r o c T y 0026740 p e ; \r \r - - I n i t i a l i 0026760 z a t i o n b i n d i n g P r o 0027000 d \r \r I n i t i a l i z a t i o 0027020 n b i n d i n g P r o d D a t a 0027040 : \t T Y P E = R E F I n i 0027060 t i a l i z a t i o n b i n d i 0027100 n g P r o d D a t a B o d y ; \r 0027120 I n i t i a l i z a t i o n b i 0027140 n d i n g P r o d D a t a B o d 0027160 y : \t T Y P E = R E C O R D 0027200 [ \r I n i t i a l V a l u e : 0027220 I n i t i a l V a l u e N o d e 0027240 ] ; \r \r I n i t i a l i z a t i 0027260 o n b i n d i n g P r o d P r o 0027300 c s : \t I n i t i a l i z a t i 0027320 o n N o d e P r o c s ; \r \r B u 0027340 i l d I n i t i a l i z a t i o 0027360 n b i n d i n g P r o d N o d e 0027400 : \t P R O C [ p o s i t i o n : 0027420 I N T , l e n g t h : I N 0027440 T , I n i t i a l V a l u e : 0027460 I n i t i a l V a l u e N o d 0027500 e ] \r \t R E T U R N S [ I n i t 0027520 i a l i z a t i o n N o d e ] ; 0027540 \r \r I n i t i a l i z a t i o n 0027560 b i n d i n g P r o d G e t I n 0027600 i t i a l V a l u e : \t G e t I 0027620 n i t i a l V a l u e P r o c T 0027640 y p e ; \r I n i t i a l i z a t 0027660 i o n b i n d i n g P r o d I n 0027700 i t i a l i z a t i o n I s E m 0027720 p t y : \t I n i t i a l i z a t 0027740 i o n I s E m p t y P r o c T y 0027760 p e ; \r I n i t i a l i z a t i 0030000 o n b i n d i n g P r o d I n i 0030020 t i a l i z a t i o n I s B i n 0030040 d i n g : \t I n i t i a l i z a 0030060 t i o n I s B i n d i n g P r o 0030100 c T y p e ; \r I n i t i a l i z 0030120 a t i o n b i n d i n g P r o d 0030140 I n i t i a l i z a t i o n I s 0030160 A s s i g n m e n t : \t I n i t 0030200 i a l i z a t i o n I s A s s i 0030220 g n m e n t P r o c T y p e ; \r 0030240 I n i t i a l i z a t i o n b i 0030260 n d i n g P r o d C o m p i l e 0030300 I n i t i a l i z a t i o n : \t 0030320 C o m p i l e I n i t i a l i z 0030340 a t i o n P r o c T y p e ; \r I 0030360 n i t i a l i z a t i o n b i n 0030400 d i n g P r o d A d d V a l u e 0030420 D e p e n d e n c i e s : \t A d 0030440 d V a l u e D e p e n d e n c i 0030460 e s P r o c T y p e ; \r \r - - 0030500 I n i t i a l i z a t i o n a s 0030520 s i g n m e n t P r o d \r \r I n 0030540 i t i a l i z a t i o n a s s i 0030560 g n m e n t P r o d D a t a : \t 0030600 T Y P E = R E F I n i t i 0030620 a l i z a t i o n a s s i g n m 0030640 e n t P r o d D a t a B o d y ; 0030660 \r I n i t i a l i z a t i o n a 0030700 s s i g n m e n t P r o d D a t 0030720 a B o d y : \t T Y P E = R E 0030740 C O R D [ \r I n i t i a l V a l 0030760 u e : I n i t i a l V a l u e 0031000 N o d e ] ; \r \r I n i t i a l i 0031020 z a t i o n a s s i g n m e n t 0031040 P r o d P r o c s : \t I n i t i 0031060 a l i z a t i o n N o d e P r o 0031100 c s ; \r \r B u i l d I n i t i a 0031120 l i z a t i o n a s s i g n m e 0031140 n t P r o d N o d e : \t P R O C 0031160 [ p o s i t i o n : I N T , 0031200 l e n g t h : I N T , I n i 0031220 t i a l V a l u e : I n i t i 0031240 a l V a l u e N o d e ] \r \t R E 0031260 T U R N S [ I n i t i a l i z a 0031300 t i o n N o d e ] ; \r \r I n i t 0031320 i a l i z a t i o n a s s i g n 0031340 m e n t P r o d G e t I n i t i 0031360 a l V a l u e : \t G e t I n i t 0031400 i a l V a l u e P r o c T y p e 0031420 ; \r I n i t i a l i z a t i o n 0031440 a s s i g n m e n t P r o d I n 0031460 i t i a l i z a t i o n I s E m 0031500 p t y : \t I n i t i a l i z a t 0031520 i o n I s E m p t y P r o c T y 0031540 p e ; \r I n i t i a l i z a t i 0031560 o n a s s i g n m e n t P r o d 0031600 I n i t i a l i z a t i o n I s 0031620 B i n d i n g : \t I n i t i a l 0031640 i z a t i o n I s B i n d i n g 0031660 P r o c T y p e ; \r I n i t i a 0031700 l i z a t i o n a s s i g n m e 0031720 n t P r o d I n i t i a l i z a 0031740 t i o n I s A s s i g n m e n t 0031760 : \t I n i t i a l i z a t i o n 0032000 I s A s s i g n m e n t P r o c 0032020 T y p e ; \r I n i t i a l i z a 0032040 t i o n a s s i g n m e n t P r 0032060 o d C o m p i l e I n i t i a l 0032100 i z a t i o n : \t C o m p i l e 0032120 I n i t i a l i z a t i o n P r 0032140 o c T y p e ; \r I n i t i a l i 0032160 z a t i o n a s s i g n m e n t 0032200 P r o d A d d V a l u e D e p e 0032220 n d e n c i e s : \t A d d V a l 0032240 u e D e p e n d e n c i e s P r 0032260 o c T y p e ; \r \r - - I n i t 0032300 i a l V a l u e t r a s h P r o 0032320 d \r \r I n i t i a l V a l u e t 0032340 r a s h P r o d D a t a : \t T Y 0032360 P E = R E F I n i t i a l 0032400 V a l u e t r a s h P r o d D a 0032420 t a B o d y ; \r I n i t i a l V 0032440 a l u e t r a s h P r o d D a t 0032460 a B o d y : \t T Y P E = R E 0032500 C O R D [ \r ] ; \r \r I n i t i a 0032520 l V a l u e t r a s h P r o d P 0032540 r o c s : \t I n i t i a l V a l 0032560 u e N o d e P r o c s ; \r \r B u 0032600 i l d I n i t i a l V a l u e t 0032620 r a s h P r o d N o d e : \t P R 0032640 O C [ p o s i t i o n : I N T 0032660 , l e n g t h : I N T ] \r \t 0032700 R E T U R N S [ I n i t i a l V 0032720 a l u e N o d e ] ; \r \r I n i t 0032740 i a l V a l u e t r a s h P r o 0032760 d G e t I n i t i a l V a l u e 0033000 : \t G e t I n i t i a l V a l u 0033020 e P r o c T y p e ; \r I n i t i 0033040 a l V a l u e t r a s h P r o d 0033060 C o m p i l e I n i t i a l i z 0033100 a t i o n : \t C o m p i l e I n 0033120 i t i a l i z a t i o n P r o c 0033140 T y p e ; \r I n i t i a l V a l 0033160 u e t r a s h P r o d A d d V a 0033200 l u e D e p e n d e n c i e s : 0033220 \t A d d V a l u e D e p e n d e 0033240 n c i e s P r o c T y p e ; \r \r 0033260 - - I n i t i a l V a l u e c 0033300 o d e P r o d \r \r I n i t i a l 0033320 V a l u e c o d e P r o d D a t 0033340 a : \t T Y P E = R E F I n 0033360 i t i a l V a l u e c o d e P r 0033400 o d D a t a B o d y ; \r I n i t 0033420 i a l V a l u e c o d e P r o d 0033440 D a t a B o d y : \t T Y P E = 0033460 R E C O R D [ \r ] ; \r \r I n i 0033500 t i a l V a l u e c o d e P r o 0033520 d P r o c s : \t I n i t i a l V 0033540 a l u e N o d e P r o c s ; \r \r 0033560 B u i l d I n i t i a l V a l u 0033600 e c o d e P r o d N o d e : \t P 0033620 R O C [ p o s i t i o n : I N 0033640 T , l e n g t h : I N T ] \r 0033660 \t R E T U R N S [ I n i t i a l 0033700 V a l u e N o d e ] ; \r \r I n i 0033720 t i a l V a l u e c o d e P r o 0033740 d G e t I n i t i a l V a l u e 0033760 : \t G e t I n i t i a l V a l u 0034000 e P r o c T y p e ; \r I n i t i 0034020 a l V a l u e c o d e P r o d C 0034040 o m p i l e I n i t i a l i z a 0034060 t i o n : \t C o m p i l e I n i 0034100 t i a l i z a t i o n P r o c T 0034120 y p e ; \r I n i t i a l V a l u 0034140 e c o d e P r o d A d d V a l u 0034160 e D e p e n d e n c i e s : \t A 0034200 d d V a l u e D e p e n d e n c 0034220 i e s P r o c T y p e ; \r \r - - 0034240 I n i t i a l V a l u e e x p 0034260 P r o d \r \r I n i t i a l V a l 0034300 u e e x p P r o d D a t a : \t T 0034320 Y P E = R E F I n i t i a 0034340 l V a l u e e x p P r o d D a t 0034360 a B o d y ; \r I n i t i a l V a 0034400 l u e e x p P r o d D a t a B o 0034420 d y : \t T Y P E = R E C O R 0034440 D [ \r E x p : E x p N o d e ] 0034460 ; \r \r I n i t i a l V a l u e e 0034500 x p P r o d P r o c s : \t I n i 0034520 t i a l V a l u e N o d e P r o 0034540 c s ; \r \r B u i l d I n i t i a 0034560 l V a l u e e x p P r o d N o d 0034600 e : \t P R O C [ p o s i t i o n 0034620 : I N T , l e n g t h : I 0034640 N T , E x p : E x p N o d e 0034660 ] \r \t R E T U R N S [ I n i t i 0034700 a l V a l u e N o d e ] ; \r \r I 0034720 n i t i a l V a l u e e x p P r 0034740 o d G e t I n i t i a l V a l u 0034760 e : \t G e t I n i t i a l V a l 0035000 u e P r o c T y p e ; \r I n i t 0035020 i a l V a l u e e x p P r o d C 0035040 o m p i l e I n i t i a l i z a 0035060 t i o n : \t C o m p i l e I n i 0035100 t i a l i z a t i o n P r o c T 0035120 y p e ; \r I n i t i a l V a l u 0035140 e e x p P r o d A d d V a l u e 0035160 D e p e n d e n c i e s : \t A d 0035200 d V a l u e D e p e n d e n c i 0035220 e s P r o c T y p e ; \r \r - - 0035240 I n i t i a l V a l u e b l o c 0035260 k P r o d \r \r I n i t i a l V a 0035300 l u e b l o c k P r o d D a t a 0035320 : \t T Y P E = R E F I n i 0035340 t i a l V a l u e b l o c k P r 0035360 o d D a t a B o d y ; \r I n i t 0035400 i a l V a l u e b l o c k P r o 0035420 d D a t a B o d y : \t T Y P E 0035440 = R E C O R D [ \r C h e c k e 0035460 d : C h e c k e d N o d e , 0035500 I n l i n e : I n l i n e N o 0035520 d e , B l o c k : B l o c k 0035540 N o d e ] ; \r \r I n i t i a l V 0035560 a l u e b l o c k P r o d P r o 0035600 c s : \t I n i t i a l V a l u e 0035620 N o d e P r o c s ; \r \r B u i l 0035640 d I n i t i a l V a l u e b l o 0035660 c k P r o d N o d e : \t P R O C 0035700 [ p o s i t i o n : I N T , 0035720 l e n g t h : I N T , C h e 0035740 c k e d : C h e c k e d N o d 0035760 e , I n l i n e : I n l i n 0036000 e N o d e , B l o c k : B l 0036020 o c k N o d e ] \r \t R E T U R N 0036040 S [ I n i t i a l V a l u e N o 0036060 d e ] ; \r \r I n i t i a l V a l 0036100 u e b l o c k P r o d G e t I n 0036120 i t i a l V a l u e : \t G e t I 0036140 n i t i a l V a l u e P r o c T 0036160 y p e ; \r I n i t i a l V a l u 0036200 e b l o c k P r o d C o m p i l 0036220 e I n i t i a l i z a t i o n : 0036240 \t C o m p i l e I n i t i a l i 0036260 z a t i o n P r o c T y p e ; \r 0036300 I n i t i a l V a l u e b l o c 0036320 k P r o d A d d V a l u e D e p 0036340 e n d e n c i e s : \t A d d V a 0036360 l u e D e p e n d e n c i e s P 0036400 r o c T y p e ; \r \r - - I n i 0036420 t i a l V a l u e m a c h i n e 0036440 c o d e P r o d \r \r I n i t i a 0036460 l V a l u e m a c h i n e c o d 0036500 e P r o d D a t a : \t T Y P E 0036520 = R E F I n i t i a l V a l 0036540 u e m a c h i n e c o d e P r o 0036560 d D a t a B o d y ; \r I n i t i 0036600 a l V a l u e m a c h i n e c o 0036620 d e P r o d D a t a B o d y : \t 0036640 T Y P E = R E C O R D [ \r C 0036660 h e c k e d : C h e c k e d N 0036700 o d e , C o d e L i s t : C 0036720 o d e L i s t N o d e ] ; \r \r I 0036740 n i t i a l V a l u e m a c h i 0036760 n e c o d e P r o d P r o c s : 0037000 \t I n i t i a l V a l u e N o d 0037020 e P r o c s ; \r \r B u i l d I n 0037040 i t i a l V a l u e m a c h i n 0037060 e c o d e P r o d N o d e : \t P 0037100 R O C [ p o s i t i o n : I N 0037120 T , l e n g t h : I N T , 0037140 C h e c k e d : C h e c k e d 0037160 N o d e , C o d e L i s t : 0037200 C o d e L i s t N o d e ] \r \t R 0037220 E T U R N S [ I n i t i a l V a 0037240 l u e N o d e ] ; \r \r I n i t i 0037260 a l V a l u e m a c h i n e c o 0037300 d e P r o d G e t I n i t i a l 0037320 V a l u e : \t G e t I n i t i a 0037340 l V a l u e P r o c T y p e ; \r 0037360 I n i t i a l V a l u e m a c h 0037400 i n e c o d e P r o d C o m p i 0037420 l e I n i t i a l i z a t i o n 0037440 : \t C o m p i l e I n i t i a l 0037460 i z a t i o n P r o c T y p e ; 0037500 \r I n i t i a l V a l u e m a c 0037520 h i n e c o d e P r o d A d d V 0037540 a l u e D e p e n d e n c i e s 0037560 : \t A d d V a l u e D e p e n d 0037600 e n c i e s P r o c T y p e ; \r 0037620 \r - - C h e c k e d e m p t y 0037640 P r o d \r \r C h e c k e d e m p 0037660 t y P r o d D a t a : \t T Y P E 0037700 = R E F C h e c k e d e m 0037720 p t y P r o d D a t a B o d y ; 0037740 \r C h e c k e d e m p t y P r o 0037760 d D a t a B o d y : \t T Y P E 0040000 = R E C O R D [ \r ] ; \r \r C h 0040020 e c k e d e m p t y P r o d P r 0040040 o c s : \t C h e c k e d N o d e 0040060 P r o c s ; \r \r B u i l d C h e 0040100 c k e d e m p t y P r o d N o d 0040120 e : \t P R O C [ p o s i t i o n 0040140 : I N T , l e n g t h : I 0040160 N T ] \r \t R E T U R N S [ C h e 0040200 c k e d N o d e ] ; \r \r C h e c 0040220 k e d e m p t y P r o d f o o : 0040240 \t f o o P r o c T y p e ; \r \r - 0040260 - C h e c k e d c h e c k e d 0040300 P r o d \r \r C h e c k e d c h e 0040320 c k e d P r o d D a t a : \t T Y 0040340 P E = R E F C h e c k e d 0040360 c h e c k e d P r o d D a t a B 0040400 o d y ; \r C h e c k e d c h e c 0040420 k e d P r o d D a t a B o d y : 0040440 \t T Y P E = R E C O R D [ \r 0040460 ] ; \r \r C h e c k e d c h e c k 0040500 e d P r o d P r o c s : \t C h e 0040520 c k e d N o d e P r o c s ; \r \r 0040540 B u i l d C h e c k e d c h e c 0040560 k e d P r o d N o d e : \t P R O 0040600 C [ p o s i t i o n : I N T , 0040620 l e n g t h : I N T ] \r \t R 0040640 E T U R N S [ C h e c k e d N o 0040660 d e ] ; \r \r C h e c k e d c h e 0040700 c k e d P r o d f o o : \t f o o 0040720 P r o c T y p e ; \r \r - - C h 0040740 e c k e d t r u s t e d P r o d 0040760 \r \r C h e c k e d t r u s t e d 0041000 P r o d D a t a : \t T Y P E = 0041020 R E F C h e c k e d t r u s 0041040 t e d P r o d D a t a B o d y ; 0041060 \r C h e c k e d t r u s t e d P 0041100 r o d D a t a B o d y : \t T Y P 0041120 E = R E C O R D [ \r ] ; \r \r 0041140 C h e c k e d t r u s t e d P r 0041160 o d P r o c s : \t C h e c k e d 0041200 N o d e P r o c s ; \r \r B u i l 0041220 d C h e c k e d t r u s t e d P 0041240 r o d N o d e : \t P R O C [ p o 0041260 s i t i o n : I N T , l e n 0041300 g t h : I N T ] \r \t R E T U R 0041320 N S [ C h e c k e d N o d e ] ; 0041340 \r \r C h e c k e d t r u s t e d 0041360 P r o d f o o : \t f o o P r o c 0041400 T y p e ; \r \r - - C h e c k e 0041420 d u n c h e c k e d P r o d \r \r 0041440 C h e c k e d u n c h e c k e d 0041460 P r o d D a t a : \t T Y P E = 0041500 R E F C h e c k e d u n c h 0041520 e c k e d P r o d D a t a B o d 0041540 y ; \r C h e c k e d u n c h e c 0041560 k e d P r o d D a t a B o d y : 0041600 \t T Y P E = R E C O R D [ \r 0041620 ] ; \r \r C h e c k e d u n c h e 0041640 c k e d P r o d P r o c s : \t C 0041660 h e c k e d N o d e P r o c s ; 0041700 \r \r B u i l d C h e c k e d u n 0041720 c h e c k e d P r o d N o d e : 0041740 \t P R O C [ p o s i t i o n : 0041760 I N T , l e n g t h : I N T 0042000 ] \r \t R E T U R N S [ C h e c k 0042020 e d N o d e ] ; \r \r C h e c k e 0042040 d u n c h e c k e d P r o d f o 0042060 o : \t f o o P r o c T y p e ; \r 0042100 \r - - I n l i n e y e s P r o 0042120 d \r \r I n l i n e y e s P r o d 0042140 D a t a : \t T Y P E = R E F 0042160 I n l i n e y e s P r o d D a 0042200 t a B o d y ; \r I n l i n e y e 0042220 s P r o d D a t a B o d y : \t T 0042240 Y P E = R E C O R D [ \r ] ; 0042260 \r \r I n l i n e y e s P r o d P 0042300 r o c s : \t I n l i n e N o d e 0042320 P r o c s ; \r \r B u i l d I n l 0042340 i n e y e s P r o d N o d e : \t 0042360 P R O C [ p o s i t i o n : I 0042400 N T , l e n g t h : I N T ] 0042420 \r \t R E T U R N S [ I n l i n e 0042440 N o d e ] ; \r \r I n l i n e y e 0042460 s P r o d I s K e y w o r d P r 0042500 e s e n t : \t I s K e y w o r d 0042520 P r e s e n t P r o c T y p e ; 0042540 \r \r - - I n l i n e n o P r o 0042560 d \r \r I n l i n e n o P r o d D 0042600 a t a : \t T Y P E = R E F 0042620 I n l i n e n o P r o d D a t a 0042640 B o d y ; \r I n l i n e n o P r 0042660 o d D a t a B o d y : \t T Y P E 0042700 = R E C O R D [ \r ] ; \r \r I 0042720 n l i n e n o P r o d P r o c s 0042740 : \t I n l i n e N o d e P r o c 0042760 s ; \r \r B u i l d I n l i n e n 0043000 o P r o d N o d e : \t P R O C [ 0043020 p o s i t i o n : I N T , l 0043040 e n g t h : I N T ] \r \t R E T 0043060 U R N S [ I n l i n e N o d e ] 0043100 ; \r \r I n l i n e n o P r o d I 0043120 s K e y w o r d P r e s e n t : 0043140 \t I s K e y w o r d P r e s e n 0043160 t P r o c T y p e ; \r \r - - C 0043200 o d e L i s t o n e P r o d \r \r 0043220 C o d e L i s t o n e P r o d D 0043240 a t a : \t T Y P E = R E F 0043260 C o d e L i s t o n e P r o d D 0043300 a t a B o d y ; \r C o d e L i s 0043320 t o n e P r o d D a t a B o d y 0043340 : \t T Y P E = R E C O R D [ 0043360 \r O r d e r L i s t : O r d e 0043400 r L i s t N o d e ] ; \r \r C o d 0043420 e L i s t o n e P r o d P r o c 0043440 s : \t C o d e L i s t N o d e P 0043460 r o c s ; \r \r B u i l d C o d e 0043500 L i s t o n e P r o d N o d e : 0043520 \t P R O C [ p o s i t i o n : 0043540 I N T , l e n g t h : I N T 0043560 , O r d e r L i s t : O r d 0043600 e r L i s t N o d e ] \r \t R E T 0043620 U R N S [ C o d e L i s t N o d 0043640 e ] ; \r \r C o d e L i s t o n e 0043660 P r o d f o o : \t f o o P r o c 0043700 T y p e ; \r \r - - C o d e L i 0043720 s t m o r e P r o d \r \r C o d e 0043740 L i s t m o r e P r o d D a t a 0043760 : \t T Y P E = R E F C o d 0044000 e L i s t m o r e P r o d D a t 0044020 a B o d y ; \r C o d e L i s t m 0044040 o r e P r o d D a t a B o d y : 0044060 \t T Y P E = R E C O R D [ \r 0044100 C o d e L i s t : C o d e L i 0044120 s t N o d e , O r d e r L i s 0044140 t : O r d e r L i s t N o d e 0044160 ] ; \r \r C o d e L i s t m o r e 0044200 P r o d P r o c s : \t C o d e L 0044220 i s t N o d e P r o c s ; \r \r B 0044240 u i l d C o d e L i s t m o r e 0044260 P r o d N o d e : \t P R O C [ p 0044300 o s i t i o n : I N T , l e 0044320 n g t h : I N T , C o d e L 0044340 i s t : C o d e L i s t N o d 0044360 e , O r d e r L i s t : O r 0044400 d e r L i s t N o d e ] \r \t R E 0044420 T U R N S [ C o d e L i s t N o 0044440 d e ] ; \r \r C o d e L i s t m o 0044460 r e P r o d f o o : \t f o o P r 0044500 o c T y p e ; \r \r - - T r a n 0044520 s f e r O p s i g n a l P r o d 0044540 \r \r T r a n s f e r O p s i g n 0044560 a l P r o d D a t a : \t T Y P E 0044600 = R E F T r a n s f e r O 0044620 p s i g n a l P r o d D a t a B 0044640 o d y ; \r T r a n s f e r O p s 0044660 i g n a l P r o d D a t a B o d 0044700 y : \t T Y P E = R E C O R D 0044720 [ \r ] ; \r \r T r a n s f e r O p 0044740 s i g n a l P r o d P r o c s : 0044760 \t T r a n s f e r O p N o d e P 0045000 r o c s ; \r \r B u i l d T r a n 0045020 s f e r O p s i g n a l P r o d 0045040 N o d e : \t P R O C [ p o s i t 0045060 i o n : I N T , l e n g t h 0045100 : I N T ] \r \t R E T U R N S [ 0045120 T r a n s f e r O p N o d e ] ; 0045140 \r \r T r a n s f e r O p s i g n 0045160 a l P r o d f o o : \t f o o P r 0045200 o c T y p e ; \r \r - - T r a n 0045220 s f e r O p e r r o r P r o d \r 0045240 \r T r a n s f e r O p e r r o r 0045260 P r o d D a t a : \t T Y P E = 0045300 R E F T r a n s f e r O p e 0045320 r r o r P r o d D a t a B o d y 0045340 ; \r T r a n s f e r O p e r r o 0045360 r P r o d D a t a B o d y : \t T 0045400 Y P E = R E C O R D [ \r ] ; 0045420 \r \r T r a n s f e r O p e r r o 0045440 r P r o d P r o c s : \t T r a n 0045460 s f e r O p N o d e P r o c s ; 0045500 \r \r B u i l d T r a n s f e r O 0045520 p e r r o r P r o d N o d e : \t 0045540 P R O C [ p o s i t i o n : I 0045560 N T , l e n g t h : I N T ] 0045600 \r \t R E T U R N S [ T r a n s f 0045620 e r O p N o d e ] ; \r \r T r a n 0045640 s f e r O p e r r o r P r o d f 0045660 o o : \t f o o P r o c T y p e ; 0045700 \r \r - - T r a n s f e r O p s 0045720 t a r t P r o d \r \r T r a n s f 0045740 e r O p s t a r t P r o d D a t 0045760 a : \t T Y P E = R E F T r 0046000 a n s f e r O p s t a r t P r o 0046020 d D a t a B o d y ; \r T r a n s 0046040 f e r O p s t a r t P r o d D a 0046060 t a B o d y : \t T Y P E = R 0046100 E C O R D [ \r ] ; \r \r T r a n s 0046120 f e r O p s t a r t P r o d P r 0046140 o c s : \t T r a n s f e r O p N 0046160 o d e P r o c s ; \r \r B u i l d 0046200 T r a n s f e r O p s t a r t P 0046220 r o d N o d e : \t P R O C [ p o 0046240 s i t i o n : I N T , l e n 0046260 g t h : I N T ] \r \t R E T U R 0046300 N S [ T r a n s f e r O p N o d 0046320 e ] ; \r \r T r a n s f e r O p s 0046340 t a r t P r o d f o o : \t f o o 0046360 P r o c T y p e ; \r \r - - T r 0046400 a n s f e r O p j o i n P r o d 0046420 \r \r T r a n s f e r O p j o i n 0046440 P r o d D a t a : \t T Y P E = 0046460 R E F T r a n s f e r O p j 0046500 o i n P r o d D a t a B o d y ; 0046520 \r T r a n s f e r O p j o i n P 0046540 r o d D a t a B o d y : \t T Y P 0046560 E = R E C O R D [ \r ] ; \r \r 0046600 T r a n s f e r O p j o i n P r 0046620 o d P r o c s : \t T r a n s f e 0046640 r O p N o d e P r o c s ; \r \r B 0046660 u i l d T r a n s f e r O p j o 0046700 i n P r o d N o d e : \t P R O C 0046720 [ p o s i t i o n : I N T , 0046740 l e n g t h : I N T ] \r \t R E 0046760 T U R N S [ T r a n s f e r O p 0047000 N o d e ] ; \r \r T r a n s f e r 0047020 O p j o i n P r o d f o o : \t f 0047040 o o P r o c T y p e ; \r \r - - 0047060 T r a n s f e r O p n e w P r o 0047100 d \r \r T r a n s f e r O p n e w 0047120 P r o d D a t a : \t T Y P E = 0047140 R E F T r a n s f e r O p n 0047160 e w P r o d D a t a B o d y ; \r 0047200 T r a n s f e r O p n e w P r o 0047220 d D a t a B o d y : \t T Y P E 0047240 = R E C O R D [ \r ] ; \r \r T r 0047260 a n s f e r O p n e w P r o d P 0047300 r o c s : \t T r a n s f e r O p 0047320 N o d e P r o c s ; \r \r B u i l 0047340 d T r a n s f e r O p n e w P r 0047360 o d N o d e : \t P R O C [ p o s 0047400 i t i o n : I N T , l e n g 0047420 t h : I N T ] \r \t R E T U R N 0047440 S [ T r a n s f e r O p N o d e 0047460 ] ; \r \r T r a n s f e r O p n e 0047500 w P r o d f o o : \t f o o P r o 0047520 c T y p e ; \r \r - - T r a n s 0047540 f e r O p f o r k P r o d \r \r T 0047560 r a n s f e r O p f o r k P r o 0047600 d D a t a : \t T Y P E = R E 0047620 F T r a n s f e r O p f o r k 0047640 P r o d D a t a B o d y ; \r T r 0047660 a n s f e r O p f o r k P r o d 0047700 D a t a B o d y : \t T Y P E = 0047720 R E C O R D [ \r ] ; \r \r T r a 0047740 n s f e r O p f o r k P r o d P 0047760 r o c s : \t T r a n s f e r O p 0050000 N o d e P r o c s ; \r \r B u i l 0050020 d T r a n s f e r O p f o r k P 0050040 r o d N o d e : \t P R O C [ p o 0050060 s i t i o n : I N T , l e n 0050100 g t h : I N T ] \r \t R E T U R 0050120 N S [ T r a n s f e r O p N o d 0050140 e ] ; \r \r T r a n s f e r O p f 0050160 o r k P r o d f o o : \t f o o P 0050200 r o c T y p e ; \r E N D . . \r 0050217