(U+7524): Use `->subsumptive'.

(U-00024BE6): Use `->subsumptive'.
(U+7526): Use `->subsumptive'.
(U-00024BE7): Use `->subsumptive'.
(U-0002F934): Add `=>ucs*' for U+7524; delete `morohashi-daikanwa';
add `<-unknown' for JX2-7132.
(U-00024BEC): Use `->subsumptive'.
(U-00024BEF): Use `->subsumptive'.
(U-00024BF2): Use `->subsumptive'.
(U-00024BF3): Use `->denotational'.
(M-21697): Add `<-denotational' for U-00024BF3.
(U+7527): Use `->subsumptive'.
(U-00024BF7): Use `->subsumptive'.

diff --git a/lisp/utf-2000/Ideograph-R100-Life.el b/lisp/utf-2000/Ideograph-R100-Life.el
index afd0274..c8a2369 100644 (file)
--- a/lisp/utf-2000/Ideograph-R100-Life.el
+++ b/lisp/utf-2000/Ideograph-R100-Life.el
@@ -251,33 +251,34 @@
     (ideographic-strokes . 7)
     (total-strokes      . 12)
     (=ucs              . #x7524)       ; 甤
     (ideographic-strokes . 7)
     (total-strokes      . 12)
     (=ucs              . #x7524)       ; 甤

-    (=jis-x0212                . #x4D26)       ; &I-JSP-4D26; [45-06]
-    (=cns11643-3       . #x3D3E)       ; &I-C3-3D3E; [29-30]
-    (=jis-x0213-2-2000 . #x7132)       ; &I-JX2-7132; [81-18]
-    (=daikanwa         . 21687)        ; &I-M-21687;
-    ))
-(define-char
-  '((morohashi-daikanwa        21687 0 5)
-    (ideographic-radical . 100)        ; ⽣
-    (ideographic-strokes . 7)
-    (total-strokes      . 12)
-    (=ucs              . #x2F934)      ; 甤
-    (=cns11643-3       . #x3D3F)       ; &I-C3-3D3F; [29-31]
-    ))
-(define-char
-  '((=>ucs             . #x24BE6)      ; 𤯦
-    (ideographic-radical . 100)        ; ⽣
-    (ideographic-strokes . 7)
-    (total-strokes      . 12)
-    (=daikanwa         . 21688)        ; &M-21688;
+    (->subsumptive
+     ((=jis-x0212        . #x4D26)     ; &M-21687; [45-06]
+      (=jis-x0213-2-2000  . #x7132)    ; &I-JX2-7132; [81-18]
+      (=daikanwa         . 21687)      ; &I-M-21687;
+      (=ucs@jis                  . #x7524)     ; &M-21687;
+      )
+     ((=ucs@unicode      . #x7524)     ; &UU+7524;
+      )
+     ((=cns11643-3       . #x3D3E)     ; &C3-3D3E; [29-30]
+      ))

     ))
 (define-char
     ))
 (define-char

-  '((morohashi-daikanwa        21688 0 0)
-    (ideographic-radical . 100)        ; ⽣
-    (ideographic-strokes . 8)
-    (total-strokes      . 13)
+  '((ideographic-radical . 100)        ; ⽣
+    (ideographic-strokes@ucs . 7)
+    (total-strokes@ucs      . 12)
+    (ideographic-strokes@ucs*sources
+     daikanwa)
+    (ideographic-strokes@cns . 8)
+    (total-strokes@cns      . 13)

     (=ucs              . #x24BE6)      ; 𤯦
     (=ucs              . #x24BE6)      ; 𤯦

-    (=cns11643-6       . #x5539)       ; &I-C6-5539; [53-25]
+    (->subsumptive
+     ((ideographic-strokes . 7)
+      (total-strokes      . 12)
+      (=daikanwa         . 21688)      ; &M-21688;
+      )
+     ((=cns11643-6       . #x5539)     ; &C6-5539; [53-25]
+      (=ucs@iso                  . #x24BE6)    ; &C6-5539;
+      ))

     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣
     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣

@@ -303,109 +304,143 @@
     (=daikanwa         . 21690)        ; &I-M-21690;
     ))
 (define-char
     (=daikanwa         . 21690)        ; &I-M-21690;
     ))
 (define-char

-  '((=>ucs             . #x7526)       ; 甦
-    (ideographic-radical . 100)        ; ⽣
+  '((ideographic-radical . 100)        ; ⽣

     (ideographic-strokes . 7)
     (total-strokes      . 12)
     (ideographic-strokes . 7)
     (total-strokes      . 12)

-    (shinjigen-2       . 5012)
-    (=jis-x0208                . #x6134)       ; &GT-27855; [65-20]
-    (=ks-x1001         . #x6141)       ; &I-K0-6141; [65-33]
+    (=ucs              . #x7526)       ; 甦

     (=big5             . #xB564)       ; &I-B-B564;
     (=big5             . #xB564)       ; &I-B-B564;

-    (=gt               . 27855)        ; &I-GT-27855;
-    (=gt-pj-1          . #x6134)       ; &I-GT-27855; [65-20]
-    (=daikanwa         . 21691)        ; &I-M-21691;
-    (=ucs@jis          . #x7526)       ; &GT-27855;
+    (->subsumptive
+     ((shinjigen-2       . 5012)
+      (=jis-x0208        . #x6134)     ; &GT-27855; [65-20]
+      (=ks-x1001         . #x6141)     ; &I-K0-6141; [65-33]
+      (=gt               . 27855)      ; &I-GT-27855;
+      (=gt-pj-1                  . #x6134)     ; &I-GT-27855; [65-20]
+      (=daikanwa         . 21691)      ; &I-M-21691;
+      (=ucs@jis                  . #x7526)     ; &GT-27855;
+      )
+     ((=cns11643-1       . #x606A)     ; &C1-606A; [64-74]
+      )
+     ((=iso-ir165        . #x2C75)     ; &EGB-2C75; [12-85]
+      (=ucs@unicode      . #x7526)     ; &EGB-2C75;
+      ))

     ))
 (define-char
     ))
 (define-char

-  '((morohashi-daikanwa        21691 0 0)
-    (ideographic-radical . 100)        ; ⽣
+  '((ideographic-radical . 100)        ; ⽣

     (ideographic-strokes . 7)
     (total-strokes      . 12)
     (ideographic-strokes . 7)
     (total-strokes      . 12)

-    (=ucs              . #x7526)       ; 甦
-    (=iso-ir165                . #x2C75)       ; &I-EGB-2C75; [12-85]
-    (=cns11643-1       . #x606A)       ; &I-C1-606A; [64-74]
+    (=ucs              . #x24BE7)      ; 𤯧
+    (->subsumptive
+     ((=daikanwa         . 21692)      ; &M-21692;
+      )
+     ((=cns11643-6       . #x4B54)     ; &C6-4B54; [43-52]
+      (=ucs@iso                  . #x24BE7)    ; &C6-4B54;
+      ))

     ))
 (define-char
     ))
 (define-char

-  '((ideographic-radical . 100)        ; ⽣
+  '((=>ucs*            . #x7524)       ; 甤
+    (ideographic-radical . 100)        ; ⽣

     (ideographic-strokes . 7)
     (total-strokes      . 12)
     (ideographic-strokes . 7)
     (total-strokes      . 12)

-    (=ucs              . #x24BE7)      ; 𤯧
-    (=cns11643-6       . #x4B54)       ; &I-C6-4B54; [43-52]
-    (=daikanwa         . 21692)        ; &I-M-21692;
+    (=ucs              . #x2F934)      ; 甤
+    (=cns11643-3       . #x3D3F)       ; &I-C3-3D3F; [29-31]
+    (<-unknown
+     ((=jis-x0212        . #x4D26)     ; &M-21687; [45-06]
+      (=jis-x0213-2-2000  . #x7132)    ; &I-JX2-7132; [81-18]
+      (=daikanwa         . 21687)      ; &I-M-21687;
+      ))

     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣
     (ideographic-strokes . 8)
     (total-strokes      . 13)
     (=ucs              . #x24BEC)      ; 𤯬
     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣
     (ideographic-strokes . 8)
     (total-strokes      . 13)
     (=ucs              . #x24BEC)      ; 𤯬

-    (=cns11643-6       . #x553B)       ; &I-C6-553B; [53-27]
-    (=daikanwa         . 21694)        ; &I-M-21694;
+    (->subsumptive
+     ((=daikanwa         . 21694)      ; &M-21694;
+      )
+     ((=cns11643-6       . #x553B)     ; &C6-553B; [53-27]
+      (=ucs@iso                  . #x24BEC)    ; &C6-553B;
+      ))

     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣
     (ideographic-strokes . 8)
     (total-strokes      . 13)
     (=ucs              . #x24BEF)      ; 𤯯
     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣
     (ideographic-strokes . 8)
     (total-strokes      . 13)
     (=ucs              . #x24BEF)      ; 𤯯

-    (=daikanwa         . 21695)        ; &I-M-21695;
-    ))
-(define-char
-  '((=>ucs             . #x24BEF)      ; 𤯯
-    (morohashi-daikanwa        21695 0 1)
-    (ideographic-radical . 100)        ; ⽣
-    (ideographic-strokes . 8)
-    (total-strokes      . 13)
-    (=cns11643-6       . #x553A)       ; &C6-553A; [53-26]
+    (->subsumptive
+     ((=daikanwa         . 21695)      ; &M-21695;
+      (=ucs@iso                  . #x24BEF)    ; &M-21695;
+      )
+     ((=cns11643-6       . #x553A)     ; &C6-553A; [53-26]
+      ))

     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣
     (ideographic-strokes . 9)
     (total-strokes      . 14)
     (=ucs              . #x24BF2)      ; 𤯲
     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣
     (ideographic-strokes . 9)
     (total-strokes      . 14)
     (=ucs              . #x24BF2)      ; 𤯲

-    (=cns11643-6       . #x5E7E)       ; &I-C6-5E7E; [62-94]
-    (=daikanwa         . 21696)        ; &I-M-21696;
+    (->subsumptive
+     ((=daikanwa         . 21696)      ; &M-21696;
+      (=ucs@iso                  . #x24BF2)    ; &M-21696;
+      )
+     ((=cns11643-6       . #x5E7E)     ; &C6-5E7E; [62-94]
+      ))

     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣
     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣

-    (ideographic-strokes . 9)
-    (total-strokes      . 14)
-    (=daikanwa         . 21697)        ; &M-21697;
+    (=ucs              . #x24BF3)      ; 𤯳

     ))
 (define-char
     ))
 (define-char

-  '((ideographic-radical . 100)        ; ⽣
+  '((<-denotational
+     ((=ucs              . #x24BF3)    ; 𤯳
+      ))
+    (ideographic-radical . 100)        ; ⽣

     (ideographic-strokes . 9)
     (total-strokes      . 14)
     (ideographic-strokes . 9)
     (total-strokes      . 14)

-    (=ucs              . #x7527)       ; 甧
-    (=jis-x0212                . #x4D27)       ; &I-JSP-4D27; [45-07]
-    (=daikanwa         . 21698)        ; &I-M-21698;
-    (=jef-china3       . #x5ABE)       ; &I-JC3-5ABE;
+    (=daikanwa         . 21697)        ; &M-21697;

     ))
 (define-char
     ))
 (define-char

-  '((=>ucs             . #x7527)       ; 甧
-    (morohashi-daikanwa        21698 0 0)
+  '((<-denotational
+     ((=ucs              . #x24BF3)    ; 𤯳
+      ))

     (ideographic-radical . 100)        ; ⽣
     (ideographic-strokes . 9)
     (total-strokes      . 14)
     (ideographic-radical . 100)        ; ⽣
     (ideographic-strokes . 9)
     (total-strokes      . 14)

-    (=cns11643-5       . #x4749)       ; &C5-4749; [39-41]
+    (=ucs@iso          . #x24BF3)      ; &U-00024BF3;

     ))
 (define-char
     ))
 (define-char

-  '((ideographic-radical . 100)        ; ⽣
+  '((<-denotational
+     ((=ucs              . #x24BF3)    ; 𤯳
+      ))
+    (ideographic-radical . 100)        ; ⽣

     (ideographic-strokes . 10)
     (total-strokes      . 15)
     (ideographic-strokes . 10)
     (total-strokes      . 15)

-    (=ucs              . #x24BF3)      ; 𤯳
-    (=cns11643-7       . #x254B)       ; &I-C7-254B; [05-43]
+    (=cns11643-7       . #x254B)       ; &C7-254B; [05-43]

     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣
     ))
 (define-char
   '((ideographic-radical . 100)        ; ⽣

-    (ideographic-strokes . 12)
-    (total-strokes      . 17)
-    (=ucs              . #x24BF7)      ; 𤯷
-    (=daikanwa         . 21699)        ; &I-M-21699;
+    (ideographic-strokes . 9)
+    (total-strokes      . 14)
+    (=ucs              . #x7527)       ; 甧
+    (->subsumptive
+     ((=jis-x0212        . #x4D27)     ; &M-21698; [45-07]
+      (=daikanwa         . 21698)      ; &I-M-21698;
+      (=jef-china3       . #x5ABE)     ; &I-JC3-5ABE;
+      (=ucs@jis                  . #x7527)     ; &M-21698;
+      )
+     ((=ucs@unicode      . #x7527)     ; &UU+7527;
+      )
+     ((=cns11643-5       . #x4749)     ; &C5-4749; [39-41]
+      ))

     ))
 (define-char
     ))
 (define-char

-  '((=>ucs             . #x24BF7)      ; 𤯷
-    (morohashi-daikanwa        21699 0 0)
-    (ideographic-radical . 100)        ; ⽣
+  '((ideographic-radical . 100)        ; ⽣

     (ideographic-strokes . 12)
     (total-strokes      . 17)
     (ideographic-strokes . 12)
     (total-strokes      . 17)

-    (=cns11643-4       . #x567A)       ; &C4-567A; [54-90]
+    (=ucs              . #x24BF7)      ; 𤯷
+    (->subsumptive
+     ((=daikanwa         . 21699)      ; &M-21699;
+      (=ucs@iso                  . #x24BF7)    ; &M-21699;
+      )
+     ((=cns11643-4       . #x567A)     ; &C4-567A; [54-90]
+      ))

     ))
     ))