(HD-JT-B27A): New character.

diff --git a/lisp/utf-2000/Ideograph-R071-Not.el b/lisp/utf-2000/Ideograph-R071-Not.el
index 1e85537..a734e1f 100644 (file)
--- a/lisp/utf-2000/Ideograph-R071-Not.el
+++ b/lisp/utf-2000/Ideograph-R071-Not.el
@@ -117,6 +117,17 @@
   '((ideographic-radical . 71) ; ⽆
     (ideographic-strokes . 5)
     (=ucs              . #x65E2)       ; 既
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x65E2)     ; 既
+      ))
+    (ideographic-radical . 71) ; ⽆
+    (ideographic-strokes . 5)
+    (=+>ucs@unicode    . #x65E2)       ; &o-J0-347B;
+    (=+>jis-x0208      . #x347B)       ; &o-J0-347B; [20-91]
+    (=+>jis-x0213-1    . #x347B)       ; &o-J0-347B; [20-91]
+    (=+>gt             . 17338)        ; &o-J0-347B;
     (->subsumptive
      ((total-strokes      . 10)
       (=ucs@jis                  . #x65E2)     ; &HD-JA-347B;
@@ -171,6 +182,20 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=ucs              . #x65E2)     ; 既
+      ))
+    (ideographic-radical . 71) ; ⽆
+    (ideographic-strokes . 7)
+    (total-strokes      . 11)
+    (=decomposition@hanyo-denshi
+     ((=ucs              . #x65E2)     ; 既
+      )
+     ((=ucs              . #xE0103)    ; 󠄃
+      ))
+    (=hanyo-denshi/jt  . #xB27A)       ; &HD-JT-B27A;
+    ))
+(define-char
   '((ideographic-radical . 71) ; ⽆
     (ideographic-strokes . 6)
     (total-strokes      . 10)