(U-00020B02): Use `->subsumptive'; use `->synonyms*sources' instead of

char-ref in `->synonyms'.

diff --git a/lisp/utf-2000/Ideograph-R028-Private.el b/lisp/utf-2000/Ideograph-R028-Private.el
index 6eb5d55..e1b6d50 100644 (file)
--- a/lisp/utf-2000/Ideograph-R028-Private.el
+++ b/lisp/utf-2000/Ideograph-R028-Private.el
@@ -908,21 +908,37 @@
     (=hanziku-1                . #xF5F0)       ; &I-HZK01-F5F0;
     ))
 (define-char
-  '((ideographic-radical . 28) ; ⼛
-    (ideographic-strokes . 10)
+  '((ideographic-radical@ucs . 28)     ; ⼛
+    (ideographic-strokes@ucs . 10)
+    (ideographic-radical@ucs*sources
+     daikanwa=03104 ucs)
+    (ideographic-radical@cns . 136)    ; ⾇
+    (ideographic-strokes@cns . 6)
+    (ideographic-radical@cns*sources
+     daikanwa=30340 cns11643)
     (total-strokes      . 12)
-    (->identical
-     ((=daikanwa         . 30340)      ; &M-30340;
-      ))
-    (->synonyms
-     (:sources (henkai-ruihen morohashi-daikanwa)
-      :char    ((=daikanwa          . 13502)   ; &I-M-13502;
-                )
-      ))
-    (hanyu-dazidian    1 389 3)
     (=ucs              . #x20B02)      ; 𠬂
-    (=daikanwa         . 03104)        ; &I-M-03104;
-    (=hanziku-1                . #xF5EF)       ; &I-HZK01-F5EF;
+    (->subsumptive
+     ((hanyu-dazidian    1 389 3)
+      (=hanziku-1        . #xF5EF)     ; &HZK01-F5EF;
+      (=ucs@iso                  . #x20B02)    ; &HZK01-F5EF;
+      (->subsumptive
+       ((ideographic-radical . 28)     ; ⼛
+       (ideographic-strokes . 10)
+       (->synonyms
+        ((=daikanwa          . 13502)  ; &I-M-13502;
+         ))
+       (->synonyms*sources
+        pianhai-leibian daikanwa)
+       (=daikanwa          . 03104)    ; &M-03104;
+       )
+       ((ideographic-radical . 136)    ; ⾇
+       (ideographic-strokes . 6)
+       (=daikanwa          . 30340)    ; &M-30340;
+       ))
+      )
+     ((=cns11643-6       . #x4D62)     ; &C6-4D62; [45-66]
+      ))
     ))
 (define-char
   '((ideographic-radical . 28) ; ⼛