(U-00024517): Copied from Ideograph-R087-Claw.el; use `->subsumptive'.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R031-Enclosure.el

diff --git a/lisp/utf-2000/Ideograph-R031-Enclosure.el b/lisp/utf-2000/Ideograph-R031-Enclosure.el
index e8a36bf..3a4c7d2 100644 (file)
--- a/lisp/utf-2000/Ideograph-R031-Enclosure.el
+++ b/lisp/utf-2000/Ideograph-R031-Enclosure.el
@@ -652,12 +652,12 @@
     (=ucs              . #x56E7)       ; 囧
     ))
 (define-char
-  '((ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 4)
-    (total-strokes      . 7)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x56E7)     ; 囧
       ))
+    (ideographic-radical . 31) ; ⼞
+    (ideographic-strokes . 4)
+    (total-strokes      . 7)
     (=big5             . #xCAA8)       ; &B-CAA8;
     (->subsumptive
      ((ideographic-structure
@@ -687,12 +687,12 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 4)
-    (total-strokes      . 7)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x56E7)     ; 囧
       ))
+    (ideographic-radical . 31) ; ⼞
+    (ideographic-strokes . 4)
+    (total-strokes      . 7)
     (=ucs@unicode      . #x56E7)       ; &UU+56E7;
     ))
 (define-char
@@ -742,23 +742,23 @@
     (=ucs              . #x56F1)       ; 囱
     ))
 (define-char
-  '((ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 4)
-    (total-strokes      . 7)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x56F1)     ; 囱
       ))
+    (ideographic-radical . 31) ; ⼞
+    (ideographic-strokes . 4)
+    (total-strokes      . 7)
     (=jis-x0212                . #x367C)       ; &M-04710; [22-92]
     (=daikanwa         . 04710)        ; &I-M-04710;
     (=ucs@jis          . #x56F1)       ; &M-04710;
     ))
 (define-char
-  '((ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 4)
-    (total-strokes      . 7)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x56F1)     ; 囱
       ))
+    (ideographic-radical . 31) ; ⼞
+    (ideographic-strokes . 4)
+    (total-strokes      . 7)
     (=gb2312           . #x3451)       ; &G0-3451; [20-49]
     (=jef-china3       . #x8CD8)       ; &I-JC3-8CD8;
     (=ucs@unicode      . #x56F1)       ; &G0-3451;
@@ -2438,12 +2438,12 @@
     (=big5             . #xD4AB)       ; &I-B-D4AB;
     ))
 (define-char
-  '((ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 8)
-    (total-strokes      . 11)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x570A)     ; 圊
       ))
+    (ideographic-radical . 31) ; ⼞
+    (ideographic-strokes . 8)
+    (total-strokes      . 11)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND")
       (=ucs              . #x2FF4)     ; ⿴
@@ -2459,12 +2459,12 @@
     (=ucs@jis          . #x570A)       ; &M-04797;
     ))
 (define-char
-  '((ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 8)
-    (total-strokes      . 11)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x570A)     ; 圊
       ))
+    (ideographic-radical . 31) ; ⼞
+    (ideographic-strokes . 8)
+    (total-strokes      . 11)
     (->subsumptive
      ((hanyu-dazidian    1 720 6)
       (ideographic-structure
@@ -2695,22 +2695,22 @@
     (=hanziku-2                . #xE6C7)       ; &HZK02-E6C7;
     ))
 (define-char
-  '((=>ucs             . #x24517)      ; 𤔗
-    (ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 9)
-    (total-strokes      . 12)
-    (=daikanwa         . 04811)        ; &M-04811;
-    ))
-(define-char
-  '((=>ucs             . #x24517)      ; 𤔗
-    (morohashi-daikanwa        4811 0 0)
-    (ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 9)
+  '((ideographic-radical@ucs . 87)     ; ⽖
+    (ideographic-strokes@ucs . 9)
+    (ideographic-radical@cns . 31)     ; ⼞
+    (ideographic-strokes@cns . 9)
+    (ideographic-radical@cns*sources
+     daikanwa cns11643)
     (total-strokes      . 12)
-    (->identical
-     ((=ucs              . #x24517)    ; 𤔗
+    (=ucs              . #x24517)      ; 𤔗
+    (->subsumptive
+     ((=daikanwa         . 04811)      ; &M-04811;
+      )
+     ((hanyu-dazidian    3 2033 18)
+      (=cns11643-6       . #x4743)     ; &HZK05-F8B3; [39-35]
+      (=hanziku-5        . #xF8B3)     ; &I-HZK05-F8B3;
+      (=ucs@iso                  . #x24517)    ; &HZK05-F8B3;
       ))
-    (=cns11643-6       . #x4743)       ; &C6-4743; [39-35]
     ))
 (define-char
   '((=>ucs             . #x21207)      ; 𡈇
@@ -2878,12 +2878,12 @@
     (=ucs              . #x5712)       ; 園
     ))
 (define-char
-  '((ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 10)
-    (total-strokes      . 13)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x5712)     ; 園
       ))
+    (ideographic-radical . 31) ; ⼞
+    (ideographic-strokes . 10)
+    (total-strokes      . 13)
     (shinjigen-1       . 1334)
     (shinjigen-2       . 1334)
     (=jis-x0208                . #x3160)       ; &GT-06057; [17-64]
@@ -2897,12 +2897,12 @@
     (=ucs@unicode      . #x5712)       ; &GT-06057;
     ))
 (define-char
-  '((ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 10)
-    (total-strokes      . 13)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x5712)     ; 園
       ))
+    (ideographic-radical . 31) ; ⼞
+    (ideographic-strokes . 10)
+    (total-strokes      . 13)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND")
       (=ucs              . #x2FF4)     ; ⿴