(M-14302): Unify HD-KS158130 and KOSEKI-158130; use `->subsumptive'

for representative nodes.
(R-M-14302): New node.
(R-KS158130): New node.

diff --git a/lisp/utf-2000/Ideograph-R073-Say.el b/lisp/utf-2000/Ideograph-R073-Say.el
index d2aebb7..64c3db5 100644 (file)
--- a/lisp/utf-2000/Ideograph-R073-Say.el
+++ b/lisp/utf-2000/Ideograph-R073-Say.el
@@ -864,7 +864,15 @@
     (=>>hanyo-denshi/jd . #x2E37)      ; &G-JX2-2E37; [14-23]
     (=>>daikanwa       . 14302)        ; &G-JX2-2E37;
     (->subsumptive
-     ((=daikanwa         . 14302)      ; &M-14302;
+     ((=hanyo-denshi/ks          . 158130)     ; &HD-KS-158130;
+      (=koseki           . 158130)     ; &HD-KS-158130;
+      (=daikanwa         . 14302)      ; &HD-KS-158130;
+      (->subsumptive
+       ((==daikanwa        . 14302)    ; &R-M-14302;
+       )
+       ((==hanyo-denshi/ks  . 158130)  ; &R-HD-KS-158130;
+       (=hanyo-denshi/ks/mf . #x3DC5)  ; &R-HD-KS-158130;
+       ))
       )
      ((=decomposition@hanyo-denshi
        ((=ucs              . #x6701)   ; 朁