$ od -c -N 50000 [qv]<IDL>koto>IDLARRAYMETHODS.DCOM!1 0000000 ( F I L E C R E A T E D " 2 5 0000020 - J u n - 8 6 0 1 : 4 7 : 3 7 0000040 " ( " c o m p i l e d o n 0000060 " { Q V } < P E D E R S E N > 0000100 L I S P > I D L A R R A Y M E T 0000120 H O D S . ; 6 ) \r " 1 2 - N o 0000140 v - 8 5 1 4 : 5 9 : 2 3 " r 0000160 e c o m p i l e d c h a n g e 0000200 s : A P P L Y - D Y A D I C - 0000220 M E T H O D A P P L Y - M O N 0000240 A D I C - M E T H O D \r A P P 0000260 L Y - N A D I C - M E T H O D M 0000300 A C R O A P P L Y - R E D U C 0000320 T I O N - M E T H O D A P P L 0000340 Y - S C A N - M E T H O D i n 0000360 " I N T E R L I S P - D 1 1 0000400 - M a y - 8 6 . . . " d a t 0000420 e d \r " 1 1 - M a y - 8 6 1 0000440 5 : 1 9 : 0 8 " ) \r ( F I L E C 0000460 R E A T E D " 2 5 - J u n - 8 0000500 6 0 1 : 4 7 : 0 1 " { Q V } 0000520 < P E D E R S E N > L I S P > I 0000540 D L A R R A Y M E T H O D S . ; 0000560 6 7 9 1 1 c h a n g e s t 0000600 o : ( V A R S \r I D L A R R 0000620 A Y M E T H O D S C O M S ) ( 0000640 F N S A P P L Y - D Y A D I C 0000660 - M E T H O D A P P L Y - M O 0000700 N A D I C - M E T H O D A P P 0000720 L Y - R E D U C T I O N - M E T 0000740 H O D \r A P P L Y - S C A N - 0000760 M E T H O D A P P L Y - N A D 0001000 I C - M E T H O D M A C R O M 0001020 E D I A N - M E T H O D M E A 0001040 N - M E T H O D V A R I A N C 0001060 E - M E T H O D P L U S - M E 0001100 T H O D \r D I F F E R E N C E 0001120 - M E T H O D Q U O T I E N T 0001140 - M E T H O D T I M E S - M E 0001160 T H O D M I N - M E T H O D 0001200 M A X - M E T H O D I D L - M 0001220 I N I D L - M A X R E S I D 0001240 U E - M E T H O D \r C E I L I 0001260 N G - M E T H O D M I N U S - 0001300 M E T H O D F L O O R - M E T 0001320 H O D ) p r e v i o u s d a 0001340 t e : " 6 - J u n - 8 6 1 0001360 1 : 4 7 : 1 5 " \r { Q V } < P 0001400 E D E R S E N > L I S P > I D L 0001420 A R R A Y M E T H O D S . ; 5 ) 0001440 \r A P P L Y - D Y A D I C - M E 0001460 T H O D D 1 \r ( P 0 S P E 0001500 C I F I C - M E T H O D I 3 0001520 R E S U L T I 2 R I G H 0001540 T I D L A R R A Y I 1 L E 0001560 F T I D L A R R A Y I 0 M 0001600 E T H O D N A M E ) \0 ! 001 \0 \0 0001620 004 @ A B ` \0 \0 \f \0 \0 021 001 \0 H 230 A 0001640 B C l 003 H 017 016 020 o \0 \0 \0 @ \n \0 \0 0001660 020 \0 ( 3 6 Q E R R O R 1 0 Q 0001700 F I N D - D Y A D I C - M E T 0001720 H O D ) \r ( 5 D Y A D I C - M 0001740 E T H O D - T R E E S ) \r ( 3 0001760 2 Q " N o s u c h m e t h 0002000 o d " ) \r A P P L Y - D Y A D I 0002020 C - S P E C I F I E R D 1 \r ( 0002040 P 1 R S P E C I F I E R P 0002060 0 L S P E C I F I E R I 0002100 2 S P E C I F I E R I 1 0002120 R I G H T G E N A R R A Y I 0002140 0 L E F T G E N A R R A Y ) 0002160 \0 026 002 \0 \0 003 B 001 B 002 001 021 002 001 @ H 0002200 \n \0 \0 264 \a A I \n \0 \0 020 \0 ( 2 3 Q 0002220 I D L A R R A Y - T Y P E P 0002240 1 4 Q I D L A R R A Y - T Y P 0002260 E P ) \r N I L \r ( ) \r A P P L Y 0002300 - M O N A D I C - M E T H O D 0002320 D 1 \r ( P 0 S P E C I F I C 0002340 - M E T H O D I 2 R E S U 0002360 L T I 1 I D L A R R A Y 0002400 I 0 M E T H O D N A M E ) 0002420 \0 036 001 \0 \0 003 @ A ` \0 \0 \v \0 \0 021 001 0002440 \0 H 227 A B l 002 H 017 016 020 o \0 \0 \0 \t 0002460 \0 \0 020 \0 ( 3 3 Q E R R O R 7 0002500 F I N D - M O N A D I C - M E 0002520 T H O D ) \r ( 4 M O N A D I C 0002540 - M E T H O D - T R E E S ) \r ( 0002560 3 0 Q " N o s u c h m e 0002600 t h o d " ) \r A P P L Y - N A D 0002620 I C - M E T H O D M A C R O D 0002640 1 \r ( P 1 K E Y A R R A Y 0002660 P 0 M E T H O D N A M E I 0002700 0 A R G S ) \0 V 002 \0 \0 001 @ 0002720 001 @ 002 001 021 002 001 g \0 \0 g \0 \0 g \0 \0 0002740 H I o \0 \0 \0 032 032 032 h 032 032 h 032 o \0 0002760 \0 \0 g \0 \0 g \0 \0 g \0 \0 g \0 \0 g \0 0003000 \0 @ 002 \t \0 \0 032 032 g \0 \0 g \0 \0 o \0 0003020 \0 \0 H h 032 032 032 h 032 032 032 032 032 032 h 032 0003040 032 032 032 020 \0 ( 6 6 Q \ A P P E N 0003060 D 2 ) \r ( 7 6 Q E R R O R 7 0003100 3 Q e l s e 6 1 Q S P E C 0003120 I F I C - M E T H O D 5 6 Q 0003140 A P P L Y * 5 3 Q t h e n 0003160 5 0 Q S P E C I F I C - M E T 0003200 H O D 4 5 Q i f 2 0 Q F 0003220 I N D - M O N A D I C - M E T H 0003240 O D 1 5 Q S P E C I F I C - 0003260 M E T H O D 1 2 Q L E T ) \r 0003300 ( 1 0 2 Q " N o s u c h 0003320 n a d i c m e t h o d " 4 2 0003340 Q ( D E C L A R E ( G L O B 0003360 A L V A R S M O N A D I C - M 0003400 E T H O D - T R E E S ) ) 2 6 0003420 Q ( M O N A D I C - M E T H O 0003440 D - T R E E S ) ) \r A P P L Y - 0003460 R E D U C T I O N - M E T H O D 0003500 D 1 \r ( P 0 S P E C I F I 0003520 C - M E T H O D I 3 R E S 0003540 U L T I 2 A X I S I 1 0003560 I D L A R R A Y I 0 F N 0003600 ) \0 001 \0 \0 004 @ A ` \0 \0 \v \0 \0 0003620 021 001 \0 H 230 A B C l 003 H 017 016 020 o \0 0003640 \0 \0 @ \n \0 \0 020 \0 ( 3 5 Q E R R 0003660 O R 7 F I N D - M O N A D I 0003700 C - M E T H O D ) \r ( 4 R E D 0003720 U C T I O N - M E T H O D - T R 0003740 E E S ) \r ( 3 1 Q " N o s 0003760 u c h r e d u c t i o n m e 0004000 t h o d " ) \r A P P L Y - S C A 0004020 N - M E T H O D D 1 \r ( P 0 0004040 S P E C I F I C - M E T H O D 0004060 I 3 R E S U L T I 2 0004100 A X I S I 1 I D L A R R A 0004120 Y I 0 M E T H O D N A M E 0004140 ) \0 037 001 \0 \0 004 @ A ` \0 \0 \v \0 \0 0004160 021 001 \0 H 227 A C l 002 H 017 016 020 o \0 \0 0004200 \0 @ \n \0 \0 020 \0 ( 3 4 Q E R R O 0004220 R 7 F I N D - M O N A D I C 0004240 - M E T H O D ) \r ( 4 S C A N 0004260 - M E T H O D - T R E E S ) \r ( 0004300 3 0 Q " N o s u c h s c 0004320 a n m e t h o d " ) \r D Y A D 0004340 I C - M O S T - S P E C I F I C 0004360 - N O D E D 1 \r ( P 4 N O 0004400 D E P 2 C U R R E N T N O 0004420 D E P 1 M O S T S P E C I 0004440 F I C N O D E P 0 C U R R 0004460 E N T C H I L D R E N I 3 0004500 T R E E I 2 R I G H T I D 0004520 L A R R A Y I 1 L E F T I 0004540 D L A R R A Y I 0 M E T H 0004560 O D N A M E ) \0 L 005 \0 \0 004 A B 0004600 C 001 \v \0 \0 264 037 C 002 002 001 C 002 001 @ ' 0004620 264 003 C 021 022 002 H 021 021 004 K 003 265 \t h 022 0004640 Z 265 031 I 020 001 274 A B L 001 \v \0 \0 225 L 0004660 265 357 i 260 354 K 002 [ 260 343 002 002 001 270 J 002 0004700 001 @ ' 262 323 J 271 260 317 \0 ( 5 7 Q A 0004720 P P L Y - D Y A D I C - S P E C 0004740 I F I E R 6 A P P L Y - D Y 0004760 A D I C - S P E C I F I E R ) \r 0005000 N I L \r ( ) \r F I N D - D Y A D 0005020 I C - M E T H O D D 1 \r ( P 0005040 4 M E T H O D S P 3 N O 0005060 D E P 2 R E S U L T P 0005100 1 T R E E I 3 T R E E S 0005120 I 2 R I G H T I D L A R R 0005140 A Y I 1 L E F T I D L A R 0005160 R A Y I 0 M E T H O D N A 0005200 M E ) \0 ( 005 \0 \0 004 C 021 ! 002 H 003 0005220 265 003 212 001 271 @ A B I \f \0 \0 Z 235 J 022 0005240 021 021 004 K d 221 002 001 \ @ ' 020 H 002 X 260 0005260 340 \0 ( 2 1 Q D Y A D I C - M O 0005300 S T - S P E C I F I C - N O D E 0005320 ) \r N I L \r ( ) \r F I N D - M O 0005340 N A D I C - M E T H O D D 1 \r 0005360 ( P 4 M E T H O D S P 3 0005400 N O D E P 2 R E S U L T 0005420 P 1 T R E E I 2 T R 0005440 E E S I 1 I D L A R R A Y 0005460 I 0 M E T H O D N A M E ) 0005500 \0 ' 005 \0 \0 003 B 021 ! 002 H 003 265 003 211 0005520 001 271 @ A I \v \0 \0 Z 235 J 022 021 021 004 K 0005540 d 221 002 001 \ @ ' 020 H 002 X 260 341 \0 ( 2 0005560 0 Q M O N A D I C - M O S T - 0005600 S P E C I F I C - N O D E ) \r N 0005620 I L \r ( ) \r ( P R E T T Y C O M 0005640 P R I N T I D L A R R A Y M E 0005660 T H O D S C O M S ) \r ( R P A Q 0005700 Q I D L A R R A Y M E T H O D 0005720 S C O M S ( ( * F i l e c 0005740 r e a t e d b y C o m s M 0005760 a n a g e r . ) ( F N S A P 0006000 P L Y - D Y A D I C - M E T H O 0006020 D \r A P P L Y - D Y A D I C - 0006040 S P E C I F I E R A P P L Y - 0006060 M O N A D I C - M E T H O D A 0006100 P P L Y - N A D I C - M E T H O 0006120 D M A C R O A P P L Y - R E D 0006140 U C T I O N - M E T H O D \r A 0006160 P P L Y - S C A N - M E T H O D 0006200 D Y A D I C - M O S T - S P E 0006220 C I F I C - N O D E F I N D - 0006240 D Y A D I C - M E T H O D F I 0006260 N D - M O N A D I C - M E T H O 0006300 D ) ( R E C O R D S \r M E T 0006320 H O D - T R E E - N O D E ) ( 0006340 V A R S D Y A D I C - M E T H 0006360 O D - T R E E S M O N A D I C 0006400 - M E T H O D - T R E E S R E 0006420 D U C T I O N - M E T H O D - T 0006440 R E E S \r S C A N - M E T H O 0006460 D - T R E E S ) ( M A C R O S 0006500 A P P L Y - N A D I C - M E T 0006520 H O D ) ) ) \r ( R E C O R D M 0006540 E T H O D - T R E E - N O D E 0006560 ( T Y P E - S P E C I F I E R 0006600 M E T H O D S C H I L D R E N 0006620 ) ) \r ( R P A Q Q D Y A D I C 0006640 - M E T H O D - T R E E S ( ( 0006660 ( ( N U M E R I C N I L ) ( 0006700 N U M E R I C N I L ) ) N I 0006720 L ( ( ( ( N U M E R I C 0 ) 0006740 ( N U M E R I C N I L ) ) 0006760 N I L ( ( ( ( \r N U M E R I C 0007000 0 ) ( N U M E R I C 0 ) ) 0007020 N I L N I L ) ) ) ( ( ( N 0007040 U M E R I C N I L ) ( N U M 0007060 E R I C 0 ) ) N I L N I L 0007100 ) ) ) ( ( ( L O G I C A L N 0007120 I L ) ( L O G I C A L \r N I 0007140 L ) ) N I L ( ( ( ( L O G I 0007160 C A L 0 ) ( L O G I C A L 0007200 N I L ) ) N I L ( ( ( ( L O 0007220 G I C A L 0 ) ( L O G I C A 0007240 L 0 ) ) N I L N I L ) ) ) 0007260 ( ( ( L O G I C A L N I L ) 0007300 ( \r L O G I C A L 0 ) ) N 0007320 I L N I L ) ) ) ( ( ( N I L 0007340 N I L ) ( N I L N I L ) ) 0007360 ( B L T G E N E R I C - B L 0007400 T M E M B E R G E N E R I C 0007420 - M E M B E R I N D E X O F 0007440 \r G E N E R I C - I N D E X O F 0007460 ) ( ( ( ( N I L 0 ) ( N I 0007500 L N I L ) ) N I L ( ( ( ( 0007520 N I L 0 ) ( N I L 0 ) ) 0007540 N I L N I L ) ) ) ( ( ( N I 0007560 L N I L ) ( N I L 0 ) ) 0007600 N I L N I L \r ) ) ) ) ) \r ( R 0007620 P A Q Q M O N A D I C - M E T 0007640 H O D - T R E E S ( ( ( N I L 0007660 N I L ) N I L ( ( ( N I L 0007700 0 ) N I L N I L ) ( ( N 0007720 I L 1 + ) ( F I L L G E N 0007740 E R I C - F I L L S O R T \r 0007760 G E N E R I C - S O R T ) N I 0010000 L ) ) ) ) ) \r ( R P A Q Q R E 0010020 D U C T I O N - M E T H O D - T 0010040 R E E S ( ( ( N I L N I L ) 0010060 N I L N I L ) ) ) \r ( R P A 0010100 Q Q S C A N - M E T H O D - T 0010120 R E E S ( ( ( N I L N I L ) 0010140 N I L N I L ) ) ) \r ( P U T 0010160 P R O P S A P P L Y - N A D I 0010200 C - M E T H O D M A C R O ( 0010220 A R G S ( A P P L Y - N A D I 0010240 C - M E T H O D M A C R O A R 0010260 G S ) ) ) \r ( P U T P R O P S 0010300 I D L A R R A Y M E T H O D S 0010320 C O P Y R I G H T ( " X e r o 0010340 x C o r p o r a t i o n " 1 0010360 9 8 6 ) ) \r N I L \r 0010372