(U+7550): Use `->denotational' to integrate GT-K7666.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R006-Hook.el

diff --git a/lisp/utf-2000/Ideograph-R006-Hook.el b/lisp/utf-2000/Ideograph-R006-Hook.el
index 08bc059..09ab277 100644 (file)
--- a/lisp/utf-2000/Ideograph-R006-Hook.el
+++ b/lisp/utf-2000/Ideograph-R006-Hook.el
@@ -77,6 +77,7 @@
     (ideographic-radical . 6)  ; ⼅
     (ideographic-strokes . 1)
     (total-strokes      . 2)
+    (=>>ucs@cns                . #x2010D)      ; &G-CU+2010D;
     (->subsumptive
      ((=daikanwa         . 00227)      ; &M-00227;
       )
@@ -197,6 +198,14 @@
   '((ideographic-radical . 6)  ; ⼅
     (ideographic-strokes . 3)
     (total-strokes      . 4)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x4E3F)     ; 丿
+      )
+     ((=ucs              . #x624D)     ; 才
+      ))
     (=ucs              . #x20112)      ; 𠄒
     (->subsumptive
      ((hanyu-dazidian    1 33 4)
@@ -222,6 +231,7 @@
        )
        ((=gt               . 00010)    ; &GT-00010;
        ))
+      (=ucs@cns                  . #x20112)    ; &C6-2147;
       (=cns11643-6       . #x2147)     ; &C6-2147; [01-39]
       ))
     ))
@@ -240,14 +250,25 @@
     (ideographic-strokes . 3)
     (total-strokes      . 4)
     (=ucs              . #x20114)      ; 𠄔
-    (=daikanwa         . 00234)        ; &I-M-00234;
     ))
 (define-char
-  '((=>ucs             . #x20114)      ; 𠄔
-    (morohashi-daikanwa        234 0 9)
+  '((<-denotational
+     ((=ucs              . #x20114)    ; 𠄔
+      ))
+    (ideographic-radical . 6)  ; ⼅
+    (ideographic-strokes . 3)
+    (total-strokes      . 4)
+    (=ucs@iso          . #x20114)      ; &M-00234;
+    (=daikanwa         . 00234)        ; &M-00234;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x20114)    ; 𠄔
+      ))
     (ideographic-radical . 6)  ; ⼅
     (ideographic-strokes . 3)
     (total-strokes      . 4)
+    (=ucs@cns          . #x20114)      ; &C6-2149;
     (=cns11643-6       . #x2149)       ; &C6-2149; [01-41]
     ))
 (define-char
@@ -329,14 +350,14 @@
      ((=ucs              . #x4E01)     ; 丁
       ))
     (=ucs              . #x20116)      ; 𠄖
-    (=>daikanwa                . 00237)        ; 𠄖
+    (=>>daikanwa       . 00237)        ; 𠄖
     (->subsumptive
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
        (=ucs               . #x2FF0)   ; ⿰
        )
-       ((=ucs@jis          . #x4EE4)   ; &GT-00521;
-       (=jis-x0208         . #x4E61)   ; &GT-00521; [46-65]
+       ((=ucs@jis          . #x4EE4)   ; 令󠄀
+       (=jis-x0208         . #x4E61)   ; 令󠄀 [46-65]
        (=ks-x1001          . #x5635)   ; &I-K0-5635; [54-21]
        (=jis-x0213-1       . #x4E61)   ; &I-JX1-4E61; [46-65]
        (=daikanwa          . 00387)    ; &I-M-00387;
@@ -511,12 +532,11 @@
     (=hanziku-2                . #xEC53)       ; &I-HZK02-EC53;
     ))
 (define-char
-  '((ideographic-      (:radical       2 ; ⼁
-                        :strokes       15
-                        :sources       (cns-11643))
-                       (:radical       6 ; ⼅
-                        :strokes       15
-                        :sources       (morohashi-daikanwa ucs)))
+  '((ideographic-radical@ucs . 6)      ; ⼅
+    (ideographic-radical@ucs*sources
+     daikanwa)
+    (ideographic-radical@cns . 2)      ; ⼁
+    (ideographic-strokes . 15)
     (total-strokes      . 16)
     (hanyu-dazidian    1 360 8)
     (=ucs              . #x2011D)      ; 𠄝