(M-28127): Add `<-formed' and `<-same' for M-21876.

diff --git a/lisp/utf-2000/Ideograph-R121-Jar.el b/lisp/utf-2000/Ideograph-R121-Jar.el
index 4fcd7a2..6f1df44 100644 (file)
--- a/lisp/utf-2000/Ideograph-R121-Jar.el
+++ b/lisp/utf-2000/Ideograph-R121-Jar.el
@@ -273,6 +273,16 @@
     (=ucs              . #x4346)       ; 䍆
     (->subsumptive
      ((=daikanwa         . 28127)      ; &M-28127;
+      (<-formed
+       ((=daikanwa         . 21876)    ; &M-21876;
+       ))
+      (<-formed*sources
+       jiyun)
+      (<-same
+       ((=daikanwa         . 21876)    ; &M-21876;
+       ))
+      (<-same*sources
+       jiyun daikanwa)
       )
      ((=cns11643-5       . #x3460)     ; &C5-3460; [20-64]
       )