X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R101-Use.el;h=3d5875e7a0ccb2dea0a69de6aa43225f08128010;hb=bf95d2aafd80b2f4065d87ff035cc1bd2e8e4eab;hp=39b04e0e68a080e03e0fddbb5341b96dea3052bb;hpb=66ecb07e7a65d21a51dfdbc57eed2da7453d5e43;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/utf-2000/Ideograph-R101-Use.el b/lisp/utf-2000/Ideograph-R101-Use.el
index 39b04e0..3d5875e 100644
--- a/lisp/utf-2000/Ideograph-R101-Use.el
+++ b/lisp/utf-2000/Ideograph-R101-Use.el
@@ -179,41 +179,39 @@
     (=daikanwa		. 21711)	; &I-M-21711;
     ))
 (define-char
-  '((=>ucs		. #x200F0)	; 𠃰
-    (ideographic-radical . 101)	; ⽤
-    (ideographic-strokes . 3)
-    (total-strokes	 . 8)
-    (=daikanwa		. 21712)	; &M-21712;
-    ))
-(define-char
-  '((morohashi-daikanwa	21712 0 1)
-    (ideographic-	(:radical	101 ; ⽤
-			 :strokes	3)
-			(:radical	5 ; ⼄
-			 :strokes	7))
+  '((ideographic-radical@ucs . 5)	; ⼄
+    (ideographic-strokes@ucs . 7)
+    (ideographic-radical@cns . 101)	; ⽤
+    (ideographic-strokes@cns . 3)
+    (ideographic-radical@cns*sources
+     daikanwa cns11643)
     (total-strokes	 . 8)
-    (<-same
-     ((=daikanwa	  . 21712)	; &M-21712;
-      ))
-    (hanyu-dazidian	1 55 3)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs		  . #x2FF1)	; ⿱
+    (=ucs		. #x200F0)	; 𠃰
+    (->subsumptive
+     ((ideographic-radical . 101)	; ⽤
+      (ideographic-strokes . 3)
+      (=daikanwa	  . 21712)	; &M-21712;
       )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	(=ucs		    . #x2FF0)	; â¿°
+     ((hanyu-dazidian	  1 55 3)
+      (ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
 	)
-       ((=big5-cdp	    . #x89C2)	; &CDP-89C2;
+       ((ideographic-structure
+	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	  (=ucs		      . #x2FF0)	; â¿°
+	  )
+	 ((=big5-cdp	      . #x89C2)	; &CDP-89C2;
+	  )
+	 ((=big5-cdp	      . #x89C7)	; &CDP-89C7;
+	  ))
 	)
-       ((=big5-cdp	    . #x89C7)	; &CDP-89C7;
+       ((=ucs		    . #x7528)	; 用
 	))
-      )
-     ((=ucs		  . #x7528)	; 用
+      (=cns11643-6	  . #x2D2C)	; &HZK01-AF63; [13-12]
+      (=hanziku-1	  . #xAF63)	; &I-HZK01-AF63;
+      (=ucs@iso		  . #x200F0)	; &HZK01-AF63;
       ))
-    (=ucs		. #x200F0)	; 𠃰
-    (=cns11643-6	. #x2D2C)	; &I-C6-2D2C; [13-12]
-    (=hanziku-1		. #xAF63)	; &I-HZK01-AF63;
     ))
 (define-char
   '((ideographic-radical . 101)	; ⽤
@@ -234,34 +232,53 @@
     (=big5		. #xCFD9)	; &I-B-CFD9;
     ))
 (define-char
-  '((=>ucs		. #x24C07)	; 𤰇
-    (ideographic-radical . 101)	; ⽤
+  '((ideographic-radical . 101)	; ⽤
     (ideographic-strokes . 5)
     (total-strokes	 . 10)
-    (=daikanwa		. 21714)	; &M-21714;
+    (=ucs		. #x24C07)	; 𤰇
     ))
 (define-char
-  '((morohashi-daikanwa	21714 0 3)
+  '((<-denotational
+     ((=ucs		  . #x24C07)	; 𤰇
+      ))
     (ideographic-radical . 101)	; ⽤
     (ideographic-strokes . 5)
     (total-strokes	 . 10)
-    (=ucs		. #x24C07)	; 𤰇
+    (=daikanwa		. 21714)	; &M-21714;
     ))
 (define-char
-  '((=>ucs		. #x24C07)	; 𤰇
-    (morohashi-daikanwa	21714 0 4)
+  '((<-denotational
+     ((=ucs		  . #x24C07)	; 𤰇
+      ))
     (ideographic-radical . 101)	; ⽤
     (ideographic-strokes . 5)
     (total-strokes	 . 10)
-    (=cns11643-6	. #x395D)	; &C6-395D; [25-61]
+    (->subsumptive
+     ((=ucs@iso		  . #x24C07)	; &U-00024C07;
+      )
+     ((=cns11643-6	  . #x395D)	; &CDP-8C73; [25-61]
+      (=big5-cdp	  . #x8C73)	; &I-CDP-8C73;
+      ))
     ))
 (define-char
-  '((=>ucs		. #x20CEB)	; 𠳫
-    (ideographic-radical . 101)	; ⽤
-    (ideographic-strokes . 5)
+  '((ideographic-radical@ucs . 30)	; ⼝
+    (ideographic-strokes@ucs . 7)
+    (ideographic-radical@cns . 101)	; ⽤
+    (ideographic-strokes@cns . 5)
+    (ideographic-radical@cns*sources
+     daikanwa cns11643)
     (total-strokes	 . 10)
-    (=cns11643-6	. #x395E)	; &M-21715; [25-62]
-    (=daikanwa		. 21715)	; &I-M-21715;
+    (=ucs		. #x20CEB)	; 𠳫
+    (->subsumptive
+     ((hanyu-dazidian	  1 626 2)
+      (=daikanwa	  . 21715)	; &M-21715;
+      (=hanziku-2	  . #xD349)	; &I-HZK02-D349;
+      (=ucs@iso		  . #x20CEB)	; &M-21715;
+      )
+     ((ideographic-radical . 101)	; ⽤
+      (ideographic-strokes . 5)
+      (=cns11643-6	  . #x395E)	; &C6-395E; [25-62]
+      ))
     ))
 (define-char
   '((ideographic-radical . 101)	; ⽤