$ od -c -N 50000 [Indigo]<Casaba>7.0>Saffron3.0>Derived>SaffronAG6bDef.Mesa!16 0000000 - - S a f f r o n A G 6 b 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 : 4 9 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 6 b 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 - - T y p e I d i d P r o 0000620 d \r \r T y p e I d i d P r o d D 0000640 a t a : \t T Y P E = R E F 0000660 T y p e I d i d P r o d D a t a 0000700 B o d y ; \r T y p e I d i d P r 0000720 o d D a t a B o d y : \t T Y P E 0000740 = R E C O R D [ \r I d : I 0000760 d N o d e ] ; \r \r T y p e I d i 0001000 d P r o d P r o c s : \t T y p e 0001020 I d N o d e P r o c s ; \r \r B u 0001040 i l d T y p e I d i d P r o d N 0001060 o d e : \t P R O C [ p o s i t i 0001100 o n : I N T , l e n g t h : 0001120 I N T , I d : I d N o d e 0001140 ] \r \t R E T U R N S [ T y p e I 0001160 d N o d e ] ; \r \r T y p e I d i 0001200 d P r o d M a k e T y p e : \t M 0001220 a k e T y p e P r o c T y p e ; 0001240 \r T y p e I d i d P r o d L o o 0001260 k u p T y p e I d : \t L o o k u 0001300 p T y p e I d P r o c T y p e ; 0001320 \r T y p e I d i d P r o d A d d 0001340 S i z e D e p e n d e n c i e s 0001360 : \t A d d S i z e D e p e n d e 0001400 n c i e s P r o c T y p e ; \r T 0001420 y p e I d i d P r o d A d d F i 0001440 r s t D e p e n d e n c i e s : 0001460 \t A d d F i r s t D e p e n d e 0001500 n c i e s P r o c T y p e ; \r T 0001520 y p e I d i d P r o d A d d L a 0001540 s t D e p e n d e n c i e s : \t 0001560 A d d L a s t D e p e n d e n c 0001600 i e s P r o c T y p e ; \r T y p 0001620 e I d i d P r o d C o m p i l e 0001640 S i z e O f T y p e E x p r e s 0001660 s i o n : \t C o m p i l e S i z 0001700 e O f T y p e E x p r e s s i o 0001720 n P r o c T y p e ; \r T y p e I 0001740 d i d P r o d C o m p i l e F i 0001760 r s t O f T y p e E x p r e s s 0002000 i o n : \t C o m p i l e F i r s 0002020 t O f T y p e E x p r e s s i o 0002040 n P r o c T y p e ; \r T y p e I 0002060 d i d P r o d C o m p i l e L a 0002100 s t O f T y p e E x p r e s s i 0002120 o n : \t C o m p i l e L a s t O 0002140 f T y p e E x p r e s s i o n P 0002160 r o c T y p e ; \r T y p e I d i 0002200 d P r o d E v a l u a t e S i z 0002220 e O f T y p e E x p r e s s i o 0002240 n : \t E v a l u a t e S i z e O 0002260 f T y p e E x p r e s s i o n P 0002300 r o c T y p e ; \r T y p e I d i 0002320 d P r o d E v a l u a t e F i r 0002340 s t O f T y p e E x p r e s s i 0002360 o n : \t E v a l u a t e F i r s 0002400 t O f T y p e E x p r e s s i o 0002420 n P r o c T y p e ; \r T y p e I 0002440 d i d P r o d E v a l u a t e L 0002460 a s t O f T y p e E x p r e s s 0002500 i o n : \t E v a l u a t e L a s 0002520 t O f T y p e E x p r e s s i o 0002540 n P r o c T y p e ; \r \r - - T 0002560 y p e I d q u a l i f i e r P r 0002600 o d \r \r T y p e I d q u a l i f 0002620 i e r P r o d D a t a : \t T Y P 0002640 E = R E F T y p e I d q u 0002660 a l i f i e r P r o d D a t a B 0002700 o d y ; \r T y p e I d q u a l i 0002720 f i e r P r o d D a t a B o d y 0002740 : \t T Y P E = R E C O R D [ 0002760 \r T y p e I d : T y p e I d N 0003000 o d e , I d : I d N o d e ] 0003020 ; \r \r T y p e I d q u a l i f i 0003040 e r P r o d P r o c s : \t T y p 0003060 e I d N o d e P r o c s ; \r \r B 0003100 u i l d T y p e I d q u a l i f 0003120 i e r P r o d N o d e : \t P R O 0003140 C [ p o s i t i o n : I N T , 0003160 l e n g t h : I N T , T y 0003200 p e I d : T y p e I d N o d e 0003220 , I d : I d N o d e ] \r \t R 0003240 E T U R N S [ T y p e I d N o d 0003260 e ] ; \r \r T y p e I d q u a l i 0003300 f i e r P r o d M a k e T y p e 0003320 : \t M a k e T y p e P r o c T y 0003340 p e ; \r T y p e I d q u a l i f 0003360 i e r P r o d L o o k u p T y p 0003400 e I d : \t L o o k u p T y p e I 0003420 d P r o c T y p e ; \r T y p e I 0003440 d q u a l i f i e r P r o d A d 0003460 d S i z e D e p e n d e n c i e 0003500 s : \t A d d S i z e D e p e n d 0003520 e n c i e s P r o c T y p e ; \r 0003540 T y p e I d q u a l i f i e r P 0003560 r o d A d d F i r s t D e p e n 0003600 d e n c i e s : \t A d d F i r s 0003620 t D e p e n d e n c i e s P r o 0003640 c T y p e ; \r T y p e I d q u a 0003660 l i f i e r P r o d A d d L a s 0003700 t D e p e n d e n c i e s : \t A 0003720 d d L a s t D e p e n d e n c i 0003740 e s P r o c T y p e ; \r T y p e 0003760 I d q u a l i f i e r P r o d C 0004000 o m p i l e S i z e O f T y p e 0004020 E x p r e s s i o n : \t C o m p 0004040 i l e S i z e O f T y p e E x p 0004060 r e s s i o n P r o c T y p e ; 0004100 \r T y p e I d q u a l i f i e r 0004120 P r o d C o m p i l e F i r s t 0004140 O f T y p e E x p r e s s i o n 0004160 : \t C o m p i l e F i r s t O f 0004200 T y p e E x p r e s s i o n P r 0004220 o c T y p e ; \r T y p e I d q u 0004240 a l i f i e r P r o d C o m p i 0004260 l e L a s t O f T y p e E x p r 0004300 e s s i o n : \t C o m p i l e L 0004320 a s t O f T y p e E x p r e s s 0004340 i o n P r o c T y p e ; \r T y p 0004360 e I d q u a l i f i e r P r o d 0004400 E v a l u a t e S i z e O f T y 0004420 p e E x p r e s s i o n : \t E v 0004440 a l u a t e S i z e O f T y p e 0004460 E x p r e s s i o n P r o c T y 0004500 p e ; \r T y p e I d q u a l i f 0004520 i e r P r o d E v a l u a t e F 0004540 i r s t O f T y p e E x p r e s 0004560 s i o n : \t E v a l u a t e F i 0004600 r s t O f T y p e E x p r e s s 0004620 i o n P r o c T y p e ; \r T y p 0004640 e I d q u a l i f i e r P r o d 0004660 E v a l u a t e L a s t O f T y 0004700 p e E x p r e s s i o n : \t E v 0004720 a l u a t e L a s t O f T y p e 0004740 E x p r e s s i o n P r o c T y 0004760 p e ; \r \r - - S u b r a n g e 0005000 n a m e d P r o d \r \r S u b r a 0005020 n g e n a m e d P r o d D a t a 0005040 : \t T Y P E = R E F S u b 0005060 r a n g e n a m e d P r o d D a 0005100 t a B o d y ; \r S u b r a n g e 0005120 n a m e d P r o d D a t a B o d 0005140 y : \t T Y P E = R E C O R D 0005160 [ \r T y p e I d : T y p e I d 0005200 N o d e , I n t e r v a l : 0005220 I n t e r v a l N o d e ] ; \r \r 0005240 S u b r a n g e n a m e d P r o 0005260 d P r o c s : \t S u b r a n g e 0005300 N o d e P r o c s ; \r \r B u i l 0005320 d S u b r a n g e n a m e d P r 0005340 o d N o d e : \t P R O C [ p o s 0005360 i t i o n : I N T , l e n g 0005400 t h : I N T , T y p e I d : 0005420 T y p e I d N o d e , I n t 0005440 e r v a l : I n t e r v a l N 0005460 o d e ] \r \t R E T U R N S [ S u 0005500 b r a n g e N o d e ] ; \r \r S u 0005520 b r a n g e n a m e d P r o d M 0005540 a k e T y p e : \t M a k e T y p 0005560 e P r o c T y p e ; \r S u b r a 0005600 n g e n a m e d P r o d A d d F 0005620 i r s t D e p e n d e n c i e s 0005640 : \t A d d F i r s t D e p e n d 0005660 e n c i e s P r o c T y p e ; \r 0005700 S u b r a n g e n a m e d P r o 0005720 d A d d L a s t D e p e n d e n 0005740 c i e s : \t A d d L a s t D e p 0005760 e n d e n c i e s P r o c T y p 0006000 e ; \r S u b r a n g e n a m e d 0006020 P r o d A d d S i z e D e p e n 0006040 d e n c i e s : \t A d d S i z e 0006060 D e p e n d e n c i e s P r o c 0006100 T y p e ; \r S u b r a n g e n a 0006120 m e d P r o d C o m p i l e S i 0006140 z e O f T y p e E x p r e s s i 0006160 o n : \t C o m p i l e S i z e O 0006200 f T y p e E x p r e s s i o n P 0006220 r o c T y p e ; \r S u b r a n g 0006240 e n a m e d P r o d C o m p i l 0006260 e F i r s t O f T y p e E x p r 0006300 e s s i o n : \t C o m p i l e F 0006320 i r s t O f T y p e E x p r e s 0006340 s i o n P r o c T y p e ; \r S u 0006360 b r a n g e n a m e d P r o d C 0006400 o m p i l e L a s t O f T y p e 0006420 E x p r e s s i o n : \t C o m p 0006440 i l e L a s t O f T y p e E x p 0006460 r e s s i o n P r o c T y p e ; 0006500 \r S u b r a n g e n a m e d P r 0006520 o d E v a l u a t e S i z e O f 0006540 T y p e E x p r e s s i o n : \t 0006560 E v a l u a t e S i z e O f T y 0006600 p e E x p r e s s i o n P r o c 0006620 T y p e ; \r S u b r a n g e n a 0006640 m e d P r o d E v a l u a t e F 0006660 i r s t O f T y p e E x p r e s 0006700 s i o n : \t E v a l u a t e F i 0006720 r s t O f T y p e E x p r e s s 0006740 i o n P r o c T y p e ; \r S u b 0006760 r a n g e n a m e d P r o d E v 0007000 a l u a t e L a s t O f T y p e 0007020 E x p r e s s i o n : \t E v a l 0007040 u a t e L a s t O f T y p e E x 0007060 p r e s s i o n P r o c T y p e 0007100 ; \r \r - - S u b r a n g e u n 0007120 n a m e d P r o d \r \r S u b r a 0007140 n g e u n n a m e d P r o d D a 0007160 t a : \t T Y P E = R E F S 0007200 u b r a n g e u n n a m e d P r 0007220 o d D a t a B o d y ; \r S u b r 0007240 a n g e u n n a m e d P r o d D 0007260 a t a B o d y : \t T Y P E = 0007300 R E C O R D [ \r I n t e r v a l 0007320 : I n t e r v a l N o d e ] ; 0007340 \r \r S u b r a n g e u n n a m e 0007360 d P r o d P r o c s : \t S u b r 0007400 a n g e N o d e P r o c s ; \r \r 0007420 B u i l d S u b r a n g e u n n 0007440 a m e d P r o d N o d e : \t P R 0007460 O C [ p o s i t i o n : I N T 0007500 , l e n g t h : I N T , I 0007520 n t e r v a l : I n t e r v a 0007540 l N o d e ] \r \t R E T U R N S [ 0007560 S u b r a n g e N o d e ] ; \r \r 0007600 S u b r a n g e u n n a m e d P 0007620 r o d M a k e T y p e : \t M a k 0007640 e T y p e P r o c T y p e ; \r S 0007660 u b r a n g e u n n a m e d P r 0007700 o d A d d F i r s t D e p e n d 0007720 e n c i e s : \t A d d F i r s t 0007740 D e p e n d e n c i e s P r o c 0007760 T y p e ; \r S u b r a n g e u n 0010000 n a m e d P r o d A d d L a s t 0010020 D e p e n d e n c i e s : \t A d 0010040 d L a s t D e p e n d e n c i e 0010060 s P r o c T y p e ; \r S u b r a 0010100 n g e u n n a m e d P r o d A d 0010120 d S i z e D e p e n d e n c i e 0010140 s : \t A d d S i z e D e p e n d 0010160 e n c i e s P r o c T y p e ; \r 0010200 S u b r a n g e u n n a m e d P 0010220 r o d C o m p i l e S i z e O f 0010240 T y p e E x p r e s s i o n : \t 0010260 C o m p i l e S i z e O f T y p 0010300 e E x p r e s s i o n P r o c T 0010320 y p e ; \r S u b r a n g e u n n 0010340 a m e d P r o d C o m p i l e F 0010360 i r s t O f T y p e E x p r e s 0010400 s i o n : \t C o m p i l e F i r 0010420 s t O f T y p e E x p r e s s i 0010440 o n P r o c T y p e ; \r S u b r 0010460 a n g e u n n a m e d P r o d C 0010500 o m p i l e L a s t O f T y p e 0010520 E x p r e s s i o n : \t C o m p 0010540 i l e L a s t O f T y p e E x p 0010560 r e s s i o n P r o c T y p e ; 0010600 \r S u b r a n g e u n n a m e d 0010620 P r o d E v a l u a t e S i z e 0010640 O f T y p e E x p r e s s i o n 0010660 : \t E v a l u a t e S i z e O f 0010700 T y p e E x p r e s s i o n P r 0010720 o c T y p e ; \r S u b r a n g e 0010740 u n n a m e d P r o d E v a l u 0010760 a t e F i r s t O f T y p e E x 0011000 p r e s s i o n : \t E v a l u a 0011020 t e F i r s t O f T y p e E x p 0011040 r e s s i o n P r o c T y p e ; 0011060 \r S u b r a n g e u n n a m e d 0011100 P r o d E v a l u a t e L a s t 0011120 O f T y p e E x p r e s s i o n 0011140 : \t E v a l u a t e L a s t O f 0011160 T y p e E x p r e s s i o n P r 0011200 o c T y p e ; \r \r - - I n t e 0011220 r v a l c c P r o d \r \r I n t e 0011240 r v a l c c P r o d D a t a : \t 0011260 T Y P E = R E F I n t e r 0011300 v a l c c P r o d D a t a B o d 0011320 y ; \r I n t e r v a l c c P r o 0011340 d D a t a B o d y : \t T Y P E 0011360 = R E C O R D [ \r B o u n d s 0011400 : B o u n d s N o d e ] ; \r \r 0011420 I n t e r v a l c c P r o d P r 0011440 o c s : \t I n t e r v a l N o d 0011460 e P r o c s ; \r \r B u i l d I n 0011500 t e r v a l c c P r o d N o d e 0011520 : \t P R O C [ p o s i t i o n : 0011540 I N T , l e n g t h : I N 0011560 T , B o u n d s : B o u n d 0011600 s N o d e ] \r \t R E T U R N S [ 0011620 I n t e r v a l N o d e ] ; \r \r 0011640 I n t e r v a l c c P r o d G e 0011660 t B o u n d s V a l : \t G e t B 0011700 o u n d s V a l P r o c T y p e 0011720 ; \r I n t e r v a l c c P r o d 0011740 A d d F i r s t D e p e n d e n 0011760 c i e s : \t A d d F i r s t D e 0012000 p e n d e n c i e s P r o c T y 0012020 p e ; \r I n t e r v a l c c P r 0012040 o d A d d L a s t D e p e n d e 0012060 n c i e s : \t A d d L a s t D e 0012100 p e n d e n c i e s P r o c T y 0012120 p e ; \r I n t e r v a l c c P r 0012140 o d A d d S i z e D e p e n d e 0012160 n c i e s : \t A d d S i z e D e 0012200 p e n d e n c i e s P r o c T y 0012220 p e ; \r I n t e r v a l c c P r 0012240 o d C o m p i l e S i z e O f T 0012260 y p e E x p r e s s i o n : \t C 0012300 o m p i l e S i z e O f T y p e 0012320 E x p r e s s i o n P r o c T y 0012340 p e ; \r I n t e r v a l c c P r 0012360 o d C o m p i l e F i r s t O f 0012400 T y p e E x p r e s s i o n : \t 0012420 C o m p i l e F i r s t O f T y 0012440 p e E x p r e s s i o n P r o c 0012460 T y p e ; \r I n t e r v a l c c 0012500 P r o d C o m p i l e L a s t O 0012520 f T y p e E x p r e s s i o n : 0012540 \t C o m p i l e L a s t O f T y 0012560 p e E x p r e s s i o n P r o c 0012600 T y p e ; \r I n t e r v a l c c 0012620 P r o d E v a l u a t e S i z e 0012640 O f T y p e E x p r e s s i o n 0012660 : \t E v a l u a t e S i z e O f 0012700 T y p e E x p r e s s i o n P r 0012720 o c T y p e ; \r I n t e r v a l 0012740 c c P r o d E v a l u a t e F i 0012760 r s t O f T y p e E x p r e s s 0013000 i o n : \t E v a l u a t e F i r 0013020 s t O f T y p e E x p r e s s i 0013040 o n P r o c T y p e ; \r I n t e 0013060 r v a l c c P r o d E v a l u a 0013100 t e L a s t O f T y p e E x p r 0013120 e s s i o n : \t E v a l u a t e 0013140 L a s t O f T y p e E x p r e s 0013160 s i o n P r o c T y p e ; \r \r - 0013200 - I n t e r v a l c o P r o d 0013220 \r \r I n t e r v a l c o P r o d 0013240 D a t a : \t T Y P E = R E F 0013260 I n t e r v a l c o P r o d D 0013300 a t a B o d y ; \r I n t e r v a 0013320 l c o P r o d D a t a B o d y : 0013340 \t T Y P E = R E C O R D [ \r 0013360 B o u n d s : B o u n d s N o 0013400 d e ] ; \r \r I n t e r v a l c o 0013420 P r o d P r o c s : \t I n t e r 0013440 v a l N o d e P r o c s ; \r \r B 0013460 u i l d I n t e r v a l c o P r 0013500 o d N o d e : \t P R O C [ p o s 0013520 i t i o n : I N T , l e n g 0013540 t h : I N T , B o u n d s : 0013560 B o u n d s N o d e ] \r \t R E 0013600 T U R N S [ I n t e r v a l N o 0013620 d e ] ; \r \r I n t e r v a l c o 0013640 P r o d G e t B o u n d s V a l 0013660 : \t G e t B o u n d s V a l P r 0013700 o c T y p e ; \r I n t e r v a l 0013720 c o P r o d A d d F i r s t D e 0013740 p e n d e n c i e s : \t A d d F 0013760 i r s t D e p e n d e n c i e s 0014000 P r o c T y p e ; \r I n t e r v 0014020 a l c o P r o d A d d L a s t D 0014040 e p e n d e n c i e s : \t A d d 0014060 L a s t D e p e n d e n c i e s 0014100 P r o c T y p e ; \r I n t e r v 0014120 a l c o P r o d A d d S i z e D 0014140 e p e n d e n c i e s : \t A d d 0014160 S i z e D e p e n d e n c i e s 0014200 P r o c T y p e ; \r I n t e r v 0014220 a l c o P r o d C o m p i l e S 0014240 i z e O f T y p e E x p r e s s 0014260 i o n : \t C o m p i l e S i z e 0014300 O f T y p e E x p r e s s i o n 0014320 P r o c T y p e ; \r I n t e r v 0014340 a l c o P r o d C o m p i l e F 0014360 i r s t O f T y p e E x p r e s 0014400 s i o n : \t C o m p i l e F i r 0014420 s t O f T y p e E x p r e s s i 0014440 o n P r o c T y p e ; \r I n t e 0014460 r v a l c o P r o d C o m p i l 0014500 e L a s t O f T y p e E x p r e 0014520 s s i o n : \t C o m p i l e L a 0014540 s t O f T y p e E x p r e s s i 0014560 o n P r o c T y p e ; \r I n t e 0014600 r v a l c o P r o d E v a l u a 0014620 t e S i z e O f T y p e E x p r 0014640 e s s i o n : \t E v a l u a t e 0014660 S i z e O f T y p e E x p r e s 0014700 s i o n P r o c T y p e ; \r I n 0014720 t e r v a l c o P r o d E v a l 0014740 u a t e F i r s t O f T y p e E 0014760 x p r e s s i o n : \t E v a l u 0015000 a t e F i r s t O f T y p e E x 0015020 p r e s s i o n P r o c T y p e 0015040 ; \r I n t e r v a l c o P r o d 0015060 E v a l u a t e L a s t O f T y 0015100 p e E x p r e s s i o n : \t E v 0015120 a l u a t e L a s t O f T y p e 0015140 E x p r e s s i o n P r o c T y 0015160 p e ; \r \r - - I n t e r v a l 0015200 o c P r o d \r \r I n t e r v a l 0015220 o c P r o d D a t a : \t T Y P E 0015240 = R E F I n t e r v a l o 0015260 c P r o d D a t a B o d y ; \r I 0015300 n t e r v a l o c P r o d D a t 0015320 a B o d y : \t T Y P E = R E 0015340 C O R D [ \r B o u n d s : B o 0015360 u n d s N o d e ] ; \r \r I n t e 0015400 r v a l o c P r o d P r o c s : 0015420 \t I n t e r v a l N o d e P r o 0015440 c s ; \r \r B u i l d I n t e r v 0015460 a l o c P r o d N o d e : \t P R 0015500 O C [ p o s i t i o n : I N T 0015520 , l e n g t h : I N T , B 0015540 o u n d s : B o u n d s N o d 0015560 e ] \r \t R E T U R N S [ I n t e 0015600 r v a l N o d e ] ; \r \r I n t e 0015620 r v a l o c P r o d G e t B o u 0015640 n d s V a l : \t G e t B o u n d 0015660 s V a l P r o c T y p e ; \r I n 0015700 t e r v a l o c P r o d A d d F 0015720 i r s t D e p e n d e n c i e s 0015740 : \t A d d F i r s t D e p e n d 0015760 e n c i e s P r o c T y p e ; \r 0016000 I n t e r v a l o c P r o d A d 0016020 d L a s t D e p e n d e n c i e 0016040 s : \t A d d L a s t D e p e n d 0016060 e n c i e s P r o c T y p e ; \r 0016100 I n t e r v a l o c P r o d A d 0016120 d S i z e D e p e n d e n c i e 0016140 s : \t A d d S i z e D e p e n d 0016160 e n c i e s P r o c T y p e ; \r 0016200 I n t e r v a l o c P r o d C o 0016220 m p i l e S i z e O f T y p e E 0016240 x p r e s s i o n : \t C o m p i 0016260 l e S i z e O f T y p e E x p r 0016300 e s s i o n P r o c T y p e ; \r 0016320 I n t e r v a l o c P r o d C o 0016340 m p i l e F i r s t O f T y p e 0016360 E x p r e s s i o n : \t C o m p 0016400 i l e F i r s t O f T y p e E x 0016420 p r e s s i o n P r o c T y p e 0016440 ; \r I n t e r v a l o c P r o d 0016460 C o m p i l e L a s t O f T y p 0016500 e E x p r e s s i o n : \t C o m 0016520 p i l e L a s t O f T y p e E x 0016540 p r e s s i o n P r o c T y p e 0016560 ; \r I n t e r v a l o c P r o d 0016600 E v a l u a t e S i z e O f T y 0016620 p e E x p r e s s i o n : \t E v 0016640 a l u a t e S i z e O f T y p e 0016660 E x p r e s s i o n P r o c T y 0016700 p e ; \r I n t e r v a l o c P r 0016720 o d E v a l u a t e F i r s t O 0016740 f T y p e E x p r e s s i o n : 0016760 \t E v a l u a t e F i r s t O f 0017000 T y p e E x p r e s s i o n P r 0017020 o c T y p e ; \r I n t e r v a l 0017040 o c P r o d E v a l u a t e L a 0017060 s t O f T y p e E x p r e s s i 0017100 o n : \t E v a l u a t e L a s t 0017120 O f T y p e E x p r e s s i o n 0017140 P r o c T y p e ; \r \r - - I n 0017160 t e r v a l o o P r o d \r \r I n 0017200 t e r v a l o o P r o d D a t a 0017220 : \t T Y P E = R E F I n t 0017240 e r v a l o o P r o d D a t a B 0017260 o d y ; \r I n t e r v a l o o P 0017300 r o d D a t a B o d y : \t T Y P 0017320 E = R E C O R D [ \r B o u n 0017340 d s : B o u n d s N o d e ] ; 0017360 \r \r I n t e r v a l o o P r o d 0017400 P r o c s : \t I n t e r v a l N 0017420 o d e P r o c s ; \r \r B u i l d 0017440 I n t e r v a l o o P r o d N o 0017460 d e : \t P R O C [ p o s i t i o 0017500 n : I N T , l e n g t h : 0017520 I N T , B o u n d s : B o u 0017540 n d s N o d e ] \r \t R E T U R N 0017560 S [ I n t e r v a l N o d e ] ; 0017600 \r \r I n t e r v a l o o P r o d 0017620 G e t B o u n d s V a l : \t G e 0017640 t B o u n d s V a l P r o c T y 0017660 p e ; \r I n t e r v a l o o P r 0017700 o d A d d F i r s t D e p e n d 0017720 e n c i e s : \t A d d F i r s t 0017740 D e p e n d e n c i e s P r o c 0017760 T y p e ; \r I n t e r v a l o o 0020000 P r o d A d d L a s t D e p e n 0020020 d e n c i e s : \t A d d L a s t 0020040 D e p e n d e n c i e s P r o c 0020060 T y p e ; \r I n t e r v a l o o 0020100 P r o d A d d S i z e D e p e n 0020120 d e n c i e s : \t A d d S i z e 0020140 D e p e n d e n c i e s P r o c 0020160 T y p e ; \r I n t e r v a l o o 0020200 P r o d C o m p i l e S i z e O 0020220 f T y p e E x p r e s s i o n : 0020240 \t C o m p i l e S i z e O f T y 0020260 p e E x p r e s s i o n P r o c 0020300 T y p e ; \r I n t e r v a l o o 0020320 P r o d C o m p i l e F i r s t 0020340 O f T y p e E x p r e s s i o n 0020360 : \t C o m p i l e F i r s t O f 0020400 T y p e E x p r e s s i o n P r 0020420 o c T y p e ; \r I n t e r v a l 0020440 o o P r o d C o m p i l e L a s 0020460 t O f T y p e E x p r e s s i o 0020500 n : \t C o m p i l e L a s t O f 0020520 T y p e E x p r e s s i o n P r 0020540 o c T y p e ; \r I n t e r v a l 0020560 o o P r o d E v a l u a t e S i 0020600 z e O f T y p e E x p r e s s i 0020620 o n : \t E v a l u a t e S i z e 0020640 O f T y p e E x p r e s s i o n 0020660 P r o c T y p e ; \r I n t e r v 0020700 a l o o P r o d E v a l u a t e 0020720 F i r s t O f T y p e E x p r e 0020740 s s i o n : \t E v a l u a t e F 0020760 i r s t O f T y p e E x p r e s 0021000 s i o n P r o c T y p e ; \r I n 0021020 t e r v a l o o P r o d E v a l 0021040 u a t e L a s t O f T y p e E x 0021060 p r e s s i o n : \t E v a l u a 0021100 t e L a s t O f T y p e E x p r 0021120 e s s i o n P r o c T y p e ; \r 0021140 \r - - B o u n d s P r o d \r \r 0021160 B o u n d s P r o d D a t a : \t 0021200 T Y P E = R E F B o u n d 0021220 s P r o d D a t a B o d y ; \r B 0021240 o u n d s P r o d D a t a B o d 0021260 y : \t T Y P E = R E C O R D 0021300 [ \r E x p l o w e r : E x p N 0021320 o d e , E x p u p p e r : E 0021340 x p N o d e ] ; \r \r B o u n d s 0021360 P r o d P r o c s : \t B o u n d 0021400 s N o d e P r o c s ; \r \r B u i 0021420 l d B o u n d s P r o d N o d e 0021440 : \t P R O C [ p o s i t i o n : 0021460 I N T , l e n g t h : I N 0021500 T , E x p l o w e r : E x p 0021520 N o d e , E x p u p p e r : 0021540 E x p N o d e ] \r \t R E T U R N 0021560 S [ B o u n d s N o d e ] ; \r \r 0021600 B o u n d s P r o d G e t L o w 0021620 e r A n d U p p e r : \t G e t L 0021640 o w e r A n d U p p e r P r o c 0021660 T y p e ; \r B o u n d s P r o d 0021700 A d d F i r s t D e p e n d e n 0021720 c i e s : \t A d d F i r s t D e 0021740 p e n d e n c i e s P r o c T y 0021760 p e ; \r B o u n d s P r o d A d 0022000 d L a s t D e p e n d e n c i e 0022020 s : \t A d d L a s t D e p e n d 0022040 e n c i e s P r o c T y p e ; \r 0022060 B o u n d s P r o d A d d S i z 0022100 e D e p e n d e n c i e s : \t A 0022120 d d S i z e D e p e n d e n c i 0022140 e s P r o c T y p e ; \r E N D . 0022160 . \r 0022162