(U+3831-itaiji-001): New character to subsume H3-C9AF; use

`<-denotational' for U+3831.

diff --git a/lisp/utf-2000/Ideograph-R049-Oneself.el b/lisp/utf-2000/Ideograph-R049-Oneself.el
index f64d1a8..462b8c3 100644 (file)
--- a/lisp/utf-2000/Ideograph-R049-Oneself.el
+++ b/lisp/utf-2000/Ideograph-R049-Oneself.el
@@ -1218,7 +1218,13 @@
       )
      ((=ucs              . #x5176)     ; 其
       ))
-    (=hanziku-3                . #xC9AF)       ; &HZK03-C9AF;
+    (=ucs-itaiji-001   . #x3831)       ; &U-i001+3831;
+    (->subsumptive
+     ((==ucs-itaiji-001          . #x3831)     ; &g2-U-i001+3831;
+      (->subsumptive
+       ((=hanziku-3        . #xC9AF)   ; &HZK03-C9AF;
+       ))
+      ))
     ))
 (define-char
   '((ideographic-radical . 49) ; ⼰