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