From: tomo <tomo>
Date: Mon, 29 Aug 2005 11:08:39 +0000 (+0000)
Subject: (U-00024517): Use `->subsumptive'; use
X-Git-Tag: r21-4-17-chise-0_22-4^20~209
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=f47bf84e084f3058253277e8c393c497322cbd80;p=chise%2Fxemacs-chise.git.1

(U-00024517): Use `->subsumptive'; use
`ideographic-{radical|strokes}@ucs' instead of
`ideographic-{radical|strokes}'; add
`ideographic-{radical|strokes}@cns' and
`ideographic-radical@cns*sources'; don't use `->identical' for C6-4743
and `<-same' for M-04811.
(U-00024522): Use `->denotational'; map to M-19695.
(U-00024523): Use `->denotational'; map to M-19696.
(U-00024524): Unify M-19697.
(U-00024526): Use `->denotational'; map to M-19698.
(U+3E15): Use `->subsumptive'; map to M-19699.
(U-00024525): Use `->denotational'; map to M-19700.
(U-00024529): Use `->denotational' and `->subsumptive'.
(U-00024540): Likewise.
(U-00024545): Likewise.
(U-000206A1): Copied from Ideograph-R018-Knife.el; use
`->denotational' and `->subsumptive'.
(U-00024548): Use `->denotational'.
(U-00024549): Use `->denotational' and `->subsumptive'.
---

