From: tomo <tomo>
Date: Tue, 15 Feb 2011 16:26:58 +0000 (+0000)
Subject: (mother of K0-706E): Unify G-KU+5C0A and G-GT-09378.
X-Git-Tag: r21-4-22-chise-0_25-6^20~597
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=b701b070a33a27065542c321eb5e5f09e7653ffa;p=chise%2Fxemacs-chise.git-

(mother of K0-706E): Unify G-KU+5C0A and G-GT-09378.
(K0-706E): Unify KU+5C0A.
(mother of J0-423A): Unify G-UU+5C0A.
(U-00021B33): Use `->denotational' instead of `->subsumptive'.
---

diff --git a/lisp/utf-2000/Ideograph-R041-Inch.el b/lisp/utf-2000/Ideograph-R041-Inch.el
index a18edc7..54a7ce5 100644
--- a/lisp/utf-2000/Ideograph-R041-Inch.el
+++ b/lisp/utf-2000/Ideograph-R041-Inch.el
@@ -581,10 +581,13 @@
     (ideographic-radical . 41)	; ⼨
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
+    (=>>ucs@ks		. #x5C0A)	; &G-GT-09378;
+    (=>>gt		. 09378)	; &G-GT-09378;
     (->subsumptive
      ((=daikanwa	  . 07445)	; &M-07445;
       )
-     ((=ks-x1001	  . #x706E)	; &GT-09378; [80-78]
+     ((=ucs@ks		  . #x5C0A)	; &GT-09378;
+      (=ks-x1001	  . #x706E)	; &GT-09378; [80-78]
       (=gt		  . 09378)	; &I-GT-09378;
       (=gt-k		  . 09091)	; &I-GT-K09091;
       (=gt-pj-3		  . #x315D)	; &I-GT-09378; [17-61]
@@ -598,6 +601,7 @@
     (ideographic-radical . 41)	; ⼨
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
+    (=>>ucs@unicode	. #x5C0A)	; &G-UU+5C0A;
     (->subsumptive
      ((=cns11643-1	  . #x5E71)	; &C1-5E71; [62-81]
       )
@@ -617,18 +621,32 @@
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
     (=ucs		. #x21B33)	; 𡬳
-    (->subsumptive
-     ((=daikanwa	  . 07446)	; &M-07446;
-      )
-     ((=ucs@iso		  . #x21B33)	; &C4-3727;
-      (=cns11643-4	  . #x3727)	; &C4-3727; [23-07]
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x21B33)	; 𡬳
       ))
+    (ideographic-radical . 41)	; ⼨
+    (ideographic-strokes . 9)
+    (total-strokes	 . 12)
+    (=daikanwa		. 07446)	; &M-07446;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x21B33)	; 𡬳
+      ))
+    (ideographic-radical . 41)	; ⼨
+    (ideographic-strokes . 9)
+    (total-strokes	 . 12)
+    (=ucs@iso		. #x21B33)	; &C4-3727;
+    (=cns11643-4	. #x3727)	; &C4-3727; [23-07]
     ))
 (define-char
   '((ideographic-radical . 41)	; ⼨
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
     (=ucs		. #x5C0B)	; 尋
+    (=big5		. #xB44D)	; &I-B-B44D;
     ))
 (define-char
   '((<-denotational
@@ -637,10 +655,8 @@
     (ideographic-radical . 41)	; ⼨
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
-    (=ucs@big5		. #x5C0B)	; &GT-09374;
     (=ks-x1001		. #x637C)	; &GT-09374; [67-92]
     (=cns11643-1	. #x5E72)	; &I-C1-5E72; [62-82]
-    (=big5		. #xB44D)	; &I-B-B44D;
     (=gt		. 09374)	; &I-GT-09374;
     (=gt-k		. 09077)	; &I-GT-K09077;
     (=gt-pj-3		. #x315F)	; &I-GT-09374; [17-63]