*START  4001  001002  *STACK  7777  000000  *SYM    000641

SEG. #    TYPE        LOW      HIGH      TOP
  4001    PROC      000100    177775    177775    
  4002    PROC      000100    177775    177775    
  4003    PROC      000100    047270    047267    

*BASE   004001  000100  000354  000777  000777  
*BASE   004002  000100  000313  000777  000777  
*BASE   004003  000100  000104  000777  000777  

ROUTINE        ECB         PROCEDURE     ST. SIZE  LINK FR. 
  ####      4001  001002    4001  001000    000042  000022  4001  000402
  P3        4001  002220    4001  001024    000046  000132  4001  001566
  P10       4001  004514    4001  002320    000046  000226  4001  004014
  P31       4001  005070    4001  004642    000046  000064  4001  004454
  P30       4001  005624    4001  005140    000046  000110  4001  005204
  P40       4001  010152    4001  005714    000046  000176  4001  007472
  P54       4001  010714    4001  010270    000046  000130  4001  010264
  P66       4001  011222    4001  011014    000046  000062  4001  010610
  P71       4001  012432    4001  011272    000046  000150  4001  011756
  P62       4001  024622    4001  012526    000046  000454  4001  023722
  P307      4001  025216    4001  024776    000046  000070  4001  024604
  P314      4001  026330    4001  025274    000046  000134  4001  025672
  P326      4001  026742    4001  026426    000046  000074  4001  026322
  P337      4001  030262    4001  027016    000046  000156  4001  027610
  P364      4001  031212    4001  030366    000046  000102  4001  030564
  P375      4001  032276    4001  031266    000046  000126  4001  031640
  P409      4001  032574    4001  032366    000046  000072  4001  032160
  P412      4001  032770    4001  032652    000046  000054  4001  032356
  P415      4001  034070    4001  033032    000046  000112  4001  033430
  P418      4001  035674    4001  034142    000046  000136  4001  035216
  P423      4001  041414    4001  035754    000046  000260  4001  040674
  P455      4001  042102    4001  041554    000046  000100  4001  041460
  P460      4001  045402    4001  042160    000046  000200  4001  044712
  P496      4001  045770    4001  045512    000046  000072  4001  045354
  P502      4001  046360    4001  046046    000046  000074  4001  045740
  P510      4001  053076    4001  046434    000046  000272  4001  052342
  P546      4001  062160    4001  053234    000046  000356  4001  061346
  P509      4001  072356    4001  062324    000046  000424  4001  071512
  P670      4001  073406    4001  072536    000046  000122  4001  072762
  P675      4001  073566    4001  073504    000046  000042  4001  073156
  P678      4001  075154    4001  073620    000046  000164  4001  074506
  P693      4001  076536    4001  075272    000046  000150  4001  076100
  P704      4001  101012    4001  076650    000046  000216  4001  100326
  P724      4001  104572    4001  101144    000046  000272  4001  104060
  P758      4001  115056    4001  104752    000046  000414  4001  114206
  P757      4001  123762    4001  115222    000046  000372  4001  123144
  P884      4001  124340    4001  124136    000046  000070  4001  123724
  P888      4001  124564    4001  124414    000046  000056  4001  124152
  P892      4001  125112    4001  124630    000046  000106  4001  124472
  P896      4001  126162    4001  125200    000046  000144  4001  125524
  P903      4001  127560    4001  126270    000046  000152  4001  127114
  P912      4001  130670    4001  127666    000046  000126  4001  130236
  P942      4001  131300    4001  130764    000046  000070  4001  130662
  P949      4001  131732    4001  131352    000046  000116  4001  131310
  P953      4001  132700    4001  132026    000046  000132  4001  132250
  P959      4001  133642    4001  133002    000046  000132  4001  133210
  P965      4001  135560    4001  133742    000046  000200  4001  135102
  P975      4001  136320    4001  135702    000046  000126  4001  135674
  P979      4001  137330    4001  136422    000046  000134  4001  136674
  P1004     4001  140414    4001  137430    000046  000132  4001  137766
  P1022     4001  141552    4001  140520    000046  000142  4001  141112
  P1049     4001  142354    4001  141654    000046  000122  4001  141730
  P1055     4001  143144    4001  142452    000046  000116  4001  142520
  P1061     4001  143672    4001  143236    000046  000114  4001  143246
  P1065     4001  146410    4001  143762    000046  000224  4001  145712
  P1081     4001  147120    4001  146536    000046  000110  4001  146474
  P1088     4001  147600    4001  147204    000046  000112  4001  147152
  P1097     4001  150066    4001  147664    000046  000074  4001  147450
  P1104     4001  150336    4001  150144    000046  000062  4001  147722
  P1108     4001  151056    4001  150404    000046  000070  4001  150440
  P1116     4001  157600    4001  151130    000046  000416  4001  156746
  P1197     4001  160274    4001  157764    000046  000102  4001  157656
  P1202     4001  163372    4001  160360    000046  000264  4001  162670
  P1235     4001  164062    4001  163554    000046  000110  4001  163442
  P1240     4001  164676    4001  164152    000046  000124  4001  164250
  P1249     4001  167672    4001  164774    000046  000246  4001  167156
  P1284     4001  174754    4001  170024    000046  000334  4001  174170
  P1340     4001  176560    4001  175124    000046  000144  4001  176116
  P1358     4001  176724    4002  001000    000046  000144  4001  176262
  P1376     4001  177110    4002  002372    000046  000200  4001  176426
  P1401     4001  177566    4001  177226    000046  000110  4001  177146
  P1407     4001  177676    4002  004406    000046  000110  4001  177256
  P1413     4002  005430    4002  004726    000046  000116  4002  005004
  P1422     4002  006030    4002  005522    000046  000072  4002  005412
  P1430     4002  006414    4002  006104    000046  000072  4002  005776
  P1438     4002  006720    4002  006470    000046  000070  4002  006302
  P1443     4002  007222    4002  006772    000046  000070  4002  006604
  P1448     4002  007510    4002  007274    000046  000070  4002  007074
  P1453     4002  010062    4002  007564    000046  000072  4002  007442
  P1460     4002  010500    4002  010134    000046  000074  4002  010064
  P1467     4002  011512    4002  010560    000046  000136  4002  011054
  P1478     4002  015712    4002  011612    000046  000302  4002  015156
  P1196     4002  017754    4002  016060    000046  000246  4002  017266
  P1595     4002  020372    4002  020134    000046  000100  4002  017754
  P1594     4002  022034    4002  020454    000046  000150  4002  021376
  P1614     4002  022412    4002  022146    000046  000072  4002  021774
  P1619     4002  023022    4002  022466    000046  000102  4002  022400
  P1593     4002  031050    4002  023102    000046  000416  4002  030216
  P1592     4002  033736    4002  031234    000046  000214  4002  033244
  P1591     4002  037124    4002  034060    000046  000224  4002  036424
  P1103     4002  042606    4002  037250    000046  000266  4002  042066
  P1836     4002  044544    4002  042754    000046  000220  4002  044062
  P1867     4002  046046    4002  044702    000046  000164  4002  045376
  P1882     4002  046572    4002  046162    000046  000120  4002  046144
  P1890     4002  047470    4002  046664    000046  000120  4002  047044
  P1897     4002  054016    4002  047564    000046  000332  4002  053250
  P1934     4002  054460    4002  054202    000046  000100  4002  054040
  P1938     4002  055462    4002  054540    000046  000126  4002  055032
  P1949     4002  056346    4002  055560    000046  000140  4002  055722
  P1954     4002  062132    4002  056462    000046  000252  4002  061424
  P1984     4002  064330    4002  062276    000046  000222  4002  063642
  P1101     4002  066512    4002  064464    000046  000240  4002  066024
  P883      4002  100162    4002  066664    000046  000514  4002  077240
  P422      4002  101662    4002  100354    000046  000160  4002  101214
  P2144     4002  103614    4002  101774    000046  000204  4002  103126
  P2170     4002  106640    4002  103732    000046  000136  4002  106146
  P2173     4002  110414    4002  106704    000046  000116  4002  107752
  P2176     4002  117736    4002  110470    000046  000276  4002  117150
  P2193     4002  122402    4002  120046    000046  000142  4002  121724
  P2196     4002  124152    4002  122466    000046  000176  4002  123440
  P2201     4002  124716    4002  124236    000046  000064  4002  124270
  P2205     4002  130422    4002  124754    000046  000142  4002  127726
  P2208     4002  144354    4002  130470    000046  000633  4002  143354
  P2213     4002  151110    4002  144610    000046  000100  4002  150452
  P2216     4002  152450    4002  151152    000046  000076  4002  152026
  P2223     4002  154676    4002  152524    000046  000120  4002  154222
  P2226     4002  161064    4002  154742    000046  000174  4002  160332
  P2229     4002  164266    4002  161126    000046  000112  4002  163630
  P2240     4002  174114    4002  164342    000046  000104  4002  173454
  P2204     4002  174350    4002  174160    000046  000062  4002  173740
  P$MAIN    4002  174614    4003  001000    000046  000356  4002  174022
  MAIN      4003  006604    4002  175000    000046  031504  4003  006200
  P$ADI     4002  175076    4002  175060    000042  000026  4002  174476
  P$AND     4002  175144    4002  175124    000042  000026  4002  174544
  P$CHK     4002  175276    4002  175172    000052  000032  4002  174674
  P$CHKA    4002  175426    4002  175326    000052  000034  4002  175024
  P$DAT     4002  175532    4002  175460    000064  000030  4002  175130
  P$DEC     4002  175572    4002  175560    000050  000024  4002  175172
  P$DIF     4002  175656    4002  175616    000044  000030  4002  175254
  P$DVI     4002  175724    4002  175704    000042  000026  4002  175324
  P$ELN     4002  176030    4002  175752    000046  000024  4002  175430
  P$ENT     4002  176142    4002  176054    000050  000032  4002  175542
  P$EOF     4002  176226    4002  176174    000044  000024  4002  175626
  P$EQU     4002  176372    4002  176252    000054  000040  4002  175764
  P$GEQ     4002  176620    4002  176424    000054  000046  4002  176212
  P$GRT     4002  177042    4002  176660    000054  000042  4002  176436
  P$INC     4002  177112    4002  177100    000050  000024  4002  176512
  P$IND     4002  177220    4002  177136    000052  000032  4002  176616
  P$INN     4002  177326    4002  177250    000046  000130  4002  176724
  P$IOR     4002  177476    4002  177454    000042  000026  4002  177076
  P$IXA     4002  177550    4002  177524    000046  000026  4002  177150
  P$LAO     4002  177612    4002  177576    000046  000024  4002  177212
  P$LCA     4002  177652    4002  177636    000046  000024  4002  177252
  P$LDA     4002  177716    4002  177676    000050  000026  4002  177316
  P$LDC     4002  177746    4003  040304    000052  000030  4002  177344
  P$LDO     4003  040410    4003  040356    000050  000030  4003  040006
  P$LDOS    4003  040556    4003  040436    000052  000026  4003  040154
  P$LEQ     4003  041006    4003  040602    000054  000050  4003  040376
  P$LES     4003  041224    4003  041046    000052  000044  4003  040616
  P$LOD     4003  041306    4003  041262    000050  000026  4003  040706
  P$LODA    4003  041360    4003  041334    000050  000026  4003  040760
  P$LODS    4003  041424    4003  041406    000052  000024  4003  041024
  P$MOD     4003  041470    4003  041450    000042  000026  4003  041070
  P$MOV     4003  041566    4003  041516    000052  000026  4003  041166
  P$MPI     4003  041634    4003  041614    000042  000026  4003  041234
  P$MST     4003  041716    4003  041662    000046  000040  4003  041314
  P$NEQ     4003  042072    4003  041754    000052  000040  4003  041464
  P$NEW     4003  042202    4003  042124    000044  000034  4003  041602
  P$NGI     4003  042236    4001  177766    000042  000024  4003  041636
  P$NOT     4003  042304    4003  042262    000042  000024  4003  041704
  P$PAG     4003  042416    4003  042330    000044  000030  4003  042014
  P$RDC     4003  042616    4003  042444    000046  000032  4003  042214
  P$RST     4003  042664    4003  042646    000042  000026  4003  042264
  P$SAV     4003  042736    4003  042712    000044  000026  4003  042336
  P$SBI     4003  043002    4003  042764    000042  000026  4003  042402
  P$SGS     4003  043204    4003  043030    000046  000130  4003  042602
  P$SRO     4003  043366    4003  043332    000050  000030  4003  042764
  P$SROS    4003  043602    4003  043414    000056  000030  4003  043200
  P$STO     4003  043702    4003  043630    000050  000034  4003  043300
  P$STP     4003  043734    4002  177774    000042  000022  4003  043334
  P$STR     4003  044004    4003  043756    000052  000026  4003  043404
  P$STRA    4003  044060    4003  044032    000052  000026  4003  043460
  P$STRS    4003  044124    4003  044106    000052  000024  4003  043524
  P$UJC     4003  044172    4003  044150    000042  000022  4003  043572
  P$UNI     4003  044260    4003  044214    000046  000032  4003  043656
  P$WLN     4003  044360    4003  044310    000044  000030  4003  043756
  P$WRC     4003  044502    4003  044406    000046  000036  4003  044100
  P$WRI     4003  044612    4003  044536    000050  000034  4003  044212
  P$WRS     4003  045024    4003  044646    000054  000040  4003  044422
  P$BASE    4003  045114    4003  045062    000052  000024  4003  044514
  P$COMP    4003  045420    4003  045140    000066  000032  4003  045016
  P$INIT    4003  045540    4003  045450    000050  000050  4003  045134
  P$FJP     4003  046036    4003  045604    000022  000236  4003  045436
  P$XJP     4003  046056    4003  045625    000022  000236  4003  045436
  P$CUP     4003  046076    4003  045644    000022  000236  4003  045436
  P$RET     4003  046116    4003  045656    000022  000236  4003  045436
  P$BOMB    4003  046136    4003  045704    000022  000236  4003  045436
  P$SPC     4003  046202    4003  045741    000022  000236  4003  045436
  P$LPC     4003  046222    4003  045777    000022  000236  4003  045436
  P$WALK    4003  046457    4003  046274    000050  000000  4001  177376
  MOVE2S    4003  046632    4003  046502    000024  000020  4003  046232
  F$LT71    4003  047040    4003  046702    000020  000000  4001  177376
  F$RT71    4003  047060    4003  046725    000020  000000  4001  177376
  F$LT77    4003  047100    4003  047004    000020  000000  4001  177376
  F$RT77    4003  047120    4003  047011    000020  000000  4001  177376
  F$OR77    4003  047154    4003  047140    000020  000020  4003  046554
  F$ERX     4003  047222    4003  047174    000020  000026  4003  046622

DIRECT ENTRY LINKS
  SWT       4003  046652    PRINT     4003  046656    DATE      4003  046662  
  GETCH     4003  046666    REMARK    4003  046672    PUTCH     4003  046676  
  EXIT      4003  047250    TNOU      4003  047254    TNOUA     4003  047260  
  GCHAR     4003  047264  

COMMON BLOCKS 
  MP        4000  000700            SP        4000  000701          
  EP        4000  000702            NP        4000  000703          
  CSTORE    4004  000000          

OTHER SYMBOLS 
  SWT$TP    2030  120000    F192QFP5  4001  177776    SWT$CM    4040  010000