;[[[[[[[[[[[[**]]]]]]]]]]]][[[[[[[[[[[[**]]]]]]]]]]]][[[[[[[[[[[[**]]]]]]]]]]]]
;									      ;
;	CLRSCR.MAR	Susan K. Seaholm				      ;
;									      ;
;	Clear the Screen.						      ;
;									      ;
;[[[[[[[[[[[[**]]]]]]]]]]]][[[[[[[[[[[[**]]]]]]]]]]]][[[[[[[[[[[[**]]]]]]]]]]]]
;
	.title CLRSCR
;
	.entry CLRSCR,0
;
	pushl #1
	pushl #1
	calls #2,G^SCR$ERASE_PAGE
;
	$EXIT_S
	.end CLRSCR
;
;[[[[[[[[[[[[**]]]]]]]]]]]][[[[[[[[[[[[**]]]]]]]]]]]][[[[[[[[[[[[**]]]]]]]]]]]]
;
; Facility for Simulation of Stochastic Population Models
; Health Computer Sciences, University of Minnesota
; (Funded in part by NIH Grant RR-01632)