(U+5DFB): Use `->denotational' to integrate HD-JT-B098 and HD-JT-B099.

(HD-JT-B098): New character.
(HD-JT-B099): New character.

diff --git a/lisp/utf-2000/Ideograph-R049-Oneself.el b/lisp/utf-2000/Ideograph-R049-Oneself.el
index 54b6fcb..b6738db 100644 (file)
--- a/lisp/utf-2000/Ideograph-R049-Oneself.el
+++ b/lisp/utf-2000/Ideograph-R049-Oneself.el
@@ -304,6 +304,19 @@
     (ideographic-strokes . 6)
     (total-strokes      . 9)
     (=ucs              . #x5DFB)       ; 巻
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x5DFB)     ; 巻
+      ))
+    (ideographic-radical . 49) ; ⼰
+    (ideographic-strokes . 6)
+    (total-strokes      . 9)
+    (=>>ucs@unicode    . #x5DFB)       ; &G-GT-11038;
+    (=>>jis-x0208      . #x342C)       ; &G-GT-11038; [20-12]
+    (=>>jis-x0213-1    . #x342C)       ; &G-GT-11038; [20-12]
+    (=>>gt             . 11038)        ; &G-GT-11038;
+    (=>>gt-k           . 05217)        ; &G-GT-11038;
     (->subsumptive
      ((morohashi-daikanwa      8759 1)
       (=ucs@jis                  . #x5DFB)     ; &GT-11038;
@@ -325,6 +338,30 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=ucs              . #x5DFB)     ; 巻
+      ))
+    (ideographic-radical . 49) ; ⼰
+    (ideographic-strokes . 6)
+    (total-strokes      . 9)
+    (=>>hanyo-denshi/jt . #xB098)      ; &G-HD-JT-B098;
+    (->subsumptive
+     ((=decomposition@hanyo-denshi
+       ((=ucs              . #x5DFB)   ; 巻
+       )
+       ((=ucs              . #xE0103)  ; 󠄃
+       ))
+      (=hanyo-denshi/jt          . #xB098)     ; 巻󠄃
+      )
+     ((=decomposition@hanyo-denshi
+       ((=ucs              . #x5DFB)   ; 巻
+       )
+       ((=ucs              . #xE0102)  ; 󠄂
+       ))
+      (=hanyo-denshi/jt          . #xB099)     ; 巻󠄂
+      ))
+    ))
+(define-char
   '((ideographic-radical . 49) ; ⼰
     (ideographic-strokes . 6)
     (total-strokes      . 9)