$ 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