;<DRAW>LAST.FAI.3, 15-NOV-75 18:06:02, EDIT BY HELLIWELL
VERSION(LAST,3)


XLIST
.litbeg:
LIT
.litend:
STORAGE(IMPURE)
.varbeg:
VAR
ORG .+20			;Overlap with boards file????
-1
.varend:
STORAGE(PURE)
LIST

IFN LIBSW!TWOSW,<

MD,<BEND D>
MPC,<BEND PC>

PASS1,<
DEPHASE
^LAY1E:
>;PASS1

PASS2,<
DEPHASE
^LAY2E:
TOTSUM__VERSUM	;PASS TOTAL BACK FOR FIXUP

TWO,<
STORAGE(LOW)
^LOWEND:
>;TWO
END SAVE
>;PASS2
^^PASSNM__PASSNM+1
>;IFN LIBSW!TWOSW

ONE,<
TOTSUM__VERSUM	;PASS TOTAL BACK FOR FIXUP
MD,<END STRT>
MPC,<END>
>;ONE

NOLAY,<
TOTSUM__VERSUM	;PASS TOTAL BACK FOR FIXUP
END STRT
>;NOLAY