-39,,/;EJCMPLS/
;	7-oct-82 ed cetron   enter for biomedical design                        ;EJC001
;	ejco1	add variable $sysiz                                             ;EJC001
;
-75,77,/;EJCMPLS/
$MDSIZ::.WORD	0		; CURRENT SYSTEM SIZE (32 WD)
$dssiz::.word	0		; current display system size (32wd)	; ejc01 ;EJC001
$MDWSF::.WORD	-1		; WORST SECPOOL FREE BLKS
$MDWSP::.WORD	0		; WORST SECPOOL FREE %
-94,94,/;EJCMPLS/
	CMP	R1,$mdsiz	; IN REAL MEMORY	;ejc01                  ;EJC001
/