;
; $Id: 3B_KATAKANA,v 1.1 1991/09/09 22:39:33 ohm Exp $
;
(defvar a (all))
(a)	(tokata (a))
