$ od -c -N 50000 [phylum]<LISPUSERS>Lyric>TRANSOR-LOADTRAN.DFASL!1 0000000 221 \0 005 X C L C o m p i l e r 0000020 o u t p u t f o r s o u r c 0000040 e f i l e { D S K } < X A V 0000060 I E R > L O A D T R A N . ; 9 \n 0000100 S o u r c e f i l e c r e a 0000120 t e d M o n d a y , 1 3 A 0000140 p r i l 1 9 8 7 , 1 7 : 3 8 0000160 : 1 7 . \n F A S L f i l e c 0000200 r e a t e d M o n d a y , 1 0000220 3 A p r i l 1 9 8 7 , 1 7 0000240 : 3 9 : 1 0 . \n 377 235 226 002 / o \0 \0 0000260 \0 g \0 \0 g \0 \0 \v \0 \0 021 021 001 o \0 \0 0000300 \0 \t \0 \0 277 023 g \0 \0 g \0 \0 o \0 \0 \0 0000320 \v \0 \0 277 g \0 \0 027 \0 \0 020 \0 002 001 230 225 0000340 214 016 F I L E C R E A T E D L O C 0000360 002 \0 230 217 214 020 * S T A N D A R D - 0000400 I N P U T * 230 214 021 3 t o p - l 0000420 e v e l f o r m s 002 \0 \0 \0 230 220 0000440 214 \b F U N C T I O N 230 223 001 200 003 $ 0000460 230 225 214 \a P U T P R O P 025 230 225 214 020 0000500 D E F I N E - F I L E - I N F O 0000520 \v 230 217 214 004 O P E N 006 + 230 222 214 004 S 0000540 T O P 230 221 230 214 \b X C L - U S E R 0000560 ( 231 \n 035 230 225 214 \t F I L E D A T E 0000600 S 032 230 225 214 \b L O A D T R A N \b 230 0000620 220 214 006 O U T P U T 005 230 220 214 \t D I 0000640 R E C T I O N 003 230 223 001 230 224 002 230 0000660 214 022 1 3 - A p r - 8 7 1 7 : 3 0000700 8 : 1 7 225 214 030 { D S K } < X A V 0000720 I E R > L O A D T R A N . ; 9 021 0000740 230 223 004 230 220 214 \a P A C K A G E 230 214 0000760 \b X C L - U S E R 230 220 214 \t R E A 0001000 D T A B L E 230 214 003 X C L 001 230 214 006 0001020 { N u l l } \0 234 230 222 214 016 P R E T 0001040 T Y C O M P R I N T 231 \t 226 001 003 j 0001060 020 \0 \0 \0 230 222 214 001 X 231 \t 231 030 \0 \0 003 0001100 001 231 003 230 223 001 230 223 001 231 031 \0 \0 \0 \0 234 0001120 230 222 214 \v S E T T E M P L A T E 231 0001140 \t 226 001 005 \b \0 \0 020 \0 \0 \0 231 031 231 034 \0 0001160 \0 \0 002 231 003 230 223 001 230 223 002 231 031 230 214 001 0001200 Y 001 001 230 222 214 004 N I L L 231 \t \0 \0 \0 0001220 234 230 222 214 020 D E F I N E - F I L E 0001240 - I N F O 231 \t 226 \0 005 \b \0 \0 020 \0 231 0001260 ! \0 \0 \0 \0 231 003 230 223 001 200 001 001 231 \0 0001300 \0 \0 234 230 222 214 \a I . S . O P R 231 \t 0001320 226 001 005 \b \0 \0 020 \0 \0 \0 231 031 231 # \0 \0 0001340 \0 001 231 003 230 223 001 230 223 001 231 031 001 001 231 0001360 \0 \0 \0 234 230 222 214 006 M Y L O A D 231 \t 0001400 226 \0 3 n \0 \0 037 X 277 @ g \0 \0 g \0 \0 0001420 \v \0 \0 H 375 024 \0 277 n \0 \0 037 o \0 \0 \0 0001440 024 \0 H 024 002 k n \0 \0 037 o \0 \0 \0 024 \0 0001460 H 024 002 016 020 \0 231 & 001 \0 \0 001 231 003 230 223 0001500 001 230 223 001 230 214 004 F I L E 001 016 231 \a 002 0001520 \v 230 220 214 005 I N P U T \b 231 016 002 ( 226 0001540 001 035 H 311 \0 i R o \0 \0 \0 \t \0 \0 \f \0 0001560 \0 \t \0 \0 271 j @ 016 277 I \t \0 \0 020 \0 003 0001600 002 230 217 214 \n * T E R M I N A L - I 0001620 O * 230 222 214 020 * U N W I N D - P R 0001640 O T E C T * 230 221 230 214 006 S Y S T E 0001660 M 002 001 \0 001 230 220 214 \a C L O S U R E 0001700 230 223 001 230 223 001 230 214 004 G 2 2 5 004 031 230 0001720 217 214 \v V A L U E S - L I S T 020 230 0001740 225 214 \a \ M V L I S T \n 230 225 214 \t \ 0001760 C M L - L O A D \n 230 217 214 \f F I N 0002000 D - P A C K A G E \0 001 006 230 214 \b X 0002020 C L - U S E R \0 032 226 \0 \b H 311 \0 \t 0002040 \0 \0 020 \0 230 214 016 C l e a n - u p 0002060 f o r m s 001 \0 \0 \0 231 / 230 223 001 200 001 0002100 004 230 217 214 005 C L O S E \0 \0 \0 003 $ 230 0002120 225 214 020 C O M P I L E D - C L O S 0002140 U R E 026 231 ; 001 230 225 214 \t \ P T R H 0002160 U N K 2 235 226 \0 \t o \0 \0 \0 \t \0 \0 020 0002200 \0 230 214 020 1 t o p - l e v e l 0002220 f o r m \0 \0 \0 \0 231 003 230 223 001 200 001 005 0002240 230 225 214 \b P U T P R O P S \0 001 001 230 0002260 223 003 231 \f 230 225 214 \t C O P Y R I G H 0002300 T 230 223 002 230 214 030 S y s t e m D e 0002320 v e l o p m e n t C o r p . 202 0002340 \0 \0 \a 303 \0 232 D 377 377 0002351