diff --git a/lisp/utf-2000/Ideograph-R087-Claw.el b/lisp/utf-2000/Ideograph-R087-Claw.el
index 044cbdb..2680e18 100644
--- a/lisp/utf-2000/Ideograph-R087-Claw.el
+++ b/lisp/utf-2000/Ideograph-R087-Claw.el
@@ -69,10 +69,10 @@
     (->subsumptive
      ((name		  . "CJK COMPATIBILITY IDEOGRAPH-FA49")
       (=>ucs*		  . #x722B)	; 爫
+      (=ucs		  . #xFA49)	; 爫
       (->canonical
        ((=ucs		    . #x722B)	; 爫
 	))
-      (=ucs		  . #xFA49)	; 爫
       ))
     ))
 (define-char
@@ -404,12 +404,7 @@
     (total-strokes	 . 12)
     (=ucs		. #x24514)	; 𤔔
     (->subsumptive
-     ((->ancient
-       ((=daikanwa	    . 19682)	; &M-19682;
-	))
-      (->ancient*sources
-       zhengzi-tong shuowen danchuu daikanwa)
-      (<-same
+     ((<-same
        ((=jis-x0208	    . #x502C)	; &GT-00285; [48-12]
 	(=daikanwa	    . 00214)	; &I-M-00214;
 	))
@@ -419,6 +414,11 @@
       (=gt-k		  . 09318)	; &I-GT-K09318;
       (=gt-pj-4		  . #x624B)	; &GT-25281; [66-43]
       (=daikanwa	  . 19687)	; &I-M-19687;
+      (->ancient
+       ((=daikanwa	    . 19682)	; &M-19682;
+	))
+      (->ancient*sources
+       zhengzi-tong shuowen shuowen-zhu daikanwa)
       )
      ((=gt		  . 25283)	; &GT-25283;
       (=gt-k		  . 09319)	; &I-GT-K09319;
@@ -451,18 +451,24 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 87)	; ⽖
-    (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
-     ((=cns11643-6	  . #x4743)	; &C6-4743; [39-35]
-      ))
-    (<-same
-     ((=daikanwa	  . 04811)	; &M-04811;
-      ))
-    (hanyu-dazidian	3 2033 18)
     (=ucs		. #x24517)	; 𤔗
-    (=hanziku-5		. #xF8B3)	; &I-HZK05-F8B3;
+    (->subsumptive
+     ((ideographic-radical . 31)	; ⼞
+      (ideographic-strokes . 9)
+      (=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;
+      ))
     ))
 (define-char
   '((ideographic-radical . 87)	; ⽖
@@ -480,31 +486,59 @@
     ))
 (define-char
   '((ideographic-radical . 87)	; ⽖
+    (=ucs		. #x24522)	; 𤔢
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x24522)	; 𤔢
+      ))
+    (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 10)
     (total-strokes	 . 14)
-    (=ucs		. #x3E15)	; 㸕
-    (=cns11643-3	. #x4774)	; &I-C3-4774; [39-84]
+    (=daikanwa		. 19695)	; &M-19695;
     ))
 (define-char
-  '((ideographic-radical . 87)	; ⽖
+  '((<-denotational
+     ((=ucs		  . #x24522)	; 𤔢
+      ))
+    (ideographic-radical . 87)	; ⽖
+    (ideographic-strokes . 9)
+    (total-strokes	 . 13)
+    (=ucs@iso		. #x24522)	; &U-00024522;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x24522)	; 𤔢
+      ))
+    (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 10)
     (total-strokes	 . 14)
-    (=ucs		. #x7233)	; 爳
-    (=gb12345		. #x7D68)	; 爳 [93-72]
+    (=cns11643-6	. #x5E53)	; &C6-5E53; [62-51]
     ))
 (define-char
   '((ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 10)
     (total-strokes	 . 14)
-    (=ucs		. #x24522)	; 𤔢
-    (=cns11643-6	. #x5E53)	; &I-C6-5E53; [62-51]
+    (=ucs		. #x24523)	; 𤔣
     ))
 (define-char
-  '((ideographic-radical . 87)	; ⽖
+  '((<-denotational
+     ((=ucs		  . #x24523)	; 𤔣
+      ))
+    (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 10)
     (total-strokes	 . 14)
-    (=ucs		. #x24523)	; 𤔣
-    (=cns11643-5	. #x4723)	; &I-C5-4723; [39-03]
+    (=daikanwa		. 19696)	; &M-19696;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x24523)	; 𤔣
+      ))
+    (ideographic-radical . 87)	; ⽖
+    (ideographic-strokes . 10)
+    (total-strokes	 . 14)
+    (=cns11643-5	. #x4723)	; &C5-4723; [39-03]
+    (=ucs@iso		. #x24523)	; &C5-4723;
     ))
 (define-char
   '((ideographic-radical . 87)	; ⽖
@@ -512,50 +546,112 @@
     (total-strokes	 . 14)
     (=ucs		. #x24524)	; 𤔤
     (=cns11643-6	. #x5E56)	; &I-C6-5E56; [62-54]
+    (=daikanwa		. 19697)	; &I-M-19697;
     ))
 (define-char
   '((ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 10)
     (total-strokes	 . 14)
-    (=ucs		. #x24525)	; 𤔥
-    (=cns11643-6	. #x5E55)	; &I-C6-5E55; [62-53]
+    (=ucs		. #x24526)	; 𤔦
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x24526)	; 𤔦
+      ))
+    (ideographic-radical . 87)	; ⽖
+    (ideographic-strokes . 10)
+    (total-strokes	 . 14)
+    (=daikanwa		. 19698)	; &M-19698;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x24526)	; 𤔦
+      ))
+    (ideographic-radical . 87)	; ⽖
+    (ideographic-strokes . 10)
+    (total-strokes	 . 14)
+    (=cns11643-6	. #x5E54)	; &C6-5E54; [62-52]
+    (=ucs@iso		. #x24526)	; &C6-5E54;
     ))
 (define-char
   '((ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 10)
     (total-strokes	 . 14)
-    (=ucs		. #x24526)	; 𤔦
-    (=cns11643-6	. #x5E54)	; &I-C6-5E54; [62-52]
+    (=ucs		. #x3E15)	; 㸕
+    (->subsumptive
+     ((=daikanwa	  . 19699)	; &M-19699;
+      )
+     ((=cns11643-3	  . #x4774)	; &C3-4774; [39-84]
+      )
+     ((=ucs@unicode	  . #x3E15)	; &UU+3E15;
+      ))
     ))
 (define-char
-  '((=>ucs		. #x24529)	; 𤔩
+  '((ideographic-radical . 87)	; ⽖
+    (ideographic-strokes . 10)
+    (total-strokes	 . 14)
+    (=ucs		. #x24525)	; 𤔥
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x24525)	; 𤔥
+      ))
     (ideographic-radical . 87)	; ⽖
-    (ideographic-strokes . 11)
-    (total-strokes	 . 15)
-    (=daikanwa		. 19703)	; &M-19703;
+    (ideographic-strokes . 10)
+    (total-strokes	 . 14)
+    (=daikanwa		. 19700)	; &M-19700;
     ))
 (define-char
-  '((morohashi-daikanwa	19703 0 0)
+  '((<-denotational
+     ((=ucs		  . #x24525)	; 𤔥
+      ))
     (ideographic-radical . 87)	; ⽖
+    (ideographic-strokes . 10)
+    (total-strokes	 . 14)
+    (->subsumptive
+     ((=ucs@iso		  . #x24525)	; &U-00024525;
+      )
+     ((=cns11643-6	  . #x5E55)	; &C6-5E55; [62-53]
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 87)	; ⽖
+    (ideographic-strokes . 10)
+    (total-strokes	 . 14)
+    (=ucs		. #x7233)	; 爳
+    (=gb12345		. #x7D68)	; 爳 [93-72]
+    ))
+(define-char
+  '((ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 11)
     (total-strokes	 . 15)
     (=ucs		. #x24529)	; 𤔩
     ))
 (define-char
-  '((=>ucs		. #x24529)	; 𤔩
-    (morohashi-daikanwa	19703 0 3)
+  '((<-denotational
+     ((=ucs		  . #x24529)	; 𤔩
+      ))
     (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 11)
     (total-strokes	 . 15)
-    (=cns11643-7	. #x2477)	; &C7-2477; [04-87]
+    (->subsumptive
+     ((=daikanwa	  . 19703)	; &M-19703;
+      )
+     ((=ucs@iso		  . #x24529)	; &U-00024529;
+      ))
     ))
 (define-char
-  '((=>ucs		. #x24529)	; 𤔩
-    (morohashi-daikanwa	19703 0 4)
+  '((<-denotational
+     ((=ucs		  . #x24529)	; 𤔩
+      ))
     (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 11)
     (total-strokes	 . 15)
-    (=cbeta		. 02461)	; &CB02461;
+    (->subsumptive
+     ((=cns11643-7	  . #x2477)	; &C7-2477; [04-87]
+      )
+     ((=cbeta		  . 02461)	; &CB02461;
+      ))
     ))
 (define-char
   '((ideographic-radical . 87)	; ⽖
@@ -737,89 +833,142 @@
     (=cns11643-7	. #x4056)	; &C7-4056; [32-54]
     ))
 (define-char
-  '((=>ucs		. #x24540)	; 𤕀
-    (ideographic-radical . 87)	; ⽖
+  '((ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 15)
     (total-strokes	 . 19)
-    (=daikanwa		. 19713)	; &M-19713;
+    (=ucs		. #x24540)	; 𤕀
     ))
 (define-char
-  '((morohashi-daikanwa	19713 0 2)
+  '((<-denotational
+     ((=ucs		  . #x24540)	; 𤕀
+      ))
     (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 15)
     (total-strokes	 . 19)
-    (=ucs		. #x24540)	; 𤕀
+    (=daikanwa		. 19713)	; &M-19713;
     ))
 (define-char
-  '((=>ucs		. #x24540)	; 𤕀
-    (morohashi-daikanwa	19713 0 3)
+  '((<-denotational
+     ((=ucs		  . #x24540)	; 𤕀
+      ))
     (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 15)
     (total-strokes	 . 19)
-    (=cns11643-5	. #x6838)	; &C5-6838; [72-24]
+    (->subsumptive
+     ((=ucs@iso		  . #x24540)	; &U-00024540;
+      )
+     ((=cns11643-5	  . #x6838)	; &C5-6838; [72-24]
+      ))
     ))
 (define-char
-  '((=>ucs		. #x24545)	; 𤕅
-    (ideographic-radical . 87)	; ⽖
+  '((ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 16)
     (total-strokes	 . 20)
-    (=daikanwa		. 19715)	; &M-19715;
+    (=ucs		. #x24545)	; 𤕅
     ))
 (define-char
-  '((morohashi-daikanwa	19715 0 2)
+  '((<-denotational
+     ((=ucs		  . #x24545)	; 𤕅
+      ))
     (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 16)
     (total-strokes	 . 20)
-    (=ucs		. #x24545)	; 𤕅
-    (=cns11643-7	. #x4E3D)	; &I-C7-4E3D; [46-29]
+    (=daikanwa		. 19715)	; &M-19715;
     ))
 (define-char
-  '((=>ucs		. #x206A1)	; 𠚡
+  '((<-denotational
+     ((=ucs		  . #x24545)	; 𤕅
+      ))
     (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 16)
     (total-strokes	 . 20)
-    (=daikanwa		. 49274)	; &M-49274;
+    (->subsumptive
+     ((=cns11643-7	  . #x4E3D)	; &C7-4E3D; [46-29]
+      )
+     ((=ucs@iso		  . #x24545)	; &U-00024545;
+      ))
+    ))
+(define-char
+  '((ideographic-radical@ucs . 17)	; ⼐
+    (ideographic-strokes@ucs . 18)
+    (ideographic-radical@cns . 87)	; ⽖
+    (ideographic-strokes@cns . 16)
+    (ideographic-radical@cns*sources
+     daikanwa cns11643)
+    (total-strokes	 . 20)
+    (=ucs		. #x206A1)	; 𠚡
     ))
 (define-char
-  '((=>ucs		. #x206A1)	; 𠚡
-    (morohashi-daikanwa	49274 0 2)
+  '((<-denotational
+     ((=ucs		  . #x206A1)	; 𠚡
+      ))
     (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 16)
     (total-strokes	 . 20)
-    (->identical
+    (=daikanwa		. 49274)	; &M-49274;
+    ))
+(define-char
+  '((<-denotational
      ((=ucs		  . #x206A1)	; 𠚡
       ))
+    (ideographic-radical@ucs . 17)	; ⼐
+    (ideographic-strokes@ucs . 18)
+    (ideographic-radical@cns . 87)	; ⽖
+    (ideographic-strokes@cns . 16)
+    (total-strokes	 . 20)
     (=cns11643-7	. #x4E3E)	; &C7-4E3E; [46-30]
+    (=ucs@iso		. #x206A1)	; &C7-4E3E;
+    ))
+(define-char
+  '((ideographic-radical . 87)	; ⽖
+    (ideographic-strokes . 17)
+    (total-strokes	 . 21)
+    (=ucs		. #x24548)	; 𤕈
     ))
 (define-char
-  '((=>ucs		. #x24548)	; 𤕈
+  '((<-denotational
+     ((=ucs		  . #x24548)	; 𤕈
+      ))
     (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 17)
     (total-strokes	 . 21)
     (=daikanwa		. 49275)	; &M-49275;
     ))
 (define-char
-  '((morohashi-daikanwa	49275 0 2)
+  '((<-denotational
+     ((=ucs		  . #x24548)	; 𤕈
+      ))
     (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 17)
     (total-strokes	 . 21)
-    (=ucs		. #x24548)	; 𤕈
-    (=cns11643-7	. #x5368)	; &I-C7-5368; [51-72]
+    (=cns11643-7	. #x5368)	; &C7-5368; [51-72]
+    (=ucs@iso		. #x24548)	; &C7-5368;
     ))
 (define-char
-  '((=>ucs		. #x24549)	; 𤕉
+  '((ideographic-radical . 87)	; ⽖
+    (=ucs		. #x24549)	; 𤕉
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x24549)	; 𤕉
+      ))
     (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 18)
     (total-strokes	 . 22)
     (=daikanwa		. 19718)	; &M-19718;
     ))
 (define-char
-  '((morohashi-daikanwa	19718 0 2)
+  '((<-denotational
+     ((=ucs		  . #x24549)	; 𤕉
+      ))
     (ideographic-radical . 87)	; ⽖
     (ideographic-strokes . 19)
     (total-strokes	 . 23)
-    (=ucs		. #x24549)	; 𤕉
-    (=cns11643-7	. #x5B71)	; &I-C7-5B71; [59-81]
+    (->subsumptive
+     ((=ucs@iso		  . #x24549)	; &U-00024549;
+      )
+     ((=cns11643-7	  . #x5B71)	; &C7-5B71; [59-81]
+      ))
     ))
 (define-char
   '((ideographic-radical . 87)	; ⽖