X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R129-Brush.el;h=3a1260ba71a12432152e9a85cb63867e93469153;hb=81719991429278ef7c6b8ddaba57ce2ecdf1ee53;hp=5c45a64d09a6461eff1ce065a28560393990c5bc;hpb=72da096bf7c900292af5c7b8fd83d02b10c76980;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/Ideograph-R129-Brush.el b/lisp/utf-2000/Ideograph-R129-Brush.el
index 5c45a64..3a1260b 100644
--- a/lisp/utf-2000/Ideograph-R129-Brush.el
+++ b/lisp/utf-2000/Ideograph-R129-Brush.el
@@ -86,8 +86,8 @@
     (total-strokes	 . 10)
     (=ucs		. #x8081)	; 肁
     (->subsumptive
-     ((=ucs@jis		  . #x8081)	; &M-29220;
-      (=jis-x0212	  . #x556A)	; &M-29220; [53-74]
+     ((=ucs@jis		  . #x8081)	; &JSP-556A;
+      (=jis-x0212	  . #x556A)	; &JSP-556A; [53-74]
       (=cns11643-6	  . #x3B24)	; &I-C6-3B24; [27-04]
       (=daikanwa	  . 29220)	; &I-M-29220;
       )
@@ -138,19 +138,19 @@
     (total-strokes	 . 11)
     (=ucs		. #x7C9B)	; 粛
     (->subsumptive
-     ((morohashi-daikanwa	29223 1)
-      (=ucs@unicode	  . #x7C9B)	; &GT-37838;
+     ((=ucs@unicode	  . #x7C9B)	; &GT-37838;
       (=jis-x0208	  . #x3D4D)	; &GT-37838; [29-45]
       (=jis-x0213-1	  . #x3D4D)	; &I-JX1-3D4D; [29-45]
       (=gt		  . 37838)	; &I-GT-37838;
       (=gt-k		  . 07787)	; &I-GT-K07787;
       (=gt-pj-1		  . #x3D4D)	; &I-GT-37838; [29-45]
+      (=daikanwa/+p	  . 29223)	; &GT-37838;
       (<-simplified@JP/Jouyou
        ((=ucs		    . #x8085)	; 肅
 	(=jis-x0208	    . #x6669)	; &I-J90-6669; [70-73]
 	))
       )
-     ((=cns11643-3	  . #x383E)	; &CDP-88C9; [24-30]
+     ((=cns11643-3	  . #x383E)	; &C3-383E; [24-30]
       (=big5-cdp	  . #x88C9)	; &I-CDP-88C9;
       ))
     ))
@@ -244,19 +244,11 @@
     (ideographic-radical . 129)	; ⾀
     (ideographic-strokes . 8)
     (total-strokes	 . 14)
-    (=ucs@unicode	. #x8087)	; &G0-5558;
-    (=gb2312		. #x5558)	; &G0-5558; [53-56]
-    ))
-(define-char
-  '((<-denotational
-     ((=ucs		  . #x8087)	; 肇
-      ))
-    (ideographic-radical . 129)	; ⾀
-    (ideographic-strokes . 8)
-    (total-strokes	 . 14)
-    (=ucs@jis		. #x8087)	; &GT-37852;
-    (=jis-x0208		. #x4825)	; &GT-37852; [40-05]
+    (=ucs@unicode	. #x8087)	; &HD-JA-4825;
+    (=jis-x0208		. #x4825)	; &HD-JA-4825; [40-05]
+    (=gb2312		. #x5558)	; &I-G0-5558; [53-56]
     (=jis-x0213-1	. #x4825)	; &I-JX1-4825; [40-05]
+    (=hanyo-denshi/ja	. #x4825)	; &I-HD-JA-4825; [40-05]
     (=gt		. 37852)	; &I-GT-37852;
     (=gt-pj-1		. #x4825)	; &I-GT-37852; [40-05]
     (<-simplified@JP/misc
@@ -264,6 +256,27 @@
       (=cns11643-1	  . #x6A4E)	; &I-C1-6A4E; [74-46]
       (=daikanwa	  . 29228)	; &I-M-29228;
       ))
+    (->subsumptive
+     ((=decomposition@hanyo-denshi
+       ((=ucs		    . #x8087)	; 肇
+	)
+       ((=ucs		    . #xE0102)	; 󠄂
+	))
+      (==ucs@jis	  . #x8087)	; &g2-HD-JA-4825;
+      (==jis-x0208	  . #x4825)	; &g2-HD-JA-4825; [40-05]
+      (==jis-x0213-1	  . #x4825)	; &g2-HD-JA-4825; [40-05]
+      (==hanyo-denshi/ja  . #x4825)	; &g2-HD-JA-4825; [40-05]
+      (==gt		  . 37852)	; &g2-HD-JA-4825;
+      (->subsumptive
+       ((===jis-x0208	    . #x4825)	; &R-J90-4825; [40-05]
+	(===jis-x0213-1	    . #x4825)	; &R-J90-4825; [40-05]
+	)
+       ((===gt		    . 37852)	; &R-GT-37852;
+	))
+      )
+     ((==ucs@unicode	  . #x8087)	; &g2-UU+8087;
+      (==gb2312		  . #x5558)	; &g2-UU+8087; [53-56]
+      ))
     ))
 (define-char
   '((ideographic-radical . 129)	; ⾀
@@ -338,7 +351,7 @@
       )
      ((=ucs		  . #x807F)	; 聿
       ))
-    (sources		bos=A021708-00010)
+    (sources		ruimoku=A021708-00010)
     (=ruimoku-v6	. #xE019)	; &RUI6-E019;
     ))
 (define-char