EQUATE HL = 24,                 << header length>>                      00010000
       headerlength = 24,                                               00015000
       trailerlength=4,                                                 00020000
       overhead=headerlength+trailerlength;                             00025000
                                                                        00030000
equate sectorspermainmempage=1;  <<constants>>                          00035000
                                                                        00040000
<< previous trailer >>                                                  00045000
                                                                        00050000
equate rbtoptssdisp =-hl-3,     << prev. trailer subregion size >>      00055000
       rbtoptrasdisp =-hl-2,    << prev. trailer region state >>        00060000
       rbtoptrsdisp =-hl-1;     << prev. trailer region size >>         00065000
                                                                        00070000
<< global region header >>                                              00075000
                                                                        00080000
equate rbtorasdisp = -hl,       << region assignment state >>           00085000
       rbtorsdisp = -hl+1,      << region size >>                       00090000
       rbtoiocntdisp = -hl+2,   << on-going i/o count >>                00095000
       rbtoinitmsgdisp = -hl+3, << initiation message (flags) >>        00100000
       rbtoinitinfodisp =-hl+4, << locn of disk req or move msg >>      00105000
       rbtopldisp = -hl+4,      << link to prior avbl region >>         00110000
       rbtocompmsgdisp = -hl+5, << completion msg (flags) >>            00115000
       rbtompqlinkdisp =-hl+6,  << makepresent deferred queue >>        00120000
       rbtonldisp = -hl+6,      << link to next avbl region >>          00125000
       rbtorpagecntdisp=-hl+7,  << release page count >>                00130000
       rbtoioreqqdisp =-hl+8;   << i/o device request queue >>          00135000
                                                                        00140000
<< subregion header >>                                                  00145000
                                                                        00150000
equate rbtosasdisp = -hl+9,     <<subregion assignment state>>          00155000
       rbtossdisp = -hl+10,     << subregion size >>                    00160000
       rbtosddisp = -hl+11,     << subregion displacement >>            00165000
       rbtowreqpdisp = -hl+12,  << write request pointer >>             00170000
       rbtoobjidentdisp=-hl+13, << object identifier >>                 00175000
       rbtopddisp = -hl+15,     << previous cached domain address >>    00180000
       rbtolkfzcntdisp =-hl+15, << lock & freeze count >>               00185000
       rbtowdiofzcntdisp=-hl+16,<< write disabled & i/o frozen cnt >>   00190000
       rbtohodadisp = -hl+17,   << ldev & high disk addr >>             00195000
       rbtolodadisp = -hl+18,   << low order disk addr >>               00200000
       rbtonddisp = -hl+19,     << next cached domain address >>        00205000
       rbtoarrtimedisp =-hl +21; << time of arrival of obj/domain>>     00210000
                                                                        00215000
<<relative equates>>                                                    00220000
                                                                        00225000
equate                                                                  00230000
       nltorbdisp = -rbtonldisp,                                        00235000
       pltorbdisp = -rbtopldisp,                                        00240000
       trastotssdisp = -1,                                              00245000
       rastossdisp = rbtossdisp-rbtorasdisp,                            00250000
       sstoptrasdisp = rbtoptrasdisp-rbtossdisp,                        00255000
       pltonldisp = rbtonldisp-rbtopldisp,                     <<07076>>00260000
       nltopldisp=-pltonldisp,                                 <<07076>>00265000
       nltorsdisp=rbtorsdisp-rbtonldisp;                       <<07076>>00270000
define                                                                  00275000
                                                                        00280000
       <<region assignment state flags>>                                00285000
                                                                        00290000
       regassignedflag = (0:1)#,                                        00295000
       regreservedflag = (1:1)#,                                        00300000
       regavailableflag = (2:1)#,                                       00305000
       regclearedflag = (3:1)#,                                         00310000
       sizechangepndgflag = (4:1)#,                                     00315000
       regnonmoveflags = (5:3)#,                                        00320000
       reglkdflag = (5:1)#,                                             00325000
       regfzflag = (6:1)#;                                              00330000
