;;; Code:
+;;;###autoload
(defun ideographic-structure-convert-to-ucs (structure)
(let (dest cell ucs ret)
(while structure
(decode-char 'ucs #x9751))
))
+;;;###autoload
(defun ideographic-structure-convert-to-daikanwa (structure)
(let (dest cell morohashi ret)
(while structure