(U-000206A1): Use `ideographic-{radical|strokes}@ucs' instead of

`ideographic-{radical|strokes}'; add
`ideographic-{radical|strokes}@cns' and
`ideographic-radical@cns*sources'; use `->denotational' instead of
`->identical' and `<-same'.
(IU-000206A1): Unify C7-4E3E.

diff --git a/lisp/utf-2000/Ideograph-R017-Open-Box.el b/lisp/utf-2000/Ideograph-R017-Open-Box.el
index c746183..23f497a 100644 (file)
--- a/lisp/utf-2000/Ideograph-R017-Open-Box.el
+++ b/lisp/utf-2000/Ideograph-R017-Open-Box.el
@@ -761,18 +761,28 @@
     (=daikanwa         . 01844)        ; &M-01844;
     ))
 (define-char
-  '((ideographic-radical . 17) ; ⼐
-    (ideographic-strokes . 18)
+  '((ideographic-radical@ucs . 17)     ; ⼐
+    (ideographic-strokes@ucs . 18)
+    (ideographic-radical@cns . 87)     ; ⽖
+    (ideographic-strokes@cns . 16)
+    (ideographic-radical@cns*sources
+     daikanwa cns11643)
     (total-strokes      . 20)
-    (->identical
-     ((=cns11643-7       . #x4E3E)     ; &C7-4E3E; [46-30]
-      ))
-    (<-same
-     ((=daikanwa         . 49274)      ; &M-49274;
-      ))
     (=ucs              . #x206A1)      ; 𠚡
     ))
 (define-char
+  '((<-denotational
+     ((=ucs              . #x206A1)    ; 𠚡
+      ))
+    (ideographic-radical@ucs . 17)     ; ⼐
+    (ideographic-strokes@ucs . 18)
+    (ideographic-radical@cns . 87)     ; ⽖
+    (ideographic-strokes@cns . 16)
+    (total-strokes      . 20)
+    (=cns11643-7       . #x4E3E)       ; &C7-4E3E; [46-30]
+    (=ucs@iso          . #x206A1)      ; &C7-4E3E;
+    ))
+(define-char
   '((ideographic-radical . 17) ; ⼐
     (hanyu-dazidian    1 307 7)
     (=ucs              . #x2067C)      ; 𠙼