(U-00021D0B): Use `->denotational' and `->subsumptive'; use

`ideographic-{radical|strokes}@ucs' instead of
`ideographic-{radical|strokes}'; add
`ideographic-{radical|strokes}@ucs*sources',
`ideographic-{radical|strokes}@ucs/compat' and
`ideographic-{radical|strokes}@ucs/compat*sources'.

diff --git a/lisp/utf-2000/Ideograph-R045-Sprout.el b/lisp/utf-2000/Ideograph-R045-Sprout.el
index 16acf25..b812c09 100644 (file)
--- a/lisp/utf-2000/Ideograph-R045-Sprout.el
+++ b/lisp/utf-2000/Ideograph-R045-Sprout.el
@@ -206,12 +206,35 @@
     (=ucs              . #x21D08)      ; 𡴈
     ))
 (define-char
-  '((ideographic-radical . 45) ; ⼬
-    (ideographic-strokes . 5)
+  '((ideographic-radical@ucs . 45)     ; ⼬
+    (ideographic-strokes@ucs . 5)
+    (ideographic-radical@ucs*sources
+     daikanwa=07842 cns11643-4)
+    (ideographic-strokes@ucs*sources
+     daikanwa=07842)
+    (ideographic-radical@ucs/compat . 80)      ; ⽏
+    (ideographic-strokes@ucs/compat . 3)
+    (ideographic-radical@ucs/compat*sources
+     daikanwa=16728 cns11643-6)
+    (ideographic-strokes@ucs/compat*sources
+     daikanwa=16728)
     (total-strokes      . 8)
     (=ucs              . #x21D0B)      ; 𡴋
-    (=cns11643-4       . #x262D)       ; &I-C4-262D; [06-13]
-    (=daikanwa         . 07842)        ; &I-M-07842;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x21D0B)    ; 𡴋
+      ))
+    (ideographic-radical . 45) ; ⼬
+    (ideographic-strokes . 5)
+    (total-strokes      . 8)
+    (->subsumptive
+     ((=daikanwa         . 07842)      ; &M-07842;
+      (=ucs@iso                  . #x21D0B)    ; &M-07842;
+      )
+     ((=cns11643-4       . #x262D)     ; &C4-262D; [06-13]
+      (=ucs@cns                  . #x21D0B)    ; &C4-262D;
+      ))
     ))
 (define-char
   '((ideographic-radical . 45) ; ⼬