Use `->subsumptive' for some character definitions.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R188-Bone.el

diff --git a/lisp/utf-2000/Ideograph-R188-Bone.el b/lisp/utf-2000/Ideograph-R188-Bone.el
index 2ce43c1..f43189b 100644 (file)
--- a/lisp/utf-2000/Ideograph-R188-Bone.el
+++ b/lisp/utf-2000/Ideograph-R188-Bone.el
@@ -1,33 +1,59 @@
 ;; -*- coding: utf-8-mcs-er -*-
 (define-char
-  '((=>ucs             . #x9AA8)       ; 骨
-    (ideographic-radical . 188)        ; ⾻
+  '((ideographic-radical . 188)        ; ⾻
     (ideographic-strokes . 0)
-    (total-strokes      . 10)
-    (shinjigen-2       . 9431)
-    (=jis-x0208                . #x397C)       ; &GT-60709; [25-92]
-    (=ks-x1001         . #x4D69)       ; &I-K0-4D69; [45-73]
-    (=gt               . 60709)        ; &I-GT-60709;
-    (=gt-k             . 06431)        ; &I-GT-K06431;
-    (=gt-pj-1          . #x397C)       ; &I-GT-60709; [25-92]
-    (=daikanwa         . 45098)        ; &I-M-45098;
-    (=ucs@jis          . #x9AA8)       ; &GT-60709;
+    (=ucs              . #x9AA8)       ; 骨
     ))
 (define-char
-  '((=>ucs             . #x9AA8)       ; 骨
-    (morohashi-daikanwa        45098 0 0)
+  '((<-denotational
+     ((=ucs              . #x9AA8)     ; 骨
+      ))
     (ideographic-radical . 188)        ; ⾻
     (ideographic-strokes . 0)
     (total-strokes      . 10)
-    (=cns11643-1       . #x586C)       ; &C1-586C; [56-76]
+    (->subsumptive
+     ((shinjigen-1       . 9431)
+      (shinjigen-2       . 9431)
+      (=jis-x0208        . #x397C)     ; &GT-60709; [25-92]
+      (=ks-x1001         . #x4D69)     ; &I-K0-4D69; [45-73]
+      (=gt               . 60709)      ; &I-GT-60709;
+      (=gt-k             . 06431)      ; &I-GT-K06431;
+      (=gt-pj-1                  . #x397C)     ; &I-GT-60709; [25-92]
+      (=daikanwa         . 45098)      ; &I-M-45098;
+      (=ucs@jis                  . #x9AA8)     ; &GT-60709;
+      )
+     ((=cns11643-1       . #x586C)     ; &C1-586C; [56-76]
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa        45098 0 4)
+  '((<-denotational
+     ((=ucs              . #x9AA8)     ; 骨
+      ))
     (ideographic-radical . 188)        ; ⾻
     (ideographic-strokes . 0)
     (total-strokes      . 9)
-    (=ucs              . #x9AA8)       ; 骨
-    (=gb2312           . #x3947)       ; &I-G0-3947; [25-39]
+    (=gb2312           . #x3947)       ; &G0-3947; [25-39]
+    (=ucs@unicode      . #x9AA8)       ; &G0-3947;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x9AA8)     ; 骨
+      ))
+    (name              . "CJK RADICAL BONE")
+    (general-category  symbol other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (=ucs              . #x2EE3)       ; ⻣
+    (<-identical@component
+     ((=ucs              . #x9AA8)     ; 骨
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((name              . "CJK RADICAL BONE")
+      (=ucs              . #x2EE3)     ; ⻣
+      ))
+    (=big5-cdp         . #x8A5C)       ; &CDP-8A5C;
     ))
 (define-char
   '((ideographic-radical . 188)        ; ⾻
@@ -943,12 +969,12 @@
     (=ucs              . #x4BD0)       ; 䯐
     ))
 (define-char
-  '((ideographic-radical . 188)        ; ⾻
-    (ideographic-strokes . 6)
-    (total-strokes      . 16)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x4BD0)     ; 䯐
       ))
+    (ideographic-radical . 188)        ; ⾻
+    (ideographic-strokes . 6)
+    (total-strokes      . 16)
     (->subsumptive
      ((=daikanwa         . 45165)      ; &M-45165;
       )
@@ -956,12 +982,12 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 188)        ; ⾻
-    (ideographic-strokes . 6)
-    (total-strokes      . 15)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x4BD0)     ; 䯐
       ))
+    (ideographic-radical . 188)        ; ⾻
+    (ideographic-strokes . 6)
+    (total-strokes      . 15)
     (=ucs@unicode      . #x4BD0)       ; &UU+4BD0;
     ))
 (define-char
@@ -970,12 +996,12 @@
     (=ucs              . #x4BD1)       ; 䯑
     ))
 (define-char
-  '((ideographic-radical . 188)        ; ⾻
-    (ideographic-strokes . 6)
-    (total-strokes      . 16)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x4BD1)     ; 䯑
       ))
+    (ideographic-radical . 188)        ; ⾻
+    (ideographic-strokes . 6)
+    (total-strokes      . 16)
     (->subsumptive
      ((=daikanwa         . 45166)      ; &M-45166;
       )
@@ -983,12 +1009,12 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 188)        ; ⾻
-    (ideographic-strokes . 6)
-    (total-strokes      . 15)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x4BD1)     ; 䯑
       ))
+    (ideographic-radical . 188)        ; ⾻
+    (ideographic-strokes . 6)
+    (total-strokes      . 15)
     (=ucs@unicode      . #x4BD1)       ; &UU+4BD1;
     ))
 (define-char
@@ -997,12 +1023,12 @@
     (=ucs              . #x4BD2)       ; 䯒
     ))
 (define-char
-  '((ideographic-radical . 188)        ; ⾻
-    (ideographic-strokes . 6)
-    (total-strokes      . 16)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x4BD2)     ; 䯒
       ))
+    (ideographic-radical . 188)        ; ⾻
+    (ideographic-strokes . 6)
+    (total-strokes      . 16)
     (->subsumptive
      ((=jis-x0213-2-2000  . #x7D2A)    ; &M-45167; [93-10]
       (=daikanwa         . 45167)      ; &I-M-45167;
@@ -1012,12 +1038,12 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 188)        ; ⾻
-    (ideographic-strokes . 6)
-    (total-strokes      . 15)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x4BD2)     ; 䯒
       ))
+    (ideographic-radical . 188)        ; ⾻
+    (ideographic-strokes . 6)
+    (total-strokes      . 15)
     (=ucs@unicode      . #x4BD2)       ; &UU+4BD2;
     ))
 (define-char
@@ -1717,7 +1743,7 @@
       )
      ((=cns11643-5       . #x6656)     ; &C5-6656; [70-54]
       )
-     ((=ucs@iso                  . #x29A61)    ; &UU+29A61;
+     ((=ucs@iso                  . #x29A61)    ; &U-00029A61;
       ))
     ))
 (define-char
@@ -1986,35 +2012,44 @@
     (=cns11643-7       . #x4C39)       ; &C7-4C39; [44-25]
     ))
 (define-char
-  '((=>ucs             . #x9AC4)       ; 髄
+  '((ideographic-radical . 188)        ; ⾻
+    (=ucs              . #x9AC4)       ; 髄
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x9AC4)     ; 髄
+      ))
     (morohashi-daikanwa        45240 1)
     (ideographic-radical . 188)        ; ⾻
     (ideographic-strokes . 9)
     (total-strokes      . 19)
+    (=jis-x0208                . #x3F71)       ; &GT-60862; [31-81]
+    (=gt               . 60862)        ; &I-GT-60862;
+    (=gt-pj-1          . #x3F71)       ; &I-GT-60862; [31-81]
+    (=ucs@jis          . #x9AC4)       ; &GT-60862;
     (<-simplified@JP/Jouyou
      ((=jis-x0208        . #x7172)     ; &GT-60935; [81-82]
       (=ks-x1001         . #x6250)     ; &I-K0-6250; [66-48]
       (=daikanwa         . 45289)      ; &I-M-45289;
       ))
-    (=jis-x0208                . #x3F71)       ; &GT-60862; [31-81]
-    (=gt               . 60862)        ; &I-GT-60862;
-    (=gt-pj-1          . #x3F71)       ; &I-GT-60862; [31-81]
-    (=ucs@jis          . #x9AC4)       ; &GT-60862;
     ))
 (define-char
-  '((=>ucs             . #x9AC4)       ; 髄
-    (morohashi-daikanwa        45240 1 1)
+  '((<-denotational
+     ((=ucs              . #x9AC4)     ; 髄
+      ))
     (ideographic-radical . 188)        ; ⾻
-    (ideographic-strokes . 10)
-    (total-strokes      . 20)
-    (=cns11643-3       . #x5D61)       ; &C3-5D61; [61-65]
+    (ideographic-strokes . 9)
+    (total-strokes      . 18)
+    (=ucs@unicode      . #x9AC4)       ; &UU+9AC4;
     ))
 (define-char
-  '((morohashi-daikanwa        45240 1 2)
+  '((<-denotational
+     ((=ucs              . #x9AC4)     ; 髄
+      ))
     (ideographic-radical . 188)        ; ⾻
-    (ideographic-strokes . 9)
-    (total-strokes      . 18)
-    (=ucs              . #x9AC4)       ; 髄
+    (ideographic-strokes . 10)
+    (total-strokes      . 20)
+    (=cns11643-3       . #x5D61)       ; &C3-5D61; [61-65]
     ))
 (define-char
   '((ideographic-radical . 188)        ; ⾻
@@ -2157,7 +2192,7 @@
       (=daikanwa         . 45248)      ; &M-45248;
       )
      ((total-strokes      . 19)
-      (=ucs@iso                  . #x29A83)    ; &UU+29A83;
+      (=ucs@iso                  . #x29A83)    ; &U-00029A83;
       )
      ((total-strokes      . 20)
       (=cns11643-5       . #x6E73)     ; &C5-6E73; [78-83]
@@ -2317,7 +2352,7 @@
       (=cns11643-5       . #x7236)     ; &C5-7236; [82-22]
       )
      ((total-strokes      . 20)
-      (=ucs@iso                  . #x29A8A)    ; &UU+29A8A;
+      (=ucs@iso                  . #x29A8A)    ; &U-00029A8A;
       ))
     ))
 (define-char
@@ -2376,7 +2411,7 @@
     (->subsumptive
      ((=daikanwa         . 45263)      ; &M-45263;
       )
-     ((=ucs@iso                  . #x29A8D)    ; &UU+29A8D;
+     ((=ucs@iso                  . #x29A8D)    ; &U-00029A8D;
       )
      ((=cns11643-5       . #x7235)     ; &C5-7235; [82-21]
       ))