;
; $Id: 3B_quanjiao,v 1.2 1991/11/21 08:41:29 proj Exp $
;
(defvar a (all))
(a)	(tozenalpha (a))
