;WLDSCN symbols

;MFD symbols
MF.LNK=506.
MF.PPN=0
MF.UFD=2
MF.SIZ=8.

;UFD symbols
UF.FIL=0
UF.EXT=4
UF.BLK=6
UF.ACT=10
UF.LNK=12
UF.SIZ=14

;impure area
OFINI
OFDEF   WS.DDB,D.DDB                    ;DDB for disk I/O
OFDEF   WS.DEV,2                        ;device code RAD50
OFDEF   WS.DRV,2                        ;drive number
OFDEF   WS.FIL,6                        ;filename
OFDEF   WS.EXT,4                        ;extension
OFDEF   WS.PRG,3                        ;programmer number
OFDEF   WS.PRJ,3                        ;project number
OFDEF   WS.TMP,10.                      ;temporary storage
OFDEF   WS.DFX,4                        ;default extension
OFDEF   WS.DTI,4                        ;device table index
OFDEF   WS.MFL,4                        ;MFD link
OFDEF   WS.MFB,512.                     ;MFD buffer
OFDEF   WS.MFI,4                        ;MFD index
OFDEF   WS.RPN,2                        ;remaining PPNs in MFD block
OFDEF   WS.UFL,4                        ;UFD link
OFDEF   WS.UFB,512.                     ;UFD buffer
OFDEF   WS.UFI,4                        ;UFD index
OFDEF   WS.RFN,2                        ;remaining files in UFD block
OFDEF   WS.FLG,4                        ;flags--.
       WS$DEV=1                        ; device was specified
       WS$ALL=2                        ; device ALL: was specified
       WS$ERZ=4                        ; erastz device was specified
       WS$FIL=10                       ; filename was specified
       WS$EXT=20                       ; extension was specified
       WS$PPN=40                       ; [P,PN] was specified
       WS$ERR=100                      ; specification invalid
       WS$UNM=200                      ; device not mounted
       WS$DNE=400                      ; device does not exist
       WS$NOT=1000                     ; 'NOT' specified
OFSIZ   WS.IMP