From: tomo <tomo>
Date: Thu, 18 Aug 2005 09:43:37 +0000 (+0000)
Subject: (U+537B): Move `->ideographic-variants' to J0-524A.
X-Git-Tag: r21-4-17-chise-0_22-4^20~246
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=96a6ee0f9caf44bb58aa13ad73e2cc61e04a4db2;p=chise%2Fxemacs-chise.git-

(U+537B): Move `->ideographic-variants' to J0-524A.
(J0-524A): Use `->ideographic-variants*sources' instead of char-ref in
`->ideographic-variants'.
(U+537D): Use `->subsumptive'.
(U-0002F833): Use `<-same' instead of `->same' for M-02880.
---

diff --git a/lisp/utf-2000/Ideograph-R026-Seal.el b/lisp/utf-2000/Ideograph-R026-Seal.el
index afbe2a0..cbd96ad 100644
--- a/lisp/utf-2000/Ideograph-R026-Seal.el
+++ b/lisp/utf-2000/Ideograph-R026-Seal.el
@@ -419,8 +419,10 @@
     (ideographic-strokes . 5)
     (total-strokes	 . 7)
     (<-simplified@JP/Jouyou
-     ((=ucs		  . #x537D)	; 卽
+     ((=ks-x1001	  . #x716D)	; &M-02872; [81-77]
+      (=cns11643-3	  . #x2B4B)	; &I-C3-2B4B; [11-43]
       (=jis-x0213-1-2000  . #x2E71)	; &I-JX1-2E71; [14-81]
+      (=daikanwa	  . 02872)	; &I-M-02872;
       ))
     (<-vulgar
      ((=daikanwa	  . 02873)	; &M-02873;
@@ -629,11 +631,6 @@
   '((ideographic-radical . 26)	; ⼙
     (ideographic-strokes . 6)
     (total-strokes	 . 8)
-    (->mistakable
-     ((=daikanwa	  . 39379)	; &I-M-39379;
-      ))
-    (->mistakable*sources
-     zihui daikanwa)
     (<-vulgar
      ((=jis-x0208	  . #x524A)	; &GT-03647; [50-42]
       (=daikanwa	  . 02867)	; &I-M-02867;
@@ -653,6 +650,11 @@
     (=cns11643-4	. #x2556)	; &I-C4-2556; [05-54]
     (=daikanwa		. 02863)	; &I-M-02863;
     (=hanziku-1		. #xE6E0)	; &I-HZK01-E6E0;
+    (->mistakable
+     ((=daikanwa	  . 39379)	; &I-M-39379;
+      ))
+    (->mistakable*sources
+     zihui daikanwa)
     ))
 (define-char
   '((ideographic-radical . 26)	; ⼙
@@ -719,11 +721,6 @@
   '((ideographic-radical . 26)	; ⼙
     (ideographic-strokes . 7)
     (total-strokes	 . 9)
-    (->ideographic-variants
-     (:char	((shinjigen-1	     . 855)
-		 (=daikanwa	     . 02856)	; &I-M-02856;
-		 )
-      :sources	(shinjigen-1)))
     (hanyu-dazidian	1 317 2)
     (=ucs		. #x537B)	; 卻
     (->subsumptive
@@ -735,6 +732,13 @@
       (=gt-pj-1		  . #x524A)	; &I-GT-03647; [50-42]
       (=daikanwa	  . 02867)	; &I-M-02867;
       (=ucs@jis		  . #x537B)	; &GT-03647;
+      (->ideographic-variants
+       ((shinjigen-1	    . 855)
+	(=ucs		    . #x5374)	; 却
+	(=daikanwa	    . 02856)	; &I-M-02856;
+	))
+      (->ideographic-variants*sources
+       shinjigen-1)
       )
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -801,45 +805,37 @@
   '((ideographic-radical . 26)	; ⼙
     (ideographic-strokes . 7)
     (total-strokes	 . 9)
-    (->ideographic-variants
-     (:char	((shinjigen-1	     . 859)
-		 (=daikanwa	     . 02855)	; &I-M-02855;
-		 )
-      :sources	(shinjigen-1)))
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs		  . #x2FF0)	; â¿°
+    (=ucs		. #x537D)	; 卽
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((=ucs@unicode	    . #x7680)	; &GT-29075;
+	)
+       ((=ucs		    . #x5369)	; 卩
+	))
+      (shinjigen-1	  . 861)
+      (shinjigen-2	  . 861)
+      (=ks-x1001	  . #x716D)	; &M-02872; [81-77]
+      (=cns11643-3	  . #x2B4B)	; &I-C3-2B4B; [11-43]
+      (=jis-x0213-1-2000  . #x2E71)	; &I-JX1-2E71; [14-81]
+      (=daikanwa	  . 02872)	; &I-M-02872;
+      (=jef-china3	  . #x45D4)	; &I-JC3-45D4;
+      (=ucs@unicode	  . #x537D)	; &M-02872;
+      (->ideographic-variants
+       ((shinjigen-1	    . 859)
+	(=ucs		    . #x5373)	; 即
+	(=daikanwa	    . 02855)	; &I-M-02855;
+	))
+      (->ideographic-variants*sources
+       shinjigen-1)
       )
-     ((=ucs		  . #x7680)	; 皀
+     ((=cns11643-6	  . #x2F3D)	; &C6-2F3D; [15-29]
       )
-     ((=ucs		  . #x5369)	; 卩
+     ((hanyu-dazidian	  1 316 2)
+      (=hanziku-1	  . #xE742)	; &HZK01-E742;
       ))
-    (shinjigen-1	. 861)
-    (shinjigen-2	. 861)
-    (=ucs		. #x537D)	; 卽
-    (=ks-x1001		. #x716D)	; &I-K0-716D; [81-77]
-    (=cns11643-3	. #x2B4B)	; &I-C3-2B4B; [11-43]
-    (=jis-x0213-1-2000	. #x2E71)	; &I-JX1-2E71; [14-81]
-    (=daikanwa		. 02872)	; &I-M-02872;
-    (=jef-china3	. #x45D4)	; &I-JC3-45D4;
-    ))
-(define-char
-  '((=>ucs		. #x537D)	; 卽
-    (morohashi-daikanwa	2872 0 0)
-    (ideographic-radical . 26)	; ⼙
-    (ideographic-strokes . 7)
-    (total-strokes	 . 9)
-    (hanyu-dazidian	1 316 2)
-    (=cns11643-6	. #x2F3D)	; &C6-2F3D; [15-29]
-    ))
-(define-char
-  '((=>ucs		. #x537D)	; 卽
-    (morohashi-daikanwa	2872 0 1)
-    (ideographic-radical . 26)	; ⼙
-    (ideographic-strokes . 7)
-    (total-strokes	 . 9)
-    (hanyu-dazidian	1 316 2)
-    (=hanziku-1		. #xE742)	; &HZK01-E742;
     ))
 (define-char
   '((=>ucs		. #x537D)	; 卽
@@ -1011,13 +1007,13 @@
     (ideographic-radical . 26)	; ⼙
     (ideographic-strokes . 10)
     (total-strokes	 . 12)
-    (->same
+    (<-same
      ((shinjigen-1	  . 868)
       (=jis-x0208@1978	  . #x362A)	; &M-02880; [22-10]
       (=ks-x1001	  . #x4C4F)	; &I-K0-4C4F; [44-47]
       (=daikanwa	  . 02880)	; &I-M-02880;
       ))
-    (->same*sources
+    (<-same*sources
      shinjigen-1)
     (shinjigen-1	. 869)
     (shinjigen-2	. 869)