perm filename COMP.1[MAC,LSP] blob sn#216169 filedate 1976-05-18 generic text, type T, neo UTF8

(DEFUN FLUSH (EDGE L) 
       (MAPCAN 
	(FUNCTION (LAMBDA (Q) 
			  (AND (NOT (EQUAL (CAR Q) EDGE)) (LIST Q))))
	L))