From: tomo <tomo>
Date: Fri, 21 May 2010 09:15:16 +0000 (+0000)
Subject: (U-0002822B): Use `->subsumptive'.
X-Git-Tag: r21-4-22-chise-0_24-jis-x0213-2004-add^20~1
X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=commitdiff_plain;h=327fa4c2d09f2a8968dd3e8d12c1c5b31083f3a1

(U-0002822B): Use `->subsumptive'.
(U+4833): Use `->subsumptive' to separate representative nodes.
(U+4834): Likewise.
(U+4832): Likewise.
(U+8EB0): Use `->subsumptive'.
(J0-6D3C): Add `<-vulgar' for J0-7173.
(U-0002822C): Unify H10-C060 and CB02553.
---

diff --git a/lisp/utf-2000/Ideograph-R158-Body.el b/lisp/utf-2000/Ideograph-R158-Body.el
index 78cded8..b013c18 100644
--- a/lisp/utf-2000/Ideograph-R158-Body.el
+++ b/lisp/utf-2000/Ideograph-R158-Body.el
@@ -263,64 +263,94 @@
     (=daikanwa		. 38060)	; &I-M-38060;
     ))
 (define-char
-  '((=>ucs		. #x2822B)	; 𨈫
-    (ideographic-radical . 158)	; ⾝
-    (ideographic-strokes . 5)
-    (total-strokes	 . 12)
-    (=daikanwa		. 38061)	; &M-38061;
-    ))
-(define-char
-  '((morohashi-daikanwa	38061 0 0)
-    (ideographic-radical . 158)	; ⾝
+  '((ideographic-radical . 158)	; ⾝
     (ideographic-strokes . 5)
     (total-strokes	 . 12)
     (=ucs		. #x2822B)	; 𨈫
-    (=cns11643-5	. #x3C64)	; &I-C5-3C64; [28-68]
+    (->subsumptive
+     ((=daikanwa	  . 38061)	; &M-38061;
+      )
+     ((=cns11643-5	  . #x3C64)	; &C5-3C64; [28-68]
+      )
+     ((=ucs@iso		  . #x2822B)	; &U-0002822B;
+      ))
     ))
 (define-char
   '((ideographic-radical . 158)	; ⾝
     (ideographic-strokes . 5)
     (total-strokes	 . 12)
     (=ucs		. #x4833)	; ä ³
-    (=cns11643-5	. #x3C67)	; &I-C5-3C67; [28-71]
-    (=daikanwa		. 38062)	; &I-M-38062;
+    (->subsumptive
+     ((=daikanwa	  . 38062)	; &M-38062;
+      )
+     ((=cns11643-5	  . #x3C67)	; &C5-3C67; [28-71]
+      )
+     ((=ucs@unicode	  . #x4833)	; &UU+4833;
+      ))
     ))
 (define-char
   '((ideographic-radical . 158)	; ⾝
     (ideographic-strokes . 5)
     (total-strokes	 . 12)
     (=ucs		. #x4834)	; ä ´
-    (=cns11643-4	. #x3B52)	; &I-C4-3B52; [27-50]
-    (=daikanwa		. 38063)	; &I-M-38063;
+    (->subsumptive
+     ((=daikanwa	  . 38063)	; &M-38063;
+      )
+     ((=cns11643-4	  . #x3B52)	; &C4-3B52; [27-50]
+      )
+     ((=ucs@unicode	  . #x4834)	; &UU+4834;
+      ))
     ))
 (define-char
   '((ideographic-radical . 158)	; ⾝
     (ideographic-strokes . 5)
     (total-strokes	 . 12)
     (=ucs		. #x4832)	; ä ²
-    (=cns11643-3	. #x3F42)	; &I-C3-3F42; [31-34]
-    (=daikanwa		. 38064)	; &I-M-38064;
-    ))
-(define-char
-  '((=>ucs		. #x8EB0)	; 躰
-    (ideographic-radical . 158)	; ⾝
-    (ideographic-strokes . 5)
-    (total-strokes	 . 12)
-    (=ucs@jis		. #x8EB0)	; &GT-50841;
-    (=jis-x0208		. #x6D3C)	; &GT-50841; [77-28]
-    (=cns11643-3	. #x3F40)	; &I-C3-3F40; [31-32]
-    (=jis-x0213-1	. #x6D3C)	; &I-JX1-6D3C; [77-28]
-    (=gt		. 50841)	; &I-GT-50841;
-    (=gt-pj-1		. #x6D3C)	; &I-GT-50841; [77-28]
-    (=daikanwa		. 38065)	; &I-M-38065;
-    (=shinjigen@rev	.  0190)	; &GT-50841;
+    (->subsumptive
+     ((=daikanwa	  . 38064)	; &M-38064;
+      )
+     ((=cns11643-3	  . #x3F42)	; &C3-3F42; [31-34]
+      )
+     ((=ucs@unicode	  . #x4832)	; &UU+4832;
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa	38065 0 0)
-    (ideographic-radical . 158)	; ⾝
+  '((ideographic-radical . 158)	; ⾝
     (ideographic-strokes . 5)
     (total-strokes	 . 12)
     (=ucs		. #x8EB0)	; 躰
+    (->subsumptive
+     ((=ucs@jis		  . #x8EB0)	; &GT-50841;
+      (=jis-x0208	  . #x6D3C)	; &GT-50841; [77-28]
+      (=cns11643-3	  . #x3F40)	; &I-C3-3F40; [31-32]
+      (=jis-x0213-1	  . #x6D3C)	; &I-JX1-6D3C; [77-28]
+      (=gt		  . 50841)	; &I-GT-50841;
+      (=gt-pj-1		  . #x6D3C)	; &I-GT-50841; [77-28]
+      (=daikanwa	  . 38065)	; &I-M-38065;
+      (<-vulgar
+       ((=ucs@jis	    . #x9AD4)	; &GT-60937;
+	(=jis-x0208	    . #x7173)	; &GT-60937; [81-83]
+	(=ks-x1001	    . #x7477)	; &I-K0-7477; [84-87]
+	(=jis-x0213-1	    . #x7173)	; &I-JX1-7173; [81-83]
+	(=daikanwa	    . 45291)	; &I-M-45291;
+	))
+      (<-vulgar*sources
+       yupian daikanwa)
+      )
+     ((=shinjigen	  .  0190)	; &SJG2-0190;
+      (<-vulgar
+       ((=ucs@jis	    . #x9AD4)	; &GT-60937;
+	(=jis-x0208	    . #x7173)	; &GT-60937; [81-83]
+	(=ks-x1001	    . #x7477)	; &I-K0-7477; [84-87]
+	(=jis-x0213-1	    . #x7173)	; &I-JX1-7173; [81-83]
+	(=daikanwa	    . 45291)	; &I-M-45291;
+	(=shinjigen	    .  0189)	; &GT-60937;
+	))
+      (<-vulgar*sources
+       shinjigen)
+      )
+     ((=ucs@unicode	  . #x8EB0)	; &UU+8EB0;
+      ))
     ))
 (define-char
   '((ideographic-radical . 158)	; ⾝
@@ -329,6 +359,8 @@
     (=ucs		. #x2822C)	; 𨈬
     (=cns11643-6	. #x4F41)	; &I-C6-4F41; [47-33]
     (=daikanwa		. 38066)	; &I-M-38066;
+    (=hanziku-10	. #xC060)	; &I-HZK10-C060;
+    (=cbeta		. 02553)	; &I-CB02553;
     ))
 (define-char
   '((ideographic-radical . 158)	; ⾝