(U-00026634): Use `->subsumptive'.
[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R115-Grain.el
index 240d118..6381a99 100644 (file)
@@ -3,6 +3,7 @@
   '((ideographic-radical . 115)        ; ⽲
     (ideographic-strokes . 0)
     (total-strokes      . 5)
+    (shinjigen-1       . 5588)
     (shinjigen-2       . 5588)
     (=ucs              . #x79BE)       ; 禾
     (=jis-x0208                . #x3253)       ; &I-J90-3253; [18-51]
     (=ucs              . #x79EF)       ; 积
     (=gb2312           . #x3B7D)       ; &I-G0-3B7D; [27-93]
     (=daikanwa         . 25011)        ; &I-M-25011;
-    (=jef-china3       . #x5DA1)       ; &I-JC3-5DA1;
-    ))
-(define-char
-  '((->identical
-     ((=ucs              . #x79EF)     ; 积
+    (->subsumptive
+     ((=jef-china3       . #x5DA1)     ; &JC3-5DA1;
+      )
+     ((=jef-china3       . #x81D7)     ; &JC3-81D7;
       ))
-    (=jef-china3       . #x81D7)       ; &JC3-81D7;
     ))
 (define-char
   '((ideographic-radical . 115)        ; ⽲
     (=ucs              . #x79F0)       ; 称
     ))
 (define-char
-  '((ideographic-radical . 115)        ; ⽲
-    (ideographic-strokes . 5)
-    (total-strokes      . 10)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x79F0)     ; 称
       ))
+    (ideographic-radical . 115)        ; ⽲
+    (ideographic-strokes . 5)
+    (total-strokes      . 10)
     (->subsumptive
      ((=gb2312           . #x3346)     ; &M-25016; [19-38]
       (=daikanwa         . 25016)      ; &I-M-25016;
       ))
     ))
 (define-char
-  '((morohashi-daikanwa        25016 1)
+  '((<-denotational
+     ((=ucs              . #x79F0)     ; 称
+      ))
+    (morohashi-daikanwa        25016 1)
     (ideographic-radical . 115)        ; ⽲
     (ideographic-strokes . 5)
     (total-strokes      . 10)
-    (<-denotational
-     ((=ucs              . #x79F0)     ; 称
-      ))
     (<-simplified@JP/Jouyou
      ((=jis-x0208@1983   . #x634A)     ; &GT-32460; [67-42]
       (=jis-x0208@1990   . #x634A)     ; &I-J90-634A; [67-42]
       ))
     ))
 (define-char
-  '((ideographic-radical . 115)        ; ⽲
-    (ideographic-strokes . 7)
-    (total-strokes      . 12)
-    (<-denotational
+  '((<-denotational
      ((=big5             . #xB57C)     ; &B-B57C;
       ))
+    (ideographic-radical . 115)        ; ⽲
+    (ideographic-strokes . 7)
+    (total-strokes      . 12)
     (=ucs              . #x7A05)       ; 稅
     (->subsumptive
      ((=ks-x1001         . #x612A)     ; &M-25070; [65-10]
     (=ucs@big5         . #x7A05)       ; &B-B57C;
     ))
 (define-char
-  '((morohashi-daikanwa        25070 1)
+  '((<-denotational
+     ((=big5             . #xB57C)     ; &B-B57C;
+      ))
+    (morohashi-daikanwa        25070 1)
     (ideographic-radical . 115)        ; ⽲
     (ideographic-strokes . 7)
     (total-strokes      . 12)
-    (<-denotational
-     ((=big5             . #xB57C)     ; &B-B57C;
-      ))
     (=ucs              . #x7A0E)       ; 税
     (=jis-x0208                . #x4047)       ; &I-J90-4047; [32-39]
     (=gb2312           . #x4B30)       ; &I-G0-4B30; [43-16]
     (=ucs              . #x7A0B)       ; 程
     ))
 (define-char
-  '((ideographic-radical . 115)        ; ⽲
-    (ideographic-strokes . 7)
-    (total-strokes      . 12)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x7A0B)     ; 程
       ))
+    (ideographic-radical . 115)        ; ⽲
+    (ideographic-strokes . 7)
+    (total-strokes      . 12)
     (=ks-x1001         . #x6F6F)       ; &M-25081; [79-79]
     (=cns11643-1       . #x6123)       ; &I-C1-6123; [65-03]
     (=big5             . #xB57B)       ; &I-B-B57B;
     (=jef-china3       . #x5DAC)       ; &I-JC3-5DAC;
     ))
 (define-char
-  '((morohashi-daikanwa        25081 1)
+  '((<-denotational
+     ((=ucs              . #x7A0B)     ; 程
+      ))
+    (morohashi-daikanwa        25081 1)
     (ideographic-radical . 115)        ; ⽲
     (ideographic-strokes . 7)
     (total-strokes      . 12)
-    (<-denotational
-     ((=ucs              . #x7A0B)     ; 程
-      ))
     (=jis-x0208                . #x4478)       ; &GT-32340; [36-88]
     (=gb2312           . #x334C)       ; &I-G0-334C; [19-44]
     (=gt               . 32340)        ; &I-GT-32340;
     (->subsumptive
      ((=daikanwa         . 25184)      ; &M-25184;
       )
-     ((=ucs@iso                  . #x2580B)    ; &UU+2580B;
+     ((=ucs@iso                  . #x2580B)    ; &U-0002580B;
       )
      ((=cns11643-5       . #x482C)     ; &C5-482C; [40-12]
       ))
     (=daikanwa         . 25188)        ; &I-M-25188;
     ))
 (define-char
-  '((=>ucs*            . #x7A40)       ; 穀
+  '((<-denotational
+     ((=ucs              . #x7A40)     ; 穀
+      ))
+    (=>ucs*            . #x7A40)       ; 穀
     (=>ucs@jis         . #x7A40)       ; &GT-32448;
     (ideographic-radical . 115)        ; ⽲
     (ideographic-strokes . 9)
     (japanese-strokes   . 14)
-    (<-denotational
-     ((=ucs              . #x7A40)     ; 穀
-      ))
     (=ucs              . #x2F959)      ; 穀
     (->subsumptive
      ((morohashi-daikanwa      25188 1)
     (->subsumptive
      ((=daikanwa         . 25190)      ; &M-25190;
       )
-     ((=ucs@iso                  . #x25831)    ; &UU+25831;
+     ((=ucs@iso                  . #x25831)    ; &U-00025831;
       )
      ((=cns11643-5       . #x4E7B)     ; &C5-4E7B; [46-91]
       ))
     (=ucs              . #x7A3D)       ; 稽
     ))
 (define-char
-  '((ideographic-radical . 115)        ; ⽲
-    (ideographic-strokes . 10)
-    (total-strokes      . 15)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x7A3D)     ; 稽
       ))
+    (ideographic-radical . 115)        ; ⽲
+    (ideographic-strokes . 10)
+    (total-strokes      . 15)
     (->subsumptive
      ((shinjigen-2       . 5649)
       (=gb2312           . #x3B7C)     ; &GT-32500; [27-92]
       ))
     ))
 (define-char
-  '((=>daikanwa                . 25218)        ; &GT-32500;
+  '((<-denotational
+     ((=ucs              . #x7A3D)     ; 稽
+      ))
+    (=>daikanwa                . 25218)        ; &GT-32500;
     (ideographic-radical . 115)        ; ⽲
     (ideographic-strokes . 11)
     (total-strokes      . 16)
-    (<-denotational
-     ((=ucs              . #x7A3D)     ; 稽
-      ))
     (=jis-x0208@1978   . #x374E)       ; &J78-374E; [23-46]
     (=ks-x1001         . #x4D26)       ; &I-K0-4D26; [45-06]
     ))
     (->subsumptive
      ((=daikanwa         . 25222)      ; &M-25222;
       )
-     ((=ucs@iso                  . #x2585B)    ; &UU+2585B;
+     ((=ucs@iso                  . #x2585B)    ; &U-0002585B;
       )
      ((=cns11643-7       . #x2637)     ; &C7-2637; [06-23]
       ))
     (->subsumptive
      ((=daikanwa         . 25233)      ; &M-25233;
       )
-     ((=ucs@iso                  . #x25854)    ; &UU+25854;
+     ((=ucs@iso                  . #x25854)    ; &U-00025854;
       )
      ((=cns11643-7       . #x262E)     ; &C7-262E; [06-14]
       ))
      ((->subsumptive
        ((=daikanwa         . 25247)    ; &M-25247;
        )
-       ((=ucs@iso          . #x25864)  ; &UU+25864;
+       ((=ucs@iso          . #x25864)  ; &U-00025864;
        ))
       )
      ((=cns11643-5       . #x563E)     ; &C5-563E; [54-30]
       ))
     ))
 (define-char
-  '((=>ucs*            . #x7A4A)       ; 穊
+  '((<-denotational
+     ((=ucs              . #x7A4A)     ; 穊
+      ))
+    (=>ucs*            . #x7A4A)       ; 穊
     (ideographic-radical . 115)        ; ⽲
     (ideographic-strokes . 11)
     (total-strokes      . 16)
-    (<-denotational
-     ((=ucs              . #x7A4A)     ; 穊
-      ))
     (=ucs              . #x2F95A)      ; 穊
     (->subsumptive
      ((=daikanwa         . 25261)      ; &M-25261;
       )
-     ((=ucs@iso                  . #x2F95A)    ; &UU+2F95A;
+     ((=ucs@iso                  . #x2F95A)    ; &U-0002F95A;
       )
      ((=cns11643-4       . #x5221)     ; &C4-5221; [50-01]
       ))
     (=ucs              . #x7A4F)       ; 穏
     ))
 (define-char
-  '((ideographic-radical . 115)        ; ⽲
-    (ideographic-strokes . 11)
-    (total-strokes      . 16)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x7A4F)     ; 穏
       ))
+    (ideographic-radical . 115)        ; ⽲
+    (ideographic-strokes . 11)
+    (total-strokes      . 16)
     (=daikanwa         . 25280)        ; &M-25280;
     ))
 (define-char
-  '((ideographic-radical . 115)        ; ⽲
-    (ideographic-strokes . 11)
-    (total-strokes      . 16)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x7A4F)     ; 穏
       ))
+    (ideographic-radical . 115)        ; ⽲
+    (ideographic-strokes . 11)
+    (total-strokes      . 16)
     (->subsumptive
      ((morohashi-daikanwa      25280 1)
       (<-simplified@JP/Jouyou
     (->subsumptive
      ((=daikanwa         . 25311)      ; &M-25311;
       )
-     ((=ucs@iso                  . #x258AE)    ; &UU+258AE;
+     ((=ucs@iso                  . #x258AE)    ; &U-000258AE;
       )
      ((=cns11643-7       . #x3979)     ; &C7-3979; [25-89]
       ))
       )
      ((=cns11643-5       . #x627D)     ; &C5-627D; [66-93]
       )
-     ((=ucs@iso                  . #x258B4)    ; &UU+258B4;
+     ((=ucs@iso                  . #x258B4)    ; &U-000258B4;
       ))
     ))
 (define-char
     (->subsumptive
      ((=daikanwa         . 25317)      ; &M-25317;
       )
-     ((=ucs@iso                  . #x258B5)    ; &UU+258B5;
+     ((=ucs@iso                  . #x258B5)    ; &U-000258B5;
       )
      ((=cns11643-5       . #x6326)     ; &C5-6326; [67-06]
       ))
      ((=cns11643-5       . #x627E)     ; &M-25330; [66-94]
       (=daikanwa         . 25330)      ; &I-M-25330;
       )
-     ((=ucs@iso                  . #x258BB)    ; &UU+258BB;
+     ((=ucs@iso                  . #x258BB)    ; &U-000258BB;
       ))
     ))
 (define-char
     (=ucs              . #x7A6B)       ; 穫
     ))
 (define-char
-  '((ideographic-radical . 115)        ; ⽲
-    (ideographic-strokes . 13)
-    (total-strokes      . 18)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x7A6B)     ; 穫
       ))
+    (ideographic-radical . 115)        ; ⽲
+    (ideographic-strokes . 13)
+    (total-strokes      . 18)
     (->subsumptive
      ((morohashi-daikanwa      25334 1)
       (=jis-x0208        . #x334F)     ; &GT-32672; [19-47]
     (=jef-china3       . #x5DC4)       ; &I-JC3-5DC4;
     ))
 (define-char
-  '((ideographic-radical . 115)        ; ⽲
-    (ideographic-strokes . 14)
-    (total-strokes      . 19)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x7A6B)     ; 穫
       ))
+    (ideographic-radical . 115)        ; ⽲
+    (ideographic-strokes . 14)
+    (total-strokes      . 19)
     (->subsumptive
      ((=daikanwa         . 25346)      ; &M-25346;
       )
       )
      ((ideographic-strokes . 13)
       (total-strokes      . 18)
-      (=ucs@iso                  . #x258DB)    ; &UU+258DB;
+      (=ucs@iso                  . #x258DB)    ; &U-000258DB;
       ))
     ))
 (define-char
     (->subsumptive
      ((=daikanwa         . 25351)      ; &M-25351;
       )
-     ((=ucs@iso                  . #x258DD)    ; &UU+258DD;
+     ((=ucs@iso                  . #x258DD)    ; &U-000258DD;
       ))
     ))
 (define-char
       )
      ((ideographic-strokes . 13)
       (total-strokes      . 18)
-      (=ucs@iso                  . #x258E6)    ; &UU+258E6;
+      (=ucs@iso                  . #x258E6)    ; &U-000258E6;
       ))
     ))
 (define-char
     (=ucs              . #x9F9D)       ; 龝
     ))
 (define-char
-  '((ideographic-radical . 115)        ; ⽲
+  '((<-denotational
+     ((=ucs              . #x9F9D)     ; 龝
+      ))
+    (ideographic-radical . 115)        ; ⽲
     (ideographic-strokes . 16)
     (total-strokes      . 21)
     (<-ancient
       ))
     (<-ancient*sources
      zihui daikanwa)
-    (<-denotational
-     ((=ucs              . #x9F9D)     ; 龝
-      ))
     (=cns11643-3       . #x5E47)       ; &M-25381; [62-39]
     (=daikanwa         . 25381)        ; &I-M-25381;
     ))