$ od -c -N 50000 [phylum]<LISPUSERS>koto>DATEFORMAT-EDITOR.DCOM!1
0000000 ( F I L E C R E A T E D " 2 0
0000020 - F e b - 8 7 0 1 : 3 8 : 1 6
0000040 " ( " c o m p i l e d o n
0000060 " \r { F I R E F S : C S : U N
0000100 I V % R O C H E S T E R } < K
0000120 O O M E N > L I S P > D A T E F
0000140 O R M A T - E D I T O R . ; 7 )
0000160 " 1 2 - N o v - 8 5 1 4 : 5
0000200 9 : 2 3 " r e c o m p i l e d
0000220 e x p r s : \r D A T E F O R
0000240 M A T - E D I T O R - P U T - S
0000260 T A T E i n " I N T E R L I
0000300 S P - D 1 2 - J a n - 8 7 .
0000320 . . " d a t e d " 1 2 - J a
0000340 n - 8 7 2 1 : 3 3 : 1 3 " ) \r
0000360 ( F I L E C R E A T E D " 2 0
0000400 - F e b - 8 7 0 1 : 3 7 : 1 9
0000420 " { F I R E F S : C S : U N I
0000440 V % R O C H E S T E R } < K O
0000460 O M E N > L I S P > D A T E F O
0000500 R M A T - E D I T O R . ; 7 1
0000520 9 3 7 8 \r c h a n g e s t o
0000540 : ( F N S D A T E F O R M A
0000560 T - E D I T O R - P U T - S T A
0000600 T E D A T E F O R M A T - E D
0000620 I T O R - G E T - S T A T E \
0000640 D F E - O U T D A T E ) ( V A
0000660 R S \r D A T E F O R M A T - E
0000700 D I T O R C O M S $ $ D A T E
0000720 F O R M A T - E D I T O R - I T
0000740 E M S ) p r e v i o u s d a
0000760 t e : " 1 2 - F e b - 8 7 1
0001000 7 : 0 1 : 3 8 " \r { F I R E F
0001020 S : C S : U N I V % R O C H E
0001040 S T E R } < K O O M E N > L I S
0001060 P > D A T E F O R M A T - E D I
0001100 T O R . ; 5 ) \r E D I T - D A T
0001120 E F O R M A T A 0 0 0 1 D 1 \r
0001140 ( N A M E E R R O R S E T F
0001160 0 D F E ) \0 022 \0 001 002 \0 P \t
0001200 \0 \0 g \0 \0 360 225 \b \0 \0 277 260 363 i 020 \0
0001220 ( 1 3 Q B L O C K 3 D A T
0001240 E F O R M A T - E D I T O R - S
0001260 T A T U S ) \r ( 6 E D I T ) \r
0001300 ( ) \r E D I T - D A T E F O R M
0001320 A T D 1 \r ( P 0 D F E I
0001340 0 D A T E F O R M A T ) \0
0001360 * 001 \0 \0 001 \b \0 \0 021 001 \0 H @ \n \0 \0
0001400 H \t \0 \0 o \0 \0 \0 \t \0 \0 H \t \0 \0 H
0001420 \t \0 \0 g \0 \0 360 264 006 H \t \0 \0 020 \0 (
0001440 4 7 Q D A T E F O R M A T - E
0001460 D I T O R - G E T - S T A T E
0001500 3 5 Q D A T E F O R M A T - E
0001520 D I T O R - S T A T U S 3 1 Q
0001540 C L O S E W 2 5 Q E D I T
0001560 - D A T E F O R M A T A 0 0 0 1
0001600 1 6 Q O P E N W 1 2 Q D
0001620 A T E F O R M A T - E D I T O R
0001640 - P U T - S T A T E 2 G E T
0001660 - D A T E F O R M A T - E D I T
0001700 O R ) \r ( 4 0 Q Q U I T ) \r (
0001720 2 2 Q ( E D I T - D A T E F
0001740 O R M A T A 0 0 0 1 ) ) \r G E T
0001760 - D A T E F O R M A T - E D I T
0002000 O R D 1 \r ( P 1 R P 0
0002020 D F E I 0 R E C O M P U
0002040 T E ? ) \0 215 004 \0 \0 001 ` \0 \0 021 1
0002060 003 @ 263 033 H \t \0 \0 262 025 H \t \0 \0 d 225
0002100 d g \0 \0 360 222 277 i 201 277 h 262 5 ` \0 \0
0002120 \t \0 \0 X 027 \0 \0 g \0 \0 i \v \0 \0 277 H
0002140 g \0 \0 g \0 \0 \v \0 \0 277 H g \0 \0 g \0
0002160 \0 \v \0 \0 277 H g \0 \0 g \0 \0 \v \0 \0 277
0002200 H \t \0 \0 Y H ` \0 \0 ` \0 \0 I 002 002 001
0002220 331 272 d J 361 221 277 J ` \0 \0 ` \0 \0 I 002
0002240 002 002 001 331 273 d K 361 221 277 K \v \0 \0 H g
0002260 \0 \0 \n \0 \0 H 020 \0 ( 2 1 1 Q D A
0002300 T E F O R M A T - E D I T O R -
0002320 S T A T U S 2 0 2 Q M O V E
0002340 W 1 3 0 Q W I N D O W R E G
0002360 I O N 1 2 3 Q P U T W I N D
0002400 O W P R O P 1 1 0 Q P U T W
0002420 I N D O W P R O P 7 5 Q P U
0002440 T W I N D O W P R O P 6 2 Q
0002460 P U T W I N D O W P R O P 4 7
0002500 Q F M . F O R M A T M E N U
0002520 2 2 Q D A T E F O R M A T - E
0002540 D I T O R - S T A T U S 1 4 Q
0002560 W I N D O W P ) \r ( 2 0 6 Q
0002600 E D I T 1 6 2 Q S C R E E N
0002620 H E I G H T 1 5 7 Q L A S T
0002640 M O U S E Y 1 4 0 Q S C R E
0002660 E N W I D T H 1 3 5 Q L A S
0002700 T M O U S E X 1 2 0 Q D O N
0002720 ' T 1 1 5 Q R E S H A P E F
0002740 N 1 0 5 Q D O N ' T 1 0 2
0002760 Q S H R I N K F N 7 2 Q D
0003000 A T E F O R M A T - E D I T O R
0003020 - C L O S E F N 6 7 Q C L O
0003040 S E F N 5 6 Q D A T E F O R
0003060 M A T - E D I T O R P 5 3 Q
0003100 $ $ D A T E F O R M A T - E D I
0003120 T O R 4 4 Q D A T E F O R M
0003140 A T - E D I T O R - I T E M S
0003160 3 0 Q E D I T 2 $ $ D A T
0003200 E F O R M A T - E D I T O R ) \r
0003220 ( ) \r D A T E F O R M A T - E D
0003240 I T O R - S T A T U S D 1 \r (
0003260 I 1 N E W S T A T U S I
0003300 0 D F E ) \0 024 \0 \0 \0 002 A 230 @
0003320 g \0 \0 A \v \0 \0 020 @ g \0 \0 \n \0 \0 020
0003340 \0 ( 2 1 Q G E T W I N D O W U
0003360 S E R P R O P 1 1 Q P U T W
0003400 I N D O W P R O P ) \r ( 1 6 Q
0003420 D A T E F O R M A T - E D I T O
0003440 R - S T A T U S 5 D A T E F
0003460 O R M A T - E D I T O R - S T A
0003500 T U S ) \r ( ) \r D A T E F O R M
0003520 A T - E D I T O R - G E T - S T
0003540 A T E D 1 \r ( P 1 F M T
0003560 P 0 S T A T E I 0 D F
0003600 E ) 001 . 002 \0 \0 001 @ \t \0 \0 021 021 001
0003620 H g \0 \0 ' d g \0 \0 360 263 = d g \0 \0
0003640 360 230 277 g \0 \0 I 032 Y 260 . d g \0 \0 360
0003660 230 277 g \0 \0 I 032 Y 260 037 d g \0 \0 360 227
0003700 277 g \0 \0 I 032 Y 216 g \0 \0 360 226 g \0 \0
0003720 I 032 Y 202 \b \0 \0 277 H g \0 \0 ' d g \0
0003740 \0 360 256 g \0 \0 360 226 g \0 \0 I 032 Y 202 \b
0003760 \0 \0 277 H g \0 \0 ' d g \0 \0 360 263 037 d
0004000 g \0 \0 360 227 277 g \0 \0 I 032 Y 216 g \0 \0
0004020 360 226 g \0 \0 I 032 Y 202 \b \0 \0 277 H g \0
0004040 \0 ' d g \0 \0 360 263 & d g \0 \0 360 230 277
0004060 g \0 \0 I 032 Y 260 027 g \0 \0 360 234 g \0 \0
0004100 I 032 271 g \0 \0 I 032 Y 202 \b \0 \0 277 H g
0004120 \0 \0 ' d g \0 \0 360 256 g \0 \0 360 226 g \0
0004140 \0 I 032 Y 202 \b \0 \0 277 H g \0 \0 ' d g
0004160 \0 \0 360 263 037 d g \0 \0 360 227 277 g \0 \0 I
0004200 032 Y 216 g \0 \0 360 226 g \0 \0 I 032 Y 202 \b
0004220 \0 \0 277 H g \0 \0 ' d g \0 \0 360 256 g \0
0004240 \0 360 226 g \0 \0 I 032 Y 202 \b \0 \0 277 g \0
0004260 \0 I \n \0 \0 020 \0 ( 4 5 3 Q A P P
0004300 L Y 4 4 3 Q S H O U L D N T
0004320 4 1 0 Q S H O U L D N T 3
0004340 3 6 Q S H O U L D N T 3 0 3
0004360 Q S H O U L D N T 2 2 2 Q
0004400 S H O U L D N T 1 5 0 Q S H
0004420 O U L D N T 1 1 5 Q S H O U
0004440 L D N T 3 F M . R E A D S T
0004460 A T E ) \r ( 4 4 7 Q D A T E F
0004500 O R M A T 4 3 4 Q T I M E .
0004520 Z O N E 4 2 7 Q y e s 4 2
0004540 2 Q n o 4 1 5 Q T I M E Z
0004560 O N E 4 0 1 Q N O . T I M E
0004600 3 7 4 Q n o n e 3 6 5 Q
0004620 N O . S E C O N D S 3 5 7 Q
0004640 h h : m m 3 5 0 Q h h : m m
0004660 : s s 3 4 3 Q T I M E 3 2
0004700 7 Q N O . L E A D I N G . S P
0004720 A C E S 3 2 2 Q n o 3 1 5
0004740 Q y e s 3 1 0 Q L E A D E
0004760 R 2 7 4 Q D A Y . S H O R T
0005000 2 6 6 Q D A Y . O F . W E E
0005020 K 2 6 1 Q s h o r t 2 5 1
0005040 Q D A Y . O F . W E E K 2 4
0005060 3 Q l o n g 2 3 4 Q n o n
0005100 e 2 2 7 Q D A Y 2 1 3 Q
0005120 N U M B E R . O F . M O N T H
0005140 2 0 6 Q n u m e r i c 1 7 7
0005160 Q M O N T H . L O N G 1 7 1
0005200 Q a l p h a - l o n g 1 6 2
0005220 Q a l p h a - s h o r t 1 5
0005240 5 Q M O N T H 1 4 1 Q Y E
0005260 A R . L O N G 1 3 4 Q l o n
0005300 g 1 2 7 Q s h o r t 1 2 2
0005320 Q Y E A R 1 0 6 Q N O . D
0005340 A T E 1 0 1 Q n o n e 7 2
0005360 Q M O N T H . L E A D I N G
0005400 6 4 Q m o n % d d , % y y
0005420 5 3 Q S P A C E S 4 5 Q
0005440 d d % m o n % y y 3 4 Q
0005460 S L A S H E S 2 6 Q d d / m
0005500 o n / y y 1 7 Q d d - m o n
0005520 - y y 1 2 Q D A T E ) \r ( )
0005540 \r D A T E F O R M A T - E D I T
0005560 O R - P U T - S T A T E D 1 \r
0005600 ( P 1 1 Q I P 1 0 Q F
0005620 M T P 7 T I M E Z O N E
0005640 P 6 T I M E P 5 L E A
0005660 D E R P 4 D A Y P 3
0005700 M O N T H P 2 Y E A R P
0005720 1 D A T E I 1 D A T E
0005740 F O R M A T I 0 D F E )
0005760 001 e \n \0 \0 002 A d 231 003 001 g \0 \0 360 264
0006000 004 A 002 g \0 \0 g \0 \0 g \0 \0 g \0 \0 g
0006020 \0 \0 g \0 \0 g \0 \0 021 030 \b H 003 265 \f @
0006040 g \0 \0 \n \0 \0 261 001 / 001 _ 020 d g \0 \0
0006060 360 227 277 g \0 \0 271 261 \0 243 g \0 \0 360 226 g
0006100 \0 \0 273 261 \0 227 O 020 d g \0 \0 360 227 277 g
0006120 \0 \0 271 261 \0 207 g \0 \0 360 225 g \0 \0 273 260
0006140 { O 020 d g \0 \0 360 226 277 g \0 \0 272 260 l
0006160 g \0 \0 360 225 g \0 \0 271 260 a O 020 d g \0
0006200 \0 360 226 277 g \0 \0 271 260 R g \0 \0 360 225 g
0006220 \0 \0 275 260 G O 020 d g \0 \0 360 226 277 g \0
0006240 \0 276 260 8 g \0 \0 360 227 g \0 \0 _ 016 277 260
0006260 + O 020 d g \0 \0 360 226 277 g \0 \0 276 260 034
0006300 g \0 \0 360 231 L g \0 \0 360 256 g \0 \0 211 O
0006320 020 g \0 \0 360 223 g \0 \0 274 H 002 X 261 377 ?
0006340 d 001 021 001 \t O 022 d 004 ` \0 \0 360 242 \t \0
0006360 \0 006 \0 \0 311 004 d g \0 \0 360 223 277 I 260 ;
0006400 d g \0 \0 360 223 277 J 260 1 d g \0 \0 360 223
0006420 277 K 260 ' d g \0 \0 360 223 277 L 260 035 d g
0006440 \0 \0 360 223 277 M 260 023 d g \0 \0 360 222 277 N
0006460 207 g \0 \0 360 262 036 O 016 O 022 d 004 ` \0 \0
0006500 360 242 \t \0 \0 006 \0 \0 311 002 360 226 O 022 @ \n
0006520 \0 \0 277 023 002 003 265 212 h 020 \0 ( 5 3 3 Q
0006540 F M . C H A N G E S T A T E
0006560 5 1 6 Q \ I L L E G A L . A R
0006600 G 3 7 2 Q \ I L L E G A L .
0006620 A R G 5 7 Q G E T W I N D O
0006640 W U S E R P R O P ) \r ( 5 2 1 Q
0006660 F R E E M E N U I T E M 5 1
0006700 1 Q 004 003 F R E E M E N U I T E
0006720 M T Y P E # 4 7 5 Q T I M E
0006740 Z O N E 4 6 5 Q T I M E 4
0006760 5 3 Q L E A D E R 4 4 1 Q
0007000 D A Y 4 2 7 Q M O N T H 4
0007020 1 5 Q Y E A R 4 0 3 Q D A
0007040 T E 3 7 5 Q F R E E M E N U
0007060 I T E M 3 6 5 Q 004 003 F R E E
0007100 M E N U I T E M T Y P E # 3 4
0007120 2 Q s h o r t 3 3 5 Q D A
0007140 Y . S H O R T 3 2 7 Q l o n
0007160 g 3 2 2 Q s h o r t 3 1 4
0007200 Q D A Y . O F . W E E K 3 0
0007220 6 Q h h : m m 3 0 0 Q N O
0007240 . S E C O N D S 2 6 5 Q y e
0007260 s 2 6 0 Q T I M E . Z O N E
0007300 2 5 2 Q n o n e 2 4 4 Q
0007320 N O . T I M E 2 3 3 Q n o
0007340 2 2 6 Q N O . L E A D I N G .
0007360 S P A C E S 2 2 0 Q d d %
0007400 m o n % y y 2 1 2 Q S P A
0007420 C E S 2 0 1 Q d d / m o n /
0007440 y y 1 7 4 Q S L A S H E S
0007460 1 6 6 Q l o n g 1 6 0 Q Y
0007500 E A R . L O N G 1 4 7 Q a l
0007520 p h a - l o n g 1 4 2 Q M O
0007540 N T H . L O N G 1 3 3 Q m o
0007560 n % d d , % y y 1 2 5 Q
0007600 M O N T H . L E A D I N G 1 1
0007620 3 Q n u m e r i c 1 0 6 Q
0007640 N U M B E R . O F . M O N T H
0007660 7 7 Q n o n e 7 1 Q N O .
0007700 D A T E 5 4 Q F M . I T E M
0007720 S 4 1 Q n o 3 6 Q h h :
0007740 m m : s s 3 3 Q y e s 3 0
0007760 Q n o n e 2 5 Q a l p h a
0010000 - s h o r t 2 2 Q s h o r t
0010020 1 7 Q d d - m o n - y y 7
0010040 D A T E F O R M A T ) \r ( ) \r
0010060 D A T E F O R M A T - E D I T O
0010100 R - A B O R T F N D 1 \r ( I
0010120 2 B U T T O N S I 1 W I
0010140 N D O W I 0 I T E M ) \0
0010160 \t \0 \0 \0 003 A g \0 \0 \n \0 \0 020 \0 ( 6
0010200 D A T E F O R M A T - E D I T
0010220 O R - S T A T U S ) \r ( 3 A B
0010240 O R T ) \r ( ) \r D A T E F O R M
0010260 A T - E D I T O R - C L O S E F
0010300 N D 1 \r ( I 0 W I N D O W
0010320 ) \0 023 \0 \0 \0 001 @ \t \0 \0 g \0 \0 360
0010340 264 \t @ g \0 \0 \n \0 \0 020 \0 ( 2 0 Q
0010360 D A T E F O R M A T - E D I T O
0010400 R - S T A T U S 3 D A T E F
0010420 O R M A T - E D I T O R - S T A
0010440 T U S ) \r ( 1 5 Q A B O R T
0010460 6 E D I T ) \r ( ) \r D A T E F
0010500 O R M A T - E D I T O R - Q U I
0010520 T F N D 1 \r ( I 2 B U T T
0010540 O N S I 1 W I N D O W I
0010560 0 I T E M ) \0 \t \0 \0 \0 003 A
0010600 g \0 \0 \n \0 \0 020 \0 ( 6 D A T E F
0010620 O R M A T - E D I T O R - S T A
0010640 T U S ) \r ( 3 Q U I T ) \r ( )
0010660 \r \ D F E - O U T D A T E D 1
0010700 \r ( P 2 7 Q T O K E N P
0010720 2 6 Q D A Y . S H O R T P
0010740 2 5 Q D A Y . O F . W E E K
0010760 P 2 4 Q M O N T H . L E A D
0011000 I N G P 2 3 Q M O N T H .
0011020 L O N G P 2 2 Q Y E A R .
0011040 L O N G P 2 1 Q N U M B E
0011060 R . O F . M O N T H P 2 0 Q
0011100 N O . S E C O N D S P 1 7
0011120 Q D A Y . L E N G T H P 1
0011140 6 Q M O N T H . L E N G T H
0011160 P 1 5 Q Y E A R . L E N G T
0011200 H P 1 4 Q T I M E . Z O N
0011220 E . L E N G T H P 1 3 Q T
0011240 I M E . Z O N E P 1 2 Q N
0011260 O . L E A D I N G . S P A C E S
0011300 P 1 1 Q N O . T I M E P
0011320 1 0 Q N O . D A T E P 7
0011340 N P 6 S P 5 M O N
0011360 T H P 4 D A Y P 3 S
0011400 I Z E P 2 Y E A R P 1
0011420 S E P R P 0 T I M E I
0011440 2 S T R I N G I 1 F O
0011460 R M A T I 0 U D F 3 0
0011500 Q \ T i m e Z o n e C o m p
0011520 F 3 1 Q T I M E . Z O N E S
0011540 ) 003 P 030 002 \0 003 @ 002 002 002 l - 021 362
0011560 020 021 ` 026 A 265 005 261 \0 336 003 001 g \0 \0 360
0011600 252 o \0 \0 \0 A \n \0 \0 261 \0 313 A 261 \0 266
0011620 d 001 021 001 027 O . d g \0 \0 360 227 277 i _
0011640 020 277 261 \0 237 g \0 \0 360 226 i _ 022 277 261 \0
0011660 223 O . d g \0 \0 360 227 277 i _ " 277 261 \0
0011700 203 g \0 \0 360 225 i _ & 277 260 w O . d g
0011720 \0 \0 360 226 277 i _ ( 277 260 h g \0 \0 360 225
0011740 i _ $ 277 260 ] O . d g \0 \0 360 225 277 l
0011760 / 271 260 O g \0 \0 360 224 l 271 260 E O .
0012000 d g \0 \0 360 226 277 i _ 024 277 260 6 g \0 \0
0012020 360 232 W 0 W 2 026 002 _ 026 277 260 & O . d
0012040 g \0 \0 360 226 277 i _ 277 260 027 g \0 \0 360
0012060 224 i _ * 277 212 O . g \0 \0 360 223 i _ ,
0012100 277 023 002 003 265 003 202 261 377 I O ( 227 h _ "
0012120 277 l Y 277 O 020 223 j 261 \0 266 @ 001 272 @
0012140 002 001 k 330 275 @ 002 002 001 274 O $ 223 l 004 260
0012160 027 J d n \a 317 361 227 277 i _ $ 277 l 004 205
0012200 l d 334 272 l 002 _ 032 O 024 242 O ( 226 l \n
0012220 L 361 221 k 201 l 002 _ 036 O " 262 024 O 024 242
0012240 O ( 227 l \n M 361 222 k 260 # l 002 260 037 O
0012260 & 235 o \0 \0 \0 M \n \0 \0 001 ] \t \0 \0 213
0012300 o \0 \0 \0 M \n \0 \0 001 275 l 003 _ 034 O (
0012320 221 k 200 j O * 262 1 o \0 \0 \0 H 002 002 002
0012340 002 001 k 330 \n \0 \0 001 _ * 277 O , 235 O *
0012360 k l 003 \v \0 \0 _ * 277 l 003 204 O * \t \0
0012400 \0 _ , l 003 330 200 j l 002 330 330 330 330 330 O
0012420 022 222 j 260 ( O 020 222 l 005 201 l 006 O 221
0012440 j 201 l 003 O 026 265 004 j 216 \t \0 \0 _ 030 d
0012460 k 360 223 277 l 004 201 k 330 330 330 330 [ d l
0012500 \n \0 \0 ^ O 020 225 j _ 016 261 \0 344 O ( 262
0012520 Y O " 262 024 O 034 \t \0 \0 277 N O 034 _ 016
0012540 M O 034 \f \0 \0 212 N k M \v \0 \0 277 O 034
0012560 _ 016 277 N O 016 k 324 _ 016 I + 277 N O 016
0012600 O 024 242 O ( 226 l \n L 361 221 k 201 l 002 324
0012620 _ 016 L k \f \0 \0 277 O ( 262 R N O 016 k
0012640 324 _ 016 l , + 260 E N O 024 226 l \n L 361
0012660 221 k 201 l 002 _ 016 L k \f \0 \0 277 N O 016
0012700 k 324 _ 016 I + 277 O " 237 N O 016 O 034 324
0012720 _ 016 M O 034 \f \0 \0 260 023 N O 016 k 330 M
0012740 \v \0 \0 277 O 016 O 034 324 _ 016 277 N O 016 k
0012760 324 _ 016 I + 277 N O 016 O 032 324 _ 016 J l
0013000 002 \f \0 \0 277 O 022 246 O 016 k 324 _ 016 277 O
0013020 * 262 036 N K O , 331 k 331 l ( + 277 N K
0013040 O , 331 O * \v \0 \0 277 N K l ) + 277 O
0013060 022 263 y N O 016 l 002 330 H 001 l 002 \f \0 \0
0013100 277 N O 016 l 003 330 l : + 277 N O 016 l 005
0013120 324 _ 016 H 002 001 l 002 \f \0 \0 277 O 263 035
0013140 N O 016 k 330 l : + 277 N O 016 l 003 324 _
0013160 016 H 002 002 001 l 002 \f \0 \0 277 O 026 262 - N
0013200 O 016 l 002 330 O 026 \v \0 \0 277 O 030 k 360 262
0013220 033 N O 016 l 003 330 H 002 002 002 001 224 o \0 \0
0013240 \0 203 o \0 \0 \0 \v \0 \0 277 B 230 N k m 377
0013260 B \f \0 \0 020 N 020 \0 ( 1 5 1 3 Q S
0013300 U B S T R I N G 1 5 0 0 Q R
0013320 P L S T R I N G 1 4 4 1 Q R
0013340 P L S T R I N G 1 4 2 1 Q \
0013360 R P L R I G H T 1 3 6 2 Q \
0013400 R P L R I G H T 1 3 2 7 Q \
0013420 R P L R I G H T 1 2 7 7 Q R
0013440 P L S T R I N G 1 2 3 3 Q \
0013460 R P L R I G H T 1 1 7 2 Q R
0013500 P L S T R I N G 1 1 5 7 Q \
0013520 R P L R I G H T 1 1 2 3 Q \
0013540 R P L R I G H T 1 0 5 6 Q \
0013560 R P L R I G H T 1 0 0 4 Q R
0013600 P L S T R I N G 7 7 5 Q \ R
0013620 P L R I G H T 7 6 1 Q P R O
0013640 M P T P R I N T 7 3 2 Q A L
0013660 L O C S T R I N G 7 0 4 Q N
0013700 C H A R S 6 3 0 Q N C H A R
0013720 S 6 1 5 Q S U B S T R I N G
0013740 5 7 6 Q N T H 5 3 7 Q N
0013760 T H 5 2 6 Q N C H A R S 5
0014000 2 1 Q N T H 4 0 Q L I S P
0014020 E R R O R ) \r ( 3 2 2 Q D A Y
0014040 . S H O R T 3 0 6 Q D A Y .
0014060 O F . W E E K 2 7 2 Q N O .
0014100 S E C O N D S 2 4 7 Q T I M
0014120 E . Z O N E 2 3 3 Q N O . L
0014140 E A D I N G . S P A C E S 2 1
0014160 6 Q S P A C E S 2 0 3 Q S
0014200 L A S H E S 1 6 5 Q Y E A R
0014220 . L O N G 1 5 1 Q M O N T H
0014240 . L E A D I N G 1 3 3 Q M O
0014260 N T H . L O N G 1 1 6 Q N U
0014300 M B E R . O F . M O N T H 7 7
0014320 Q N O . T I M E 6 2 Q N O
0014340 . D A T E 2 6 Q D A T E F O
0014360 R M A T ) \r ( 1 4 7 5 Q " S
0014400 T " 1 4 7 0 Q " D T " 5 6
0014420 3 Q ( " M o n d a y " " T u
0014440 e s d a y " " W e d n e s d a
0014460 y " " T h u r s d a y " " F
0014500 r i d a y " " S a t u r d a y
0014520 " " S u n d a y " ) 5 3 3 Q
0014540 ( " J a n " " F e b " " M
0014560 a r " " A p r " " M a y "
0014600 " J u n " " J u l " " A u g
0014620 " " S e p " " O c t " " N
0014640 o v " " D e c " ) 5 1 5 Q
0014660 ( " J a n u a r y " " F e b r
0014700 u a r y " " M a r c h " " A
0014720 p r i l " " M a y " " J u n
0014740 e " " J u l y " " A u g u s
0014760 t " " S e p t e m b e r " "
0015000 O c t o b e r " " N o v e m b
0015020 e r " " D e c e m b e r " )
0015040 3 4 Q " I L L E G A L A R G
0015060 " ) \r ( P R E T T Y C O M P R I
0015100 N T D A T E F O R M A T - E D
0015120 I T O R C O M S ) \r ( R P A Q Q
0015140 D A T E F O R M A T - E D I T
0015160 O R C O M S ( ( * ; ; ; \r
0015200 " T h i s s y s t e m p r o
0015220 v i d e s a f a c i l i t y
0015240 f o r e d i t i n g d a t
0015260 e f o r m a t s a s d e s
0015300 c r i b e d i n s e c t i o
0015320 n 1 2 . 5 o f t h e I n
0015340 t e r l i s p - D m a n u a l
0015360 , K o t o v e r s i o n .
0015400 U s e r e n t r y p o i n
0015420 t i s t h e f u n c t i o
0015440 n E D I T - D A T E F O R M A
0015460 T . E d i t i n g i s a
0015500 c c o m p l i s h e d u s i n
0015520 g a F R E E M E N U . I
0015540 t e m s d i s p l a y e d i
0015560 n t h i s m e n u a r e
0015600 s t o r e d o n D A T E F O
0015620 R M A T - E D I T O R - I T E M
0015640 S . C a l l ( G E T - D A
0015660 T E F O R M A T - E D I T O R
0015700 T ) a f t e r c h a n g i n
0015720 g t h i s v a r i a b l e .
0015740 I n p u t t o E D I T -
0015760 D A T E F O R M A T i s e i
0016000 t h e r N I L o r a v a
0016020 l u e r e t u r n e d b y
0016040 t h e D A T E F O R M A T f
0016060 u n c t i o n . O u t p u t
0016100 i s e i t h e r N I L -
0016120 - i n c a s e e d i t i n
0016140 g w a s a b o r t e d - -
0016160 o r a n o t h e r v a l u
0016200 e a s r e t u r n e d f r
0016220 o m t h e D A T E F O R M A
0016240 T f u n c t i o n . " \r ) (
0016260 F N S E D I T - D A T E F O R
0016300 M A T G E T - D A T E F O R M
0016320 A T - E D I T O R D A T E F O
0016340 R M A T - E D I T O R - S T A T
0016360 U S D A T E F O R M A T - E D
0016400 I T O R - G E T - S T A T E \r
0016420 D A T E F O R M A T - E D I T O
0016440 R - P U T - S T A T E D A T E
0016460 F O R M A T - E D I T O R - A B
0016500 O R T F N D A T E F O R M A T
0016520 - E D I T O R - C L O S E F N
0016540 \r D A T E F O R M A T - E D I T
0016560 O R - Q U I T F N ) ( C O M S
0016600 ( * ; ; \r " R e d e f i n
0016620 e \ O U T D A T E i n t h
0016640 e s y s t e m f i l e I O
0016660 C H A R S t o a d d t w o
0016700 n e w D A T E F O R M A T
0016720 o p t i o n s : M O N T H . L
0016740 O N G a n d M O N T H . L E
0016760 A D I N G " \r ) ( F N S \ D
0017000 F E - O U T D A T E ) ( P (
0017020 C O N D ( ( C C O D E P ( Q
0017040 U O T E \ D F E - O U T D A T
0017060 E ) ) ( M O V D ? ( Q U O T
0017100 E \ O U T D A T E ) ( Q U O
0017120 T E \r \ D F E - S A V E D - O
0017140 U T D A T E ) ) ( M O V D (
0017160 Q U O T E \ D F E - O U T D A
0017200 T E ) ( Q U O T E \ O U T D
0017220 A T E ) ) ) ) ) ) ( V A R S
0017240 $ $ D A T E F O R M A T - E D I
0017260 T O R - I T E M S \r ( $ $ D A
0017300 T E F O R M A T - E D I T O R )
0017320 ) ( I N I T V A R S ( D A T
0017340 E F O R M A T - E D I T O R - I
0017360 T E M S ( C O P Y $ $ D A T
0017400 E F O R M A T - E D I T O R - I
0017420 T E M S ) ) ) ( F I L E S (
0017440 \r S Y S L O A D ) F R E E M E
0017460 N U ) ) ) \r ( C O N D ( ( C C
0017500 O D E P ( Q U O T E \ D F E
0017520 - O U T D A T E ) ) ( M O V D
0017540 ? ( Q U O T E \ O U T D A T
0017560 E ) ( Q U O T E \ D F E - S
0017600 A V E D - O U T D A T E ) ) (
0017620 M O V D ( Q U O T E \r \ D F
0017640 E - O U T D A T E ) ( Q U O T
0017660 E \ O U T D A T E ) ) ) ) \r (
0017700 R P A Q Q $ $ D A T E F O R M
0017720 A T - E D I T O R - I T E M S
0017740 ( ( ( L A B E L Q u i t S E
0017760 L E C T E D F N D A T E F O R
0020000 M A T - E D I T O R - Q U I T F
0020020 N M E S S A G E \r " S t o p
0020040 e d i t i n g , r e t u r n
0020060 c u r r e n t s e t t i n g
0020100 s " F O N T ( G A C H A 1
0020120 0 B O L D ) ) ( L A B E L
0020140 " " ) ( L A B E L A b o r t
0020160 S E L E C T E D F N \r D A T
0020200 E F O R M A T - E D I T O R - A
0020220 B O R T F N M E S S A G E "
0020240 S t o p e d i t i n g , i g
0020260 n o r e c h a n g e s , r e
0020300 t u r n N I L " F O N T (
0020320 G A C H A 1 0 B O L D ) ) )
0020340 ( ( \r T Y P E T I T L E L
0020360 A B E L " " ) ) ( ( T Y P E
0020400 T I T L E L A B E L " D A
0020420 T E : " F O N T ( G A C H A
0020440 1 0 B O L D ) ) ( T Y P E
0020460 N W A Y I D D A T E L A
0020500 B E L \r d d - m o n - y y )
0020520 ( L A B E L " " ) ( T Y P E
0020540 N W A Y I D D A T E L A
0020560 B E L n o n e ) ) ( ( L A B
0020600 E L " " ) ( T Y P
0020620 E N W A Y I D D A T E L
0020640 A B E L \r d d / m o n / y y )
0020660 ( L A B E L " " ) ( T Y P
0020700 E N W A Y I D D A T E L
0020720 A B E L d d % m o n % y y
0020740 ) ( L A B E L " " ) ( T Y
0020760 P E N W A Y I D D A T E
0021000 L A B E L \r m o n % d d , %
0021020 y y ) ) ( ( T Y P E T I T
0021040 L E L A B E L " Y e a r
0021060 : " F O N T ( G A C H A 1
0021100 0 B O L D ) ) ( T Y P E N
0021120 W A Y I D Y E A R L A B E
0021140 L s h o r t ) ( \r T Y P E
0021160 N W A Y I D Y E A R L A B
0021200 E L l o n g ) ) ( ( T Y P E
0021220 T I T L E L A B E L "
0021240 M o n t h : " F O N T ( G A
0021260 C H A 1 0 B O L D ) ) ( T
0021300 Y P E N W A Y I D M O N T
0021320 H \r L A B E L a l p h a - s
0021340 h o r t ) ( T Y P E N W A Y
0021360 I D M O N T H L A B E L
0021400 a l p h a - l o n g ) ( T Y P
0021420 E N W A Y I D M O N T H
0021440 L A B E L n u m e r i c ) )
0021460 ( ( T Y P E \r T I T L E L A
0021500 B E L " W e e k d a y : "
0021520 F O N T ( G A C H A 1 0
0021540 B O L D ) ) ( T Y P E N W A
0021560 Y I D D A Y L A B E L n
0021600 o n e ) ( T Y P E N W A Y
0021620 I D D A Y L A B E L \r l o
0021640 n g ) ( T Y P E N W A Y I
0021660 D D A Y L A B E L s h o r
0021700 t ) ) ( ( T Y P E T I T L E
0021720 L A B E L " L e a d i n
0021740 g s p a c e s : " F O N T
0021760 ( G A C H A 1 0 B O L D ) )
0022000 ( \r T Y P E N W A Y I D
0022020 L E A D E R L A B E L y e s
0022040 ) ( T Y P E N W A Y I D
0022060 L E A D E R L A B E L n o )
0022100 ) ( ( T Y P E T I T L E L
0022120 A B E L " T I M E : " F O N
0022140 T ( G A C H A \r 1 0 B O L
0022160 D ) ) ( T Y P E N W A Y I
0022200 D T I M E L A B E L h h :
0022220 m m : s s ) ( T Y P E N W A
0022240 Y I D T I M E L A B E L
0022260 h h : m m ) ( T Y P E N W A
0022300 Y I D T I M E L A B E L
0022320 \r n o n e ) ) ( ( T Y P E T
0022340 I T L E L A B E L " T
0022360 i m e Z o n e : " F O N T
0022400 ( G A C H A 1 0 B O L D ) )
0022420 ( T Y P E N W A Y I D T
0022440 I M E Z O N E L A B E L n o
0022460 ) ( T Y P E \r N W A Y I D
0022500 T I M E Z O N E L A B E L
0022520 y e s ) ) ( W I N D O W P R O
0022540 P S T I T L E " D a t e F
0022560 o r m a t E d i t o r " L E
0022600 F T 1 5 0 B O T T O M 1 5
0022620 0 ) ) ) \r ( R P A Q Q $ $ D A
0022640 T E F O R M A T - E D I T O R
0022660 N I L ) \r ( R P A Q ? D A T E
0022700 F O R M A T - E D I T O R - I T
0022720 E M S ( C O P Y $ $ D A T E
0022740 F O R M A T - E D I T O R - I T
0022760 E M S ) ) \r ( F I L E S L O A D
0023000 ( S Y S L O A D ) F R E E M
0023020 E N U ) \r ( P U T P R O P S D
0023040 A T E F O R M A T - E D I T O R
0023060 C O P Y R I G H T ( " J o h
0023100 a n n e s A . G . M . K
0023120 o o m e n " 1 9 8 7 ) ) \r N I
0023140 L \r
0023142