$ od -c -N 50000 [Indigo]<Casaba>7.0>Saffron3.0>Derived>SaffronValueCompile2Impl.Mesa!13 0000000 - - S a f f r o n V a l u e C 0000020 o m p i l e 2 I m p l . m e s a 0000040 \r - - C o p y r i g h t 323 0000060 1 9 8 7 b y X e r o x C 0000100 o r p o r a t i o n . A l l 0000120 r i g h t s r e s e r v e d 0000140 . \r - - G e n e r a t e d 0000160 b y R a u e n . p a a t S 0000200 e p t e m b e r 1 , 1 9 8 8 0000220 3 : 1 2 : 4 8 p m P D T \r 0000240 - - u s i n g T h r e e 0000260 C a s a b a F o u r [ 1 . 2 ] 0000300 o f J u n e 1 , 1 9 8 7 0000320 6 : 0 0 : 0 0 p m P D T \r 0000340 \r D I R E C T O R Y \r \t S a f f 0000360 r o n P G D e f , \r \t S a f f r 0000400 o n A G 1 b D e f , \r \t S a f f 0000420 r o n A G 3 D e f , \r \t S a f f 0000440 r o n A G 2 D e f , \r \t R o p e 0000460 , \r \t T h r e e C 4 S u p p o r 0000500 t , \r \t S a f f r o n B a s e D 0000520 e f , \r \t B i g I n t e g e r s 0000540 , \r \t S a f f r o n A T D e f ; 0000560 \r \r S a f f r o n V a l u e C o 0000600 m p i l e 2 I m p l : C E D A 0000620 R P R O G R A M I M P O R T 0000640 S S a f f r o n P G D e f , 0000660 T h r e e C 4 S u p p o r t , 0000700 S a f f r o n B a s e D e f E 0000720 X P O R T S S a f f r o n A G 0000740 1 b D e f , S a f f r o n A G 0000760 3 D e f , S a f f r o n A G 2 0001000 D e f = \r B E G I N \r O P E N 0001020 S a f f r o n P G D e f , S 0001040 a f f r o n A G 1 b D e f , S 0001060 a f f r o n A G 3 D e f , S a 0001100 f f r o n A G 2 D e f , R o p 0001120 e , T h r e e C 4 S u p p o r 0001140 t , S a f f r o n B a s e D e 0001160 f , B i g I n t e g e r s , 0001200 S a f f r o n A T D e f ; \r E x 0001220 p t y p e o p P r o d C o m p i 0001240 l e L V a l u e : \t P U B L I C 0001260 P R O C [ r e f : R E F A 0001300 N Y , c o n t e x t T r e e : 0001320 C o n t e x t T r e e N o d e 0001340 , c s : C o m p i l e r S t 0001360 a t e N o d e ] R E T U R N S 0001400 [ t e m p 0 : P a r a m e t e 0001420 r i z e d F i e l d D e s c r i 0001440 p t o r N o d e , t e m p 1 : 0001460 T y p e G r a p h N o d e N o 0001500 d e ] = \r B E G I N \r t r e e 0001520 : \t E x p N o d e _ N A R R O 0001540 W [ r e f ] ; \r B E G I N \r E N 0001560 A B L E T h r e e C 4 S u p p 0001600 o r t . G e t S o u r c e I n f 0001620 o = > R E S U M E [ t r e e 0001640 . p o s i t i o n , t r e e . 0001660 l e n g t h ] ; \r t r e e D a t 0001700 a : \t E x p t y p e o p P r o d 0001720 D a t a _ N A R R O W [ t r 0001740 e e . d a t a ] ; \r B E G I N \r 0001760 p f d : \t P a r a m e t e r i z 0002000 e d F i e l d D e s c r i p t o 0002020 r N o d e ; \r t g n : \t T y p e 0002040 G r a p h N o d e N o d e ; \r e 0002060 r r : \t B O O L E A N ; \r e r r 0002100 _ E r r o r [ " T y p e O p 0002120 e x p r e s s i o n u s e d 0002140 a s l - v a l u e " ] ; \r t 0002160 g n _ G e t I n t r i n s i 0002200 c B o o l e a n T y p e [ c s ] 0002220 ; \r p f d _ E m p t y P F D 0002240 [ ] ; \r t e m p 1 _ t g n ; 0002260 \r t e m p 0 _ p f d ; \r E N 0002300 D ; \r E N D \r E N D ; \r \r E x p 0002320 t y p e o p P r o d C o m p i l 0002340 e E x p r e s s i o n : \t P U B 0002360 L I C P R O C [ r e f : R E 0002400 F A N Y , c o n t e x t T r 0002420 e e : C o n t e x t T r e e N 0002440 o d e , c s : C o m p i l e 0002460 r S t a t e N o d e , t a r g 0002500 e t T y p e : T y p e G r a p 0002520 h N o d e N o d e ] R E T U R 0002540 N S [ t e m p 0 : V a l u e N 0002560 o d e , t e m p 1 : C o n t 0002600 e x t T r e e N o d e ] = \r B 0002620 E G I N \r t r e e : \t E x p N o 0002640 d e _ N A R R O W [ r e f ] ; 0002660 \r B E G I N \r E N A B L E T h 0002700 r e e C 4 S u p p o r t . G e t 0002720 S o u r c e I n f o = > R E 0002740 S U M E [ t r e e . p o s i t i 0002760 o n , t r e e . l e n g t h ] 0003000 ; \r t r e e D a t a : \t E x p t 0003020 y p e o p P r o d D a t a _ 0003040 N A R R O W [ t r e e . d a t a 0003060 ] ; \r I F t r e e D a t a . T 0003100 y p e O p . p r o c s . T y p e 0003120 O p I s C o d e [ t r e e D a t 0003140 a . T y p e O p ] T H E N { 0003160 B E G I N \r d u m m y : \t V a l 0003200 u e N o d e ; \r c o n t e x t T 0003220 r e e 1 : \t C o n t e x t T r e 0003240 e N o d e ; \r e r r : \t B O O L 0003260 E A N ; \r e r r _ E r r o r 0003300 [ " C o m p i l e E x p r e s s 0003320 i o n n o t i m p l e m e n 0003340 t e d f o r c o d e E x p 0003360 . t y p e o p " ] ; \r c o n t e 0003400 x t T r e e 1 _ F a k e D a 0003420 m a g e C o n t e x t T r e e [ 0003440 c o n t e x t T r e e ] ; \r d u 0003460 m m y _ M a k e D u m m y [ 0003500 " " ] ; \r t e m p 1 _ c o n 0003520 t e x t T r e e 1 ; \r t e m p 0 0003540 _ d u m m y ; \r E N D ; \r } 0003560 E L S E { I F t r e e D a 0003600 t a . T y p e O p . p r o c s . 0003620 T y p e O p I s F i r s t [ t r 0003640 e e D a t a . T y p e O p ] T 0003660 H E N { B E G I N \r c o n t e 0003700 x t T r e e 1 : \t C o n t e x t 0003720 T r e e N o d e ; \r f i r s t : 0003740 \t V a l u e N o d e ; \r f i r s 0003760 t _ t r e e D a t a . T y p 0004000 e E x p . p r o c s . C o m p i 0004020 l e F i r s t O f T y p e E x p 0004040 r e s s i o n [ t r e e D a t a 0004060 . T y p e E x p , c o n t e x 0004100 t T r e e , c s , t a r g e 0004120 t T y p e ] ; \r c o n t e x t T 0004140 r e e 1 _ F a k e D a m a g 0004160 e C o n t e x t T r e e [ c o n 0004200 t e x t T r e e ] ; \r t e m p 1 0004220 _ c o n t e x t T r e e 1 ; 0004240 \r t e m p 0 _ f i r s t ; \r 0004260 E N D ; \r } E L S E { I F 0004300 t r e e D a t a . T y p e O p . 0004320 p r o c s . T y p e O p I s L a 0004340 s t [ t r e e D a t a . T y p e 0004360 O p ] T H E N { B E G I N \r 0004400 c o n t e x t T r e e 1 : \t C o 0004420 n t e x t T r e e N o d e ; \r l 0004440 a s t : \t V a l u e N o d e ; \r 0004460 l a s t _ t r e e D a t a . 0004500 T y p e E x p . p r o c s . C o 0004520 m p i l e L a s t O f T y p e E 0004540 x p r e s s i o n [ t r e e D a 0004560 t a . T y p e E x p , c o n t 0004600 e x t T r e e , c s , t a r 0004620 g e t T y p e ] ; \r c o n t e x 0004640 t T r e e 1 _ F a k e D a m 0004660 a g e C o n t e x t T r e e [ c 0004700 o n t e x t T r e e ] ; \r t e m 0004720 p 1 _ c o n t e x t T r e e 0004740 1 ; \r t e m p 0 _ l a s t ; 0004760 \r E N D ; \r } E L S E { I F 0005000 t r e e D a t a . T y p e O p 0005020 . p r o c s . T y p e O p I s N 0005040 i l [ t r e e D a t a . T y p e 0005060 O p ] T H E N { B E G I N \r 0005100 d u m m y : \t V a l u e N o d e 0005120 ; \r c o n t e x t T r e e 1 : \t 0005140 C o n t e x t T r e e N o d e ; 0005160 \r e r r : \t B O O L E A N ; \r e 0005200 r r _ E r r o r [ " C o m p 0005220 i l e E x p r e s s i o n n o 0005240 t i m p l e m e n t e d f o 0005260 r n i l E x p . t y p e o p 0005300 " ] ; \r c o n t e x t T r e e 1 0005320 _ F a k e D a m a g e C o n 0005340 t e x t T r e e [ c o n t e x t 0005360 T r e e ] ; \r d u m m y _ M 0005400 a k e D u m m y [ " " ] ; \r t e 0005420 m p 1 _ c o n t e x t T r e 0005440 e 1 ; \r t e m p 0 _ d u m m 0005460 y ; \r E N D ; \r } E L S E { 0005500 B E G I N \r d u m m y : \t V a l 0005520 u e N o d e ; \r c o n t e x t T 0005540 r e e 1 : \t C o n t e x t T r e 0005560 e N o d e ; \r e r r : \t B O O L 0005600 E A N ; \r e r r _ E r r o r 0005620 [ " i n C o m p i l e E x p r 0005640 e s s i o n f o r E x p . t 0005660 y p e o p " ] ; \r c o n t e x t 0005700 T r e e 1 _ F a k e D a m a 0005720 g e C o n t e x t T r e e [ c o 0005740 n t e x t T r e e ] ; \r d u m m 0005760 y _ M a k e D u m m y [ " " 0006000 ] ; \r t e m p 1 _ c o n t e 0006020 x t T r e e 1 ; \r t e m p 0 _ 0006040 d u m m y ; \r E N D ; \r } ; \r 0006060 } ; \r } ; \r } ; \r E N D \r E N D 0006100 ; \r \r E x p t y p e o p P r o d 0006120 E v a l u a t e E x p r e s s i 0006140 o n : \t P U B L I C P R O C [ 0006160 r e f : R E F A N Y , l c 0006200 : L o c a l C o n t e x t N o 0006220 d e , f l : F i e l d L i s 0006240 t N o d e , c s : C o m p i 0006260 l e r S t a t e N o d e , t a 0006300 r g e t T y p e : T y p e G r 0006320 a p h N o d e N o d e ] R E T 0006340 U R N S [ t e m p 0 : V a l u 0006360 e N o d e ] = \r B E G I N \r t 0006400 r e e : \t E x p N o d e _ N A 0006420 R R O W [ r e f ] ; \r B E G I N 0006440 \r E N A B L E T h r e e C 4 S 0006460 u p p o r t . G e t S o u r c e 0006500 I n f o = > R E S U M E [ t 0006520 r e e . p o s i t i o n , t r 0006540 e e . l e n g t h ] ; \r t r e e 0006560 D a t a : \t E x p t y p e o p P 0006600 r o d D a t a _ N A R R O W 0006620 [ t r e e . d a t a ] ; \r I F 0006640 t r e e D a t a . T y p e O p . 0006660 p r o c s . T y p e O p I s C o 0006700 d e [ t r e e D a t a . T y p e 0006720 O p ] T H E N { B E G I N \r 0006740 e r r : \t B O O L E A N ; \r e r 0006760 r _ E r r o r [ " E v a l u 0007000 a t e E x p r e s s i o n n o 0007020 t i m p l e m e n t e d f o 0007040 r c o d e E x p . t y p e o 0007060 p " ] ; \r t e m p 0 _ M a k 0007100 e D u m m y [ " " ] ; \r E N D ; 0007120 \r } E L S E { I F t r e e 0007140 D a t a . T y p e O p . p r o c 0007160 s . T y p e O p I s F i r s t [ 0007200 t r e e D a t a . T y p e O p ] 0007220 T H E N { t e m p 0 _ t 0007240 r e e D a t a . T y p e E x p . 0007260 p r o c s . E v a l u a t e F i 0007300 r s t O f T y p e E x p r e s s 0007320 i o n [ t r e e D a t a . T y p 0007340 e E x p , l c , f l , c s 0007360 , t a r g e t T y p e ] ; \r } 0007400 E L S E { I F t r e e D a 0007420 t a . T y p e O p . p r o c s . 0007440 T y p e O p I s L a s t [ t r e 0007460 e D a t a . T y p e O p ] T H 0007500 E N { t e m p 0 _ t r e e 0007520 D a t a . T y p e E x p . p r o 0007540 c s . E v a l u a t e L a s t O 0007560 f T y p e E x p r e s s i o n [ 0007600 t r e e D a t a . T y p e E x p 0007620 , l c , f l , c s , t a 0007640 r g e t T y p e ] ; \r } E L S 0007660 E { I F t r e e D a t a . T 0007700 y p e O p . p r o c s . T y p e 0007720 O p I s N i l [ t r e e D a t a 0007740 . T y p e O p ] T H E N { B 0007760 E G I N \r e r r : \t B O O L E A 0010000 N ; \r e r r _ E r r o r [ " 0010020 E v a l u a t e E x p r e s s i 0010040 o n n o t i m p l e m e n t 0010060 e d f o r n i l E x p . t 0010100 y p e o p " ] ; \r t e m p 0 _ 0010120 M a k e D u m m y [ " " ] ; \r 0010140 E N D ; \r } E L S E { B E G 0010160 I N \r e r r : \t B O O L E A N ; 0010200 \r e r r _ E r r o r [ " i n 0010220 E v a l u a t e E x p r e s s 0010240 i o n f o r E x p . t y p e 0010260 o p " ] ; \r t e m p 0 _ M a 0010300 k e D u m m y [ " " ] ; \r E N D 0010320 ; \r } ; \r } ; \r } ; \r } ; \r E N 0010340 D \r E N D ; \r \r E x p s i z e P 0010360 r o d C o m p i l e L V a l u e 0010400 : \t P U B L I C P R O C [ r e 0010420 f : R E F A N Y , c o n t 0010440 e x t T r e e : C o n t e x t 0010460 T r e e N o d e , c s : C o 0010500 m p i l e r S t a t e N o d e ] 0010520 R E T U R N S [ t e m p 0 : 0010540 P a r a m e t e r i z e d F i e 0010560 l d D e s c r i p t o r N o d e 0010600 , t e m p 1 : T y p e G r a 0010620 p h N o d e N o d e ] = \r B E 0010640 G I N \r t r e e : \t E x p N o d 0010660 e _ N A R R O W [ r e f ] ; \r 0010700 B E G I N \r E N A B L E T h r 0010720 e e C 4 S u p p o r t . G e t S 0010740 o u r c e I n f o = > R E S 0010760 U M E [ t r e e . p o s i t i o 0011000 n , t r e e . l e n g t h ] ; 0011020 \r t r e e D a t a : \t E x p s i 0011040 z e P r o d D a t a _ N A R 0011060 R O W [ t r e e . d a t a ] ; \r 0011100 B E G I N \r p f d : \t P a r a m 0011120 e t e r i z e d F i e l d D e s 0011140 c r i p t o r N o d e ; \r t g n 0011160 : \t T y p e G r a p h N o d e N 0011200 o d e ; \r e r r : \t B O O L E A 0011220 N ; \r e r r _ E r r o r [ " 0011240 S I Z E e x p r e s s i o n 0011260 u s e d a s l - v a l u e " 0011300 ] ; \r t g n _ G e t I n t r 0011320 i n s i c B o o l e a n T y p e 0011340 [ c s ] ; \r p f d _ E m p t 0011360 y P F D [ ] ; \r t e m p 1 _ 0011400 t g n ; \r t e m p 0 _ p f d 0011420 ; \r E N D ; \r E N D \r E N D ; \r 0011440 \r E x p s i z e P r o d C o m p 0011460 i l e E x p r e s s i o n : \t P 0011500 U B L I C P R O C [ r e f : 0011520 R E F A N Y , c o n t e x t 0011540 T r e e : C o n t e x t T r e 0011560 e N o d e , c s : C o m p i 0011600 l e r S t a t e N o d e , t a 0011620 r g e t T y p e : T y p e G r 0011640 a p h N o d e N o d e ] R E T 0011660 U R N S [ t e m p 0 : V a l u 0011700 e N o d e , t e m p 1 : C o 0011720 n t e x t T r e e N o d e ] = 0011740 \r B E G I N \r t r e e : \t E x p 0011760 N o d e _ N A R R O W [ r e f 0012000 ] ; \r B E G I N \r E N A B L E 0012020 T h r e e C 4 S u p p o r t . G 0012040 e t S o u r c e I n f o = > 0012060 R E S U M E [ t r e e . p o s i 0012100 t i o n , t r e e . l e n g t 0012120 h ] ; \r t r e e D a t a : \t E x 0012140 p s i z e P r o d D a t a _ 0012160 N A R R O W [ t r e e . d a t a 0012200 ] ; \r B E G I N \r r e s u l t : 0012220 \t V a l u e N o d e ; \r c o n t 0012240 e x t T r e e 1 : \t C o n t e x 0012260 t T r e e N o d e ; \r c o n t e 0012300 x t T r e e 1 _ F a k e D a 0012320 m a g e C o n t e x t T r e e [ 0012340 c o n t e x t T r e e ] ; \r r e 0012360 s u l t _ M a k e D u m m y 0012400 [ " s i z e " ] ; \r t e m p 1 0012420 _ c o n t e x t T r e e 1 ; \r 0012440 t e m p 0 _ r e s u l t ; \r 0012460 E N D ; \r E N D \r E N D ; \r \r E 0012500 x p s i z e P r o d E v a l u a 0012520 t e E x p r e s s i o n : \t P U 0012540 B L I C P R O C [ r e f : R 0012560 E F A N Y , l c : L o c a 0012600 l C o n t e x t N o d e , f l 0012620 : F i e l d L i s t N o d e , 0012640 c s : C o m p i l e r S t a 0012660 t e N o d e , t a r g e t T y 0012700 p e : T y p e G r a p h N o d 0012720 e N o d e ] R E T U R N S [ t 0012740 e m p 0 : V a l u e N o d e ] 0012760 = \r B E G I N \r t r e e : \t E 0013000 x p N o d e _ N A R R O W [ r 0013020 e f ] ; \r B E G I N \r E N A B L 0013040 E T h r e e C 4 S u p p o r t 0013060 . G e t S o u r c e I n f o = 0013100 > R E S U M E [ t r e e . p o 0013120 s i t i o n , t r e e . l e n 0013140 g t h ] ; \r t r e e D a t a : \t 0013160 E x p s i z e P r o d D a t a 0013200 _ N A R R O W [ t r e e . d a 0013220 t a ] ; \r t e m p 0 _ M a k 0013240 e D u m m y [ " s i z e " ] ; \r 0013260 E N D \r E N D ; \r \r E x p s i z 0013300 e 2 P r o d C o m p i l e L V a 0013320 l u e : \t P U B L I C P R O C 0013340 [ r e f : R E F A N Y , c 0013360 o n t e x t T r e e : C o n t 0013400 e x t T r e e N o d e , c s : 0013420 C o m p i l e r S t a t e N o 0013440 d e ] R E T U R N S [ t e m p 0013460 0 : P a r a m e t e r i z e d 0013500 F i e l d D e s c r i p t o r N 0013520 o d e , t e m p 1 : T y p e 0013540 G r a p h N o d e N o d e ] = 0013560 \r B E G I N \r t r e e : \t E x p 0013600 N o d e _ N A R R O W [ r e f 0013620 ] ; \r B E G I N \r E N A B L E 0013640 T h r e e C 4 S u p p o r t . G 0013660 e t S o u r c e I n f o = > 0013700 R E S U M E [ t r e e . p o s i 0013720 t i o n , t r e e . l e n g t 0013740 h ] ; \r t r e e D a t a : \t E x 0013760 p s i z e 2 P r o d D a t a _ 0014000 N A R R O W [ t r e e . d a t 0014020 a ] ; \r B E G I N \r p f d : \t P 0014040 a r a m e t e r i z e d F i e l 0014060 d D e s c r i p t o r N o d e ; 0014100 \r t g n : \t T y p e G r a p h N 0014120 o d e N o d e ; \r e r r : \t B O 0014140 O L E A N ; \r e r r _ E r r 0014160 o r [ " S I Z E 2 e x p r e s 0014200 s i o n u s e d a s l - v 0014220 a l u e " ] ; \r t g n _ G e 0014240 t I n t r i n s i c B o o l e a 0014260 n T y p e [ c s ] ; \r p f d _ 0014300 E m p t y P F D [ ] ; \r t e m 0014320 p 1 _ t g n ; \r t e m p 0 0014340 _ p f d ; \r E N D ; \r E N D \r 0014360 E N D ; \r \r E x p s i z e 2 P r 0014400 o d C o m p i l e E x p r e s s 0014420 i o n : \t P U B L I C P R O C 0014440 [ r e f : R E F A N Y , c 0014460 o n t e x t T r e e : C o n t 0014500 e x t T r e e N o d e , c s : 0014520 C o m p i l e r S t a t e N o 0014540 d e , t a r g e t T y p e : 0014560 T y p e G r a p h N o d e N o d 0014600 e ] R E T U R N S [ t e m p 0 0014620 : V a l u e N o d e , t e m 0014640 p 1 : C o n t e x t T r e e N 0014660 o d e ] = \r B E G I N \r t r e 0014700 e : \t E x p N o d e _ N A R R 0014720 O W [ r e f ] ; \r B E G I N \r E 0014740 N A B L E T h r e e C 4 S u p 0014760 p o r t . G e t S o u r c e I n 0015000 f o = > R E S U M E [ t r e 0015020 e . p o s i t i o n , t r e e 0015040 . l e n g t h ] ; \r t r e e D a 0015060 t a : \t E x p s i z e 2 P r o d 0015100 D a t a _ N A R R O W [ t r 0015120 e e . d a t a ] ; \r B E G I N \r 0015140 r e s u l t : \t V a l u e N o d 0015160 e ; \r c o n t e x t T r e e 1 : 0015200 \t C o n t e x t T r e e N o d e 0015220 ; \r c o n t e x t T r e e 1 _ 0015240 F a k e D a m a g e C o n t e 0015260 x t T r e e [ c o n t e x t T r 0015300 e e ] ; \r r e s u l t _ M a 0015320 k e D u m m y [ " s i z e 2 " ] 0015340 ; \r t e m p 1 _ c o n t e x 0015360 t T r e e 1 ; \r t e m p 0 _ 0015400 r e s u l t ; \r E N D ; \r E N D 0015420 \r E N D ; \r \r E x p s i z e 2 P 0015440 r o d E v a l u a t e E x p r e 0015460 s s i o n : \t P U B L I C P R 0015500 O C [ r e f : R E F A N Y , 0015520 l c : L o c a l C o n t e x 0015540 t N o d e , f l : F i e l d 0015560 L i s t N o d e , c s : C o 0015600 m p i l e r S t a t e N o d e , 0015620 t a r g e t T y p e : T y p 0015640 e G r a p h N o d e N o d e ] 0015660 R E T U R N S [ t e m p 0 : V 0015700 a l u e N o d e ] = \r B E G I 0015720 N \r t r e e : \t E x p N o d e _ 0015740 N A R R O W [ r e f ] ; \r B E 0015760 G I N \r E N A B L E T h r e e 0016000 C 4 S u p p o r t . G e t S o u 0016020 r c e I n f o = > R E S U M 0016040 E [ t r e e . p o s i t i o n , 0016060 t r e e . l e n g t h ] ; \r t 0016100 r e e D a t a : \t E x p s i z e 0016120 2 P r o d D a t a _ N A R R 0016140 O W [ t r e e . d a t a ] ; \r t 0016160 e m p 0 _ M a k e D u m m y 0016200 [ " s i z e 2 " ] ; \r E N D \r E 0016220 N D ; \r \r E x p b i t s P r o d 0016240 C o m p i l e L V a l u e : \t P 0016260 U B L I C P R O C [ r e f : 0016300 R E F A N Y , c o n t e x t 0016320 T r e e : C o n t e x t T r e 0016340 e N o d e , c s : C o m p i 0016360 l e r S t a t e N o d e ] R E 0016400 T U R N S [ t e m p 0 : P a r 0016420 a m e t e r i z e d F i e l d D 0016440 e s c r i p t o r N o d e , t 0016460 e m p 1 : T y p e G r a p h N 0016500 o d e N o d e ] = \r B E G I N 0016520 \r t r e e : \t E x p N o d e _ 0016540 N A R R O W [ r e f ] ; \r B E G 0016560 I N \r E N A B L E T h r e e C 0016600 4 S u p p o r t . G e t S o u r 0016620 c e I n f o = > R E S U M E 0016640 [ t r e e . p o s i t i o n , 0016660 t r e e . l e n g t h ] ; \r t r 0016700 e e D a t a : \t E x p b i t s P 0016720 r o d D a t a _ N A R R O W 0016740 [ t r e e . d a t a ] ; \r B E G 0016760 I N \r p f d : \t P a r a m e t e 0017000 r i z e d F i e l d D e s c r i 0017020 p t o r N o d e ; \r t g n : \t T 0017040 y p e G r a p h N o d e N o d e 0017060 ; \r e r r : \t B O O L E A N ; \r 0017100 e r r _ E r r o r [ " B I T 0017120 S e x p r e s s i o n u s e 0017140 d a s l - v a l u e " ] ; \r 0017160 t g n _ G e t I n t r i n s 0017200 i c B o o l e a n T y p e [ c s 0017220 ] ; \r p f d _ E m p t y P F 0017240 D [ ] ; \r t e m p 1 _ t g n 0017260 ; \r t e m p 0 _ p f d ; \r E 0017300 N D ; \r E N D \r E N D ; \r \r E x 0017320 p b i t s P r o d C o m p i l e 0017340 E x p r e s s i o n : \t P U B L 0017360 I C P R O C [ r e f : R E F 0017400 A N Y , c o n t e x t T r e 0017420 e : C o n t e x t T r e e N o 0017440 d e , c s : C o m p i l e r 0017460 S t a t e N o d e , t a r g e 0017500 t T y p e : T y p e G r a p h 0017520 N o d e N o d e ] R E T U R N 0017540 S [ t e m p 0 : V a l u e N o 0017560 d e , t e m p 1 : C o n t e 0017600 x t T r e e N o d e ] = \r B E 0017620 G I N \r t r e e : \t E x p N o d 0017640 e _ N A R R O W [ r e f ] ; \r 0017660 B E G I N \r E N A B L E T h r 0017700 e e C 4 S u p p o r t . G e t S 0017720 o u r c e I n f o = > R E S 0017740 U M E [ t r e e . p o s i t i o 0017760 n , t r e e . l e n g t h ] ; 0020000 \r t r e e D a t a : \t E x p b i 0020020 t s P r o d D a t a _ N A R 0020040 R O W [ t r e e . d a t a ] ; \r 0020060 B E G I N \r r e s u l t : \t V a 0020100 l u e N o d e ; \r c o n t e x t 0020120 T r e e 1 : \t C o n t e x t T r 0020140 e e N o d e ; \r c o n t e x t T 0020160 r e e 1 _ F a k e D a m a g 0020200 e C o n t e x t T r e e [ c o n 0020220 t e x t T r e e ] ; \r r e s u l 0020240 t _ M a k e D u m m y [ " b 0020260 i t s " ] ; \r t e m p 1 _ c 0020300 o n t e x t T r e e 1 ; \r t e m 0020320 p 0 _ r e s u l t ; \r E N D 0020340 ; \r E N D \r E N D ; \r \r E x p b 0020360 i t s P r o d E v a l u a t e E 0020400 x p r e s s i o n : \t P U B L I 0020420 C P R O C [ r e f : R E F 0020440 A N Y , l c : L o c a l C o 0020460 n t e x t N o d e , f l : F 0020500 i e l d L i s t N o d e , c s 0020520 : C o m p i l e r S t a t e N 0020540 o d e , t a r g e t T y p e : 0020560 T y p e G r a p h N o d e N o 0020600 d e ] R E T U R N S [ t e m p 0020620 0 : V a l u e N o d e ] = \r 0020640 B E G I N \r t r e e : \t E x p N 0020660 o d e _ N A R R O W [ r e f ] 0020700 ; \r B E G I N \r E N A B L E T 0020720 h r e e C 4 S u p p o r t . G e 0020740 t S o u r c e I n f o = > R 0020760 E S U M E [ t r e e . p o s i t 0021000 i o n , t r e e . l e n g t h 0021020 ] ; \r t r e e D a t a : \t E x p 0021040 b i t s P r o d D a t a _ N 0021060 A R R O W [ t r e e . d a t a ] 0021100 ; \r t e m p 0 _ M a k e D u 0021120 m m y [ " b i t s " ] ; \r E N D 0021140 \r E N D ; \r \r E x p b i t s 2 P 0021160 r o d C o m p i l e L V a l u e 0021200 : \t P U B L I C P R O C [ r e 0021220 f : R E F A N Y , c o n t 0021240 e x t T r e e : C o n t e x t 0021260 T r e e N o d e , c s : C o 0021300 m p i l e r S t a t e N o d e ] 0021320 R E T U R N S [ t e m p 0 : 0021340 P a r a m e t e r i z e d F i e 0021360 l d D e s c r i p t o r N o d e 0021400 , t e m p 1 : T y p e G r a 0021420 p h N o d e N o d e ] = \r B E 0021440 G I N \r t r e e : \t E x p N o d 0021460 e _ N A R R O W [ r e f ] ; \r 0021500 B E G I N \r E N A B L E T h r 0021520 e e C 4 S u p p o r t . G e t S 0021540 o u r c e I n f o = > R E S 0021560 U M E [ t r e e . p o s i t i o 0021600 n , t r e e . l e n g t h ] ; 0021620 \r t r e e D a t a : \t E x p b i 0021640 t s 2 P r o d D a t a _ N A 0021660 R R O W [ t r e e . d a t a ] ; 0021700 \r B E G I N \r p f d : \t P a r a 0021720 m e t e r i z e d F i e l d D e 0021740 s c r i p t o r N o d e ; \r t g 0021760 n : \t T y p e G r a p h N o d e 0022000 N o d e ; \r e r r : \t B O O L E 0022020 A N ; \r e r r _ E r r o r [ 0022040 " B I T S 2 e x p r e s s i o 0022060 n u s e d a s l - v a l u 0022100 e " ] ; \r t g n _ G e t I n 0022120 t r i n s i c B o o l e a n T y 0022140 p e [ c s ] ; \r p f d _ E m 0022160 p t y P F D [ ] ; \r t e m p 1 0022200 _ t g n ; \r t e m p 0 _ p 0022220 f d ; \r E N D ; \r E N D \r E N D 0022240 ; \r \r E x p b i t s 2 P r o d C 0022260 o m p i l e E x p r e s s i o n 0022300 : \t P U B L I C P R O C [ r e 0022320 f : R E F A N Y , c o n t 0022340 e x t T r e e : C o n t e x t 0022360 T r e e N o d e , c s : C o 0022400 m p i l e r S t a t e N o d e , 0022420 t a r g e t T y p e : T y p 0022440 e G r a p h N o d e N o d e ] 0022460 R E T U R N S [ t e m p 0 : V 0022500 a l u e N o d e , t e m p 1 : 0022520 C o n t e x t T r e e N o d e 0022540 ] = \r B E G I N \r t r e e : \t 0022560 E x p N o d e _ N A R R O W [ 0022600 r e f ] ; \r B E G I N \r E N A B 0022620 L E T h r e e C 4 S u p p o r 0022640 t . G e t S o u r c e I n f o 0022660 = > R E S U M E [ t r e e . p 0022700 o s i t i o n , t r e e . l e 0022720 n g t h ] ; \r t r e e D a t a : 0022740 \t E x p b i t s 2 P r o d D a t 0022760 a _ N A R R O W [ t r e e . 0023000 d a t a ] ; \r B E G I N \r r e s 0023020 u l t : \t V a l u e N o d e ; \r 0023040 c o n t e x t T r e e 1 : \t C o 0023060 n t e x t T r e e N o d e ; \r c 0023100 o n t e x t T r e e 1 _ F a 0023120 k e D a m a g e C o n t e x t T 0023140 r e e [ c o n t e x t T r e e ] 0023160 ; \r r e s u l t _ M a k e D 0023200 u m m y [ " b i t s 2 " ] ; \r t 0023220 e m p 1 _ c o n t e x t T r 0023240 e e 1 ; \r t e m p 0 _ r e s 0023260 u l t ; \r E N D ; \r E N D \r E N 0023300 D ; \r \r E x p b i t s 2 P r o d 0023320 E v a l u a t e E x p r e s s i 0023340 o n : \t P U B L I C P R O C [ 0023360 r e f : R E F A N Y , l c 0023400 : L o c a l C o n t e x t N o 0023420 d e , f l : F i e l d L i s 0023440 t N o d e , c s : C o m p i 0023460 l e r S t a t e N o d e , t a 0023500 r g e t T y p e : T y p e G r 0023520 a p h N o d e N o d e ] R E T 0023540 U R N S [ t e m p 0 : V a l u 0023560 e N o d e ] = \r B E G I N \r t 0023600 r e e : \t E x p N o d e _ N A 0023620 R R O W [ r e f ] ; \r B E G I N 0023640 \r E N A B L E T h r e e C 4 S 0023660 u p p o r t . G e t S o u r c e 0023700 I n f o = > R E S U M E [ t 0023720 r e e . p o s i t i o n , t r 0023740 e e . l e n g t h ] ; \r t r e e 0023760 D a t a : \t E x p b i t s 2 P r 0024000 o d D a t a _ N A R R O W [ 0024020 t r e e . d a t a ] ; \r t e m p 0024040 0 _ M a k e D u m m y [ " b 0024060 i t s 2 " ] ; \r E N D \r E N D ; 0024100 \r \r E x p b y t e s P r o d C o 0024120 m p i l e L V a l u e : \t P U B 0024140 L I C P R O C [ r e f : R E 0024160 F A N Y , c o n t e x t T r 0024200 e e : C o n t e x t T r e e N 0024220 o d e , c s : C o m p i l e 0024240 r S t a t e N o d e ] R E T U 0024260 R N S [ t e m p 0 : P a r a m 0024300 e t e r i z e d F i e l d D e s 0024320 c r i p t o r N o d e , t e m 0024340 p 1 : T y p e G r a p h N o d 0024360 e N o d e ] = \r B E G I N \r t 0024400 r e e : \t E x p N o d e _ N A 0024420 R R O W [ r e f ] ; \r B E G I N 0024440 \r E N A B L E T h r e e C 4 S 0024460 u p p o r t . G e t S o u r c e 0024500 I n f o = > R E S U M E [ t 0024520 r e e . p o s i t i o n , t r 0024540 e e . l e n g t h ] ; \r t r e e 0024560 D a t a : \t E x p b y t e s P r 0024600 o d D a t a _ N A R R O W [ 0024620 t r e e . d a t a ] ; \r B E G I 0024640 N \r p f d : \t P a r a m e t e r 0024660 i z e d F i e l d D e s c r i p 0024700 t o r N o d e ; \r t g n : \t T y 0024720 p e G r a p h N o d e N o d e ; 0024740 \r e r r : \t B O O L E A N ; \r e 0024760 r r _ E r r o r [ " B Y T E 0025000 S e x p r e s s i o n u s e 0025020 d a s l - v a l u e " ] ; \r 0025040 t g n _ G e t I n t r i n s 0025060 i c B o o l e a n T y p e [ c s 0025100 ] ; \r p f d _ E m p t y P F 0025120 D [ ] ; \r t e m p 1 _ t g n 0025140 ; \r t e m p 0 _ p f d ; \r E 0025160 N D ; \r E N D \r E N D ; \r \r E x 0025200 p b y t e s P r o d C o m p i l 0025220 e E x p r e s s i o n : \t P U B 0025240 L I C P R O C [ r e f : R E 0025260 F A N Y , c o n t e x t T r 0025300 e e : C o n t e x t T r e e N 0025320 o d e , c s : C o m p i l e 0025340 r S t a t e N o d e , t a r g 0025360 e t T y p e : T y p e G r a p 0025400 h N o d e N o d e ] R E T U R 0025420 N S [ t e m p 0 : V a l u e N 0025440 o d e , t e m p 1 : C o n t 0025460 e x t T r e e N o d e ] = \r B 0025500 E G I N \r t r e e : \t E x p N o 0025520 d e _ N A R R O W [ r e f ] ; 0025540 \r B E G I N \r E N A B L E T h 0025560 r e e C 4 S u p p o r t . G e t 0025600 S o u r c e I n f o = > R E 0025620 S U M E [ t r e e . p o s i t i 0025640 o n , t r e e . l e n g t h ] 0025660 ; \r t r e e D a t a : \t E x p b 0025700 y t e s P r o d D a t a _ N 0025720 A R R O W [ t r e e . d a t a ] 0025740 ; \r B E G I N \r r e s u l t : \t 0025760 V a l u e N o d e ; \r c o n t e 0026000 x t T r e e 1 : \t C o n t e x t 0026020 T r e e N o d e ; \r c o n t e x 0026040 t T r e e 1 _ F a k e D a m 0026060 a g e C o n t e x t T r e e [ c 0026100 o n t e x t T r e e ] ; \r r e s 0026120 u l t _ M a k e D u m m y [ 0026140 " b y t e s " ] ; \r t e m p 1 0026160 _ c o n t e x t T r e e 1 ; \r 0026200 t e m p 0 _ r e s u l t ; \r 0026220 E N D ; \r E N D \r E N D ; \r \r E 0026240 x p b y t e s P r o d E v a l u 0026260 a t e E x p r e s s i o n : \t P 0026300 U B L I C P R O C [ r e f : 0026320 R E F A N Y , l c : L o c 0026340 a l C o n t e x t N o d e , f 0026360 l : F i e l d L i s t N o d e 0026400 , c s : C o m p i l e r S t 0026420 a t e N o d e , t a r g e t T 0026440 y p e : T y p e G r a p h N o 0026460 d e N o d e ] R E T U R N S [ 0026500 t e m p 0 : V a l u e N o d e 0026520 ] = \r B E G I N \r t r e e : \t 0026540 E x p N o d e _ N A R R O W [ 0026560 r e f ] ; \r B E G I N \r E N A B 0026600 L E T h r e e C 4 S u p p o r 0026620 t . G e t S o u r c e I n f o 0026640 = > R E S U M E [ t r e e . p 0026660 o s i t i o n , t r e e . l e 0026700 n g t h ] ; \r t r e e D a t a : 0026720 \t E x p b y t e s P r o d D a t 0026740 a _ N A R R O W [ t r e e . 0026760 d a t a ] ; \r t e m p 0 _ M 0027000 a k e D u m m y [ " b y t e s " 0027020 ] ; \r E N D \r E N D ; \r \r E x p 0027040 b y t e s 2 P r o d C o m p i l 0027060 e L V a l u e : \t P U B L I C 0027100 P R O C [ r e f : R E F A N 0027120 Y , c o n t e x t T r e e : 0027140 C o n t e x t T r e e N o d e , 0027160 c s : C o m p i l e r S t a 0027200 t e N o d e ] R E T U R N S [ 0027220 t e m p 0 : P a r a m e t e r 0027240 i z e d F i e l d D e s c r i p 0027260 t o r N o d e , t e m p 1 : 0027300 T y p e G r a p h N o d e N o d 0027320 e ] = \r B E G I N \r t r e e : 0027340 \t E x p N o d e _ N A R R O W 0027360 [ r e f ] ; \r B E G I N \r E N A 0027400 B L E T h r e e C 4 S u p p o 0027420 r t . G e t S o u r c e I n f o 0027440 = > R E S U M E [ t r e e . 0027460 p o s i t i o n , t r e e . l 0027500 e n g t h ] ; \r t r e e D a t a 0027520 : \t E x p b y t e s 2 P r o d D 0027540 a t a _ N A R R O W [ t r e 0027560 e . d a t a ] ; \r B E G I N \r p 0027600 f d : \t P a r a m e t e r i z e 0027620 d F i e l d D e s c r i p t o r 0027640 N o d e ; \r t g n : \t T y p e G 0027660 r a p h N o d e N o d e ; \r e r 0027700 r : \t B O O L E A N ; \r e r r 0027720 _ E r r o r [ " B Y T E S 2 0027740 e x p r e s s i o n u s e d 0027760 a s l - v a l u e " ] ; \r t g 0030000 n _ G e t I n t r i n s i c 0030020 B o o l e a n T y p e [ c s ] ; 0030040 \r p f d _ E m p t y P F D [ 0030060 ] ; \r t e m p 1 _ t g n ; \r 0030100 t e m p 0 _ p f d ; \r E N D 0030120 ; \r E N D \r E N D ; \r \r E x p b 0030140 y t e s 2 P r o d C o m p i l e 0030160 E x p r e s s i o n : \t P U B L 0030200 I C P R O C [ r e f : R E F 0030220 A N Y , c o n t e x t T r e 0030240 e : C o n t e x t T r e e N o 0030260 d e , c s : C o m p i l e r 0030300 S t a t e N o d e , t a r g e 0030320 t T y p e : T y p e G r a p h 0030340 N o d e N o d e ] R E T U R N 0030360 S [ t e m p 0 : V a l u e N o 0030400 d e , t e m p 1 : C o n t e 0030420 x t T r e e N o d e ] = \r B E 0030440 G I N \r t r e e : \t E x p N o d 0030460 e _ N A R R O W [ r e f ] ; \r 0030500 B E G I N \r E N A B L E T h r 0030520 e e C 4 S u p p o r t . G e t S 0030540 o u r c e I n f o = > R E S 0030560 U M E [ t r e e . p o s i t i o 0030600 n , t r e e . l e n g t h ] ; 0030620 \r t r e e D a t a : \t E x p b y 0030640 t e s 2 P r o d D a t a _ N 0030660 A R R O W [ t r e e . d a t a ] 0030700 ; \r B E G I N \r r e s u l t : \t 0030720 V a l u e N o d e ; \r c o n t e 0030740 x t T r e e 1 : \t C o n t e x t 0030760 T r e e N o d e ; \r c o n t e x 0031000 t T r e e 1 _ F a k e D a m 0031020 a g e C o n t e x t T r e e [ c 0031040 o n t e x t T r e e ] ; \r r e s 0031060 u l t _ M a k e D u m m y [ 0031100 " b y t e s 2 " ] ; \r t e m p 1 0031120 _ c o n t e x t T r e e 1 ; 0031140 \r t e m p 0 _ r e s u l t ; 0031160 \r E N D ; \r E N D \r E N D ; \r \r 0031200 E x p b y t e s 2 P r o d E v a 0031220 l u a t e E x p r e s s i o n : 0031240 \t P U B L I C P R O C [ r e f 0031260 : R E F A N Y , l c : L 0031300 o c a l C o n t e x t N o d e , 0031320 f l : F i e l d L i s t N o 0031340 d e , c s : C o m p i l e r 0031360 S t a t e N o d e , t a r g e 0031400 t T y p e : T y p e G r a p h 0031420 N o d e N o d e ] R E T U R N 0031440 S [ t e m p 0 : V a l u e N o 0031460 d e ] = \r B E G I N \r t r e e 0031500 : \t E x p N o d e _ N A R R O 0031520 W [ r e f ] ; \r B E G I N \r E N 0031540 A B L E T h r e e C 4 S u p p 0031560 o r t . G e t S o u r c e I n f 0031600 o = > R E S U M E [ t r e e 0031620 . p o s i t i o n , t r e e . 0031640 l e n g t h ] ; \r t r e e D a t 0031660 a : \t E x p b y t e s 2 P r o d 0031700 D a t a _ N A R R O W [ t r 0031720 e e . d a t a ] ; \r t e m p 0 0031740 _ M a k e D u m m y [ " b y t 0031760 e s 2 " ] ; \r E N D \r E N D ; \r 0032000 \r E x p u n i t s P r o d C o m 0032020 p i l e L V a l u e : \t P U B L 0032040 I C P R O C [ r e f : R E F 0032060 A N Y , c o n t e x t T r e 0032100 e : C o n t e x t T r e e N o 0032120 d e , c s : C o m p i l e r 0032140 S t a t e N o d e ] R E T U R 0032160 N S [ t e m p 0 : P a r a m e 0032200 t e r i z e d F i e l d D e s c 0032220 r i p t o r N o d e , t e m p 0032240 1 : T y p e G r a p h N o d e 0032260 N o d e ] = \r B E G I N \r t r 0032300 e e : \t E x p N o d e _ N A R 0032320 R O W [ r e f ] ; \r B E G I N \r 0032340 E N A B L E T h r e e C 4 S u 0032360 p p o r t . G e t S o u r c e I 0032400 n f o = > R E S U M E [ t r 0032420 e e . p o s i t i o n , t r e 0032440 e . l e n g t h ] ; \r t r e e D 0032460 a t a : \t E x p u n i t s P r o 0032500 d D a t a _ N A R R O W [ t 0032520 r e e . d a t a ] ; \r B E G I N 0032540 \r p f d : \t P a r a m e t e r i 0032560 z e d F i e l d D e s c r i p t 0032600 o r N o d e ; \r t g n : \t T y p 0032620 e G r a p h N o d e N o d e ; \r 0032640 e r r : \t B O O L E A N ; \r e r 0032660 r _ E r r o r [ " U N I T S 0032700 e x p r e s s i o n u s e d 0032720 a s l - v a l u e " ] ; \r t 0032740 g n _ G e t I n t r i n s i 0032760 c B o o l e a n T y p e [ c s ] 0033000 ; \r p f d _ E m p t y P F D 0033020 [ ] ; \r t e m p 1 _ t g n ; 0033040 \r t e m p 0 _ p f d ; \r E N 0033060 D ; \r E N D \r E N D ; \r \r E x p 0033100 u n i t s P r o d C o m p i l e 0033120 E x p r e s s i o n : \t P U B L 0033140 I C P R O C [ r e f : R E F 0033160 A N Y , c o n t e x t T r e 0033200 e : C o n t e x t T r e e N o 0033220 d e , c s : C o m p i l e r 0033240 S t a t e N o d e , t a r g e 0033260 t T y p e : T y p e G r a p h 0033300 N o d e N o d e ] R E T U R N 0033320 S [ t e m p 0 : V a l u e N o 0033340 d e , t e m p 1 : C o n t e 0033360 x t T r e e N o d e ] = \r B E 0033400 G I N \r t r e e : \t E x p N o d 0033420 e _ N A R R O W [ r e f ] ; \r 0033440 B E G I N \r E N A B L E T h r 0033460 e e C 4 S u p p o r t . G e t S 0033500 o u r c e I n f o = > R E S 0033520 U M E [ t r e e . p o s i t i o 0033540 n , t r e e . l e n g t h ] ; 0033560 \r t r e e D a t a : \t E x p u n 0033600 i t s P r o d D a t a _ N A 0033620 R R O W [ t r e e . d a t a ] ; 0033640 \r B E G I N \r r e s u l t : \t V 0033660 a l u e N o d e ; \r c o n t e x 0033700 t T r e e 1 : \t C o n t e x t T 0033720 r e e N o d e ; \r c o n t e x t 0033740 T r e e 1 _ F a k e D a m a 0033760 g e C o n t e x t T r e e [ c o 0034000 n t e x t T r e e ] ; \r r e s u 0034020 l t _ M a k e D u m m y [ " 0034040 u n i t s " ] ; \r t e m p 1 _ 0034060 c o n t e x t T r e e 1 ; \r t 0034100 e m p 0 _ r e s u l t ; \r E 0034120 N D ; \r E N D \r E N D ; \r \r E x 0034140 p u n i t s P r o d E v a l u a 0034160 t e E x p r e s s i o n : \t P U 0034200 B L I C P R O C [ r e f : R 0034220 E F A N Y , l c : L o c a 0034240 l C o n t e x t N o d e , f l 0034260 : F i e l d L i s t N o d e , 0034300 c s : C o m p i l e r S t a 0034320 t e N o d e , t a r g e t T y 0034340 p e : T y p e G r a p h N o d 0034360 e N o d e ] R E T U R N S [ t 0034400 e m p 0 : V a l u e N o d e ] 0034420 = \r B E G I N \r t r e e : \t E 0034440 x p N o d e _ N A R R O W [ r 0034460 e f ] ; \r B E G I N \r E N A B L 0034500 E T h r e e C 4 S u p p o r t 0034520 . G e t S o u r c e I n f o = 0034540 > R E S U M E [ t r e e . p o 0034560 s i t i o n , t r e e . l e n 0034600 g t h ] ; \r t r e e D a t a : \t 0034620 E x p u n i t s P r o d D a t a 0034640 _ N A R R O W [ t r e e . d 0034660 a t a ] ; \r t e m p 0 _ M a 0034700 k e D u m m y [ " u n i t s " ] 0034720 ; \r E N D \r E N D ; \r \r E x p u 0034740 n i t s 2 P r o d C o m p i l e 0034760 L V a l u e : \t P U B L I C P 0035000 R O C [ r e f : R E F A N Y 0035020 , c o n t e x t T r e e : C 0035040 o n t e x t T r e e N o d e , 0035060 c s : C o m p i l e r S t a t 0035100 e N o d e ] R E T U R N S [ t 0035120 e m p 0 : P a r a m e t e r i 0035140 z e d F i e l d D e s c r i p t 0035160 o r N o d e , t e m p 1 : T 0035200 y p e G r a p h N o d e N o d e 0035220 ] = \r B E G I N \r t r e e : \t 0035240 E x p N o d e _ N A R R O W [ 0035260 r e f ] ; \r B E G I N \r E N A B 0035300 L E T h r e e C 4 S u p p o r 0035320 t . G e t S o u r c e I n f o 0035340 = > R E S U M E [ t r e e . p 0035360 o s i t i o n , t r e e . l e 0035400 n g t h ] ; \r t r e e D a t a : 0035420 \t E x p u n i t s 2 P r o d D a 0035440 t a _ N A R R O W [ t r e e 0035460 . d a t a ] ; \r B E G I N \r p f 0035500 d : \t P a r a m e t e r i z e d 0035520 F i e l d D e s c r i p t o r N 0035540 o d e ; \r t g n : \t T y p e G r 0035560 a p h N o d e N o d e ; \r e r r 0035600 : \t B O O L E A N ; \r e r r _ 0035620 E r r o r [ " U N I T S 2 e 0035640 x p r e s s i o n u s e d a 0035660 s l - v a l u e " ] ; \r t g n 0035700 _ G e t I n t r i n s i c B 0035720 o o l e a n T y p e [ c s ] ; \r 0035740 p f d _ E m p t y P F D [ ] 0035760 ; \r t e m p 1 _ t g n ; \r t 0036000 e m p 0 _ p f d ; \r E N D ; 0036020 \r E N D \r E N D ; \r \r E x p u n 0036040 i t s 2 P r o d C o m p i l e E 0036060 x p r e s s i o n : \t P U B L I 0036100 C P R O C [ r e f : R E F 0036120 A N Y , c o n t e x t T r e e 0036140 : C o n t e x t T r e e N o d 0036160 e , c s : C o m p i l e r S 0036200 t a t e N o d e , t a r g e t 0036220 T y p e : T y p e G r a p h N 0036240 o d e N o d e ] R E T U R N S 0036260 [ t e m p 0 : V a l u e N o d 0036300 e , t e m p 1 : C o n t e x 0036320 t T r e e N o d e ] = \r B E G 0036340 I N \r t r e e : \t E x p N o d e 0036360 _ N A R R O W [ r e f ] ; \r B 0036400 E G I N \r E N A B L E T h r e 0036420 e C 4 S u p p o r t . G e t S o 0036440 u r c e I n f o = > R E S U 0036460 M E [ t r e e . p o s i t i o n 0036500 , t r e e . l e n g t h ] ; \r 0036520 t r e e D a t a : \t E x p u n i 0036540 t s 2 P r o d D a t a _ N A 0036560 R R O W [ t r e e . d a t a ] ; 0036600 \r B E G I N \r r e s u l t : \t V 0036620 a l u e N o d e ; \r c o n t e x 0036640 t T r e e 1 : \t C o n t e x t T 0036660 r e e N o d e ; \r c o n t e x t 0036700 T r e e 1 _ F a k e D a m a 0036720 g e C o n t e x t T r e e [ c o 0036740 n t e x t T r e e ] ; \r r e s u 0036760 l t _ M a k e D u m m y [ " 0037000 u n i t s 2 " ] ; \r t e m p 1 0037020 _ c o n t e x t T r e e 1 ; \r 0037040 t e m p 0 _ r e s u l t ; \r 0037060 E N D ; \r E N D \r E N D ; \r \r E 0037100 x p u n i t s 2 P r o d E v a l 0037120 u a t e E x p r e s s i o n : \t 0037140 P U B L I C P R O C [ r e f : 0037160 R E F A N Y , l c : L o 0037200 c a l C o n t e x t N o d e , 0037220 f l : F i e l d L i s t N o d 0037240 e , c s : C o m p i l e r S 0037260 t a t e N o d e , t a r g e t 0037300 T y p e : T y p e G r a p h N 0037320 o d e N o d e ] R E T U R N S 0037340 [ t e m p 0 : V a l u e N o d 0037360 e ] = \r B E G I N \r t r e e : 0037400 \t E x p N o d e _ N A R R O W 0037420 [ r e f ] ; \r B E G I N \r E N A 0037440 B L E T h r e e C 4 S u p p o 0037460 r t . G e t S o u r c e I n f o 0037500 = > R E S U M E [ t r e e . 0037520 p o s i t i o n , t r e e . l 0037540 e n g t h ] ; \r t r e e D a t a 0037560 : \t E x p u n i t s 2 P r o d D 0037600 a t a _ N A R R O W [ t r e 0037620 e . d a t a ] ; \r t e m p 0 _ 0037640 M a k e D u m m y [ " u n i t 0037660 s 2 " ] ; \r E N D \r E N D ; \r \r 0037700 E x p w o r d s P r o d C o m p 0037720 i l e L V a l u e : \t P U B L I 0037740 C P R O C [ r e f : R E F 0037760 A N Y , c o n t e x t T r e e 0040000 : C o n t e x t T r e e N o d 0040020 e , c s : C o m p i l e r S 0040040 t a t e N o d e ] R E T U R N 0040060 S [ t e m p 0 : P a r a m e t 0040100 e r i z e d F i e l d D e s c r 0040120 i p t o r N o d e , t e m p 1 0040140 : T y p e G r a p h N o d e N 0040160 o d e ] = \r B E G I N \r t r e 0040200 e : \t E x p N o d e _ N A R R 0040220 O W [ r e f ] ; \r B E G I N \r E 0040240 N A B L E T h r e e C 4 S u p 0040260 p o r t . G e t S o u r c e I n 0040300 f o = > R E S U M E [ t r e 0040320 e . p o s i t i o n , t r e e 0040340 . l e n g t h ] ; \r t r e e D a 0040360 t a : \t E x p w o r d s P r o d 0040400 D a t a _ N A R R O W [ t r 0040420 e e . d a t a ] ; \r B E G I N \r 0040440 p f d : \t P a r a m e t e r i z 0040460 e d F i e l d D e s c r i p t o 0040500 r N o d e ; \r t g n : \t T y p e 0040520 G r a p h N o d e N o d e ; \r e 0040540 r r : \t B O O L E A N ; \r e r r 0040560 _ E r r o r [ " W O R D S 0040600 e x p r e s s i o n u s e d 0040620 a s l - v a l u e " ] ; \r t g 0040640 n _ G e t I n t r i n s i c 0040660 B o o l e a n T y p e [ c s ] ; 0040700 \r p f d _ E m p t y P F D [ 0040720 ] ; \r t e m p 1 _ t g n ; \r 0040740 t e m p 0 _ p f d ; \r E N D 0040760 ; \r E N D \r E N D ; \r \r E x p w 0041000 o r d s P r o d C o m p i l e E 0041020 x p r e s s i o n : \t P U B L I 0041040 C P R O C [ r e f : R E F 0041060 A N Y , c o n t e x t T r e e 0041100 : C o n t e x t T r e e N o d 0041120 e , c s : C o m p i l e r S 0041140 t a t e N o d e , t a r g e t 0041160 T y p e : T y p e G r a p h N 0041200 o d e N o d e ] R E T U R N S 0041220 [ t e m p 0 : V a l u e N o d 0041240 e , t e m p 1 : C o n t e x 0041260 t T r e e N o d e ] = \r B E G 0041300 I N \r t r e e : \t E x p N o d e 0041320 _ N A R R O W [ r e f ] ; \r B 0041340 E G I N \r E N A B L E T h r e 0041360 e C 4 S u p p o r t . G e t S o 0041400 u r c e I n f o = > R E S U 0041420 M E [ t r e e . p o s i t i o n 0041440 , t r e e . l e n g t h ] ; \r 0041460 t r e e D a t a : \t E x p w o r 0041500 d s P r o d D a t a _ N A R 0041520 R O W [ t r e e . d a t a ] ; \r 0041540 B E G I N \r r e s u l t : \t V a 0041560 l u e N o d e ; \r c o n t e x t 0041600 T r e e 1 : \t C o n t e x t T r 0041620 e e N o d e ; \r c o n t e x t T 0041640 r e e 1 _ F a k e D a m a g 0041660 e C o n t e x t T r e e [ c o n 0041700 t e x t T r e e ] ; \r r e s u l 0041720 t _ M a k e D u m m y [ " w 0041740 o r d s " ] ; \r t e m p 1 _ 0041760 c o n t e x t T r e e 1 ; \r t e 0042000 m p 0 _ r e s u l t ; \r E N 0042020 D ; \r E N D \r E N D ; \r \r E x p 0042040 w o r d s P r o d E v a l u a t 0042060 e E x p r e s s i o n : \t P U B 0042100 L I C P R O C [ r e f : R E 0042120 F A N Y , l c : L o c a l 0042140 C o n t e x t N o d e , f l : 0042160 F i e l d L i s t N o d e , 0042200 c s : C o m p i l e r S t a t 0042220 e N o d e , t a r g e t T y p 0042240 e : T y p e G r a p h N o d e 0042260 N o d e ] R E T U R N S [ t e 0042300 m p 0 : V a l u e N o d e ] 0042320 = \r B E G I N \r t r e e : \t E x 0042340 p N o d e _ N A R R O W [ r e 0042360 f ] ; \r B E G I N \r E N A B L E 0042400 T h r e e C 4 S u p p o r t . 0042420 G e t S o u r c e I n f o = > 0042440 R E S U M E [ t r e e . p o s 0042460 i t i o n , t r e e . l e n g 0042500 t h ] ; \r t r e e D a t a : \t E 0042520 x p w o r d s P r o d D a t a 0042540 _ N A R R O W [ t r e e . d a 0042560 t a ] ; \r t e m p 0 _ M a k 0042600 e D u m m y [ " w o r d s " ] ; 0042620 \r E N D \r E N D ; \r \r E x p w o 0042640 r d s 2 P r o d C o m p i l e L 0042660 V a l u e : \t P U B L I C P R 0042700 O C [ r e f : R E F A N Y , 0042720 c o n t e x t T r e e : C o 0042740 n t e x t T r e e N o d e , c 0042760 s : C o m p i l e r S t a t e 0043000 N o d e ] R E T U R N S [ t e 0043020 m p 0 : P a r a m e t e r i z 0043040 e d F i e l d D e s c r i p t o 0043060 r N o d e , t e m p 1 : T y 0043100 p e G r a p h N o d e N o d e ] 0043120 = \r B E G I N \r t r e e : \t E 0043140 x p N o d e _ N A R R O W [ r 0043160 e f ] ; \r B E G I N \r E N A B L 0043200 E T h r e e C 4 S u p p o r t 0043220 . G e t S o u r c e I n f o = 0043240 > R E S U M E [ t r e e . p o 0043260 s i t i o n , t r e e . l e n 0043300 g t h ] ; \r t r e e D a t a : \t 0043320 E x p w o r d s 2 P r o d D a t 0043340 a _ N A R R O W [ t r e e . 0043360 d a t a ] ; \r B E G I N \r p f d 0043400 : \t P a r a m e t e r i z e d F 0043420 i e l d D e s c r i p t o r N o 0043440 d e ; \r t g n : \t T y p e G r a 0043460 p h N o d e N o d e ; \r e r r : 0043500 \t B O O L E A N ; \r e r r _ 0043520 E r r o r [ " W O R D S 2 e x 0043540 p r e s s i o n u s e d a s 0043560 l - v a l u e " ] ; \r t g n 0043600 _ G e t I n t r i n s i c B o 0043620 o l e a n T y p e [ c s ] ; \r p 0043640 f d _ E m p t y P F D [ ] ; 0043660 \r t e m p 1 _ t g n ; \r t e 0043700 m p 0 _ p f d ; \r E N D ; \r 0043720 E N D \r E N D ; \r \r E x p w o r 0043740 d s 2 P r o d C o m p i l e E x 0043760 p r e s s i o n : \t P U B L I C 0044000 P R O C [ r e f : R E F A 0044020 N Y , c o n t e x t T r e e : 0044040 C o n t e x t T r e e N o d e 0044060 , c s : C o m p i l e r S t 0044100 a t e N o d e , t a r g e t T 0044120 y p e : T y p e G r a p h N o 0044140 d e N o d e ] R E T U R N S [ 0044160 t e m p 0 : V a l u e N o d e 0044200 , t e m p 1 : C o n t e x t 0044220 T r e e N o d e ] = \r B E G I 0044240 N \r t r e e : \t E x p N o d e _ 0044260 N A R R O W [ r e f ] ; \r B E 0044300 G I N \r E N A B L E T h r e e 0044320 C 4 S u p p o r t . G e t S o u 0044340 r c e I n f o = > R E S U M 0044360 E [ t r e e . p o s i t i o n , 0044400 t r e e . l e n g t h ] ; \r t 0044420 r e e D a t a : \t E x p w o r d 0044440 s 2 P r o d D a t a _ N A R 0044460 R O W [ t r e e . d a t a ] ; \r 0044500 B E G I N \r r e s u l t : \t V a 0044520 l u e N o d e ; \r c o n t e x t 0044540 T r e e 1 : \t C o n t e x t T r 0044560 e e N o d e ; \r c o n t e x t T 0044600 r e e 1 _ F a k e D a m a g 0044620 e C o n t e x t T r e e [ c o n 0044640 t e x t T r e e ] ; \r r e s u l 0044660 t _ M a k e D u m m y [ " w 0044700 o r d s 2 " ] ; \r t e m p 1 _ 0044720 c o n t e x t T r e e 1 ; \r t 0044740 e m p 0 _ r e s u l t ; \r E 0044760 N D ; \r E N D \r E N D ; \r \r E x 0045000 p w o r d s 2 P r o d E v a l u 0045020 a t e E x p r e s s i o n : \t P 0045040 U B L I C P R O C [ r e f : 0045060 R E F A N Y , l c : L o c 0045100 a l C o n t e x t N o d e , f 0045120 l : F i e l d L i s t N o d e 0045140 , c s : C o m p i l e r S t 0045160 a t e N o d e , t a r g e t T 0045200 y p e : T y p e G r a p h N o 0045220 d e N o d e ] R E T U R N S [ 0045240 t e m p 0 : V a l u e N o d e 0045260 ] = \r B E G I N \r t r e e : \t 0045300 E x p N o d e _ N A R R O W [ 0045320 r e f ] ; \r B E G I N \r E N A B 0045340 L E T h r e e C 4 S u p p o r 0045360 t . G e t S o u r c e I n f o 0045400 = > R E S U M E [ t r e e . p 0045420 o s i t i o n , t r e e . l e 0045440 n g t h ] ; \r t r e e D a t a : 0045460 \t E x p w o r d s 2 P r o d D a 0045500 t a _ N A R R O W [ t r e e 0045520 . d a t a ] ; \r t e m p 0 _ 0045540 M a k e D u m m y [ " w o r d s 0045560 2 " ] ; \r E N D \r E N D ; \r \r E 0045600 x p i s t y p e P r o d C o m p 0045620 i l e L V a l u e : \t P U B L I 0045640 C P R O C [ r e f : R E F 0045660 A N Y , c o n t e x t T r e e 0045700 : C o n t e x t T r e e N o d 0045720 e , c s : C o m p i l e r S 0045740 t a t e N o d e ] R E T U R N 0045760 S [ t e m p 0 : P a r a m e t 0046000 e r i z e d F i e l d D e s c r 0046020 i p t o r N o d e , t e m p 1 0046040 : T y p e G r a p h N o d e N 0046060 o d e ] = \r B E G I N \r t r e 0046100 e : \t E x p N o d e _ N A R R 0046120 O W [ r e f ] ; \r B E G I N \r E 0046140 N A B L E T h r e e C 4 S u p 0046160 p o r t . G e t S o u r c e I n 0046200 f o = > R E S U M E [ t r e 0046220 e . p o s i t i o n , t r e e 0046240 . l e n g t h ] ; \r t r e e D a 0046260 t a : \t E x p i s t y p e P r o 0046300 d D a t a _ N A R R O W [ t 0046320 r e e . d a t a ] ; \r B E G I N 0046340 \r p f d : \t P a r a m e t e r i 0046360 z e d F i e l d D e s c r i p t 0046400 o r N o d e ; \r t g n : \t T y p 0046420 e G r a p h N o d e N o d e ; \r 0046440 e r r : \t B O O L E A N ; \r e r 0046460 r _ E r r o r [ " I S T Y P 0046500 E e x p r e s s i o n u s e 0046520 d a s l - v a l u e " ] ; \r 0046540 t g n _ G e t I n t r i n s 0046560 i c B o o l e a n T y p e [ c s 0046600 ] ; \r p f d _ E m p t y P F 0046620 D [ ] ; \r t e m p 1 _ t g n 0046640 ; \r t e m p 0 _ p f d ; \r E 0046660 N D ; \r E N D \r E N D ; \r \r E x 0046700 p i s t y p e P r o d C o m p i 0046720 l e E x p r e s s i o n : \t P U 0046740 B L I C P R O C [ r e f : R 0046760 E F A N Y , c o n t e x t T 0047000 r e e : C o n t e x t T r e e 0047020 N o d e , c s : C o m p i l 0047040 e r S t a t e N o d e , t a r 0047060 g e t T y p e : T y p e G r a 0047100 p h N o d e N o d e ] R E T U 0047120 R N S [ t e m p 0 : V a l u e 0047140 N o d e , t e m p 1 : C o n 0047160 t e x t T r e e N o d e ] = \r 0047200 B E G I N \r t r e e : \t E x p N 0047220 o d e _ N A R R O W [ r e f ] 0047240 ; \r B E G I N \r E N A B L E T 0047260 h r e e C 4 S u p p o r t . G e 0047300 t S o u r c e I n f o = > R 0047320 E S U M E [ t r e e . p o s i t 0047340 i o n , t r e e . l e n g t h 0047360 ] ; \r t r e e D a t a : \t E x p 0047400 i s t y p e P r o d D a t a _ 0047420 N A R R O W [ t r e e . d a t 0047440 a ] ; \r B E G I N \r r e s u l t 0047460 : \t V a l u e N o d e ; \r c o n 0047500 t e x t T r e e 1 : \t C o n t e 0047520 x t T r e e N o d e ; \r c o n t 0047540 e x t T r e e 1 _ F a k e D 0047560 a m a g e C o n t e x t T r e e 0047600 [ c o n t e x t T r e e ] ; \r r 0047620 e s u l t _ M a k e D u m m 0047640 y [ " i s t y p e " ] ; \r t e m 0047660 p 1 _ c o n t e x t T r e e 0047700 1 ; \r t e m p 0 _ r e s u l 0047720 t ; \r E N D ; \r E N D \r E N D ; 0047740 \r \r E x p i s t y p e P r o d E 0047760 v a l u a t e E x p r e s s i o 0050000 n : \t P U B L I C P R O C [ r 0050020 e f : R E F A N Y , l c : 0050040 L o c a l C o n t e x t N o d 0050060 e , f l : F i e l d L i s t 0050100 N o d e , c s : C o m p i l 0050120 e r S t a t e N o d e , t a r 0050140 g e t T y p e : T y p e G r a 0050160 p h N o d e N o d e ] R E T U 0050200 R N S [ t e m p 0 : V a l u e 0050220 N o d e ] = \r B E G I N \r t r 0050240 e e : \t E x p N o d e _ N A R 0050260 R O W [ r e f ] ; \r B E G I N \r 0050300 E N A B L E T h r e e C 4 S u 0050320 p p o r t . G e t S o u r c e I 0050340 n f o = > R E S U M E [ t r 0050360 e e . p o s i t i o n , t r e 0050400 e . l e n g t h ] ; \r t r e e D 0050420 a t a : \t E x p i s t y p e P r 0050440 o d D a t a _ N A R R O W [ 0050460 t r e e . d a t a ] ; \r t e m p 0050500 0 _ M a k e D u m m y [ " i 0050520 s t y p e " ] ; \r E N D \r E N D 0050540 ; \r \r E x p a d d r e s s P r o 0050560 d C o m p i l e L V a l u e : \t 0050600 P U B L I C P R O C [ r e f : 0050620 R E F A N Y , c o n t e x 0050640 t T r e e : C o n t e x t T r 0050660 e e N o d e , c s : C o m p 0050700 i l e r S t a t e N o d e ] R 0050720 E T U R N S [ t e m p 0 : P a 0050740 r a m e t e r i z e d F i e l d 0050760 D e s c r i p t o r N o d e , 0051000 t e m p 1 : T y p e G r a p h 0051020 N o d e N o d e ] = \r B E G I 0051040 N \r t r e e : \t E x p N o d e _ 0051060 N A R R O W [ r e f ] ; \r B E 0051100 G I N \r E N A B L E T h r e e 0051120 C 4 S u p p o r t . G e t S o u 0051140 r c e I n f o = > R E S U M 0051160 E [ t r e e . p o s i t i o n , 0051200 t r e e . l e n g t h ] ; \r t 0051220 r e e D a t a : \t E x p a d d r 0051240 e s s P r o d D a t a _ N A 0051260 R R O W [ t r e e . d a t a ] ; 0051300 \r B E G I N \r p f d : \t P a r a 0051320 m e t e r i z e d F i e l d D e 0051340 s c r i p t o r N o d e ; \r t g 0051360 n : \t T y p e G r a p h N o d e 0051400 N o d e ; \r e r r : \t B O O L E 0051420 A N ; \r e r r _ E r r o r [ 0051440 " @ e x p r e s s i o n u s 0051460 e d a s l - v a l u e " ] ; 0051500 \r t g n _ G e t I n t r i n 0051520 s i c B o o l e a n T y p e [ c 0051540 s ] ; \r p f d _ E m p t y P 0051560 F D [ ] ; \r t e m p 1 _ t g 0051600 n ; \r t e m p 0 _ p f d ; \r 0051620 E N D ; \r E N D \r E N D ; \r \r E 0051640 x p a d d r e s s P r o d C o m 0051660 p i l e E x p r e s s i o n : \t 0051700 P U B L I C P R O C [ r e f : 0051720 R E F A N Y , c o n t e x 0051740 t T r e e : C o n t e x t T r 0051760 e e N o d e , c s : C o m p 0052000 i l e r S t a t e N o d e , t 0052020 a r g e t T y p e : T y p e G 0052040 r a p h N o d e N o d e ] R E 0052060 T U R N S [ t e m p 0 : V a l 0052100 u e N o d e , t e m p 1 : C 0052120 o n t e x t T r e e N o d e ] 0052140 = \r B E G I N \r t r e e : \t E x 0052160 p N o d e _ N A R R O W [ r e 0052200 f ] ; \r B E G I N \r E N A B L E 0052220 T h r e e C 4 S u p p o r t . 0052240 G e t S o u r c e I n f o = > 0052260 R E S U M E [ t r e e . p o s 0052300 i t i o n , t r e e . l e n g 0052320 t h ] ; \r t r e e D a t a : \t E 0052340 x p a d d r e s s P r o d D a t 0052360 a _ N A R R O W [ t r e e . 0052400 d a t a ] ; \r B E G I N \r r e s 0052420 u l t : \t V a l u e N o d e ; \r 0052440 c o n t e x t T r e e 1 : \t C o 0052460 n t e x t T r e e N o d e ; \r c 0052500 o n t e x t T r e e 1 _ F a 0052520 k e D a m a g e C o n t e x t T 0052540 r e e [ c o n t e x t T r e e ] 0052560 ; \r r e s u l t _ M a k e D 0052600 u m m y [ " a d d r e s s " ] ; 0052620 \r t e m p 1 _ c o n t e x t 0052640 T r e e 1 ; \r t e m p 0 _ r 0052660 e s u l t ; \r E N D ; \r E N D \r 0052700 E N D ; \r \r E x p a d d r e s s 0052720 P r o d E v a l u a t e E x p r 0052740 e s s i o n : \t P U B L I C P 0052760 R O C [ r e f : R E F A N Y 0053000 , l c : L o c a l C o n t e 0053020 x t N o d e , f l : F i e l 0053040 d L i s t N o d e , c s : C 0053060 o m p i l e r S t a t e N o d e 0053100 , t a r g e t T y p e : T y 0053120 p e G r a p h N o d e N o d e ] 0053140 R E T U R N S [ t e m p 0 : 0053160 V a l u e N o d e ] = \r B E G 0053200 I N \r t r e e : \t E x p N o d e 0053220 _ N A R R O W [ r e f ] ; \r B 0053240 E G I N \r E N A B L E T h r e 0053260 e C 4 S u p p o r t . G e t S o 0053300 u r c e I n f o = > R E S U 0053320 M E [ t r e e . p o s i t i o n 0053340 , t r e e . l e n g t h ] ; \r 0053360 t r e e D a t a : \t E x p a d d 0053400 r e s s P r o d D a t a _ N 0053420 A R R O W [ t r e e . d a t a ] 0053440 ; \r t e m p 0 _ M a k e D u 0053460 m m y [ " a d d r e s s " ] ; \r 0053500 E N D \r E N D ; \r \r E x p d e s 0053520 c r i p t o r P r o d C o m p i 0053540 l e L V a l u e : \t P U B L I C 0053560 P R O C [ r e f : R E F A 0053600 N Y , c o n t e x t T r e e : 0053620 C o n t e x t T r e e N o d e 0053640 , c s : C o m p i l e r S t 0053660 a t e N o d e ] R E T U R N S 0053700 [ t e m p 0 : P a r a m e t e 0053720 r i z e d F i e l d D e s c r i 0053740 p t o r N o d e , t e m p 1 : 0053760 T y p e G r a p h N o d e N o 0054000 d e ] = \r B E G I N \r t r e e 0054020 : \t E x p N o d e _ N A R R O 0054040 W [ r e f ] ; \r B E G I N \r E N 0054060 A B L E T h r e e C 4 S u p p 0054100 o r t . G e t S o u r c e I n f 0054120 o = > R E S U M E [ t r e e 0054140 . p o s i t i o n , t r e e . 0054160 l e n g t h ] ; \r t r e e D a t 0054200 a : \t E x p d e s c r i p t o r 0054220 P r o d D a t a _ N A R R O 0054240 W [ t r e e . d a t a ] ; \r B E 0054260 G I N \r p f d : \t P a r a m e t 0054300 e r i z e d F i e l d D e s c r 0054320 i p t o r N o d e ; \r t g n : \t 0054340 T y p e G r a p h N o d e N o d 0054360 e ; \r e r r : \t B O O L E A N ; 0054400 \r e r r _ E r r o r [ " D e 0054420 s c r i p t o r u s e d a s 0054440 l - v a l u e " ] ; \r t g n 0054460 _ G e t I n t r i n s i c B o 0054500 o l e a n T y p e [ c s ] ; \r p 0054520 f d _ E m p t y P F D [ ] ; 0054540 \r t e m p 1 _ t g n ; \r t e 0054560 m p 0 _ p f d ; \r E N D ; \r 0054600 E N D \r E N D ; \r \r E x p d e s 0054620 c r i p t o r P r o d C o m p i 0054640 l e E x p r e s s i o n : \t P U 0054660 B L I C P R O C [ r e f : R 0054700 E F A N Y , c o n t e x t T 0054720 r e e : C o n t e x t T r e e 0054740 N o d e , c s : C o m p i l 0054760 e r S t a t e N o d e , t a r 0055000 g e t T y p e : T y p e G r a 0055020 p h N o d e N o d e ] R E T U 0055040 R N S [ t e m p 0 : V a l u e 0055060 N o d e , t e m p 1 : C o n 0055100 t e x t T r e e N o d e ] = \r 0055120 B E G I N \r t r e e : \t E x p N 0055140 o d e _ N A R R O W [ r e f ] 0055160 ; \r B E G I N \r E N A B L E T 0055200 h r e e C 4 S u p p o r t . G e 0055220 t S o u r c e I n f o = > R 0055240 E S U M E [ t r e e . p o s i t 0055260 i o n , t r e e . l e n g t h 0055300 ] ; \r t r e e D a t a : \t E x p 0055320 d e s c r i p t o r P r o d D a 0055340 t a _ N A R R O W [ t r e e 0055360 . d a t a ] ; \r B E G I N \r r e 0055400 s u l t : \t V a l u e N o d e ; 0055420 \r c o n t e x t T r e e 1 : \t C 0055440 o n t e x t T r e e N o d e ; \r 0055460 c o n t e x t T r e e 1 _ F 0055500 a k e D a m a g e C o n t e x t 0055520 T r e e [ c o n t e x t T r e e 0055540 ] ; \r r e s u l t _ M a k e 0055560 D u m m y [ " d e s c r i p t o 0055600 r " ] ; \r t e m p 1 _ c o n 0055620 t e x t T r e e 1 ; \r t e m p 0 0055640 _ r e s u l t ; \r E N D ; \r 0055660 E N D \r E N D ; \r \r E x p d e s 0055700 c r i p t o r P r o d E v a l u 0055720 a t e E x p r e s s i o n : \t P 0055740 U B L I C P R O C [ r e f : 0055760 R E F A N Y , l c : L o c 0056000 a l C o n t e x t N o d e , f 0056020 l : F i e l d L i s t N o d e 0056040 , c s : C o m p i l e r S t 0056060 a t e N o d e , t a r g e t T 0056100 y p e : T y p e G r a p h N o 0056120 d e N o d e ] R E T U R N S [ 0056140 t e m p 0 : V a l u e N o d e 0056160 ] = \r B E G I N \r t r e e : \t 0056200 E x p N o d e _ N A R R O W [ 0056220 r e f ] ; \r B E G I N \r E N A B 0056240 L E T h r e e C 4 S u p p o r 0056260 t . G e t S o u r c e I n f o 0056300 = > R E S U M E [ t r e e . p 0056320 o s i t i o n , t r e e . l e 0056340 n g t h ] ; \r t r e e D a t a : 0056360 \t E x p d e s c r i p t o r P r 0056400 o d D a t a _ N A R R O W [ 0056420 t r e e . d a t a ] ; \r t e m p 0056440 0 _ M a k e D u m m y [ " d 0056460 e s c r i p t o r " ] ; \r E N D 0056500 \r E N D ; \r \r E x p e r r o r P 0056520 r o d C o m p i l e L V a l u e 0056540 : \t P U B L I C P R O C [ r e 0056560 f : R E F A N Y , c o n t 0056600 e x t T r e e : C o n t e x t 0056620 T r e e N o d e , c s : C o 0056640 m p i l e r S t a t e N o d e ] 0056660 R E T U R N S [ t e m p 0 : 0056700 P a r a m e t e r i z e d F i e 0056720 l d D e s c r i p t o r N o d e 0056740 , t e m p 1 : T y p e G r a 0056760 p h N o d e N o d e ] = \r B E 0057000 G I N \r t r e e : \t E x p N o d 0057020 e _ N A R R O W [ r e f ] ; \r 0057040 B E G I N \r E N A B L E T h r 0057060 e e C 4 S u p p o r t . G e t S 0057100 o u r c e I n f o = > R E S 0057120 U M E [ t r e e . p o s i t i o 0057140 n , t r e e . l e n g t h ] ; 0057160 \r B E G I N \r p f d : \t P a r a 0057200 m e t e r i z e d F i e l d D e 0057220 s c r i p t o r N o d e ; \r t g 0057240 n : \t T y p e G r a p h N o d e 0057260 N o d e ; \r e r r : \t B O O L E 0057300 A N ; \r e r r _ E r r o r [ 0057320 " E R R O R u s e d a s l 0057340 - v a l u e " ] ; \r t g n _ 0057360 G e t I n t r i n s i c B o o l 0057400 e a n T y p e [ c s ] ; \r p f d 0057420 _ E m p t y P F D [ ] ; \r t 0057440 e m p 1 _ t g n ; \r t e m p 0057460 0 _ p f d ; \r E N D ; \r E N 0057500 D \r E N D ; \r \r E x p e r r o r 0057520 P r o d C o m p i l e E x p r e 0057540 s s i o n : \t P U B L I C P R 0057560 O C [ r e f : R E F A N Y , 0057600 c o n t e x t T r e e : C o 0057620 n t e x t T r e e N o d e , c 0057640 s : C o m p i l e r S t a t e 0057660 N o d e , t a r g e t T y p e 0057700 : T y p e G r a p h N o d e N 0057720 o d e ] R E T U R N S [ t e m 0057740 p 0 : V a l u e N o d e , t 0057760 e m p 1 : C o n t e x t T r e 0060000 e N o d e ] = \r B E G I N \r t 0060020 r e e : \t E x p N o d e _ N A 0060040 R R O W [ r e f ] ; \r B E G I N 0060060 \r E N A B L E T h r e e C 4 S 0060100 u p p o r t . G e t S o u r c e 0060120 I n f o = > R E S U M E [ t 0060140 r e e . p o s i t i o n , t r 0060160 e e . l e n g t h ] ; \r B E G I 0060200 N \r r e s u l t : \t V a l u e N 0060220 o d e ; \r c o n t e x t T r e e 0060240 1 : \t C o n t e x t T r e e N o 0060260 d e ; \r c o n t e x t T r e e 1 0060300 _ F a k e D a m a g e C o n 0060320 t e x t T r e e [ c o n t e x t 0060340 T r e e ] ; \r r e s u l t _ 0060360 M a k e D u m m y [ " e r r o r 0060400 " ] ; \r t e m p 1 _ c o n t 0060420 e x t T r e e 1 ; \r t e m p 0 0060440 _ r e s u l t ; \r E N D ; \r E 0060460 N D \r E N D ; \r \r E x p e r r o 0060500 r P r o d E v a l u a t e E x p 0060520 r e s s i o n : \t P U B L I C 0060540 P R O C [ r e f : R E F A N 0060560 Y , l c : L o c a l C o n t 0060600 e x t N o d e , f l : F i e 0060620 l d L i s t N o d e , c s : 0060640 C o m p i l e r S t a t e N o d 0060660 e , t a r g e t T y p e : T 0060700 y p e G r a p h N o d e N o d e 0060720 ] R E T U R N S [ t e m p 0 : 0060740 V a l u e N o d e ] = \r B E 0060760 G I N \r t r e e : \t E x p N o d 0061000 e _ N A R R O W [ r e f ] ; \r 0061020 B E G I N \r E N A B L E T h r 0061040 e e C 4 S u p p o r t . G e t S 0061060 o u r c e I n f o = > R E S 0061100 U M E [ t r e e . p o s i t i o 0061120 n , t r e e . l e n g t h ] ; 0061140 \r t e m p 0 _ M a k e D u m 0061160 m y [ " e r r o r " ] ; \r E N D 0061200 \r E N D ; \r \r E x p t r a n s f 0061220 e r P r o d C o m p i l e L V a 0061240 l u e : \t P U B L I C P R O C 0061260 [ r e f : R E F A N Y , c 0061300 o n t e x t T r e e : C o n t 0061320 e x t T r e e N o d e , c s : 0061340 C o m p i l e r S t a t e N o 0061360 d e ] R E T U R N S [ t e m p 0061400 0 : P a r a m e t e r i z e d 0061420 F i e l d D e s c r i p t o r N 0061440 o d e , t e m p 1 : T y p e 0061460 G r a p h N o d e N o d e ] = 0061500 \r B E G I N \r t r e e : \t E x p 0061520 N o d e _ N A R R O W [ r e f 0061540 ] ; \r B E G I N \r E N A B L E 0061560 T h r e e C 4 S u p p o r t . G 0061600 e t S o u r c e I n f o = > 0061620 R E S U M E [ t r e e . p o s i 0061640 t i o n , t r e e . l e n g t 0061660 h ] ; \r t r e e D a t a : \t E x 0061700 p t r a n s f e r P r o d D a t 0061720 a _ N A R R O W [ t r e e . 0061740 d a t a ] ; \r B E G I N \r p f d 0061760 : \t P a r a m e t e r i z e d F 0062000 i e l d D e s c r i p t o r N o 0062020 d e ; \r t g n : \t T y p e G r a 0062040 p h N o d e N o d e ; \r e r r : 0062060 \t B O O L E A N ; \r e r r _ 0062100 E r r o r [ " T r a n s f e r 0062120 e x p r e s s i o n u s e d 0062140 a s l - v a l u e " ] ; \r t g 0062160 n _ G e t I n t r i n s i c 0062200 B o o l e a n T y p e [ c s ] ; 0062220 \r p f d _ E m p t y P F D [ 0062240 ] ; \r t e m p 1 _ t g n ; \r 0062260 t e m p 0 _ p f d ; \r E N D 0062300 ; \r E N D \r E N D ; \r \r E x p t 0062320 r a n s f e r P r o d C o m p i 0062340 l e E x p r e s s i o n : \t P U 0062360 B L I C P R O C [ r e f : R 0062400 E F A N Y , c o n t e x t T 0062420 r e e : C o n t e x t T r e e 0062440 N o d e , c s : C o m p i l 0062460 e r S t a t e N o d e , t a r 0062500 g e t T y p e : T y p e G r a 0062520 p h N o d e N o d e ] R E T U 0062540 R N S [ t e m p 0 : V a l u e 0062560 N o d e , t e m p 1 : C o n 0062600 t e x t T r e e N o d e ] = \r 0062620 B E G I N \r t r e e : \t E x p N 0062640 o d e _ N A R R O W [ r e f ] 0062660 ; \r B E G I N \r E N A B L E T 0062700 h r e e C 4 S u p p o r t . G e 0062720 t S o u r c e I n f o = > R 0062740 E S U M E [ t r e e . p o s i t 0062760 i o n , t r e e . l e n g t h 0063000 ] ; \r t r e e D a t a : \t E x p 0063020 t r a n s f e r P r o d D a t a 0063040 _ N A R R O W [ t r e e . d 0063060 a t a ] ; \r B E G I N \r r e s u 0063100 l t : \t V a l u e N o d e ; \r c 0063120 o n t e x t T r e e 1 : \t C o n 0063140 t e x t T r e e N o d e ; \r c o 0063160 n t e x t T r e e 1 _ F a k 0063200 e D a m a g e C o n t e x t T r 0063220 e e [ c o n t e x t T r e e ] ; 0063240 \r r e s u l t _ M a k e D u 0063260 m m y [ " t r a n s f e r " ] ; 0063300 \r t e m p 1 _ c o n t e x t 0063320 T r e e 1 ; \r t e m p 0 _ r 0063340 e s u l t ; \r E N D ; \r E N D \r 0063360 E N D ; \r \r E x p t r a n s f e 0063400 r P r o d E v a l u a t e E x p 0063420 r e s s i o n : \t P U B L I C 0063440 P R O C [ r e f : R E F A N 0063460 Y , l c : L o c a l C o n t 0063500 e x t N o d e , f l : F i e 0063520 l d L i s t N o d e , c s : 0063540 C o m p i l e r S t a t e N o d 0063560 e , t a r g e t T y p e : T 0063600 y p e G r a p h N o d e N o d e 0063620 ] R E T U R N S [ t e m p 0 : 0063640 V a l u e N o d e ] = \r B E 0063660 G I N \r t r e e : \t E x p N o d 0063700 e _ N A R R O W [ r e f ] ; \r 0063720 B E G I N \r E N A B L E T h r 0063740 e e C 4 S u p p o r t . G e t S 0063760 o u r c e I n f o = > R E S 0064000 U M E [ t r e e . p o s i t i o 0064020 n , t r e e . l e n g t h ] ; 0064040 \r t r e e D a t a : \t E x p t r 0064060 a n s f e r P r o d D a t a _ 0064100 N A R R O W [ t r e e . d a t 0064120 a ] ; \r t e m p 0 _ M a k e 0064140 D u m m y [ " t r a n s f e r " 0064160 ] ; \r E N D \r E N D ; \r \r N u m 0064200 d e c i m a l P r o d I n t e g 0064220 e r V a l u e F r o m L i t e r 0064240 a l : \t P U B L I C P R O C [ 0064260 r e f : R E F A N Y ] R E 0064300 T U R N S [ t e m p 0 : B i g 0064320 I N T ] = \r B E G I N \r t r e 0064340 e : \t N u m N o d e _ N A R R 0064360 O W [ r e f ] ; \r B E G I N \r E 0064400 N A B L E T h r e e C 4 S u p 0064420 p o r t . G e t S o u r c e I n 0064440 f o = > R E S U M E [ t r e 0064460 e . p o s i t i o n , t r e e 0064500 . l e n g t h ] ; \r t r e e D a 0064520 t a : \t N u m d e c i m a l P r 0064540 o d D a t a _ N A R R O W [ 0064560 t r e e . d a t a ] ; \r B E G I 0064600 N \r d i g i t s : \t R O P E ; \r 0064620 d i g i t s _ R o p e F r o 0064640 m D e c i m a l n u m [ t r e e 0064660 D a t a . D e c i m a l n u m ] 0064700 ; \r t e m p 0 _ P a r s e I 0064720 n t e g e r L i t e r a l [ d i 0064740 g i t s , 1 0 ] ; \r E N D ; \r 0064760 E N D \r E N D ; \r \r N u m o c t 0065000 a l P r o d I n t e g e r V a l 0065020 u e F r o m L i t e r a l : \t P 0065040 U B L I C P R O C [ r e f : 0065060 R E F A N Y ] R E T U R N S 0065100 [ t e m p 0 : B i g I N T ] 0065120 = \r B E G I N \r t r e e : \t N u 0065140 m N o d e _ N A R R O W [ r e 0065160 f ] ; \r B E G I N \r E N A B L E 0065200 T h r e e C 4 S u p p o r t . 0065220 G e t S o u r c e I n f o = > 0065240 R E S U M E [ t r e e . p o s 0065260 i t i o n , t r e e . l e n g 0065300 t h ] ; \r t r e e D a t a : \t N 0065320 u m o c t a l P r o d D a t a 0065340 _ N A R R O W [ t r e e . d a 0065360 t a ] ; \r B E G I N \r d i g i t 0065400 s : \t R O P E ; \r d i g i t s 0065420 _ R o p e F r o m O c t a l n 0065440 u m [ t r e e D a t a . O c t a 0065460 l n u m ] ; \r t e m p 0 _ P 0065500 a r s e I n t e g e r L i t e r 0065520 a l [ d i g i t s , 8 ] ; \r E 0065540 N D ; \r E N D \r E N D ; \r \r N u 0065560 m h e x P r o d I n t e g e r V 0065600 a l u e F r o m L i t e r a l : 0065620 \t P U B L I C P R O C [ r e f 0065640 : R E F A N Y ] R E T U R 0065660 N S [ t e m p 0 : B i g I N T 0065700 ] = \r B E G I N \r t r e e : \t 0065720 N u m N o d e _ N A R R O W [ 0065740 r e f ] ; \r B E G I N \r E N A B 0065760 L E T h r e e C 4 S u p p o r 0066000 t . G e t S o u r c e I n f o 0066020 = > R E S U M E [ t r e e . p 0066040 o s i t i o n , t r e e . l e 0066060 n g t h ] ; \r t r e e D a t a : 0066100 \t N u m h e x P r o d D a t a 0066120 _ N A R R O W [ t r e e . d a 0066140 t a ] ; \r B E G I N \r d i g i t 0066160 s : \t R O P E ; \r d i g i t s 0066200 _ R o p e F r o m H e x n u m 0066220 [ t r e e D a t a . H e x n u m 0066240 ] ; \r t e m p 0 _ P a r s e 0066260 I n t e g e r L i t e r a l [ d 0066300 i g i t s , 1 6 ] ; \r E N D ; 0066320 \r E N D \r E N D ; \r \r A d d O p 0066340 p l u s P r o d I s M i n u s : 0066360 \t P U B L I C P R O C [ r e f 0066400 : R E F A N Y ] R E T U R 0066420 N S [ t e m p 0 : B O O L E A 0066440 N ] = \r B E G I N \r t r e e : 0066460 \t A d d O p N o d e _ N A R R 0066500 O W [ r e f ] ; \r B E G I N \r E 0066520 N A B L E T h r e e C 4 S u p 0066540 p o r t . G e t S o u r c e I n 0066560 f o = > R E S U M E [ t r e 0066600 e . p o s i t i o n , t r e e 0066620 . l e n g t h ] ; \r t e m p 0 0066640 _ F a l s e [ ] ; \r E N D \r E 0066660 N D ; \r \r A d d O p p l u s P r 0066700 o d I s P l u s : \t P U B L I C 0066720 P R O C [ r e f : R E F A 0066740 N Y ] R E T U R N S [ t e m p 0066760 0 : B O O L E A N ] = \r B E 0067000 G I N \r t r e e : \t A d d O p N 0067020 o d e _ N A R R O W [ r e f ] 0067040 ; \r B E G I N \r E N A B L E T 0067060 h r e e C 4 S u p p o r t . G e 0067100 t S o u r c e I n f o = > R 0067120 E S U M E [ t r e e . p o s i t 0067140 i o n , t r e e . l e n g t h 0067160 ] ; \r t e m p 0 _ T r u e [ 0067200 ] ; \r E N D \r E N D ; \r \r A d d 0067220 O p m i n u s P r o d I s M i n 0067240 u s : \t P U B L I C P R O C [ 0067260 r e f : R E F A N Y ] R E 0067300 T U R N S [ t e m p 0 : B O O 0067320 L E A N ] = \r B E G I N \r t r 0067340 e e : \t A d d O p N o d e _ N 0067360 A R R O W [ r e f ] ; \r B E G I 0067400 N \r E N A B L E T h r e e C 4 0067420 S u p p o r t . G e t S o u r c 0067440 e I n f o = > R E S U M E [ 0067460 t r e e . p o s i t i o n , t 0067500 r e e . l e n g t h ] ; \r t e m 0067520 p 0 _ T r u e [ ] ; \r E N D 0067540 \r E N D ; \r \r A d d O p m i n u 0067560 s P r o d I s P l u s : \t P U B 0067600 L I C P R O C [ r e f : R E 0067620 F A N Y ] R E T U R N S [ t 0067640 e m p 0 : B O O L E A N ] = 0067660 \r B E G I N \r t r e e : \t A d d 0067700 O p N o d e _ N A R R O W [ r 0067720 e f ] ; \r B E G I N \r E N A B L 0067740 E T h r e e C 4 S u p p o r t 0067760 . G e t S o u r c e I n f o = 0070000 > R E S U M E [ t r e e . p o 0070020 s i t i o n , t r e e . l e n 0070040 g t h ] ; \r t e m p 0 _ F a 0070060 l s e [ ] ; \r E N D \r E N D ; \r 0070100 \r M u l t O p t i m e s P r o d 0070120 I s M o d : \t P U B L I C P R 0070140 O C [ r e f : R E F A N Y ] 0070160 R E T U R N S [ t e m p 0 : 0070200 B O O L E A N ] = \r B E G I N 0070220 \r t r e e : \t M u l t O p N o d 0070240 e _ N A R R O W [ r e f ] ; \r 0070260 B E G I N \r E N A B L E T h r 0070300 e e C 4 S u p p o r t . G e t S 0070320 o u r c e I n f o = > R E S 0070340 U M E [ t r e e . p o s i t i o 0070360 n , t r e e . l e n g t h ] ; 0070400 \r t e m p 0 _ F a l s e [ ] 0070420 ; \r E N D \r E N D ; \r \r M u l t 0070440 O p t i m e s P r o d I s D i v 0070460 i d e : \t P U B L I C P R O C 0070500 [ r e f : R E F A N Y ] R 0070520 E T U R N S [ t e m p 0 : B O 0070540 O L E A N ] = \r B E G I N \r t 0070560 r e e : \t M u l t O p N o d e _ 0070600 N A R R O W [ r e f ] ; \r B E 0070620 G I N \r E N A B L E T h r e e 0070640 C 4 S u p p o r t . G e t S o u 0070660 r c e I n f o = > R E S U M 0070700 E [ t r e e . p o s i t i o n , 0070720 t r e e . l e n g t h ] ; \r t 0070740 e m p 0 _ F a l s e [ ] ; \r 0070760 E N D \r E N D ; \r \r M u l t O p 0071000 t i m e s P r o d I s T i m e s 0071020 : \t P U B L I C P R O C [ r e 0071040 f : R E F A N Y ] R E T U 0071060 R N S [ t e m p 0 : B O O L E 0071100 A N ] = \r B E G I N \r t r e e 0071120 : \t M u l t O p N o d e _ N A 0071140 R R O W [ r e f ] ; \r B E G I N 0071160 \r E N A B L E T h r e e C 4 S 0071200 u p p o r t . G e t S o u r c e 0071220 I n f o = > R E S U M E [ t 0071240 r e e . p o s i t i o n , t r 0071260 e e . l e n g t h ] ; \r t e m p 0071300 0 _ T r u e [ ] ; \r E N D \r 0071320 E N D ; \r \r M u l t O p d i v i 0071340 d e P r o d I s M o d : \t P U B 0071360 L I C P R O C [ r e f : R E 0071400 F A N Y ] R E T U R N S [ t 0071420 e m p 0 : B O O L E A N ] = 0071440 \r B E G I N \r t r e e : \t M u l 0071460 t O p N o d e _ N A R R O W [ 0071500 r e f ] ; \r B E G I N \r E N A B 0071520 L E T h r e e C 4 S u p p o r 0071540 t . G e t S o u r c e I n f o 0071560 = > R E S U M E [ t r e e . p 0071600 o s i t i o n , t r e e . l e 0071620 n g t h ] ; \r t e m p 0 _ F 0071640 a l s e [ ] ; \r E N D \r E N D ; 0071660 \r \r M u l t O p d i v i d e P r 0071700 o d I s D i v i d e : \t P U B L 0071720 I C P R O C [ r e f : R E F 0071740 A N Y ] R E T U R N S [ t e 0071760 m p 0 : B O O L E A N ] = \r 0072000 B E G I N \r t r e e : \t M u l t 0072020 O p N o d e _ N A R R O W [ r 0072040 e f ] ; \r B E G I N \r E N A B L 0072060 E T h r e e C 4 S u p p o r t 0072100 . G e t S o u r c e I n f o = 0072120 > R E S U M E [ t r e e . p o 0072140 s i t i o n , t r e e . l e n 0072160 g t h ] ; \r t e m p 0 _ T r 0072200 u e [ ] ; \r E N D \r E N D ; \r \r 0072220 M u l t O p d i v i d e P r o d 0072240 I s T i m e s : \t P U B L I C 0072260 P R O C [ r e f : R E F A N 0072300 Y ] R E T U R N S [ t e m p 0 0072320 : B O O L E A N ] = \r B E G 0072340 I N \r t r e e : \t M u l t O p N 0072360 o d e _ N A R R O W [ r e f ] 0072400 ; \r B E G I N \r E N A B L E T 0072420 h r e e C 4 S u p p o r t . G e 0072440 t S o u r c e I n f o = > R 0072460 E S U M E [ t r e e . p o s i t 0072500 i o n , t r e e . l e n g t h 0072520 ] ; \r t e m p 0 _ F a l s e 0072540 [ ] ; \r E N D \r E N D ; \r \r M u 0072560 l t O p m o d P r o d I s M o d 0072600 : \t P U B L I C P R O C [ r e 0072620 f : R E F A N Y ] R E T U 0072640 R N S [ t e m p 0 : B O O L E 0072660 A N ] = \r B E G I N \r t r e e 0072700 : \t M u l t O p N o d e _ N A 0072720 R R O W [ r e f ] ; \r B E G I N 0072740 \r E N A B L E T h r e e C 4 S 0072760 u p p o r t . G e t S o u r c e 0073000 I n f o = > R E S U M E [ t 0073020 r e e . p o s i t i o n , t r 0073040 e e . l e n g t h ] ; \r t e m p 0073060 0 _ T r u e [ ] ; \r E N D \r 0073100 E N D ; \r \r M u l t O p m o d P 0073120 r o d I s D i v i d e : \t P U B 0073140 L I C P R O C [ r e f : R E 0073160 F A N Y ] R E T U R N S [ t 0073200 e m p 0 : B O O L E A N ] = 0073220 \r B E G I N \r t r e e : \t M u l 0073240 t O p N o d e _ N A R R O W [ 0073260 r e f ] ; \r B E G I N \r E N A B 0073300 L E T h r e e C 4 S u p p o r 0073320 t . G e t S o u r c e I n f o 0073340 = > R E S U M E [ t r e e . p 0073360 o s i t i o n , t r e e . l e 0073400 n g t h ] ; \r t e m p 0 _ F 0073420 a l s e [ ] ; \r E N D \r E N D ; 0073440 \r \r M u l t O p m o d P r o d I 0073460 s T i m e s : \t P U B L I C P 0073500 R O C [ r e f : R E F A N Y 0073520 ] R E T U R N S [ t e m p 0 : 0073540 B O O L E A N ] = \r B E G I 0073560 N \r t r e e : \t M u l t O p N o 0073600 d e _ N A R R O W [ r e f ] ; 0073620 \r B E G I N \r E N A B L E T h 0073640 r e e C 4 S u p p o r t . G e t 0073660 S o u r c e I n f o = > R E 0073700 S U M E [ t r e e . p o s i t i 0073720 o n , t r e e . l e n g t h ] 0073740 ; \r t e m p 0 _ F a l s e [ 0073760 ] ; \r E N D \r E N D ; \r \r R e l 0074000 o p e q P r o d G e t R e l a t 0074020 i o n O p : \t P U B L I C P R 0074040 O C [ r e f : R E F A N Y ] 0074060 R E T U R N S [ t e m p 0 : 0074100 R e l a t i o n O p ] = \r B E 0074120 G I N \r t r e e : \t R e l o p N 0074140 o d e _ N A R R O W [ r e f ] 0074160 ; \r B E G I N \r E N A B L E T 0074200 h r e e C 4 S u p p o r t . G e 0074220 t S o u r c e I n f o = > R 0074240 E S U M E [ t r e e . p o s i t 0074260 i o n , t r e e . l e n g t h 0074300 ] ; \r t e m p 0 _ R e l a t 0074320 i o n O p . e q ; \r E N D \r E N 0074340 D ; \r \r R e l o p n e P r o d G 0074360 e t R e l a t i o n O p : \t P U 0074400 B L I C P R O C [ r e f : R 0074420 E F A N Y ] R E T U R N S [ 0074440 t e m p 0 : R e l a t i o n O 0074460 p ] = \r B E G I N \r t r e e : 0074500 \t R e l o p N o d e _ N A R R 0074520 O W [ r e f ] ; \r B E G I N \r E 0074540 N A B L E T h r e e C 4 S u p 0074560 p o r t . G e t S o u r c e I n 0074600 f o = > R E S U M E [ t r e 0074620 e . p o s i t i o n , t r e e 0074640 . l e n g t h ] ; \r t e m p 0 0074660 _ R e l a t i o n O p . n e ; 0074700 \r E N D \r E N D ; \r \r R e l o p 0074720 l t P r o d G e t R e l a t i o 0074740 n O p : \t P U B L I C P R O C 0074760 [ r e f : R E F A N Y ] R 0075000 E T U R N S [ t e m p 0 : R e 0075020 l a t i o n O p ] = \r B E G I 0075040 N \r t r e e : \t R e l o p N o d 0075060 e _ N A R R O W [ r e f ] ; \r 0075100 B E G I N \r E N A B L E T h r 0075120 e e C 4 S u p p o r t . G e t S 0075140 o u r c e I n f o = > R E S 0075160 U M E [ t r e e . p o s i t i o 0075200 n , t r e e . l e n g t h ] ; 0075220 \r t e m p 0 _ R e l a t i o 0075240 n O p . l t ; \r E N D \r E N D ; 0075260 \r \r R e l o p l e P r o d G e t 0075300 R e l a t i o n O p : \t P U B L 0075320 I C P R O C [ r e f : R E F 0075340 A N Y ] R E T U R N S [ t e 0075360 m p 0 : R e l a t i o n O p ] 0075400 = \r B E G I N \r t r e e : \t R 0075420 e l o p N o d e _ N A R R O W 0075440 [ r e f ] ; \r B E G I N \r E N A 0075460 B L E T h r e e C 4 S u p p o 0075500 r t . G e t S o u r c e I n f o 0075520 = > R E S U M E [ t r e e . 0075540 p o s i t i o n , t r e e . l 0075560 e n g t h ] ; \r t e m p 0 _ 0075600 R e l a t i o n O p . l e ; \r E 0075620 N D \r E N D ; \r \r R e l o p g t 0075640 P r o d G e t R e l a t i o n O 0075660 p : \t P U B L I C P R O C [ r 0075700 e f : R E F A N Y ] R E T 0075720 U R N S [ t e m p 0 : R e l a 0075740 t i o n O p ] = \r B E G I N \r 0075760 t r e e : \t R e l o p N o d e _ 0076000 N A R R O W [ r e f ] ; \r B E 0076020 G I N \r E N A B L E T h r e e 0076040 C 4 S u p p o r t . G e t S o u 0076060 r c e I n f o = > R E S U M 0076100 E [ t r e e . p o s i t i o n , 0076120 t r e e . l e n g t h ] ; \r t 0076140 e m p 0 _ R e l a t i o n O 0076160 p . g t ; \r E N D \r E N D ; \r \r 0076200 R e l o p g e P r o d G e t R e 0076220 l a t i o n O p : \t P U B L I C 0076240 P R O C [ r e f : R E F A 0076260 N Y ] R E T U R N S [ t e m p 0076300 0 : R e l a t i o n O p ] = 0076320 \r B E G I N \r t r e e : \t R e l 0076340 o p N o d e _ N A R R O W [ r 0076360 e f ] ; \r B E G I N \r E N A B L 0076400 E T h r e e C 4 S u p p o r t 0076420 . G e t S o u r c e I n f o = 0076440 > R E S U M E [ t r e e . p o 0076460 s i t i o n , t r e e . l e n 0076500 g t h ] ; \r t e m p 0 _ R e 0076520 l a t i o n O p . g e ; \r E N D 0076540 \r E N D ; \r \r I n i t i a l i z 0076560 a t i o n e m p t y P r o d I n 0076600 i t i a l i z a t i o n I s A s 0076620 s i g n m e n t : \t P U B L I C 0076640 P R O C [ r e f : R E F A 0076660 N Y ] R E T U R N S [ t e m p 0076700 0 : B O O L E A N ] = \r B E 0076720 G I N \r t r e e : \t I n i t i a 0076740 l i z a t i o n N o d e _ N A 0076760 R R O W [ r e f ] ; \r B E G I N 0077000 \r E N A B L E T h r e e C 4 S 0077020 u p p o r t . G e t S o u r c e 0077040 I n f o = > R E S U M E [ t 0077060 r e e . p o s i t i o n , t r 0077100 e e . l e n g t h ] ; \r t e m p 0077120 0 _ F a l s e [ ] ; \r E N D 0077140 \r E N D ; \r \r I n i t i a l i z 0077160 a t i o n e m p t y P r o d I n 0077200 i t i a l i z a t i o n I s B i 0077220 n d i n g : \t P U B L I C P R 0077240 O C [ r e f : R E F A N Y ] 0077260 R E T U R N S [ t e m p 0 : 0077300 B O O L E A N ] = \r B E G I N 0077320 \r t r e e : \t I n i t i a l i z 0077340 a t i o n N o d e _ N A R R O 0077360 W [ r e f ] ; \r B E G I N \r E N 0077400 A B L E T h r e e C 4 S u p p 0077420 o r t . G e t S o u r c e I n f 0077440 o = > R E S U M E [ t r e e 0077460 . p o s i t i o n , t r e e . 0077500 l e n g t h ] ; \r t e m p 0 _ 0077520 F a l s e [ ] ; \r E N D \r E N 0077540 D ; \r \r I n i t i a l i z a t i 0077560 o n e m p t y P r o d I n i t i 0077600 a l i z a t i o n I s E m p t y 0077620 : \t P U B L I C P R O C [ r e 0077640 f : R E F A N Y ] R E T U 0077660 R N S [ t e m p 0 : B O O L E 0077700 A N ] = \r B E G I N \r t r e e 0077720 : \t I n i t i a l i z a t i o n 0077740 N o d e _ N A R R O W [ r e f 0077760 ] ; \r B E G I N \r E N A B L E 0100000 T h r e e C 4 S u p p o r t . G 0100020 e t S o u r c e I n f o = > 0100040 R E S U M E [ t r e e . p o s i 0100060 t i o n , t r e e . l e n g t 0100100 h ] ; \r t e m p 0 _ T r u e 0100120 [ ] ; \r E N D \r E N D ; \r \r I n 0100140 i t i a l i z a t i o n b i n d 0100160 i n g P r o d I n i t i a l i z 0100200 a t i o n I s A s s i g n m e n 0100220 t : \t P U B L I C P R O C [ r 0100240 e f : R E F A N Y ] R E T 0100260 U R N S [ t e m p 0 : B O O L 0100300 E A N ] = \r B E G I N \r t r e 0100320 e : \t I n i t i a l i z a t i o 0100340 n N o d e _ N A R R O W [ r e 0100360 f ] ; \r B E G I N \r E N A B L E 0100400 T h r e e C 4 S u p p o r t . 0100420 G e t S o u r c e I n f o = > 0100440 R E S U M E [ t r e e . p o s 0100460 i t i o n , t r e e . l e n g 0100500 t h ] ; \r t r e e D a t a : \t I 0100520 n i t i a l i z a t i o n b i n 0100540 d i n g P r o d D a t a _ N 0100560 A R R O W [ t r e e . d a t a ] 0100600 ; \r t e m p 0 _ F a l s e [ 0100620 ] ; \r E N D \r E N D ; \r \r I n i 0100640 t i a l i z a t i o n b i n d i 0100660 n g P r o d I n i t i a l i z a 0100700 t i o n I s B i n d i n g : \t P 0100720 U B L I C P R O C [ r e f : 0100740 R E F A N Y ] R E T U R N S 0100760 [ t e m p 0 : B O O L E A N ] 0101000 = \r B E G I N \r t r e e : \t I 0101020 n i t i a l i z a t i o n N o d 0101040 e _ N A R R O W [ r e f ] ; \r 0101060 B E G I N \r E N A B L E T h r 0101100 e e C 4 S u p p o r t . G e t S 0101120 o u r c e I n f o = > R E S 0101140 U M E [ t r e e . p o s i t i o 0101160 n , t r e e . l e n g t h ] ; 0101200 \r t r e e D a t a : \t I n i t i 0101220 a l i z a t i o n b i n d i n g 0101240 P r o d D a t a _ N A R R O 0101260 W [ t r e e . d a t a ] ; \r t e 0101300 m p 0 _ T r u e [ ] ; \r E N 0101320 D \r E N D ; \r \r I n i t i a l i 0101340 z a t i o n b i n d i n g P r o 0101360 d I n i t i a l i z a t i o n I 0101400 s E m p t y : \t P U B L I C P 0101420 R O C [ r e f : R E F A N Y 0101440 ] R E T U R N S [ t e m p 0 : 0101460 B O O L E A N ] = \r B E G I 0101500 N \r t r e e : \t I n i t i a l i 0101520 z a t i o n N o d e _ N A R R 0101540 O W [ r e f ] ; \r B E G I N \r E 0101560 N A B L E T h r e e C 4 S u p 0101600 p o r t . G e t S o u r c e I n 0101620 f o = > R E S U M E [ t r e 0101640 e . p o s i t i o n , t r e e 0101660 . l e n g t h ] ; \r t r e e D a 0101700 t a : \t I n i t i a l i z a t i 0101720 o n b i n d i n g P r o d D a t 0101740 a _ N A R R O W [ t r e e . 0101760 d a t a ] ; \r t e m p 0 _ F 0102000 a l s e [ ] ; \r E N D \r E N D ; 0102020 \r \r I n i t i a l i z a t i o n 0102040 a s s i g n m e n t P r o d I n 0102060 i t i a l i z a t i o n I s A s 0102100 s i g n m e n t : \t P U B L I C 0102120 P R O C [ r e f : R E F A 0102140 N Y ] R E T U R N S [ t e m p 0102160 0 : B O O L E A N ] = \r B E 0102200 G I N \r t r e e : \t I n i t i a 0102220 l i z a t i o n N o d e _ N A 0102240 R R O W [ r e f ] ; \r B E G I N 0102260 \r E N A B L E T h r e e C 4 S 0102300 u p p o r t . G e t S o u r c e 0102320 I n f o = > R E S U M E [ t 0102340 r e e . p o s i t i o n , t r 0102360 e e . l e n g t h ] ; \r t r e e 0102400 D a t a : \t I n i t i a l i z a 0102420 t i o n a s s i g n m e n t P r 0102440 o d D a t a _ N A R R O W [ 0102460 t r e e . d a t a ] ; \r t e m p 0102500 0 _ T r u e [ ] ; \r E N D \r 0102520 E N D ; \r \r I n i t i a l i z a 0102540 t i o n a s s i g n m e n t P r 0102560 o d I n i t i a l i z a t i o n 0102600 I s B i n d i n g : \t P U B L I 0102620 C P R O C [ r e f : R E F 0102640 A N Y ] R E T U R N S [ t e m 0102660 p 0 : B O O L E A N ] = \r B 0102700 E G I N \r t r e e : \t I n i t i 0102720 a l i z a t i o n N o d e _ N 0102740 A R R O W [ r e f ] ; \r B E G I 0102760 N \r E N A B L E T h r e e C 4 0103000 S u p p o r t . G e t S o u r c 0103020 e I n f o = > R E S U M E [ 0103040 t r e e . p o s i t i o n , t 0103060 r e e . l e n g t h ] ; \r t r e 0103100 e D a t a : \t I n i t i a l i z 0103120 a t i o n a s s i g n m e n t P 0103140 r o d D a t a _ N A R R O W 0103160 [ t r e e . d a t a ] ; \r t e m 0103200 p 0 _ F a l s e [ ] ; \r E N 0103220 D \r E N D ; \r \r I n i t i a l i 0103240 z a t i o n a s s i g n m e n t 0103260 P r o d I n i t i a l i z a t i 0103300 o n I s E m p t y : \t P U B L I 0103320 C P R O C [ r e f : R E F 0103340 A N Y ] R E T U R N S [ t e m 0103360 p 0 : B O O L E A N ] = \r B 0103400 E G I N \r t r e e : \t I n i t i 0103420 a l i z a t i o n N o d e _ N 0103440 A R R O W [ r e f ] ; \r B E G I 0103460 N \r E N A B L E T h r e e C 4 0103500 S u p p o r t . G e t S o u r c 0103520 e I n f o = > R E S U M E [ 0103540 t r e e . p o s i t i o n , t 0103560 r e e . l e n g t h ] ; \r t r e 0103600 e D a t a : \t I n i t i a l i z 0103620 a t i o n a s s i g n m e n t P 0103640 r o d D a t a _ N A R R O W 0103660 [ t r e e . d a t a ] ; \r t e m 0103700 p 0 _ F a l s e [ ] ; \r E N 0103720 D \r E N D ; \r \r T y p e O p c o 0103740 d e P r o d T y p e O p I s N i 0103760 l : \t P U B L I C P R O C [ r 0104000 e f : R E F A N Y ] R E T 0104020 U R N S [ t e m p 0 : B O O L 0104040 E A N ] = \r B E G I N \r t r e 0104060 e : \t T y p e O p N o d e _ N 0104100 A R R O W [ r e f ] ; \r B E G I 0104120 N \r E N A B L E T h r e e C 4 0104140 S u p p o r t . G e t S o u r c 0104160 e I n f o = > R E S U M E [ 0104200 t r e e . p o s i t i o n , t 0104220 r e e . l e n g t h ] ; \r t e m 0104240 p 0 _ F a l s e [ ] ; \r E N 0104260 D \r E N D ; \r \r T y p e O p c o 0104300 d e P r o d T y p e O p I s L a 0104320 s t : \t P U B L I C P R O C [ 0104340 r e f : R E F A N Y ] R E 0104360 T U R N S [ t e m p 0 : B O O 0104400 L E A N ] = \r B E G I N \r t r 0104420 e e : \t T y p e O p N o d e _ 0104440 N A R R O W [ r e f ] ; \r B E G 0104460 I N \r E N A B L E T h r e e C 0104500 4 S u p p o r t . G e t S o u r 0104520 c e I n f o = > R E S U M E 0104540 [ t r e e . p o s i t i o n , 0104560 t r e e . l e n g t h ] ; \r t e 0104600 m p 0 _ F a l s e [ ] ; \r E 0104620 N D \r E N D ; \r \r T y p e O p c 0104640 o d e P r o d T y p e O p I s F 0104660 i r s t : \t P U B L I C P R O 0104700 C [ r e f : R E F A N Y ] 0104720 R E T U R N S [ t e m p 0 : B 0104740 O O L E A N ] = \r B E G I N \r 0104760 t r e e : \t T y p e O p N o d e 0105000 _ N A R R O W [ r e f ] ; \r B 0105020 E G I N \r E N A B L E T h r e 0105040 e C 4 S u p p o r t . G e t S o 0105060 u r c e I n f o = > R E S U 0105100 M E [ t r e e . p o s i t i o n 0105120 , t r e e . l e n g t h ] ; \r 0105140 t e m p 0 _ F a l s e [ ] ; 0105160 \r E N D \r E N D ; \r \r T y p e O 0105200 p c o d e P r o d T y p e O p I 0105220 s C o d e : \t P U B L I C P R 0105240 O C [ r e f : R E F A N Y ] 0105260 R E T U R N S [ t e m p 0 : 0105300 B O O L E A N ] = \r B E G I N 0105320 \r t r e e : \t T y p e O p N o d 0105340 e _ N A R R O W [ r e f ] ; \r 0105360 B E G I N \r E N A B L E T h r 0105400 e e C 4 S u p p o r t . G e t S 0105420 o u r c e I n f o = > R E S 0105440 U M E [ t r e e . p o s i t i o 0105460 n , t r e e . l e n g t h ] ; 0105500 \r t e m p 0 _ T r u e [ ] ; 0105520 \r E N D \r E N D ; \r \r T y p e O 0105540 p f i r s t P r o d T y p e O p 0105560 I s N i l : \t P U B L I C P R 0105600 O C [ r e f : R E F A N Y ] 0105620 R E T U R N S [ t e m p 0 : 0105640 B O O L E A N ] = \r B E G I N 0105660 \r t r e e : \t T y p e O p N o d 0105700 e _ N A R R O W [ r e f ] ; \r 0105720 B E G I N \r E N A B L E T h r 0105740 e e C 4 S u p p o r t . G e t S 0105760 o u r c e I n f o = > R E S 0106000 U M E [ t r e e . p o s i t i o 0106020 n , t r e e . l e n g t h ] ; 0106040 \r t e m p 0 _ F a l s e [ ] 0106060 ; \r E N D \r E N D ; \r \r T y p e 0106100 O p f i r s t P r o d T y p e O 0106120 p I s L a s t : \t P U B L I C 0106140 P R O C [ r e f : R E F A N 0106160 Y ] R E T U R N S [ t e m p 0 0106200 : B O O L E A N ] = \r B E G 0106220 I N \r t r e e : \t T y p e O p N 0106240 o d e _ N A R R O W [ r e f ] 0106260 ; \r B E G I N \r E N A B L E T 0106300 h r e e C 4 S u p p o r t . G e 0106320 t S o u r c e I n f o = > R 0106340 E S U M E [ t r e e . p o s i t 0106360 i o n , t r e e . l e n g t h 0106400 ] ; \r t e m p 0 _ F a l s e 0106420 [ ] ; \r E N D \r E N D ; \r \r T y 0106440 p e O p f i r s t P r o d T y p 0106460 e O p I s F i r s t : \t P U B L 0106500 I C P R O C [ r e f : R E F 0106520 A N Y ] R E T U R N S [ t e 0106540 m p 0 : B O O L E A N ] = \r 0106560 B E G I N \r t r e e : \t T y p e 0106600 O p N o d e _ N A R R O W [ r 0106620 e f ] ; \r B E G I N \r E N A B L 0106640 E T h r e e C 4 S u p p o r t 0106660 . G e t S o u r c e I n f o = 0106700 > R E S U M E [ t r e e . p o 0106720 s i t i o n , t r e e . l e n 0106740 g t h ] ; \r t e m p 0 _ T r 0106760 u e [ ] ; \r E N D \r E N D ; \r \r 0107000 T y p e O p f i r s t P r o d T 0107020 y p e O p I s C o d e : \t P U B 0107040 L I C P R O C [ r e f : R E 0107060 F A N Y ] R E T U R N S [ t 0107100 e m p 0 : B O O L E A N ] = 0107120 \r B E G I N \r t r e e : \t T y p 0107140 e O p N o d e _ N A R R O W [ 0107160 r e f ] ; \r B E G I N \r E N A B 0107200 L E T h r e e C 4 S u p p o r 0107220 t . G e t S o u r c e I n f o 0107240 = > R E S U M E [ t r e e . p 0107260 o s i t i o n , t r e e . l e 0107300 n g t h ] ; \r t e m p 0 _ F 0107320 a l s e [ ] ; \r E N D \r E N D ; 0107340 \r \r T y p e O p l a s t P r o d 0107360 T y p e O p I s N i l : \t P U B 0107400 L I C P R O C [ r e f : R E 0107420 F A N Y ] R E T U R N S [ t 0107440 e m p 0 : B O O L E A N ] = 0107460 \r B E G I N \r t r e e : \t T y p 0107500 e O p N o d e _ N A R R O W [ 0107520 r e f ] ; \r B E G I N \r E N A B 0107540 L E T h r e e C 4 S u p p o r 0107560 t . G e t S o u r c e I n f o 0107600 = > R E S U M E [ t r e e . p 0107620 o s i t i o n , t r e e . l e 0107640 n g t h ] ; \r t e m p 0 _ F 0107660 a l s e [ ] ; \r E N D \r E N D ; 0107700 \r \r T y p e O p l a s t P r o d 0107720 T y p e O p I s L a s t : \t P U 0107740 B L I C P R O C [ r e f : R 0107760 E F A N Y ] R E T U R N S [ 0110000 t e m p 0 : B O O L E A N ] 0110020 = \r B E G I N \r t r e e : \t T y 0110040 p e O p N o d e _ N A R R O W 0110060 [ r e f ] ; \r B E G I N \r E N A 0110100 B L E T h r e e C 4 S u p p o 0110120 r t . G e t S o u r c e I n f o 0110140 = > R E S U M E [ t r e e . 0110160 p o s i t i o n , t r e e . l 0110200 e n g t h ] ; \r t e m p 0 _ 0110220 T r u e [ ] ; \r E N D \r E N D ; 0110240 \r \r T y p e O p l a s t P r o d 0110260 T y p e O p I s F i r s t : \t P 0110300 U B L I C P R O C [ r e f : 0110320 R E F A N Y ] R E T U R N S 0110340 [ t e m p 0 : B O O L E A N ] 0110360 = \r B E G I N \r t r e e : \t T 0110400 y p e O p N o d e _ N A R R O 0110420 W [ r e f ] ; \r B E G I N \r E N 0110440 A B L E T h r e e C 4 S u p p 0110460 o r t . G e t S o u r c e I n f 0110500 o = > R E S U M E [ t r e e 0110520 . p o s i t i o n , t r e e . 0110540 l e n g t h ] ; \r t e m p 0 _ 0110560 F a l s e [ ] ; \r E N D \r E N 0110600 D ; \r \r T y p e O p l a s t P r 0110620 o d T y p e O p I s C o d e : \t 0110640 P U B L I C P R O C [ r e f : 0110660 R E F A N Y ] R E T U R N 0110700 S [ t e m p 0 : B O O L E A N 0110720 ] = \r B E G I N \r t r e e : \t 0110740 T y p e O p N o d e _ N A R R 0110760 O W [ r e f ] ; \r B E G I N \r E 0111000 N A B L E T h r e e C 4 S u p 0111020 p o r t . G e t S o u r c e I n 0111040 f o = > R E S U M E [ t r e 0111060 e . p o s i t i o n , t r e e 0111100 . l e n g t h ] ; \r t e m p 0 0111120 _ F a l s e [ ] ; \r E N D \r E 0111140 N D ; \r \r T y p e O p n i l P r 0111160 o d T y p e O p I s N i l : \t P 0111200 U B L I C P R O C [ r e f : 0111220 R E F A N Y ] R E T U R N S 0111240 [ t e m p 0 : B O O L E A N ] 0111260 = \r B E G I N \r t r e e : \t T 0111300 y p e O p N o d e _ N A R R O 0111320 W [ r e f ] ; \r B E G I N \r E N 0111340 A B L E T h r e e C 4 S u p p 0111360 o r t . G e t S o u r c e I n f 0111400 o = > R E S U M E [ t r e e 0111420 . p o s i t i o n , t r e e . 0111440 l e n g t h ] ; \r t e m p 0 _ 0111460 T r u e [ ] ; \r E N D \r E N D 0111500 ; \r \r T y p e O p n i l P r o d 0111520 T y p e O p I s L a s t : \t P U 0111540 B L I C P R O C [ r e f : R 0111560 E F A N Y ] R E T U R N S [ 0111600 t e m p 0 : B O O L E A N ] 0111620 = \r B E G I N \r t r e e : \t T y 0111640 p e O p N o d e _ N A R R O W 0111660 [ r e f ] ; \r B E G I N \r E N A 0111700 B L E T h r e e C 4 S u p p o 0111720 r t . G e t S o u r c e I n f o 0111740 = > R E S U M E [ t r e e . 0111760 p o s i t i o n , t r e e . l 0112000 e n g t h ] ; \r t e m p 0 _ 0112020 F a l s e [ ] ; \r E N D \r E N D 0112040 ; \r \r T y p e O p n i l P r o d 0112060 T y p e O p I s F i r s t : \t P 0112100 U B L I C P R O C [ r e f : 0112120 R E F A N Y ] R E T U R N S 0112140 [ t e m p 0 : B O O L E A N ] 0112160 = \r B E G I N \r t r e e : \t T 0112200 y p e O p N o d e _ N A R R O 0112220 W [ r e f ] ; \r B E G I N \r E N 0112240 A B L E T h r e e C 4 S u p p 0112260 o r t . G e t S o u r c e I n f 0112300 o = > R E S U M E [ t r e e 0112320 . p o s i t i o n , t r e e . 0112340 l e n g t h ] ; \r t e m p 0 _ 0112360 F a l s e [ ] ; \r E N D \r E N 0112400 D ; \r \r T y p e O p n i l P r o 0112420 d T y p e O p I s C o d e : \t P 0112440 U B L I C P R O C [ r e f : 0112460 R E F A N Y ] R E T U R N S 0112500 [ t e m p 0 : B O O L E A N ] 0112520 = \r B E G I N \r t r e e : \t T 0112540 y p e O p N o d e _ N A R R O 0112560 W [ r e f ] ; \r B E G I N \r E N 0112600 A B L E T h r e e C 4 S u p p 0112620 o r t . G e t S o u r c e I n f 0112640 o = > R E S U M E [ t r e e 0112660 . p o s i t i o n , t r e e . 0112700 l e n g t h ] ; \r t e m p 0 _ 0112720 F a l s e [ ] ; \r E N D \r E N 0112740 D ; \r \r Q u a l i f i e r p r e 0112760 f i x o p P r o d C o m p i l e 0113000 Q u a l i f i e d E x p r e s s 0113020 i o n : \t P U B L I C P R O C 0113040 [ r e f : R E F A N Y , e 0113060 x p V a l u e : V a l u e N o 0113100 d e , c o n t e x t T r e e : 0113120 C o n t e x t T r e e N o d e 0113140 , c s : C o m p i l e r S t 0113160 a t e N o d e , t a r g e t T 0113200 y p e : T y p e G r a p h N o 0113220 d e N o d e ] R E T U R N S [ 0113240 t e m p 0 : V a l u e N o d e 0113260 , t e m p 1 : C o n t e x t 0113300 T r e e N o d e ] = \r B E G I 0113320 N \r t r e e : \t Q u a l i f i e 0113340 r N o d e _ N A R R O W [ r e 0113360 f ] ; \r B E G I N \r E N A B L E 0113400 T h r e e C 4 S u p p o r t . 0113420 G e t S o u r c e I n f o = > 0113440 R E S U M E [ t r e e . p o s 0113460 i t i o n , t r e e . l e n g 0113500 t h ] ; \r t r e e D a t a : \t Q 0113520 u a l i f i e r p r e f i x o p 0113540 P r o d D a t a _ N A R R O 0113560 W [ t r e e . d a t a ] ; \r t e 0113600 m p 1 _ F a k e D a m a g e 0113620 C o n t e x t T r e e [ c o n t 0113640 e x t T r e e ] ; \r t e m p 0 0113660 _ M a k e D u m m y [ " Q u a 0113700 l i f i e r . p r e f i x o p " 0113720 ] ; \r E N D \r E N D ; \r \r Q u a 0113740 l i f i e r t y p e o p P r o d 0113760 C o m p i l e Q u a l i f i e d 0114000 E x p r e s s i o n : \t P U B L 0114020 I C P R O C [ r e f : R E F 0114040 A N Y , e x p V a l u e : 0114060 V a l u e N o d e , c o n t e 0114100 x t T r e e : C o n t e x t T 0114120 r e e N o d e , c s : C o m 0114140 p i l e r S t a t e N o d e , 0114160 t a r g e t T y p e : T y p e 0114200 G r a p h N o d e N o d e ] R 0114220 E T U R N S [ t e m p 0 : V a 0114240 l u e N o d e , t e m p 1 : 0114260 C o n t e x t T r e e N o d e ] 0114300 = \r B E G I N \r t r e e : \t Q 0114320 u a l i f i e r N o d e _ N A 0114340 R R O W [ r e f ] ; \r B E G I N 0114360 \r E N A B L E T h r e e C 4 S 0114400 u p p o r t . G e t S o u r c e 0114420 I n f o = > R E S U M E [ t 0114440 r e e . p o s i t i o n , t r 0114460 e e . l e n g t h ] ; \r t r e e 0114500 D a t a : \t Q u a l i f i e r t 0114520 y p e o p P r o d D a t a _ 0114540 N A R R O W [ t r e e . d a t a 0114560 ] ; \r t e m p 1 _ F a k e D 0114600 a m a g e C o n t e x t T r e e 0114620 [ c o n t e x t T r e e ] ; \r t 0114640 e m p 0 _ M a k e D u m m y 0114660 [ " Q u a l i f i e r . p r e f 0114700 i x o p " ] ; \r E N D \r E N D ; 0114720 \r \r Q u a l i f i e r s i z e P 0114740 r o d C o m p i l e Q u a l i f 0114760 i e d E x p r e s s i o n : \t P 0115000 U B L I C P R O C [ r e f : 0115020 R E F A N Y , e x p V a l u 0115040 e : V a l u e N o d e , c o 0115060 n t e x t T r e e : C o n t e 0115100 x t T r e e N o d e , c s : 0115120 C o m p i l e r S t a t e N o d 0115140 e , t a r g e t T y p e : T 0115160 y p e G r a p h N o d e N o d e 0115200 ] R E T U R N S [ t e m p 0 : 0115220 V a l u e N o d e , t e m p 0115240 1 : C o n t e x t T r e e N o 0115260 d e ] = \r B E G I N \r t r e e 0115300 : \t Q u a l i f i e r N o d e _ 0115320 N A R R O W [ r e f ] ; \r B E 0115340 G I N \r E N A B L E T h r e e 0115360 C 4 S u p p o r t . G e t S o u 0115400 r c e I n f o = > R E S U M 0115420 E [ t r e e . p o s i t i o n , 0115440 t r e e . l e n g t h ] ; \r t 0115460 e m p 1 _ F a k e D a m a g 0115500 e C o n t e x t T r e e [ c o n 0115520 t e x t T r e e ] ; \r t e m p 0 0115540 _ M a k e D u m m y [ " Q u 0115560 a l i f i e r . p r e f i x o p 0115600 " ] ; \r E N D \r E N D ; \r \r Q u 0115620 a l i f i e r b i t s P r o d C 0115640 o m p i l e Q u a l i f i e d E 0115660 x p r e s s i o n : \t P U B L I 0115700 C P R O C [ r e f : R E F 0115720 A N Y , e x p V a l u e : V 0115740 a l u e N o d e , c o n t e x 0115760 t T r e e : C o n t e x t T r 0116000 e e N o d e , c s : C o m p 0116020 i l e r S t a t e N o d e , t 0116040 a r g e t T y p e : T y p e G 0116060 r a p h N o d e N o d e ] R E 0116100 T U R N S [ t e m p 0 : V a l 0116120 u e N o d e , t e m p 1 : C 0116140 o n t e x t T r e e N o d e ] 0116160 = \r B E G I N \r t r e e : \t Q u 0116200 a l i f i e r N o d e _ N A R 0116220 R O W [ r e f ] ; \r B E G I N \r 0116240 E N A B L E T h r e e C 4 S u 0116260 p p o r t . G e t S o u r c e I 0116300 n f o = > R E S U M E [ t r 0116320 e e . p o s i t i o n , t r e 0116340 e . l e n g t h ] ; \r t e m p 1 0116360 _ F a k e D a m a g e C o n 0116400 t e x t T r e e [ c o n t e x t 0116420 T r e e ] ; \r t e m p 0 _ M 0116440 a k e D u m m y [ " Q u a l i f 0116460 i e r . p r e f i x o p " ] ; \r 0116500 E N D \r E N D ; \r \r Q u a l i f 0116520 i e r b y t e s P r o d C o m p 0116540 i l e Q u a l i f i e d E x p r 0116560 e s s i o n : \t P U B L I C P 0116600 R O C [ r e f : R E F A N Y 0116620 , e x p V a l u e : V a l u 0116640 e N o d e , c o n t e x t T r 0116660 e e : C o n t e x t T r e e N 0116700 o d e , c s : C o m p i l e 0116720 r S t a t e N o d e , t a r g 0116740 e t T y p e : T y p e G r a p 0116760 h N o d e N o d e ] R E T U R 0117000 N S [ t e m p 0 : V a l u e N 0117020 o d e , t e m p 1 : C o n t 0117040 e x t T r e e N o d e ] = \r B 0117060 E G I N \r t r e e : \t Q u a l i 0117100 f i e r N o d e _ N A R R O W 0117120 [ r e f ] ; \r B E G I N \r E N A 0117140 B L E T h r e e C 4 S u p p o 0117160 r t . G e t S o u r c e I n f o 0117200 = > R E S U M E [ t r e e . 0117220 p o s i t i o n , t r e e . l 0117240 e n g t h ] ; \r t e m p 1 _ 0117260 F a k e D a m a g e C o n t e x 0117300 t T r e e [ c o n t e x t T r e 0117320 e ] ; \r t e m p 0 _ M a k e 0117340 D u m m y [ " Q u a l i f i e r 0117360 . p r e f i x o p " ] ; \r E N D 0117400 \r E N D ; \r \r Q u a l i f i e r 0117420 u n i t s P r o d C o m p i l e 0117440 Q u a l i f i e d E x p r e s s 0117460 i o n : \t P U B L I C P R O C 0117500 [ r e f : R E F A N Y , e 0117520 x p V a l u e : V a l u e N o 0117540 d e , c o n t e x t T r e e : 0117560 C o n t e x t T r e e N o d e 0117600 , c s : C o m p i l e r S t 0117620 a t e N o d e , t a r g e t T 0117640 y p e : T y p e G r a p h N o 0117660 d e N o d e ] R E T U R N S [ 0117700 t e m p 0 : V a l u e N o d e 0117720 , t e m p 1 : C o n t e x t 0117740 T r e e N o d e ] = \r B E G I 0117760 N \r t r e e : \t Q u a l i f i e 0120000 r N o d e _ N A R R O W [ r e 0120020 f ] ; \r B E G I N \r E N A B L E 0120040 T h r e e C 4 S u p p o r t . 0120060 G e t S o u r c e I n f o = > 0120100 R E S U M E [ t r e e . p o s 0120120 i t i o n , t r e e . l e n g 0120140 t h ] ; \r t e m p 1 _ F a k 0120160 e D a m a g e C o n t e x t T r 0120200 e e [ c o n t e x t T r e e ] ; 0120220 \r t e m p 0 _ M a k e D u m 0120240 m y [ " Q u a l i f i e r . p r 0120260 e f i x o p " ] ; \r E N D \r E N 0120300 D ; \r \r Q u a l i f i e r w o r 0120320 d s P r o d C o m p i l e Q u a 0120340 l i f i e d E x p r e s s i o n 0120360 : \t P U B L I C P R O C [ r e 0120400 f : R E F A N Y , e x p V 0120420 a l u e : V a l u e N o d e , 0120440 c o n t e x t T r e e : C o 0120460 n t e x t T r e e N o d e , c 0120500 s : C o m p i l e r S t a t e 0120520 N o d e , t a r g e t T y p e 0120540 : T y p e G r a p h N o d e N 0120560 o d e ] R E T U R N S [ t e m 0120600 p 0 : V a l u e N o d e , t 0120620 e m p 1 : C o n t e x t T r e 0120640 e N o d e ] = \r B E G I N \r t 0120660 r e e : \t Q u a l i f i e r N o 0120700 d e _ N A R R O W [ r e f ] ; 0120720 \r B E G I N \r E N A B L E T h 0120740 r e e C 4 S u p p o r t . G e t 0120760 S o u r c e I n f o = > R E 0121000 S U M E [ t r e e . p o s i t i 0121020 o n , t r e e . l e n g t h ] 0121040 ; \r t e m p 1 _ F a k e D a 0121060 m a g e C o n t e x t T r e e [ 0121100 c o n t e x t T r e e ] ; \r t e 0121120 m p 0 _ M a k e D u m m y [ 0121140 " Q u a l i f i e r . p r e f i 0121160 x o p " ] ; \r E N D \r E N D ; \r 0121200 \r Q u a l i f i e r a p p l y P 0121220 r o d C o m p i l e Q u a l i f 0121240 i e d E x p r e s s i o n : \t P 0121260 U B L I C P R O C [ r e f : 0121300 R E F A N Y , e x p V a l u 0121320 e : V a l u e N o d e , c o 0121340 n t e x t T r e e : C o n t e 0121360 x t T r e e N o d e , c s : 0121400 C o m p i l e r S t a t e N o d 0121420 e , t a r g e t T y p e : T 0121440 y p e G r a p h N o d e N o d e 0121460 ] R E T U R N S [ t e m p 0 : 0121500 V a l u e N o d e , t e m p 0121520 1 : C o n t e x t T r e e N o 0121540 d e ] = \r B E G I N \r t r e e 0121560 : \t Q u a l i f i e r N o d e _ 0121600 N A R R O W [ r e f ] ; \r B E 0121620 G I N \r E N A B L E T h r e e 0121640 C 4 S u p p o r t . G e t S o u 0121660 r c e I n f o = > R E S U M 0121700 E [ t r e e . p o s i t i o n , 0121720 t r e e . l e n g t h ] ; \r t 0121740 r e e D a t a : \t Q u a l i f i 0121760 e r a p p l y P r o d D a t a 0122000 _ N A R R O W [ t r e e . d a 0122020 t a ] ; \r t e m p 1 _ F a k 0122040 e D a m a g e C o n t e x t T r 0122060 e e [ c o n t e x t T r e e ] ; 0122100 \r t e m p 0 _ M a k e D u m 0122120 m y [ " Q u a l i f i e r . a p 0122140 p l y " ] ; \r E N D \r E N D ; \r 0122160 \r Q u a l i f i e r s e l e c t 0122200 P r o d C o m p i l e Q u a l i 0122220 f i e d E x p r e s s i o n : \t 0122240 P U B L I C P R O C [ r e f : 0122260 R E F A N Y , e x p V a l 0122300 u e : V a l u e N o d e , c 0122320 o n t e x t T r e e : C o n t 0122340 e x t T r e e N o d e , c s : 0122360 C o m p i l e r S t a t e N o 0122400 d e , t a r g e t T y p e : 0122420 T y p e G r a p h N o d e N o d 0122440 e ] R E T U R N S [ t e m p 0 0122460 : V a l u e N o d e , t e m 0122500 p 1 : C o n t e x t T r e e N 0122520 o d e ] = \r B E G I N \r t r e 0122540 e : \t Q u a l i f i e r N o d e 0122560 _ N A R R O W [ r e f ] ; \r B 0122600 E G I N \r E N A B L E T h r e 0122620 e C 4 S u p p o r t . G e t S o 0122640 u r c e I n f o = > R E S U 0122660 M E [ t r e e . p o s i t i o n 0122700 , t r e e . l e n g t h ] ; \r 0122720 t r e e D a t a : \t Q u a l i f 0122740 i e r s e l e c t P r o d D a t 0122760 a _ N A R R O W [ t r e e . 0123000 d a t a ] ; \r t e m p 1 _ F 0123020 a k e D a m a g e C o n t e x t 0123040 T r e e [ c o n t e x t T r e e 0123060 ] ; \r t e m p 0 _ M a k e D 0123100 u m m y [ " Q u a l i f i e r . 0123120 p r e f i x o p " ] ; \r E N D \r 0123140 E N D ; \r \r Q u a l i f i e r i 0123160 n d i r e c t P r o d C o m p i 0123200 l e Q u a l i f i e d E x p r e 0123220 s s i o n : \t P U B L I C P R 0123240 O C [ r e f : R E F A N Y , 0123260 e x p V a l u e : V a l u e 0123300 N o d e , c o n t e x t T r e 0123320 e : C o n t e x t T r e e N o 0123340 d e , c s : C o m p i l e r 0123360 S t a t e N o d e , t a r g e 0123400 t T y p e : T y p e G r a p h 0123420 N o d e N o d e ] R E T U R N 0123440 S [ t e m p 0 : V a l u e N o 0123460 d e , t e m p 1 : C o n t e 0123500 x t T r e e N o d e ] = \r B E 0123520 G I N \r t r e e : \t Q u a l i f 0123540 i e r N o d e _ N A R R O W [ 0123560 r e f ] ; \r B E G I N \r E N A B 0123600 L E T h r e e C 4 S u p p o r 0123620 t . G e t S o u r c e I n f o 0123640 = > R E S U M E [ t r e e . p 0123660 o s i t i o n , t r e e . l e 0123700 n g t h ] ; \r t e m p 1 _ F 0123720 a k e D a m a g e C o n t e x t 0123740 T r e e [ c o n t e x t T r e e 0123760 ] ; \r t e m p 0 _ M a k e D 0124000 u m m y [ " Q u a l i f i e r . 0124020 p r e f i x o p " ] ; \r E N D \r 0124040 E N D ; \r \r E N D . . \r 0124054