File: DSTROY.RL of Disk: V50/Source/Source-Listing-FORTRAN-2
(Binary file converted to dump format)
Block: 0000 00000: 0003 0050 0000 0000 0423 2422 1731 0004 0060 0101 1517 2605 0000 0002 0100 0000 @C@(@@@@DSTROY@D@0AAMOVE@@@BA@@@ ( Y 00A O 5 @ 00020: 0000 0000 0000 0000 0000 0000 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @@@@@@@@@@@@@A@A@A@A@A@A@A@A@A@A 00040: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00060: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00100: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00120: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00140: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00160: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00200: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00220: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00240: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00260: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00300: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00320: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00340: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00360: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A Block: 0001 00400: 1003 0000 0000 1403 1030 0051 0403 0423 2422 1731 1403 1100 0021 1403 1110 0013 HC@@@@LCHX@)DCDSTROYLCI@@QLCIH@K ) YS @2 H 00420: 1403 1030 0014 0417 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 LCHX@LDO@@@@@@@@@@@@@@@@@@@@@@@@ 2 00440: 0000 0000 0000 1003 0000 0043 0401 0040 1403 1030 0005 0401 0000 1403 1030 0047 @@@@@@HC@@@#DA@ LCHX@EDA@@LCHX@' # 2 ' 00460: 0402 0006 0210 1403 6400 0047 0401 0200 1403 1100 0021 1403 1110 0013 0404 6200 DB@FBHLC4@@'DAB@LCI@@QLCIH@KDD2@ 'P @2 H 00500: 0101 0001 0610 1403 6400 0075 0401 0005 1404 1130 0000 1403 1030 0047 1403 1030 AA@AFHLC4@@=DA@ELDIX@@LCHX@'LCHX A =P X2 ' 2 00520: 0075 1403 1030 0027 0000 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @=LCHX@W@@@A@A@A@A@A@A@A@A@A@A@A = 00540: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00560: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00600: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00620: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00640: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00660: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00700: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00720: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00740: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A 00760: 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A