(A-U+5F55-itaiji-001): Unify A-U+5F55-itaiji-003.

(U+5F55-itaiji-003): New character; use `<-denotational' for
A-U+5F55-itaiji-001.

diff --git a/lisp/utf-2000/Ideograph-R058-Snout.el b/lisp/utf-2000/Ideograph-R058-Snout.el
index 865f617..cb34204 100644 (file)
--- a/lisp/utf-2000/Ideograph-R058-Snout.el
+++ b/lisp/utf-2000/Ideograph-R058-Snout.el
@@ -2104,6 +2104,7 @@
      ((=ucs              . #x23C73)    ; 𣱳
       ))
     (=>ucs-itaiji-001  . #x5F55)       ; &A-U-i001+5F55;
+    (=>ucs-itaiji-003  . #x5F55)       ; &A-U-i001+5F55;
     ))
 (define-char
   '((<-denotational
@@ -2123,6 +2124,23 @@
     (=ucs-itaiji-001   . #x5F55)       ; &U-i001+5F55;
     ))
 (define-char
+  '((<-denotational
+     ((=>ucs-itaiji-001          . #x5F55)     ; &A-U-i001+5F55;
+      ))
+    (ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 6)
+    (total-strokes      . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x2B739)    ; 𫜹
+      )
+     ((=ucs              . #x23C73)    ; 𣱳
+      ))
+    (=ucs-itaiji-003   . #x5F55)       ; &U-i003+5F55;
+    ))
+(define-char
   '((ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 6)
     (total-strokes      . 9)