$ od -c -N 50000 [Indigo]<Casaba>7.0>Saffron3.0>Derived>SaffronAG7aDef.Mesa!15 0000000 - - S a f f r o n A G 7 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 2 : 4 6 : 0 0 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 7 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 - - A c c e s s e m p t y 0000620 P r o d \r \r A c c e s s e m p t 0000640 y P r o d D a t a : \t T Y P E 0000660 = R E F A c c e s s e m p t 0000700 y P r o d D a t a B o d y ; \r A 0000720 c c e s s e m p t y P r o d D a 0000740 t a B o d y : \t T Y P E = R 0000760 E C O R D [ \r ] ; \r \r A c c e s 0001000 s e m p t y P r o d P r o c s : 0001020 \t A c c e s s N o d e P r o c s 0001040 ; \r \r B u i l d A c c e s s e m 0001060 p t y P r o d N o d e : \t P R O 0001100 C [ p o s i t i o n : I N T , 0001120 l e n g t h : I N T ] \r \t R 0001140 E T U R N S [ A c c e s s N o d 0001160 e ] ; \r \r A c c e s s e m p t y 0001200 P r o d G e t A c c e s s V a l 0001220 : \t G e t A c c e s s V a l P r 0001240 o c T y p e ; \r \r - - A c c e 0001260 s s p u b l i c P r o d \r \r A c 0001300 c e s s p u b l i c P r o d D a 0001320 t a : \t T Y P E = R E F A 0001340 c c e s s p u b l i c P r o d D 0001360 a t a B o d y ; \r A c c e s s p 0001400 u b l i c P r o d D a t a B o d 0001420 y : \t T Y P E = R E C O R D 0001440 [ \r ] ; \r \r A c c e s s p u b l 0001460 i c P r o d P r o c s : \t A c c 0001500 e s s N o d e P r o c s ; \r \r B 0001520 u i l d A c c e s s p u b l i c 0001540 P r o d N o d e : \t P R O C [ p 0001560 o s i t i o n : I N T , l e 0001600 n g t h : I N T ] \r \t R E T U 0001620 R N S [ A c c e s s N o d e ] ; 0001640 \r \r A c c e s s p u b l i c P r 0001660 o d G e t A c c e s s V a l : \t 0001700 G e t A c c e s s V a l P r o c 0001720 T y p e ; \r \r - - A c c e s s 0001740 p r i v a t e P r o d \r \r A c c 0001760 e s s p r i v a t e P r o d D a 0002000 t a : \t T Y P E = R E F A 0002020 c c e s s p r i v a t e P r o d 0002040 D a t a B o d y ; \r A c c e s s 0002060 p r i v a t e P r o d D a t a B 0002100 o d y : \t T Y P E = R E C O 0002120 R D [ \r ] ; \r \r A c c e s s p r 0002140 i v a t e P r o d P r o c s : \t 0002160 A c c e s s N o d e P r o c s ; 0002200 \r \r B u i l d A c c e s s p r i 0002220 v a t e P r o d N o d e : \t P R 0002240 O C [ p o s i t i o n : I N T 0002260 , l e n g t h : I N T ] \r \t 0002300 R E T U R N S [ A c c e s s N o 0002320 d e ] ; \r \r A c c e s s p r i v 0002340 a t e P r o d G e t A c c e s s 0002360 V a l : \t G e t A c c e s s V a 0002400 l P r o c T y p e ; \r \r - - D 0002420 e f a u l t e m p t y P r o d \r 0002440 \r D e f a u l t e m p t y P r o 0002460 d D a t a : \t T Y P E = R E 0002500 F D e f a u l t e m p t y P r 0002520 o d D a t a B o d y ; \r D e f a 0002540 u l t e m p t y P r o d D a t a 0002560 B o d y : \t T Y P E = R E C 0002600 O R D [ \r ] ; \r \r D e f a u l t 0002620 e m p t y P r o d P r o c s : \t 0002640 D e f a u l t N o d e P r o c s 0002660 ; \r \r B u i l d D e f a u l t e 0002700 m p t y P r o d N o d e : \t P R 0002720 O C [ p o s i t i o n : I N T 0002740 , l e n g t h : I N T ] \r \t 0002760 R E T U R N S [ D e f a u l t N 0003000 o d e ] ; \r \r D e f a u l t e m 0003020 p t y P r o d G e t D e f a u l 0003040 t E x p V a l : \t G e t D e f a 0003060 u l t E x p V a l P r o c T y p 0003100 e ; \r \r - - D e f a u l t g e 0003120 t s P r o d \r \r D e f a u l t g 0003140 e t s P r o d D a t a : \t T Y P 0003160 E = R E F D e f a u l t g 0003200 e t s P r o d D a t a B o d y ; 0003220 \r D e f a u l t g e t s P r o d 0003240 D a t a B o d y : \t T Y P E = 0003260 R E C O R D [ \r ] ; \r \r D e f 0003300 a u l t g e t s P r o d P r o c 0003320 s : \t D e f a u l t N o d e P r 0003340 o c s ; \r \r B u i l d D e f a u 0003360 l t g e t s P r o d N o d e : \t 0003400 P R O C [ p o s i t i o n : I 0003420 N T , l e n g t h : I N T ] 0003440 \r \t R E T U R N S [ D e f a u l 0003460 t N o d e ] ; \r \r D e f a u l t 0003500 g e t s P r o d G e t D e f a u 0003520 l t E x p V a l : \t G e t D e f 0003540 a u l t E x p V a l P r o c T y 0003560 p e ; \r \r - - D e f a u l t g 0003600 e t s e x p P r o d \r \r D e f a 0003620 u l t g e t s e x p P r o d D a 0003640 t a : \t T Y P E = R E F D 0003660 e f a u l t g e t s e x p P r o 0003700 d D a t a B o d y ; \r D e f a u 0003720 l t g e t s e x p P r o d D a t 0003740 a B o d y : \t T Y P E = R E 0003760 C O R D [ \r E x p : E x p N o 0004000 d e ] ; \r \r D e f a u l t g e t 0004020 s e x p P r o d P r o c s : \t D 0004040 e f a u l t N o d e P r o c s ; 0004060 \r \r B u i l d D e f a u l t g e 0004100 t s e x p P r o d N o d e : \t P 0004120 R O C [ p o s i t i o n : I N 0004140 T , l e n g t h : I N T , 0004160 E x p : E x p N o d e ] \r \t R 0004200 E T U R N S [ D e f a u l t N o 0004220 d e ] ; \r \r D e f a u l t g e t 0004240 s e x p P r o d G e t D e f a u 0004260 l t E x p V a l : \t G e t D e f 0004300 a u l t E x p V a l P r o c T y 0004320 p e ; \r \r - - D e f a u l t g 0004340 e t s t r a s h P r o d \r \r D e 0004360 f a u l t g e t s t r a s h P r 0004400 o d D a t a : \t T Y P E = R 0004420 E F D e f a u l t g e t s t r 0004440 a s h P r o d D a t a B o d y ; 0004460 \r D e f a u l t g e t s t r a s 0004500 h P r o d D a t a B o d y : \t T 0004520 Y P E = R E C O R D [ \r ] ; 0004540 \r \r D e f a u l t g e t s t r a 0004560 s h P r o d P r o c s : \t D e f 0004600 a u l t N o d e P r o c s ; \r \r 0004620 B u i l d D e f a u l t g e t s 0004640 t r a s h P r o d N o d e : \t P 0004660 R O C [ p o s i t i o n : I N 0004700 T , l e n g t h : I N T ] \r 0004720 \t R E T U R N S [ D e f a u l t 0004740 N o d e ] ; \r \r D e f a u l t g 0004760 e t s t r a s h P r o d G e t D 0005000 e f a u l t E x p V a l : \t G e 0005020 t D e f a u l t E x p V a l P r 0005040 o c T y p e ; \r \r - - D e f a 0005060 u l t g e t s e x p o r t r a s 0005100 h P r o d \r \r D e f a u l t g e 0005120 t s e x p o r t r a s h P r o d 0005140 D a t a : \t T Y P E = R E F 0005160 D e f a u l t g e t s e x p o 0005200 r t r a s h P r o d D a t a B o 0005220 d y ; \r D e f a u l t g e t s e 0005240 x p o r t r a s h P r o d D a t 0005260 a B o d y : \t T Y P E = R E 0005300 C O R D [ \r E x p : E x p N o 0005320 d e ] ; \r \r D e f a u l t g e t 0005340 s e x p o r t r a s h P r o d P 0005360 r o c s : \t D e f a u l t N o d 0005400 e P r o c s ; \r \r B u i l d D e 0005420 f a u l t g e t s e x p o r t r 0005440 a s h P r o d N o d e : \t P R O 0005460 C [ p o s i t i o n : I N T , 0005500 l e n g t h : I N T , E x 0005520 p : E x p N o d e ] \r \t R E T 0005540 U R N S [ D e f a u l t N o d e 0005560 ] ; \r \r D e f a u l t g e t s e 0005600 x p o r t r a s h P r o d G e t 0005620 D e f a u l t E x p V a l : \t G 0005640 e t D e f a u l t E x p V a l P 0005660 r o c T y p e ; \r \r - - I d e 0005700 n t i d P r o d \r \r I d e n t i 0005720 d P r o d D a t a : \t T Y P E 0005740 = R E F I d e n t i d P r o 0005760 d D a t a B o d y ; \r I d e n t 0006000 i d P r o d D a t a B o d y : \t 0006020 T Y P E = R E C O R D [ \r I 0006040 d : I d N o d e ] ; \r \r I d e 0006060 n t i d P r o d P r o c s : \t I 0006100 d e n t N o d e P r o c s ; \r \r 0006120 B u i l d I d e n t i d P r o d 0006140 N o d e : \t P R O C [ p o s i t 0006160 i o n : I N T , l e n g t h 0006200 : I N T , I d : I d N o d 0006220 e ] \r \t R E T U R N S [ I d e n 0006240 t N o d e ] ; \r \r I d e n t i d 0006260 P r o d A d d N a m e s T o F i 0006300 e l d L i s t : \t A d d N a m e 0006320 s T o F i e l d L i s t P r o c 0006340 T y p e ; \r I d e n t i d P r o 0006360 d G e t I d e n t I n f o : \t G 0006400 e t I d e n t I n f o P r o c T 0006420 y p e ; \r I d e n t i d P r o d 0006440 A d d N a m e s T o S e q u e n 0006460 c e : \t A d d N a m e s T o S e 0006500 q u e n c e P r o c T y p e ; \r 0006520 I d e n t i d P r o d A d d V a 0006540 l u e D e c l a r a t i o n T o 0006560 F i e l d L i s t : \t A d d V a 0006600 l u e D e c l a r a t i o n T o 0006620 F i e l d L i s t P r o c T y p 0006640 e ; \r I d e n t i d P r o d A d 0006660 d T y p e D e c l a r a t i o n 0006700 T o F i e l d L i s t : \t A d d 0006720 T y p e D e c l a r a t i o n T 0006740 o F i e l d L i s t P r o c T y 0006760 p e ; \r I d e n t i d P r o d M 0007000 a k e C o d e T o S t o r e T O 0007020 S I n V a r i o u s L o c a l F 0007040 r a m e S l o t s : \t M a k e C 0007060 o d e T o S t o r e T O S I n V 0007100 a r i o u s L o c a l F r a m e 0007120 S l o t s P r o c T y p e ; \r \r 0007140 - - I d e n t i d p o s i t i 0007160 o n P r o d \r \r I d e n t i d p 0007200 o s i t i o n P r o d D a t a : 0007220 \t T Y P E = R E F I d e n 0007240 t i d p o s i t i o n P r o d D 0007260 a t a B o d y ; \r I d e n t i d 0007300 p o s i t i o n P r o d D a t a 0007320 B o d y : \t T Y P E = R E C 0007340 O R D [ \r I d : I d N o d e , 0007360 P o s i t i o n : P o s i t 0007400 i o n N o d e ] ; \r \r I d e n t 0007420 i d p o s i t i o n P r o d P r 0007440 o c s : \t I d e n t N o d e P r 0007460 o c s ; \r \r B u i l d I d e n t 0007500 i d p o s i t i o n P r o d N o 0007520 d e : \t P R O C [ p o s i t i o 0007540 n : I N T , l e n g t h : 0007560 I N T , I d : I d N o d e , 0007600 P o s i t i o n : P o s i t 0007620 i o n N o d e ] \r \t R E T U R N 0007640 S [ I d e n t N o d e ] ; \r \r I 0007660 d e n t i d p o s i t i o n P r 0007700 o d A d d N a m e s T o F i e l 0007720 d L i s t : \t A d d N a m e s T 0007740 o F i e l d L i s t P r o c T y 0007760 p e ; \r I d e n t i d p o s i t 0010000 i o n P r o d G e t I d e n t I 0010020 n f o : \t G e t I d e n t I n f 0010040 o P r o c T y p e ; \r I d e n t 0010060 i d p o s i t i o n P r o d A d 0010100 d N a m e s T o S e q u e n c e 0010120 : \t A d d N a m e s T o S e q u 0010140 e n c e P r o c T y p e ; \r I d 0010160 e n t i d p o s i t i o n P r o 0010200 d A d d V a l u e D e c l a r a 0010220 t i o n T o F i e l d L i s t : 0010240 \t A d d V a l u e D e c l a r a 0010260 t i o n T o F i e l d L i s t P 0010300 r o c T y p e ; \r I d e n t i d 0010320 p o s i t i o n P r o d A d d T 0010340 y p e D e c l a r a t i o n T o 0010360 F i e l d L i s t : \t A d d T y 0010400 p e D e c l a r a t i o n T o F 0010420 i e l d L i s t P r o c T y p e 0010440 ; \r I d e n t i d p o s i t i o 0010460 n P r o d M a k e C o d e T o S 0010500 t o r e T O S I n V a r i o u s 0010520 L o c a l F r a m e S l o t s : 0010540 \t M a k e C o d e T o S t o r e 0010560 T O S I n V a r i o u s L o c a 0010600 l F r a m e S l o t s P r o c T 0010620 y p e ; \r \r - - P o s i t i o 0010640 n P r o d \r \r P o s i t i o n P 0010660 r o d D a t a : \t T Y P E = 0010700 R E F P o s i t i o n P r o d 0010720 D a t a B o d y ; \r P o s i t i 0010740 o n P r o d D a t a B o d y : \t 0010760 T Y P E = R E C O R D [ \r E 0011000 x p : E x p N o d e , O p t 0011020 B i t s : O p t B i t s N o d 0011040 e ] ; \r \r P o s i t i o n P r o 0011060 d P r o c s : \t P o s i t i o n 0011100 N o d e P r o c s ; \r \r B u i l 0011120 d P o s i t i o n P r o d N o d 0011140 e : \t P R O C [ p o s i t i o n 0011160 : I N T , l e n g t h : I 0011200 N T , E x p : E x p N o d e 0011220 , O p t B i t s : O p t B i 0011240 t s N o d e ] \r \t R E T U R N S 0011260 [ P o s i t i o n N o d e ] ; \r 0011300 \r P o s i t i o n P r o d G e t 0011320 P o s i t i o n V a l : \t G e t 0011340 P o s i t i o n V a l P r o c T 0011360 y p e ; \r \r - - O p t B i t s 0011400 a b s e n t P r o d \r \r O p t B 0011420 i t s a b s e n t P r o d D a t 0011440 a : \t T Y P E = R E F O p 0011460 t B i t s a b s e n t P r o d D 0011500 a t a B o d y ; \r O p t B i t s 0011520 a b s e n t P r o d D a t a B o 0011540 d y : \t T Y P E = R E C O R 0011560 D [ \r ] ; \r \r O p t B i t s a b 0011600 s e n t P r o d P r o c s : \t O 0011620 p t B i t s N o d e P r o c s ; 0011640 \r \r B u i l d O p t B i t s a b 0011660 s e n t P r o d N o d e : \t P R 0011700 O C [ p o s i t i o n : I N T 0011720 , l e n g t h : I N T ] \r \t 0011740 R E T U R N S [ O p t B i t s N 0011760 o d e ] ; \r \r O p t B i t s a b 0012000 s e n t P r o d G e t B o u n d 0012020 s V a l : \t G e t B o u n d s V 0012040 a l P r o c T y p e ; \r \r - - 0012060 O p t B i t s p r e s e n t P r 0012100 o d \r \r O p t B i t s p r e s e 0012120 n t P r o d D a t a : \t T Y P E 0012140 = R E F O p t B i t s p r 0012160 e s e n t P r o d D a t a B o d 0012200 y ; \r O p t B i t s p r e s e n 0012220 t P r o d D a t a B o d y : \t T 0012240 Y P E = R E C O R D [ \r B o 0012260 u n d s : B o u n d s N o d e 0012300 ] ; \r \r O p t B i t s p r e s e 0012320 n t P r o d P r o c s : \t O p t 0012340 B i t s N o d e P r o c s ; \r \r 0012360 B u i l d O p t B i t s p r e s 0012400 e n t P r o d N o d e : \t P R O 0012420 C [ p o s i t i o n : I N T , 0012440 l e n g t h : I N T , B o 0012460 u n d s : B o u n d s N o d e 0012500 ] \r \t R E T U R N S [ O p t B i 0012520 t s N o d e ] ; \r \r O p t B i t 0012540 s p r e s e n t P r o d G e t B 0012560 o u n d s V a l : \t G e t B o u 0012600 n d s V a l P r o c T y p e ; \r 0012620 E N D . . \r 0012626