(J0-3B7B): Use `=shinjigen' instead of `=shinjigen@rev' for S-1879.

(U-00021B1E): New character.
(C3-255E): Use `<-subsumptive' to integrate H2-B7C4.

diff --git a/lisp/utf-2000/Ideograph-R041-Inch.el b/lisp/utf-2000/Ideograph-R041-Inch.el
index 5611b37..c533594 100644 (file)
--- a/lisp/utf-2000/Ideograph-R041-Inch.el
+++ b/lisp/utf-2000/Ideograph-R041-Inch.el
@@ -67,7 +67,7 @@
     (=gt-k             . 01625)        ; &I-GT-K01625;
     (=gt-pj-1          . #x3B7B)       ; &I-GT-09324; [27-91]
     (=daikanwa         . 07414)        ; &I-M-07414;
-    (=shinjigen@rev    .  1879)        ; &GT-09324;
+    (=shinjigen                .  1879)        ; &GT-09324;
     (=ucs@unicode      . #x5BFA)       ; &GT-09324;
     ))
 (define-char
@@ -83,6 +83,17 @@
   '((ideographic-radical . 41) ; ⼨
     (ideographic-strokes . 3)
     (total-strokes      . 6)
+    (=ucs              . #x21B1E)      ; 𡬞
+    (->subsumptive
+     ((=daikanwa         . 07415)      ; &M-07415;
+      )
+     ((=ucs@iso                  . #x21B1E)    ; &U-00021B1E;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 41) ; ⼨
+    (ideographic-strokes . 3)
+    (total-strokes      . 6)
     (=ucs              . #x5BFB)       ; 寻
     (=gb2312           . #x5130)       ; &I-G0-5130; [49-16]
     ))
@@ -121,8 +132,12 @@
     (ideographic-radical . 41) ; ⼨
     (ideographic-strokes . 4)
     (total-strokes      . 7)
-    (=cns11643-3       . #x255E)       ; &C3-255E; [05-62]
-    (=ucs@unicode      . #x5BFD)       ; &C3-255E;
+    (->subsumptive
+     ((=hanziku-2        . #xB7C4)     ; &HZK02-B7C4;
+      (=ucs@unicode      . #x5BFD)     ; &HZK02-B7C4;
+      )
+     ((=cns11643-3       . #x255E)     ; &C3-255E; [05-62]
+      ))
     ))
 (define-char
   '((ideographic-radical . 41) ; ⼨