$ od -c -N 50000 [Indigo]<Casaba>7.0>Saffron3.0>Derived>SaffronAG1aDef.Mesa!18 0000000 - - S a f f r o n A G 1 a D e 0000020 f . m e s a \r - - C o p y r 0000040 i g h t 323 1 9 8 7 b y X 0000060 e 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 0000120 s e r v e d . \r - - G e n e 0000140 r a t e d b y R a u e n . p 0000160 a a t S e p t e m b e r 1 0000200 , 1 9 8 8 7 : 2 4 : 1 7 p 0000220 m 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 0000320 m P D T \r \r D I R E C T O R Y 0000340 \r \t S a f f r o n T r e e D e c 0000360 l s D e f , \r \t S a f f r o n G 0000400 e n e r i c D e f , \r \t S a f f 0000420 r o n A T D e f ; \r \r S a f f r 0000440 o n A G 1 a D e f : C E D A R 0000460 D E F I N I T I O N S = \r 0000500 B E G I N \r O P E N S a f f r 0000520 o n T r e e D e c l s D e f , 0000540 S a f f r o n G e n e r i c D e 0000560 f , S a f f r o n A T D e f ; 0000600 \r \r - - J u n k P r o d \r \r J 0000620 u n k P r o d D a t a : \t T Y P 0000640 E = R E F J u n k P r o d 0000660 D a t a B o d y ; \r J u n k P r 0000700 o d D a t a B o d y : \t T Y P E 0000720 = R E C O R D [ \r ] ; \r \r J 0000740 u n k P r o d P r o c s : \t J u 0000760 n k N o d e P r o c s ; \r \r B u 0001000 i l d J u n k P r o d N o d e : 0001020 \t P R O C [ p o s i t i o n : 0001040 I N T , l e n g t h : I N T 0001060 ] \r \t R E T U R N S [ J u n k N 0001100 o d e ] ; \r \r J u n k P r o d f 0001120 o o : \t f o o P r o c T y p e ; 0001140 \r \r - - T o p m o d u l e p P 0001160 r o d \r \r T o p m o d u l e p P 0001200 r o d D a t a : \t T Y P E = 0001220 R E F T o p m o d u l e p P r 0001240 o d D a t a B o d y ; \r T o p m 0001260 o d u l e p P r o d D a t a B o 0001300 d y : \t T Y P E = R E C O R 0001320 D [ \r M o d u l e P : M o d u 0001340 l e P N o d e ] ; \r \r T o p m o 0001360 d u l e p P r o d P r o c s : \t 0001400 T o p N o d e P r o c s ; \r \r B 0001420 u i l d T o p m o d u l e p P r 0001440 o d N o d e : \t P R O C [ p o s 0001460 i t i o n : I N T , l e n g 0001500 t h : I N T , M o d u l e P 0001520 : M o d u l e P N o d e ] \r \t 0001540 R E T U R N S [ T o p N o d e ] 0001560 ; \r \r T o p m o d u l e p P r o 0001600 d D o T o p : \t D o T o p P r o 0001620 c T y p e ; \r \r - - E x p s u 0001640 m P r o d \r \r E x p s u m P r o 0001660 d D a t a : \t T Y P E = R E 0001700 F E x p s u m P r o d D a t a 0001720 B o d y ; \r E x p s u m P r o d 0001740 D a t a B o d y : \t T Y P E = 0001760 R E C O R D [ \r E x p l e f t 0002000 : E x p N o d e , A d d O p 0002020 : A d d O p N o d e , E x p 0002040 r i g h t : E x p N o d e ] ; 0002060 \r \r E x p s u m P r o d P r o c 0002100 s : \t E x p N o d e P r o c s ; 0002120 \r \r B u i l d E x p s u m P r o 0002140 d N o d e : \t P R O C [ p o s i 0002160 t i o n : I N T , l e n g t 0002200 h : I N T , E x p l e f t : 0002220 E x p N o d e , A d d O p : 0002240 A d d O p N o d e , E x p r 0002260 i g h t : E x p N o d e ] \r \t 0002300 R E T U R N S [ E x p N o d e ] 0002320 ; \r \r E x p s u m P r o d I d V 0002340 a l : \t I d V a l P r o c T y p 0002360 e ; \r E x p s u m P r o d C o m 0002400 p i l e E x p r e s s i o n : \t 0002420 C o m p i l e E x p r e s s i o 0002440 n P r o c T y p e ; \r E x p s u 0002460 m P r o d A d d V a l u e D e p 0002500 e n d e n c i e s : \t A d d V a 0002520 l u e D e p e n d e n c i e s P 0002540 r o c T y p e ; \r E x p s u m P 0002560 r o d C o m p i l e L V a l u e 0002600 : \t C o m p i l e L V a l u e P 0002620 r o c T y p e ; \r E x p s u m P 0002640 r o d E v a l u a t e E x p r e 0002660 s s i o n : \t E v a l u a t e E 0002700 x p r e s s i o n P r o c T y p 0002720 e ; \r \r - - E x p u n a r y s 0002740 u m P r o d \r \r E x p u n a r y 0002760 s u m P r o d D a t a : \t T Y P 0003000 E = R E F E x p u n a r y 0003020 s u m P r o d D a t a B o d y ; 0003040 \r E x p u n a r y s u m P r o d 0003060 D a t a B o d y : \t T Y P E = 0003100 R E C O R D [ \r A d d O p : 0003120 A d d O p N o d e , E x p : 0003140 E x p N o d e ] ; \r \r E x p u n 0003160 a r y s u m P r o d P r o c s : 0003200 \t E x p N o d e P r o c s ; \r \r 0003220 B u i l d E x p u n a r y s u m 0003240 P r o d N o d e : \t P R O C [ p 0003260 o s i t i o n : I N T , l e 0003300 n g t h : I N T , A d d O p 0003320 : A d d O p N o d e , E x p 0003340 : E x p N o d e ] \r \t R E T U 0003360 R N S [ E x p N o d e ] ; \r \r E 0003400 x p u n a r y s u m P r o d I d 0003420 V a l : \t I d V a l P r o c T y 0003440 p e ; \r E x p u n a r y s u m P 0003460 r o d C o m p i l e E x p r e s 0003500 s i o n : \t C o m p i l e E x p 0003520 r e s s i o n P r o c T y p e ; 0003540 \r E x p u n a r y s u m P r o d 0003560 A d d V a l u e D e p e n d e n 0003600 c i e s : \t A d d V a l u e D e 0003620 p e n d e n c i e s P r o c T y 0003640 p e ; \r E x p u n a r y s u m P 0003660 r o d C o m p i l e L V a l u e 0003700 : \t C o m p i l e L V a l u e P 0003720 r o c T y p e ; \r E x p u n a r 0003740 y s u m P r o d E v a l u a t e 0003760 E x p r e s s i o n : \t E v a l 0004000 u a t e E x p r e s s i o n P r 0004020 o c T y p e ; \r \r - - E x p p 0004040 r o d u c t P r o d \r \r E x p p 0004060 r o d u c t P r o d D a t a : \t 0004100 T Y P E = R E F E x p p r 0004120 o d u c t P r o d D a t a B o d 0004140 y ; \r E x p p r o d u c t P r o 0004160 d D a t a B o d y : \t T Y P E 0004200 = R E C O R D [ \r E x p l e f 0004220 t : E x p N o d e , M u l t 0004240 O p : M u l t O p N o d e , 0004260 E x p r i g h t : E x p N o d 0004300 e ] ; \r \r E x p p r o d u c t P 0004320 r o d P r o c s : \t E x p N o d 0004340 e P r o c s ; \r \r B u i l d E x 0004360 p p r o d u c t P r o d N o d e 0004400 : \t P R O C [ p o s i t i o n : 0004420 I N T , l e n g t h : I N 0004440 T , E x p l e f t : E x p N 0004460 o d e , M u l t O p : M u l 0004500 t O p N o d e , E x p r i g h 0004520 t : E x p N o d e ] \r \t R E T 0004540 U R N S [ E x p N o d e ] ; \r \r 0004560 E x p p r o d u c t P r o d I d 0004600 V a l : \t I d V a l P r o c T y 0004620 p e ; \r E x p p r o d u c t P r 0004640 o d C o m p i l e E x p r e s s 0004660 i o n : \t C o m p i l e E x p r 0004700 e s s i o n P r o c T y p e ; \r 0004720 E x p p r o d u c t P r o d A d 0004740 d V a l u e D e p e n d e n c i 0004760 e s : \t A d d V a l u e D e p e 0005000 n d e n c i e s P r o c T y p e 0005020 ; \r E x p p r o d u c t P r o d 0005040 C o m p i l e L V a l u e : \t C 0005060 o m p i l e L V a l u e P r o c 0005100 T y p e ; \r E x p p r o d u c t 0005120 P r o d E v a l u a t e E x p r 0005140 e s s i o n : \t E v a l u a t e 0005160 E x p r e s s i o n P r o c T y 0005200 p e ; \r \r - - E x p o r P r o 0005220 d \r \r E x p o r P r o d D a t a 0005240 : \t T Y P E = R E F E x p 0005260 o r P r o d D a t a B o d y ; \r 0005300 E x p o r P r o d D a t a B o d 0005320 y : \t T Y P E = R E C O R D 0005340 [ \r E x p l e f t : E x p N o 0005360 d e , E x p r i g h t : E x 0005400 p N o d e ] ; \r \r E x p o r P r 0005420 o d P r o c s : \t E x p N o d e 0005440 P r o c s ; \r \r B u i l d E x p 0005460 o r P r o d N o d e : \t P R O C 0005500 [ p o s i t i o n : I N T , 0005520 l e n g t h : I N T , E x p 0005540 l e f t : E x p N o d e , E 0005560 x p r i g h t : E x p N o d e 0005600 ] \r \t R E T U R N S [ E x p N o 0005620 d e ] ; \r \r E x p o r P r o d I 0005640 d V a l : \t I d V a l P r o c T 0005660 y p e ; \r E x p o r P r o d C o 0005700 m p i l e E x p r e s s i o n : 0005720 \t C o m p i l e E x p r e s s i 0005740 o n P r o c T y p e ; \r E x p o 0005760 r P r o d A d d V a l u e D e p 0006000 e n d e n c i e s : \t A d d V a 0006020 l u e D e p e n d e n c i e s P 0006040 r o c T y p e ; \r E x p o r P r 0006060 o d C o m p i l e L V a l u e : 0006100 \t C o m p i l e L V a l u e P r 0006120 o c T y p e ; \r E x p o r P r o 0006140 d E v a l u a t e E x p r e s s 0006160 i o n : \t E v a l u a t e E x p 0006200 r e s s i o n P r o c T y p e ; 0006220 \r \r - - E x p a n d P r o d \r 0006240 \r E x p a n d P r o d D a t a : 0006260 \t T Y P E = R E F E x p a 0006300 n d P r o d D a t a B o d y ; \r 0006320 E x p a n d P r o d D a t a B o 0006340 d y : \t T Y P E = R E C O R 0006360 D [ \r E x p l e f t : E x p N 0006400 o d e , E x p r i g h t : E 0006420 x p N o d e ] ; \r \r E x p a n d 0006440 P r o d P r o c s : \t E x p N o 0006460 d e P r o c s ; \r \r B u i l d E 0006500 x p a n d P r o d N o d e : \t P 0006520 R O C [ p o s i t i o n : I N 0006540 T , l e n g t h : I N T , 0006560 E x p l e f t : E x p N o d e 0006600 , E x p r i g h t : E x p N 0006620 o d e ] \r \t R E T U R N S [ E x 0006640 p N o d e ] ; \r \r E x p a n d P 0006660 r o d I d V a l : \t I d V a l P 0006700 r o c T y p e ; \r E x p a n d P 0006720 r o d C o m p i l e E x p r e s 0006740 s i o n : \t C o m p i l e E x p 0006760 r e s s i o n P r o c T y p e ; 0007000 \r E x p a n d P r o d A d d V a 0007020 l u e D e p e n d e n c i e s : 0007040 \t A d d V a l u e D e p e n d e 0007060 n c i e s P r o c T y p e ; \r E 0007100 x p a n d P r o d C o m p i l e 0007120 L V a l u e : \t C o m p i l e L 0007140 V a l u e P r o c T y p e ; \r E 0007160 x p a n d P r o d E v a l u a t 0007200 e E x p r e s s i o n : \t E v a 0007220 l u a t e E x p r e s s i o n P 0007240 r o c T y p e ; \r \r - - E x p 0007260 n o t P r o d \r \r E x p n o t P 0007300 r o d D a t a : \t T Y P E = 0007320 R E F E x p n o t P r o d D a 0007340 t a B o d y ; \r E x p n o t P r 0007360 o d D a t a B o d y : \t T Y P E 0007400 = R E C O R D [ \r E x p : 0007420 E x p N o d e ] ; \r \r E x p n o 0007440 t P r o d P r o c s : \t E x p N 0007460 o d e P r o c s ; \r \r B u i l d 0007500 E x p n o t P r o d N o d e : \t 0007520 P R O C [ p o s i t i o n : I 0007540 N T , l e n g t h : I N T , 0007560 E x p : E x p N o d e ] \r \t 0007600 R E T U R N S [ E x p N o d e ] 0007620 ; \r \r E x p n o t P r o d I d V 0007640 a l : \t I d V a l P r o c T y p 0007660 e ; \r E x p n o t P r o d C o m 0007700 p i l e E x p r e s s i o n : \t 0007720 C o m p i l e E x p r e s s i o 0007740 n P r o c T y p e ; \r E x p n o 0007760 t P r o d A d d V a l u e D e p 0010000 e n d e n c i e s : \t A d d V a 0010020 l u e D e p e n d e n c i e s P 0010040 r o c T y p e ; \r E x p n o t P 0010060 r o d C o m p i l e L V a l u e 0010100 : \t C o m p i l e L V a l u e P 0010120 r o c T y p e ; \r E x p n o t P 0010140 r o d E v a l u a t e E x p r e 0010160 s s i o n : \t E v a l u a t e E 0010200 x p r e s s i o n P r o c T y p 0010220 e ; \r \r - - E x p r e l a t i 0010240 o n P r o d \r \r E x p r e l a t 0010260 i o n P r o d D a t a : \t T Y P 0010300 E = R E F E x p r e l a t 0010320 i o n P r o d D a t a B o d y ; 0010340 \r E x p r e l a t i o n P r o d 0010360 D a t a B o d y : \t T Y P E = 0010400 R E C O R D [ \r E x p : E x 0010420 p N o d e , R e l a t i o n : 0010440 R e l a t i o n N o d e ] ; \r 0010460 \r E x p r e l a t i o n P r o d 0010500 P r o c s : \t E x p N o d e P r 0010520 o c s ; \r \r B u i l d E x p r e 0010540 l a t i o n P r o d N o d e : \t 0010560 P R O C [ p o s i t i o n : I 0010600 N T , l e n g t h : I N T , 0010620 E x p : E x p N o d e , R 0010640 e l a t i o n : R e l a t i o 0010660 n N o d e ] \r \t R E T U R N S [ 0010700 E x p N o d e ] ; \r \r E x p r e 0010720 l a t i o n P r o d I d V a l : 0010740 \t I d V a l P r o c T y p e ; \r 0010760 E x p r e l a t i o n P r o d C 0011000 o m p i l e E x p r e s s i o n 0011020 : \t C o m p i l e E x p r e s s 0011040 i o n P r o c T y p e ; \r E x p 0011060 r e l a t i o n P r o d A d d V 0011100 a l u e D e p e n d e n c i e s 0011120 : \t A d d V a l u e D e p e n d 0011140 e n c i e s P r o c T y p e ; \r 0011160 E x p r e l a t i o n P r o d C 0011200 o m p i l e L V a l u e : \t C o 0011220 m p i l e L V a l u e P r o c T 0011240 y p e ; \r E x p r e l a t i o n 0011260 P r o d E v a l u a t e E x p r 0011300 e s s i o n : \t E v a l u a t e 0011320 E x p r e s s i o n P r o c T y 0011340 p e ; \r \r - - E x p i f t h e 0011360 n e l s e P r o d \r \r E x p i f 0011400 t h e n e l s e P r o d D a t a 0011420 : \t T Y P E = R E F E x p 0011440 i f t h e n e l s e P r o d D a 0011460 t a B o d y ; \r E x p i f t h e 0011500 n e l s e P r o d D a t a B o d 0011520 y : \t T Y P E = R E C O R D 0011540 [ \r E x p c o n d : E x p N o 0011560 d e , E x p t h e n p a r t : 0011600 E x p N o d e , E x p e l s 0011620 e p a r t : E x p N o d e ] ; 0011640 \r \r E x p i f t h e n e l s e P 0011660 r o d P r o c s : \t E x p N o d 0011700 e P r o c s ; \r \r B u i l d E x 0011720 p i f t h e n e l s e P r o d N 0011740 o d e : \t P R O C [ p o s i t i 0011760 o n : I N T , l e n g t h : 0012000 I N T , E x p c o n d : E 0012020 x p N o d e , E x p t h e n p 0012040 a r t : E x p N o d e , E x 0012060 p e l s e p a r t : E x p N o 0012100 d e ] \r \t R E T U R N S [ E x p 0012120 N o d e ] ; \r \r E x p i f t h e 0012140 n e l s e P r o d I d V a l : \t 0012160 I d V a l P r o c T y p e ; \r E 0012200 x p i f t h e n e l s e P r o d 0012220 C o m p i l e E x p r e s s i o 0012240 n : \t C o m p i l e E x p r e s 0012260 s i o n P r o c T y p e ; \r E x 0012300 p i f t h e n e l s e P r o d A 0012320 d d V a l u e D e p e n d e n c 0012340 i e s : \t A d d V a l u e D e p 0012360 e n d e n c i e s P r o c T y p 0012400 e ; \r E x p i f t h e n e l s e 0012420 P r o d C o m p i l e L V a l u 0012440 e : \t C o m p i l e L V a l u e 0012460 P r o c T y p e ; \r E x p i f t 0012500 h e n e l s e P r o d E v a l u 0012520 a t e E x p r e s s i o n : \t E 0012540 v a l u a t e E x p r e s s i o 0012560 n P r o c T y p e ; \r \r - - E 0012600 x p s e l e c t P r o d \r \r E x 0012620 p s e l e c t P r o d D a t a : 0012640 \t T Y P E = R E F E x p s 0012660 e l e c t P r o d D a t a B o d 0012700 y ; \r E x p s e l e c t P r o d 0012720 D a t a B o d y : \t T Y P E = 0012740 R E C O R D [ \r S e l e c t H 0012760 e a d : S e l e c t H e a d N 0013000 o d e , S e l e c t E x p L i 0013020 s t : S e l e c t E x p L i s 0013040 t N o d e , E x p d e f a u l 0013060 t : E x p N o d e ] ; \r \r E x 0013100 p s e l e c t P r o d P r o c s 0013120 : \t E x p N o d e P r o c s ; \r 0013140 \r B u i l d E x p s e l e c t P 0013160 r o d N o d e : \t P R O C [ p o 0013200 s i t i o n : I N T , l e n 0013220 g t h : I N T , S e l e c t 0013240 H e a d : S e l e c t H e a d 0013260 N o d e , S e l e c t E x p L 0013300 i s t : S e l e c t E x p L i 0013320 s t N o d e , E x p d e f a u 0013340 l t : E x p N o d e ] \r \t R E 0013360 T U R N S [ E x p N o d e ] ; \r 0013400 \r E x p s e l e c t P r o d I d 0013420 V a l : \t I d V a l P r o c T y 0013440 p e ; \r E x p s e l e c t P r o 0013460 d C o m p i l e E x p r e s s i 0013500 o n : \t C o m p i l e E x p r e 0013520 s s i o n P r o c T y p e ; \r E 0013540 x p s e l e c t P r o d A d d V 0013560 a l u e D e p e n d e n c i e s 0013600 : \t A d d V a l u e D e p e n d 0013620 e n c i e s P r o c T y p e ; \r 0013640 E x p s e l e c t P r o d C o m 0013660 p i l e L V a l u e : \t C o m p 0013700 i l e L V a l u e P r o c T y p 0013720 e ; \r E x p s e l e c t P r o d 0013740 E v a l u a t e E x p r e s s i 0013760 o n : \t E v a l u a t e E x p r 0014000 e s s i o n P r o c T y p e ; \r 0014020 \r - - E x p a s s i g n P r o 0014040 d \r \r E x p a s s i g n P r o d 0014060 D a t a : \t T Y P E = R E F 0014100 E x p a s s i g n P r o d D a 0014120 t a B o d y ; \r E x p a s s i g 0014140 n P r o d D a t a B o d y : \t T 0014160 Y P E = R E C O R D [ \r E x 0014200 p l h s : E x p N o d e , E 0014220 x p r h s : E x p N o d e ] ; 0014240 \r \r E x p a s s i g n P r o d P 0014260 r o c s : \t E x p N o d e P r o 0014300 c s ; \r \r B u i l d E x p a s s 0014320 i g n P r o d N o d e : \t P R O 0014340 C [ p o s i t i o n : I N T , 0014360 l e n g t h : I N T , E x 0014400 p l h s : E x p N o d e , E 0014420 x p r h s : E x p N o d e ] \r 0014440 \t R E T U R N S [ E x p N o d e 0014460 ] ; \r \r E x p a s s i g n P r o 0014500 d I d V a l : \t I d V a l P r o 0014520 c T y p e ; \r E x p a s s i g n 0014540 P r o d C o m p i l e E x p r e 0014560 s s i o n : \t C o m p i l e E x 0014600 p r e s s i o n P r o c T y p e 0014620 ; \r E x p a s s i g n P r o d A 0014640 d d V a l u e D e p e n d e n c 0014660 i e s : \t A d d V a l u e D e p 0014700 e n d e n c i e s P r o c T y p 0014720 e ; \r E x p a s s i g n P r o d 0014740 C o m p i l e L V a l u e : \t C 0014760 o m p i l e L V a l u e P r o c 0015000 T y p e ; \r E x p a s s i g n P 0015020 r o d E v a l u a t e E x p r e 0015040 s s i o n : \t E v a l u a t e E 0015060 x p r e s s i o n P r o c T y p 0015100 e ; \r \r - - E x p m u l t i a 0015120 s s i g n P r o d \r \r E x p m u 0015140 l t i a s s i g n P r o d D a t 0015160 a : \t T Y P E = R E F E x 0015200 p m u l t i a s s i g n P r o d 0015220 D a t a B o d y ; \r E x p m u l 0015240 t i a s s i g n P r o d D a t a 0015260 B o d y : \t T Y P E = R E C 0015300 O R D [ \r E x p L i s t : E x 0015320 p L i s t N o d e , E x p : 0015340 E x p N o d e ] ; \r \r E x p m u 0015360 l t i a s s i g n P r o d P r o 0015400 c s : \t E x p N o d e P r o c s 0015420 ; \r \r B u i l d E x p m u l t i 0015440 a s s i g n P r o d N o d e : \t 0015460 P R O C [ p o s i t i o n : I 0015500 N T , l e n g t h : I N T , 0015520 E x p L i s t : E x p L i s 0015540 t N o d e , E x p : E x p N 0015560 o d e ] \r \t R E T U R N S [ E x 0015600 p N o d e ] ; \r \r E x p m u l t 0015620 i a s s i g n P r o d I d V a l 0015640 : \t I d V a l P r o c T y p e ; 0015660 \r E x p m u l t i a s s i g n P 0015700 r o d C o m p i l e E x p r e s 0015720 s i o n : \t C o m p i l e E x p 0015740 r e s s i o n P r o c T y p e ; 0015760 \r E x p m u l t i a s s i g n P 0016000 r o d A d d V a l u e D e p e n 0016020 d e n c i e s : \t A d d V a l u 0016040 e D e p e n d e n c i e s P r o 0016060 c T y p e ; \r E x p m u l t i a 0016100 s s i g n P r o d C o m p i l e 0016120 L V a l u e : \t C o m p i l e L 0016140 V a l u e P r o c T y p e ; \r E 0016160 x p m u l t i a s s i g n P r o 0016200 d E v a l u a t e E x p r e s s 0016220 i o n : \t E v a l u a t e E x p 0016240 r e s s i o n P r o c T y p e ; 0016260 \r \r - - E x p i d P r o d \r \r 0016300 E x p i d P r o d D a t a : \t T 0016320 Y P E = R E F E x p i d P 0016340 r o d D a t a B o d y ; \r E x p 0016360 i d P r o d D a t a B o d y : \t 0016400 T Y P E = R E C O R D [ \r I 0016420 d : I d N o d e ] ; \r \r E x p 0016440 i d P r o d P r o c s : \t E x p 0016460 N o d e P r o c s ; \r \r B u i l 0016500 d E x p i d P r o d N o d e : \t 0016520 P R O C [ p o s i t i o n : I 0016540 N T , l e n g t h : I N T , 0016560 I d : I d N o d e ] \r \t R E 0016600 T U R N S [ E x p N o d e ] ; \r 0016620 \r E x p i d P r o d I d V a l : 0016640 \t I d V a l P r o c T y p e ; \r 0016660 E x p i d P r o d C o m p i l e 0016700 E x p r e s s i o n : \t C o m p 0016720 i l e E x p r e s s i o n P r o 0016740 c T y p e ; \r E x p i d P r o d 0016760 A d d V a l u e D e p e n d e n 0017000 c i e s : \t A d d V a l u e D e 0017020 p e n d e n c i e s P r o c T y 0017040 p e ; \r E x p i d P r o d C o m 0017060 p i l e L V a l u e : \t C o m p 0017100 i l e L V a l u e P r o c T y p 0017120 e ; \r E x p i d P r o d E v a l 0017140 u a t e E x p r e s s i o n : \t 0017160 E v a l u a t e E x p r e s s i 0017200 o n P r o c T y p e ; \r \r - - 0017220 E x p n u m P r o d \r \r E x p n 0017240 u m P r o d D a t a : \t T Y P E 0017260 = R E F E x p n u m P r o 0017300 d D a t a B o d y ; \r E x p n u 0017320 m P r o d D a t a B o d y : \t T 0017340 Y P E = R E C O R D [ \r N u 0017360 m : N u m N o d e ] ; \r \r E x 0017400 p n u m P r o d P r o c s : \t E 0017420 x p N o d e P r o c s ; \r \r B u 0017440 i l d E x p n u m P r o d N o d 0017460 e : \t P R O C [ p o s i t i o n 0017500 : I N T , l e n g t h : I 0017520 N T , N u m : N u m N o d e 0017540 ] \r \t R E T U R N S [ E x p N o 0017560 d e ] ; \r \r E x p n u m P r o d 0017600 I d V a l : \t I d V a l P r o c 0017620 T y p e ; \r E x p n u m P r o d 0017640 C o m p i l e E x p r e s s i o 0017660 n : \t C o m p i l e E x p r e s 0017700 s i o n P r o c T y p e ; \r E x 0017720 p n u m P r o d A d d V a l u e 0017740 D e p e n d e n c i e s : \t A d 0017760 d V a l u e D e p e n d e n c i 0020000 e s P r o c T y p e ; \r E x p n 0020020 u m P r o d C o m p i l e L V a 0020040 l u e : \t C o m p i l e L V a l 0020060 u e P r o c T y p e ; \r E x p n 0020100 u m P r o d E v a l u a t e E x 0020120 p r e s s i o n : \t E v a l u a 0020140 t e E x p r e s s i o n P r o c 0020160 T y p e ; \r \r - - E x p s t r 0020200 i n g P r o d \r \r E x p s t r i 0020220 n g P r o d D a t a : \t T Y P E 0020240 = R E F E x p s t r i n g 0020260 P r o d D a t a B o d y ; \r E x 0020300 p s t r i n g P r o d D a t a B 0020320 o d y : \t T Y P E = R E C O 0020340 R D [ \r S t r i n g : S t r i 0020360 n g N o d e ] ; \r \r E x p s t r 0020400 i n g P r o d P r o c s : \t E x 0020420 p N o d e P r o c s ; \r \r B u i 0020440 l d E x p s t r i n g P r o d N 0020460 o d e : \t P R O C [ p o s i t i 0020500 o n : I N T , l e n g t h : 0020520 I N T , S t r i n g : S t 0020540 r i n g N o d e ] \r \t R E T U R 0020560 N S [ E x p N o d e ] ; \r \r E x 0020600 p s t r i n g P r o d I d V a l 0020620 : \t I d V a l P r o c T y p e ; 0020640 \r E x p s t r i n g P r o d C o 0020660 m p i l e E x p r e s s i o n : 0020700 \t C o m p i l e E x p r e s s i 0020720 o n P r o c T y p e ; \r E x p s 0020740 t r i n g P r o d A d d V a l u 0020760 e D e p e n d e n c i e s : \t A 0021000 d d V a l u e D e p e n d e n c 0021020 i e s P r o c T y p e ; \r E x p 0021040 s t r i n g P r o d C o m p i l 0021060 e L V a l u e : \t C o m p i l e 0021100 L V a l u e P r o c T y p e ; \r 0021120 E x p s t r i n g P r o d E v a 0021140 l u a t e E x p r e s s i o n : 0021160 \t E v a l u a t e E x p r e s s 0021200 i o n P r o c T y p e ; \r \r - - 0021220 E x p f l n u m P r o d \r \r E 0021240 x p f l n u m P r o d D a t a : 0021260 \t T Y P E = R E F E x p f 0021300 l n u m P r o d D a t a B o d y 0021320 ; \r E x p f l n u m P r o d D a 0021340 t a B o d y : \t T Y P E = R 0021360 E C O R D [ \r F l n u m : F l 0021400 n u m N o d e ] ; \r \r E x p f l 0021420 n u m P r o d P r o c s : \t E x 0021440 p N o d e P r o c s ; \r \r B u i 0021460 l d E x p f l n u m P r o d N o 0021500 d e : \t P R O C [ p o s i t i o 0021520 n : I N T , l e n g t h : 0021540 I N T , F l n u m : F l n u 0021560 m N o d e ] \r \t R E T U R N S [ 0021600 E x p N o d e ] ; \r \r E x p f l 0021620 n u m P r o d I d V a l : \t I d 0021640 V a l P r o c T y p e ; \r E x p 0021660 f l n u m P r o d C o m p i l e 0021700 E x p r e s s i o n : \t C o m p 0021720 i l e E x p r e s s i o n P r o 0021740 c T y p e ; \r E x p f l n u m P 0021760 r o d A d d V a l u e D e p e n 0022000 d e n c i e s : \t A d d V a l u 0022020 e D e p e n d e n c i e s P r o 0022040 c T y p e ; \r E x p f l n u m P 0022060 r o d C o m p i l e L V a l u e 0022100 : \t C o m p i l e L V a l u e P 0022120 r o c T y p e ; \r E x p f l n u 0022140 m P r o d E v a l u a t e E x p 0022160 r e s s i o n : \t E v a l u a t 0022200 e E x p r e s s i o n P r o c T 0022220 y p e ; \r \r - - E x p c h a r 0022240 P r o d \r \r E x p c h a r P r o 0022260 d D a t a : \t T Y P E = R E 0022300 F E x p c h a r P r o d D a t 0022320 a B o d y ; \r E x p c h a r P r 0022340 o d D a t a B o d y : \t T Y P E 0022360 = R E C O R D [ \r C h a r : 0022400 C h a r N o d e ] ; \r \r E x p 0022420 c h a r P r o d P r o c s : \t E 0022440 x p N o d e P r o c s ; \r \r B u 0022460 i l d E x p c h a r P r o d N o 0022500 d e : \t P R O C [ p o s i t i o 0022520 n : I N T , l e n g t h : 0022540 I N T , C h a r : C h a r N 0022560 o d e ] \r \t R E T U R N S [ E x 0022600 p N o d e ] ; \r \r E x p c h a r 0022620 P r o d I d V a l : \t I d V a l 0022640 P r o c T y p e ; \r E x p c h a 0022660 r P r o d C o m p i l e E x p r 0022700 e s s i o n : \t C o m p i l e E 0022720 x p r e s s i o n P r o c T y p 0022740 e ; \r E x p c h a r P r o d A d 0022760 d V a l u e D e p e n d e n c i 0023000 e s : \t A d d V a l u e D e p e 0023020 n d e n c i e s P r o c T y p e 0023040 ; \r E x p c h a r P r o d C o m 0023060 p i l e L V a l u e : \t C o m p 0023100 i l e L V a l u e P r o c T y p 0023120 e ; \r E x p c h a r P r o d E v 0023140 a l u a t e E x p r e s s i o n 0023160 : \t E v a l u a t e E x p r e s 0023200 s i o n P r o c T y p e ; \r \r - 0023220 - E x p a t o m P r o d \r \r E 0023240 x p a t o m P r o d D a t a : \t 0023260 T Y P E = R E F E x p a t 0023300 o m P r o d D a t a B o d y ; \r 0023320 E x p a t o m P r o d D a t a B 0023340 o d y : \t T Y P E = R E C O 0023360 R D [ \r A t o m : A t o m N o 0023400 d e ] ; \r \r E x p a t o m P r o 0023420 d P r o c s : \t E x p N o d e P 0023440 r o c s ; \r \r B u i l d E x p a 0023460 t o m P r o d N o d e : \t P R O 0023500 C [ p o s i t i o n : I N T , 0023520 l e n g t h : I N T , A t 0023540 o m : A t o m N o d e ] \r \t R 0023560 E T U R N S [ E x p N o d e ] ; 0023600 \r \r E x p a t o m P r o d I d V 0023620 a l : \t I d V a l P r o c T y p 0023640 e ; \r E x p a t o m P r o d C o 0023660 m p i l e E x p r e s s i o n : 0023700 \t C o m p i l e E x p r e s s i 0023720 o n P r o c T y p e ; \r E x p a 0023740 t o m P r o d A d d V a l u e D 0023760 e p e n d e n c i e s : \t A d d 0024000 V a l u e D e p e n d e n c i e 0024020 s P r o c T y p e ; \r E x p a t 0024040 o m P r o d C o m p i l e L V a 0024060 l u e : \t C o m p i l e L V a l 0024100 u e P r o c T y p e ; \r E x p a 0024120 t o m P r o d E v a l u a t e E 0024140 x p r e s s i o n : \t E v a l u 0024160 a t e E x p r e s s i o n P r o 0024200 c T y p e ; \r \r - - E x p n a 0024220 r r o w P r o d \r \r E x p n a r 0024240 r o w P r o d D a t a : \t T Y P 0024260 E = R E F E x p n a r r o 0024300 w P r o d D a t a B o d y ; \r E 0024320 x p n a r r o w P r o d D a t a 0024340 B o d y : \t T Y P E = R E C 0024360 O R D [ \r E x p : E x p N o d 0024400 e , O p t T y p e : O p t T 0024420 y p e N o d e , C a t c h : 0024440 C a t c h N o d e ] ; \r \r E x p 0024460 n a r r o w P r o d P r o c s : 0024500 \t E x p N o d e P r o c s ; \r \r 0024520 B u i l d E x p n a r r o w P r 0024540 o d N o d e : \t P R O C [ p o s 0024560 i t i o n : I N T , l e n g 0024600 t h : I N T , E x p : E x 0024620 p N o d e , O p t T y p e : 0024640 O p t T y p e N o d e , C a t 0024660 c h : C a t c h N o d e ] \r \t 0024700 R E T U R N S [ E x p N o d e ] 0024720 ; \r \r E x p n a r r o w P r o d 0024740 I d V a l : \t I d V a l P r o c 0024760 T y p e ; \r E x p n a r r o w P 0025000 r o d C o m p i l e E x p r e s 0025020 s i o n : \t C o m p i l e E x p 0025040 r e s s i o n P r o c T y p e ; 0025060 \r E x p n a r r o w P r o d A d 0025100 d V a l u e D e p e n d e n c i 0025120 e s : \t A d d V a l u e D e p e 0025140 n d e n c i e s P r o c T y p e 0025160 ; \r E x p n a r r o w P r o d C 0025200 o m p i l e L V a l u e : \t C o 0025220 m p i l e L V a l u e P r o c T 0025240 y p e ; \r E x p n a r r o w P r 0025260 o d E v a l u a t e E x p r e s 0025300 s i o n : \t E v a l u a t e E x 0025320 p r e s s i o n P r o c T y p e 0025340 ; \r \r - - E x p l o o p h o l 0025360 e P r o d \r \r E x p l o o p h o 0025400 l e P r o d D a t a : \t T Y P E 0025420 = R E F E x p l o o p h o 0025440 l e P r o d D a t a B o d y ; \r 0025460 E x p l o o p h o l e P r o d D 0025500 a t a B o d y : \t T Y P E = 0025520 R E C O R D [ \r E x p : E x p 0025540 N o d e , O p t T y p e : O 0025560 p t T y p e N o d e ] ; \r \r E x 0025600 p l o o p h o l e P r o d P r o 0025620 c s : \t E x p N o d e P r o c s 0025640 ; \r \r B u i l d E x p l o o p h 0025660 o l e P r o d N o d e : \t P R O 0025700 C [ p o s i t i o n : I N T , 0025720 l e n g t h : I N T , E x 0025740 p : E x p N o d e , O p t T 0025760 y p e : O p t T y p e N o d e 0026000 ] \r \t R E T U R N S [ E x p N o 0026020 d e ] ; \r \r E x p l o o p h o l 0026040 e P r o d I d V a l : \t I d V a 0026060 l P r o c T y p e ; \r E x p l o 0026100 o p h o l e P r o d C o m p i l 0026120 e E x p r e s s i o n : \t C o m 0026140 p i l e E x p r e s s i o n P r 0026160 o c T y p e ; \r E x p l o o p h 0026200 o l e P r o d A d d V a l u e D 0026220 e p e n d e n c i e s : \t A d d 0026240 V a l u e D e p e n d e n c i e 0026260 s P r o c T y p e ; \r E x p l o 0026300 o p h o l e P r o d C o m p i l 0026320 e L V a l u e : \t C o m p i l e 0026340 L V a l u e P r o c T y p e ; \r 0026360 E x p l o o p h o l e P r o d E 0026400 v a l u a t e E x p r e s s i o 0026420 n : \t E v a l u a t e E x p r e 0026440 s s i o n P r o c T y p e ; \r \r 0026460 - - E x p a p p l y P r o d \r 0026500 \r E x p a p p l y P r o d D a t 0026520 a : \t T Y P E = R E F E x 0026540 p a p p l y P r o d D a t a B o 0026560 d y ; \r E x p a p p l y P r o d 0026600 D a t a B o d y : \t T Y P E = 0026620 R E C O R D [ \r E x p r a t o 0026640 r : E x p N o d e , E x p r 0026660 a n d : E x p N o d e , C a 0026700 t c h : C a t c h N o d e ] ; 0026720 \r \r E x p a p p l y P r o d P r 0026740 o c s : \t E x p N o d e P r o c 0026760 s ; \r \r B u i l d E x p a p p l 0027000 y P r o d N o d e : \t P R O C [ 0027020 p o s i t i o n : I N T , l 0027040 e n g t h : I N T , E x p r 0027060 a t o r : E x p N o d e , E 0027100 x p r a n d : E x p N o d e , 0027120 C a t c h : C a t c h N o d 0027140 e ] \r \t R E T U R N S [ E x p N 0027160 o d e ] ; \r \r E x p a p p l y P 0027200 r o d I d V a l : \t I d V a l P 0027220 r o c T y p e ; \r E x p a p p l 0027240 y P r o d C o m p i l e E x p r 0027260 e s s i o n : \t C o m p i l e E 0027300 x p r e s s i o n P r o c T y p 0027320 e ; \r E x p a p p l y P r o d A 0027340 d d V a l u e D e p e n d e n c 0027360 i e s : \t A d d V a l u e D e p 0027400 e n d e n c i e s P r o c T y p 0027420 e ; \r E x p a p p l y P r o d C 0027440 o m p i l e L V a l u e : \t C o 0027460 m p i l e L V a l u e P r o c T 0027500 y p e ; \r E x p a p p l y P r o 0027520 d E v a l u a t e E x p r e s s 0027540 i o n : \t E v a l u a t e E x p 0027560 r e s s i o n P r o c T y p e ; 0027600 \r \r - - E x p q u a l i f i e 0027620 r P r o d \r \r E x p q u a l i f 0027640 i e r P r o d D a t a : \t T Y P 0027660 E = R E F E x p q u a l i 0027700 f i e r P r o d D a t a B o d y 0027720 ; \r E x p q u a l i f i e r P r 0027740 o d D a t a B o d y : \t T Y P E 0027760 = R E C O R D [ \r E x p : 0030000 E x p N o d e , Q u a l i f i 0030020 e r : Q u a l i f i e r N o d 0030040 e ] ; \r \r E x p q u a l i f i e 0030060 r P r o d P r o c s : \t E x p N 0030100 o d e P r o c s ; \r \r B u i l d 0030120 E x p q u a l i f i e r P r o d 0030140 N o d e : \t P R O C [ p o s i t 0030160 i o n : I N T , l e n g t h 0030200 : I N T , E x p : E x p N 0030220 o d e , Q u a l i f i e r : 0030240 Q u a l i f i e r N o d e ] \r \t 0030260 R E T U R N S [ E x p N o d e ] 0030300 ; \r \r E x p q u a l i f i e r P 0030320 r o d I d V a l : \t I d V a l P 0030340 r o c T y p e ; \r E x p q u a l 0030360 i f i e r P r o d C o m p i l e 0030400 E x p r e s s i o n : \t C o m p 0030420 i l e E x p r e s s i o n P r o 0030440 c T y p e ; \r E x p q u a l i f 0030460 i e r P r o d A d d V a l u e D 0030500 e p e n d e n c i e s : \t A d d 0030520 V a l u e D e p e n d e n c i e 0030540 s P r o c T y p e ; \r E x p q u 0030560 a l i f i e r P r o d C o m p i 0030600 l e L V a l u e : \t C o m p i l 0030620 e L V a l u e P r o c T y p e ; 0030640 \r E x p q u a l i f i e r P r o 0030660 d E v a l u a t e E x p r e s s 0030700 i o n : \t E v a l u a t e E x p 0030720 r e s s i o n P r o c T y p e ; 0030740 \r \r - - E x p e x p l i s t P 0030760 r o d \r \r E x p e x p l i s t P 0031000 r o d D a t a : \t T Y P E = 0031020 R E F E x p e x p l i s t P r 0031040 o d D a t a B o d y ; \r E x p e 0031060 x p l i s t P r o d D a t a B o 0031100 d y : \t T Y P E = R E C O R 0031120 D [ \r E x p L i s t : E x p L 0031140 i s t N o d e ] ; \r \r E x p e x 0031160 p l i s t P r o d P r o c s : \t 0031200 E x p N o d e P r o c s ; \r \r B 0031220 u i l d E x p e x p l i s t P r 0031240 o d N o d e : \t P R O C [ p o s 0031260 i t i o n : I N T , l e n g 0031300 t h : I N T , E x p L i s t 0031320 : E x p L i s t N o d e ] \r \t 0031340 R E T U R N S [ E x p N o d e ] 0031360 ; \r \r E x p e x p l i s t P r o 0031400 d I d V a l : \t I d V a l P r o 0031420 c T y p e ; \r E x p e x p l i s 0031440 t P r o d C o m p i l e E x p r 0031460 e s s i o n : \t C o m p i l e E 0031500 x p r e s s i o n P r o c T y p 0031520 e ; \r E x p e x p l i s t P r o 0031540 d A d d V a l u e D e p e n d e 0031560 n c i e s : \t A d d V a l u e D 0031600 e p e n d e n c i e s P r o c T 0031620 y p e ; \r E x p e x p l i s t P 0031640 r o d C o m p i l e L V a l u e 0031660 : \t C o m p i l e L V a l u e P 0031700 r o c T y p e ; \r E x p e x p l 0031720 i s t P r o d E v a l u a t e E 0031740 x p r e s s i o n : \t E v a l u 0031760 a t e E x p r e s s i o n P r o 0032000 c T y p e ; \r \r - - E x p p r 0032020 e f i x o p P r o d \r \r E x p p 0032040 r e f i x o p P r o d D a t a : 0032060 \t T Y P E = R E F E x p p 0032100 r e f i x o p P r o d D a t a B 0032120 o d y ; \r E x p p r e f i x o p 0032140 P r o d D a t a B o d y : \t T Y 0032160 P E = R E C O R D [ \r P r e 0032200 f i x O p : P r e f i x O p N 0032220 o d e , O r d e r L i s t : 0032240 O r d e r L i s t N o d e ] ; \r 0032260 \r E x p p r e f i x o p P r o d 0032300 P r o c s : \t E x p N o d e P r 0032320 o c s ; \r \r B u i l d E x p p r 0032340 e f i x o p P r o d N o d e : \t 0032360 P R O C [ p o s i t i o n : I 0032400 N T , l e n g t h : I N T , 0032420 P r e f i x O p : P r e f i 0032440 x O p N o d e , O r d e r L i 0032460 s t : O r d e r L i s t N o d 0032500 e ] \r \t R E T U R N S [ E x p N 0032520 o d e ] ; \r \r E x p p r e f i x 0032540 o p P r o d I d V a l : \t I d V 0032560 a l P r o c T y p e ; \r E x p p 0032600 r e f i x o p P r o d C o m p i 0032620 l e E x p r e s s i o n : \t C o 0032640 m p i l e E x p r e s s i o n P 0032660 r o c T y p e ; \r E x p p r e f 0032700 i x o p P r o d A d d V a l u e 0032720 D e p e n d e n c i e s : \t A d 0032740 d V a l u e D e p e n d e n c i 0032760 e s P r o c T y p e ; \r E x p p 0033000 r e f i x o p P r o d C o m p i 0033020 l e L V a l u e : \t C o m p i l 0033040 e L V a l u e P r o c T y p e ; 0033060 \r E x p p r e f i x o p P r o d 0033100 E v a l u a t e E x p r e s s i 0033120 o n : \t E v a l u a t e E x p r 0033140 e s s i o n P r o c T y p e ; \r 0033160 E N D . . \r 0033166