(George Source)
22#C #OPT K0PMREPLAC=0 22LS #LIS K0PMREPLAC>K0POST>K0ALLGEO 22^= # 23DW # 23YG #BAS ABC,FXINPRIN+1 24D6 # 24XQ ...#SEG PMREPLAC [ KAREL KOSKUBA - DIAG RAY BARNES + 25CB # 25X2 # 26BL # THIS SEGMENT CONTAINS REPLACERS FOR PM SEGMENTS: 26W= # 27*W # PMDR 27TG # PMFSB 28*6 # 28SQ # IT ALSO CONTAINS CERTAIN COMMONLY USED UNIVERSAL 29#B # LOCATIONS USED BY ROUTINES AND SEGMENTS 29S2 # THROUGHOUT POSTMORTEM 2=?L # 2=R= # 2?=W # 2?QG JPMFSBAS [ USED BY PMDR 2#=6 FPRLIN +FFPRLIN 2#PQ FPRRCD +FFPRRCD 2*9B JGETFCB1 +JJGETFCB1 2*P2 JGETFCB +JJGETFCB 2BN= JPMDRBAS [ USED BY PMDR 2C7W JPMSEG +JJPMSEG 2CMG JGNO1 +JJGNO1 2D76 JGNO2 +JJGNO2 2DLQ JDECN +JJDECN 2F6B JDECP +JJDECP 2FL2 JDECS +JJDECS 2G5L JDECDEC +JJDECDEC 2GK= JOCT +JJOCT 2H4W JCHA +JJCHA 2HJG JCON4 +JJCON4 2J46 JCON1 +JJCON1 2JHQ JUP +JJUP 2K3B JPRINT +JJPRINT 2KH2 JPRINT1 +JJPRINT1 2L2L JPRINT2 +JJPRINT2 2LG= JPRINTX +JJPRINTX 2L^W JBSNUM +JJBSNUM 2M9N ...JSUBSREAD +JJSUBSREAD 2MFG JBSADDSWAP +JJBSADDSWAP 2M^6 JBSADDGEO +JJBSADDGEO 2NDQ JCTWIN +JJCTWIN 2NYB JSEGREAD +JJSEGREAD 2PD2 JSEGREAD2 +JJSEGREAD2 2PXL JOZ +JDBASE.3 2QC= JLPMOD +JDBASE+1 2QWW JPMOD +JDBASE.3 2RBG JPLACEND [ USED BY PMDR 2RW6 JLPREC 2S*Q #GAP K53-K50 2STB # 2T*2 JLINKA +0 2TSL JXLINK 2W#= JLINKB +0 2WRW JLINKC +0 2X?G JLINK0 +0 2XR6 JLINK1 +0 2Y=Q JLINK2 +0 2YQB JLINK3 +0 2^=2 JLINK4 +0 2^PL JLINK5 +0 329= JLINK7 +0 32NW JWLINK +0 338G #GAP 6 33?5 ...#SKI G3 33*N ...( 33D? ...JRECBLK +JJRECBLK [TWO REPLACERS FOR RECALL FIE 33GW ...JZDECANT +JJZDECANT [ENHANCEMENT 33KF ...) 33N6 # 347Q #END 34MB # 3572 #OVE 35LL # ^^^^ ...44131411000500000000