(U+FA39): New character.

(U+5841): Use `<-simplified-ideograph' instead of
`simplified-ideograph-of'.
(U+58A8): Add JU+FA3A.
(U+FA3A): New character.

diff --git a/lisp/utf-2000/Ideograph-R032-Earth.el b/lisp/utf-2000/Ideograph-R032-Earth.el
index 35f4752..5f830b3 100644 (file)
--- a/lisp/utf-2000/Ideograph-R032-Earth.el
+++ b/lisp/utf-2000/Ideograph-R032-Earth.el
@@ -6702,15 +6702,32 @@
     (ucs               . #x5840)       ; 塀
     ))
 (define-char
-  '((morohashi-daikanwa        5316 1)
+  '((=>ucs*            . #x5840)       ; 塀
+    (morohashi-daikanwa        5316 0 2)
     (ideographic-radical . 32) ; ⼟
     (ideographic-strokes . 9)
     (total-strokes      . 12)
-    (simplified-ideograph-of
-     ((sources           morohashi-daikanwa)
-      (char . ((ideograph-daikanwa . 05574)    ; �����
-              ))
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (ucs               . #x2FF0)     ; ⿰
+      )
+     ((ucs               . #x571F)     ; 土
+      )
+     ((korean-ksc5601    . #x5C34)     ; �����
+      (ideograph-daikanwa . 09175)     ; �����
       ))
+    (japanese-jisx0213-1       . #x2F5A)       ; �����
+    (ucs                       . #xFA39)       ; 塀
+    ))
+(define-char
+  '((morohashi-daikanwa        5316 1)
+    (ideographic-radical . 32) ; ⼟
+    (ideographic-strokes . 9)
+    (total-strokes      . 12)
+    (<-simplified-ideograph
+     (:char    ((ideograph-daikanwa . 05574)   ; �����
+                )
+      :sources (morohashi-daikanwa)))
     (=jis-x0208                . #x4E5D)       ; �����
     (ucs               . #x5841)       ; 塁
     ))
@@ -9610,9 +9627,18 @@
     (chinese-big5              . #xBEA5)       ; ������
     (ideograph-daikanwa                . 05469)        ; �����
     (china3-jef                        . #x47DC)       ; �����
+    (ucs-jis                   . #xFA3A)       ; 墨
     (ucs                       . #x58A8)       ; 墨
     ))
 (define-char
+  '((=>ucs*            . #x58A8)       ; 墨
+    (morohashi-daikanwa        5469 0 0)
+    (ideographic-radical . 32) ; ⼟
+    (ideographic-strokes . 12)
+    (total-strokes      . 15)
+    (ucs               . #xFA3A)       ; 墨
+    ))
+(define-char
   '((=>ucs             . #x58A8)       ; 墨
     (morohashi-daikanwa        5469 0 5)
     (ideographic-radical . 32) ; ⼟