$ od -c -N 50000 [Indigo]<Casaba>7.0>Saffron3.0>Derived>SaffronAG7bDef.Mesa!16 0000000 - - S a f f r o n A G 7 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 : 5 8 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 A 0000400 T D e f ; \r \r S a f f r o n A G 0000420 7 b D e f : C E D A R D E F 0000440 I N I T I O N S = \r B E G I 0000460 N \r O P E N S a f f r o n T r 0000500 e e D e c l s D e f , S a f f 0000520 r o n A T D e f ; \r \r - - I d 0000540 e n t L i s t o n e P r o d \r \r 0000560 I d e n t L i s t o n e P r o d 0000600 D a t a : \t T Y P E = R E F 0000620 I d e n t L i s t o n e P r o 0000640 d D a t a B o d y ; \r I d e n t 0000660 L i s t o n e P r o d D a t a B 0000700 o d y : \t T Y P E = R E C O 0000720 R D [ \r I d e n t : I d e n t 0000740 N o d e ] ; \r \r I d e n t L i s 0000760 t o n e P r o d P r o c s : \t I 0001000 d e n t L i s t N o d e P r o c 0001020 s ; \r \r B u i l d I d e n t L i 0001040 s t o n e P r o d N o d e : \t P 0001060 R O C [ p o s i t i o n : I N 0001100 T , l e n g t h : I N T , 0001120 I d e n t : I d e n t N o d e 0001140 ] \r \t R E T U R N S [ I d e n t 0001160 L i s t N o d e ] ; \r \r I d e n 0001200 t L i s t o n e P r o d A d d N 0001220 a m e s T o F i e l d L i s t : 0001240 \t A d d N a m e s T o F i e l d 0001260 L i s t P r o c T y p e ; \r I d 0001300 e n t L i s t o n e P r o d M a 0001320 k e N a m e S e q u e n c e : \t 0001340 M a k e N a m e S e q u e n c e 0001360 P r o c T y p e ; \r I d e n t L 0001400 i s t o n e P r o d A d d N a m 0001420 e s T o S e q u e n c e : \t A d 0001440 d N a m e s T o S e q u e n c e 0001460 P r o c T y p e ; \r I d e n t L 0001500 i s t o n e P r o d A d d V a l 0001520 u e D e c l a r a t i o n T o F 0001540 i e l d L i s t : \t A d d V a l 0001560 u e D e c l a r a t i o n T o F 0001600 i e l d L i s t P r o c T y p e 0001620 ; \r I d e n t L i s t o n e P r 0001640 o d A d d T y p e D e c l a r a 0001660 t i o n T o F i e l d L i s t : 0001700 \t A d d T y p e D e c l a r a t 0001720 i o n T o F i e l d L i s t P r 0001740 o c T y p e ; \r I d e n t L i s 0001760 t o n e P r o d M a k e C o d e 0002000 T o S t o r e T O S I n V a r i 0002020 o u s L o c a l F r a m e S l o 0002040 t s : \t M a k e C o d e T o S t 0002060 o r e T O S I n V a r i o u s L 0002100 o c a l F r a m e S l o t s P r 0002120 o c T y p e ; \r \r - - I d e n 0002140 t L i s t m a n y P r o d \r \r I 0002160 d e n t L i s t m a n y P r o d 0002200 D a t a : \t T Y P E = R E F 0002220 I d e n t L i s t m a n y P r 0002240 o d D a t a B o d y ; \r I d e n 0002260 t L i s t m a n y P r o d D a t 0002300 a B o d y : \t T Y P E = R E 0002320 C O R D [ \r I d e n t L i s t h 0002340 e a d : I d e n t L i s t N o 0002360 d e , I d e n t L i s t t a i 0002400 l : I d e n t L i s t N o d e 0002420 ] ; \r \r I d e n t L i s t m a n 0002440 y P r o d P r o c s : \t I d e n 0002460 t L i s t N o d e P r o c s ; \r 0002500 \r B u i l d I d e n t L i s t m 0002520 a n y P r o d N o d e : \t P R O 0002540 C [ p o s i t i o n : I N T , 0002560 l e n g t h : I N T , I d 0002600 e n t L i s t h e a d : I d e 0002620 n t L i s t N o d e , I d e n 0002640 t L i s t t a i l : I d e n t 0002660 L i s t N o d e ] \r \t R E T U R 0002700 N S [ I d e n t L i s t N o d e 0002720 ] ; \r \r I d e n t L i s t m a n 0002740 y P r o d A d d N a m e s T o F 0002760 i e l d L i s t : \t A d d N a m 0003000 e s T o F i e l d L i s t P r o 0003020 c T y p e ; \r I d e n t L i s t 0003040 m a n y P r o d M a k e N a m e 0003060 S e q u e n c e : \t M a k e N a 0003100 m e S e q u e n c e P r o c T y 0003120 p e ; \r I d e n t L i s t m a n 0003140 y P r o d A d d N a m e s T o S 0003160 e q u e n c e : \t A d d N a m e 0003200 s T o S e q u e n c e P r o c T 0003220 y p e ; \r I d e n t L i s t m a 0003240 n y P r o d A d d V a l u e D e 0003260 c l a r a t i o n T o F i e l d 0003300 L i s t : \t A d d V a l u e D e 0003320 c l a r a t i o n T o F i e l d 0003340 L i s t P r o c T y p e ; \r I d 0003360 e n t L i s t m a n y P r o d A 0003400 d d T y p e D e c l a r a t i o 0003420 n T o F i e l d L i s t : \t A d 0003440 d T y p e D e c l a r a t i o n 0003460 T o F i e l d L i s t P r o c T 0003500 y p e ; \r I d e n t L i s t m a 0003520 n y P r o d M a k e C o d e T o 0003540 S t o r e T O S I n V a r i o u 0003560 s L o c a l F r a m e S l o t s 0003600 : \t M a k e C o d e T o S t o r 0003620 e T O S I n V a r i o u s L o c 0003640 a l F r a m e S l o t s P r o c 0003660 T y p e ; \r \r - - T a g i d e 0003700 n t P r o d \r \r T a g i d e n t 0003720 P r o d D a t a : \t T Y P E = 0003740 R E F T a g i d e n t P r o 0003760 d D a t a B o d y ; \r T a g i d 0004000 e n t P r o d D a t a B o d y : 0004020 \t T Y P E = R E C O R D [ \r 0004040 I d e n t : I d e n t N o d e 0004060 , A c c e s s : A c c e s s 0004100 N o d e , T a g T y p e : T 0004120 a g T y p e N o d e ] ; \r \r T a 0004140 g i d e n t P r o d P r o c s : 0004160 \t T a g N o d e P r o c s ; \r \r 0004200 B u i l d T a g i d e n t P r o 0004220 d N o d e : \t P R O C [ p o s i 0004240 t i o n : I N T , l e n g t 0004260 h : I N T , I d e n t : I 0004300 d e n t N o d e , A c c e s s 0004320 : A c c e s s N o d e , T a 0004340 g T y p e : T a g T y p e N o 0004360 d e ] \r \t R E T U R N S [ T a g 0004400 N o d e ] ; \r \r T a g i d e n t 0004420 P r o d M a k e V a r i a n t F 0004440 l a v o r : \t M a k e V a r i a 0004460 n t F l a v o r P r o c T y p e 0004500 ; \r T a g i d e n t P r o d M a 0004520 k e T a g T y p e : \t M a k e T 0004540 a g T y p e P r o c T y p e ; \r 0004560 T a g i d e n t P r o d G e t S 0004600 e q u e n c e T a g I n f o : \t 0004620 G e t S e q u e n c e T a g I n 0004640 f o P r o c T y p e ; \r T a g i 0004660 d e n t P r o d A d d S i z e D 0004700 e p e n d e n c i e s : \t A d d 0004720 S i z e D e p e n d e n c i e s 0004740 P r o c T y p e ; \r \r - - T a 0004760 g c o m p u t e d P r o d \r \r T 0005000 a g c o m p u t e d P r o d D a 0005020 t a : \t T Y P E = R E F T 0005040 a g c o m p u t e d P r o d D a 0005060 t a B o d y ; \r T a g c o m p u 0005100 t e d P r o d D a t a B o d y : 0005120 \t T Y P E = R E C O R D [ \r 0005140 T a g T y p e : T a g T y p e 0005160 N o d e ] ; \r \r T a g c o m p u 0005200 t e d P r o d P r o c s : \t T a 0005220 g N o d e P r o c s ; \r \r B u i 0005240 l d T a g c o m p u t e d P r o 0005260 d N o d e : \t P R O C [ p o s i 0005300 t i o n : I N T , l e n g t 0005320 h : I N T , T a g T y p e : 0005340 T a g T y p e N o d e ] \r \t R 0005360 E T U R N S [ T a g N o d e ] ; 0005400 \r \r T a g c o m p u t e d P r o 0005420 d M a k e V a r i a n t F l a v 0005440 o r : \t M a k e V a r i a n t F 0005460 l a v o r P r o c T y p e ; \r T 0005500 a g c o m p u t e d P r o d M a 0005520 k e T a g T y p e : \t M a k e T 0005540 a g T y p e P r o c T y p e ; \r 0005560 T a g c o m p u t e d P r o d G 0005600 e t S e q u e n c e T a g I n f 0005620 o : \t G e t S e q u e n c e T a 0005640 g I n f o P r o c T y p e ; \r T 0005660 a g c o m p u t e d P r o d A d 0005700 d S i z e D e p e n d e n c i e 0005720 s : \t A d d S i z e D e p e n d 0005740 e n c i e s P r o c T y p e ; \r 0005760 \r - - T a g o v e r l a i d P 0006000 r o d \r \r T a g o v e r l a i d 0006020 P r o d D a t a : \t T Y P E = 0006040 R E F T a g o v e r l a i d 0006060 P r o d D a t a B o d y ; \r T a 0006100 g o v e r l a i d P r o d D a t 0006120 a B o d y : \t T Y P E = R E 0006140 C O R D [ \r T a g T y p e : T 0006160 a g T y p e N o d e ] ; \r \r T a 0006200 g o v e r l a i d P r o d P r o 0006220 c s : \t T a g N o d e P r o c s 0006240 ; \r \r B u i l d T a g o v e r l 0006260 a i d P r o d N o d e : \t P R O 0006300 C [ p o s i t i o n : I N T , 0006320 l e n g t h : I N T , T a 0006340 g T y p e : T a g T y p e N o 0006360 d e ] \r \t R E T U R N S [ T a g 0006400 N o d e ] ; \r \r T a g o v e r l 0006420 a i d P r o d M a k e V a r i a 0006440 n t F l a v o r : \t M a k e V a 0006460 r i a n t F l a v o r P r o c T 0006500 y p e ; \r T a g o v e r l a i d 0006520 P r o d M a k e T a g T y p e : 0006540 \t M a k e T a g T y p e P r o c 0006560 T y p e ; \r T a g o v e r l a i 0006600 d P r o d G e t S e q u e n c e 0006620 T a g I n f o : \t G e t S e q u 0006640 e n c e T a g I n f o P r o c T 0006660 y p e ; \r T a g o v e r l a i d 0006700 P r o d A d d S i z e D e p e n 0006720 d e n c i e s : \t A d d S i z e 0006740 D e p e n d e n c i e s P r o c 0006760 T y p e ; \r \r - - T a g T y p 0007000 e s t a r P r o d \r \r T a g T y 0007020 p e s t a r P r o d D a t a : \t 0007040 T Y P E = R E F T a g T y 0007060 p e s t a r P r o d D a t a B o 0007100 d y ; \r T a g T y p e s t a r P 0007120 r o d D a t a B o d y : \t T Y P 0007140 E = R E C O R D [ \r ] ; \r \r 0007160 T a g T y p e s t a r P r o d P 0007200 r o c s : \t T a g T y p e N o d 0007220 e P r o c s ; \r \r B u i l d T a 0007240 g T y p e s t a r P r o d N o d 0007260 e : \t P R O C [ p o s i t i o n 0007300 : I N T , l e n g t h : I 0007320 N T ] \r \t R E T U R N S [ T a g 0007340 T y p e N o d e ] ; \r \r T a g T 0007360 y p e s t a r P r o d M a k e T 0007400 a g T y p e : \t M a k e T a g T 0007420 y p e P r o c T y p e ; \r T a g 0007440 T y p e s t a r P r o d A d d S 0007460 i z e D e p e n d e n c i e s : 0007500 \t A d d S i z e D e p e n d e n 0007520 c i e s P r o c T y p e ; \r \r - 0007540 - T a g T y p e t y p e e x p 0007560 P r o d \r \r T a g T y p e t y p 0007600 e e x p P r o d D a t a : \t T Y 0007620 P E = R E F T a g T y p e 0007640 t y p e e x p P r o d D a t a B 0007660 o d y ; \r T a g T y p e t y p e 0007700 e x p P r o d D a t a B o d y : 0007720 \t T Y P E = R E C O R D [ \r 0007740 T y p e E x p : T y p e E x p 0007760 N o d e ] ; \r \r T a g T y p e t 0010000 y p e e x p P r o d P r o c s : 0010020 \t T a g T y p e N o d e P r o c 0010040 s ; \r \r B u i l d T a g T y p e 0010060 t y p e e x p P r o d N o d e : 0010100 \t P R O C [ p o s i t i o n : 0010120 I N T , l e n g t h : I N T 0010140 , T y p e E x p : T y p e E 0010160 x p N o d e ] \r \t R E T U R N S 0010200 [ T a g T y p e N o d e ] ; \r \r 0010220 T a g T y p e t y p e e x p P r 0010240 o d M a k e T a g T y p e : \t M 0010260 a k e T a g T y p e P r o c T y 0010300 p e ; \r T a g T y p e t y p e e 0010320 x p P r o d A d d S i z e D e p 0010340 e n d e n c i e s : \t A d d S i 0010360 z e D e p e n d e n c i e s P r 0010400 o c T y p e ; \r \r - - V a r i 0010420 a n t L i s t o n e P r o d \r \r 0010440 V a r i a n t L i s t o n e P r 0010460 o d D a t a : \t T Y P E = R 0010500 E F V a r i a n t L i s t o n 0010520 e P r o d D a t a B o d y ; \r V 0010540 a r i a n t L i s t o n e P r o 0010560 d D a t a B o d y : \t T Y P E 0010600 = R E C O R D [ \r V a r i a n 0010620 t I t e m : V a r i a n t I t 0010640 e m N o d e ] ; \r \r V a r i a n 0010660 t L i s t o n e P r o d P r o c 0010700 s : \t V a r i a n t L i s t N o 0010720 d e P r o c s ; \r \r B u i l d V 0010740 a r i a n t L i s t o n e P r o 0010760 d N o d e : \t P R O C [ p o s i 0011000 t i o n : I N T , l e n g t 0011020 h : I N T , V a r i a n t I 0011040 t e m : V a r i a n t I t e m 0011060 N o d e ] \r \t R E T U R N S [ V 0011100 a r i a n t L i s t N o d e ] ; 0011120 \r \r V a r i a n t L i s t o n e 0011140 P r o d M a k e U n i o n L i s 0011160 t : \t M a k e U n i o n L i s t 0011200 P r o c T y p e ; \r V a r i a n 0011220 t L i s t o n e P r o d A d d V 0011240 a r i a n t s T o U n i o n L i 0011260 s t : \t A d d V a r i a n t s T 0011300 o U n i o n L i s t P r o c T y 0011320 p e ; \r V a r i a n t L i s t o 0011340 n e P r o d M a k e S t a r T a 0011360 g T y p e : \t M a k e S t a r T 0011400 a g T y p e P r o c T y p e ; \r 0011420 V a r i a n t L i s t o n e P r 0011440 o d A d d V a r i a n t N a m e 0011460 s T o E n u m T y p e T G N : \t 0011500 A d d V a r i a n t N a m e s T 0011520 o E n u m T y p e T G N P r o c 0011540 T y p e ; \r V a r i a n t L i s 0011560 t o n e P r o d A d d S i z e D 0011600 e p e n d e n c i e s : \t A d d 0011620 S i z e D e p e n d e n c i e s 0011640 P r o c T y p e ; \r \r - - V a 0011660 r i a n t L i s t m o r e P r o 0011700 d \r \r V a r i a n t L i s t m o 0011720 r e P r o d D a t a : \t T Y P E 0011740 = R E F V a r i a n t L i 0011760 s t m o r e P r o d D a t a B o 0012000 d y ; \r V a r i a n t L i s t m 0012020 o r e P r o d D a t a B o d y : 0012040 \t T Y P E = R E C O R D [ \r 0012060 V a r i a n t L i s t : V a r 0012100 i a n t L i s t N o d e , V a 0012120 r i a n t I t e m : V a r i a 0012140 n t I t e m N o d e ] ; \r \r V a 0012160 r i a n t L i s t m o r e P r o 0012200 d P r o c s : \t V a r i a n t L 0012220 i s t N o d e P r o c s ; \r \r B 0012240 u i l d V a r i a n t L i s t m 0012260 o r e P r o d N o d e : \t P R O 0012300 C [ p o s i t i o n : I N T , 0012320 l e n g t h : I N T , V a 0012340 r i a n t L i s t : V a r i a 0012360 n t L i s t N o d e , V a r i 0012400 a n t I t e m : V a r i a n t 0012420 I t e m N o d e ] \r \t R E T U R 0012440 N S [ V a r i a n t L i s t N o 0012460 d e ] ; \r \r V a r i a n t L i s 0012500 t m o r e P r o d M a k e U n i 0012520 o n L i s t : \t M a k e U n i o 0012540 n L i s t P r o c T y p e ; \r V 0012560 a r i a n t L i s t m o r e P r 0012600 o d A d d V a r i a n t s T o U 0012620 n i o n L i s t : \t A d d V a r 0012640 i a n t s T o U n i o n L i s t 0012660 P r o c T y p e ; \r V a r i a n 0012700 t L i s t m o r e P r o d M a k 0012720 e S t a r T a g T y p e : \t M a 0012740 k e S t a r T a g T y p e P r o 0012760 c T y p e ; \r V a r i a n t L i 0013000 s t m o r e P r o d A d d V a r 0013020 i a n t N a m e s T o E n u m T 0013040 y p e T G N : \t A d d V a r i a 0013060 n t N a m e s T o E n u m T y p 0013100 e T G N P r o c T y p e ; \r V a 0013120 r i a n t L i s t m o r e P r o 0013140 d A d d S i z e D e p e n d e n 0013160 c i e s : \t A d d S i z e D e p 0013200 e n d e n c i e s P r o c T y p 0013220 e ; \r \r - - V a r i a n t I t 0013240 e m P r o d \r \r V a r i a n t I 0013260 t e m P r o d D a t a : \t T Y P 0013300 E = R E F V a r i a n t I 0013320 t e m P r o d D a t a B o d y ; 0013340 \r V a r i a n t I t e m P r o d 0013360 D a t a B o d y : \t T Y P E = 0013400 R E C O R D [ \r I d L i s t : 0013420 I d L i s t N o d e , R e c 0013440 L i s t : R e c L i s t N o d 0013460 e ] ; \r \r V a r i a n t I t e m 0013500 P r o d P r o c s : \t V a r i a 0013520 n t I t e m N o d e P r o c s ; 0013540 \r \r B u i l d V a r i a n t I t 0013560 e m P r o d N o d e : \t P R O C 0013600 [ p o s i t i o n : I N T , 0013620 l e n g t h : I N T , I d L 0013640 i s t : I d L i s t N o d e , 0013660 R e c L i s t : R e c L i s 0013700 t N o d e ] \r \t R E T U R N S [ 0013720 V a r i a n t I t e m N o d e ] 0013740 ; \r \r V a r i a n t I t e m P r 0013760 o d A d d V a r i a n t s T o U 0014000 n i o n L i s t : \t A d d V a r 0014020 i a n t s T o U n i o n L i s t 0014040 P r o c T y p e ; \r V a r i a n 0014060 t I t e m P r o d A d d V a r i 0014100 a n t N a m e s T o E n u m T y 0014120 p e T G N : \t A d d V a r i a n 0014140 t N a m e s T o E n u m T y p e 0014160 T G N P r o c T y p e ; \r V a r 0014200 i a n t I t e m P r o d A d d S 0014220 i z e D e p e n d e n c i e s : 0014240 \t A d d S i z e D e p e n d e n 0014260 c i e s P r o c T y p e ; \r \r - 0014300 - P a c k e d y e s P r o d \r 0014320 \r P a c k e d y e s P r o d D a 0014340 t a : \t T Y P E = R E F P 0014360 a c k e d y e s P r o d D a t a 0014400 B o d y ; \r P a c k e d y e s P 0014420 r o d D a t a B o d y : \t T Y P 0014440 E = R E C O R D [ \r ] ; \r \r 0014460 P a c k e d y e s P r o d P r o 0014500 c s : \t P a c k e d N o d e P r 0014520 o c s ; \r \r B u i l d P a c k e 0014540 d y e s P r o d N o d e : \t P R 0014560 O C [ p o s i t i o n : I N T 0014600 , l e n g t h : I N T ] \r \t 0014620 R E T U R N S [ P a c k e d N o 0014640 d e ] ; \r \r P a c k e d y e s P 0014660 r o d I s K e y w o r d P r e s 0014700 e n t : \t I s K e y w o r d P r 0014720 e s e n t P r o c T y p e ; \r \r 0014740 - - P a c k e d n o P r o d \r 0014760 \r P a c k e d n o P r o d D a t 0015000 a : \t T Y P E = R E F P a 0015020 c k e d n o P r o d D a t a B o 0015040 d y ; \r P a c k e d n o P r o d 0015060 D a t a B o d y : \t T Y P E = 0015100 R E C O R D [ \r ] ; \r \r P a c 0015120 k e d n o P r o d P r o c s : \t 0015140 P a c k e d N o d e P r o c s ; 0015160 \r \r B u i l d P a c k e d n o P 0015200 r o d N o d e : \t P R O C [ p o 0015220 s i t i o n : I N T , l e n 0015240 g t h : I N T ] \r \t R E T U R 0015260 N S [ P a c k e d N o d e ] ; \r 0015300 \r P a c k e d n o P r o d I s K 0015320 e y w o r d P r e s e n t : \t I 0015340 s K e y w o r d P r e s e n t P 0015360 r o c T y p e ; \r E N D . . \r 0015377