X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R158-Body.el;h=13842587f4a8c1a5f7b0b8a37536da675d05be13;hb=ad50eda8749768eeeeaffa95c7d8b1cefd7842df;hp=0e621ea415b6dc99bd745c65358aee98867d4c70;hpb=141caa8ee97dc84752a1ea4d59193f053b17e7e0;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/Ideograph-R158-Body.el b/lisp/utf-2000/Ideograph-R158-Body.el
index 0e621ea..1384258 100644
--- a/lisp/utf-2000/Ideograph-R158-Body.el
+++ b/lisp/utf-2000/Ideograph-R158-Body.el
@@ -42,27 +42,24 @@
     (=daikanwa		. 38037)	; &I-M-38037;
     ))
 (define-char
-  '((=>ucs		. #x8EAC)	; 躬
-    (ideographic-radical . 158)	; ⾝
-    (ideographic-strokes . 3)
-    (total-strokes	 . 10)
-    (shinjigen-2	. 8102)
-    (=jis-x0208		. #x6D3B)	; &GT-50812; [77-27]
-    (=ks-x1001		. #x4F65)	; &I-K0-4F65; [47-69]
-    (=cns11643-1	. #x5845)	; &I-C1-5845; [56-37]
-    (=gt		. 50812)	; &I-GT-50812;
-    (=gt-k		. 06646)	; &I-GT-K06646;
-    (=gt-pj-1		. #x6D3B)	; &I-GT-50812; [77-27]
-    (=daikanwa		. 38038)	; &I-M-38038;
-    (=ucs@jis		. #x8EAC)	; &GT-50812;
-    ))
-(define-char
-  '((morohashi-daikanwa	38038 0 0)
-    (ideographic-radical . 158)	; ⾝
+  '((ideographic-radical . 158)	; ⾝
     (ideographic-strokes . 3)
     (total-strokes	 . 10)
     (=ucs		. #x8EAC)	; 躬
-    (=gb2312		. #x392A)	; &I-G0-392A; [25-10]
+    (->subsumptive
+     ((shinjigen-2	  . 8102)
+      (=jis-x0208	  . #x6D3B)	; &GT-50812; [77-27]
+      (=ks-x1001	  . #x4F65)	; &I-K0-4F65; [47-69]
+      (=cns11643-1	  . #x5845)	; &I-C1-5845; [56-37]
+      (=gt		  . 50812)	; &I-GT-50812;
+      (=gt-k		  . 06646)	; &I-GT-K06646;
+      (=gt-pj-1		  . #x6D3B)	; &I-GT-50812; [77-27]
+      (=daikanwa	  . 38038)	; &I-M-38038;
+      (=ucs@jis		  . #x8EAC)	; &GT-50812;
+      )
+     ((=gb2312		  . #x392A)	; &G0-392A; [25-10]
+      (=ucs@unicode	  . #x8EAC)	; &G0-392A;
+      ))
     ))
 (define-char
   '((ideographic-radical . 158)	; ⾝
@@ -896,73 +893,84 @@
     (ideographic-strokes . 11)
     (total-strokes	 . 18)
     (=ucs		. #x8EBF)	; 躿
-    (=cns11643-3	. #x5935)	; &I-C3-5935; [57-21]
-    (=daikanwa		. 38136)	; &I-M-38136;
-    ))
-(define-char
-  '((=>ucs		. #x8EC0)	; 軀
-    (ideographic-radical . 158)	; ⾝
-    (ideographic-strokes . 11)
-    (total-strokes	 . 18)
-    (=jis-x0208-1978	. #x366D)	; &M-38137; [22-77]
-    (=ks-x1001		. #x4F46)	; &I-K0-4F46; [47-38]
-    (=jis-x0212		. #x6054)	; &I-JSP-6054; [64-52]
-    (=jis-x0213-1-2000	. #x7C4A)	; &I-JX1-7C4A; [92-42]
-    (=daikanwa		. 38137)	; &I-M-38137;
-    (=ucs@jis		. #x8EC0)	; &M-38137;
-    ))
-(define-char
-  '((=>ucs		. #x8EC0)	; 軀
-    (morohashi-daikanwa	38137 0 1)
-    (ideographic-radical . 158)	; ⾝
-    (ideographic-strokes . 11)
-    (total-strokes	 . 18)
-    (=cns11643-1	. #x774A)	; &C1-774A; [87-42]
+    (->subsumptive
+     ((=daikanwa	  . 38136)	; &M-38136;
+      )
+     ((=cns11643-3	  . #x5935)	; &C3-5935; [57-21]
+      )
+     ((=ucs@unicode	  . #x8EBF)	; &UU+8EBF;
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa	38137 0 2)
+  '((<-denotational
+     ((=jis-x0208@1997	  . #x366D)	; &J97-366D; [22-77]
+      ))
     (ideographic-radical . 158)	; ⾝
     (ideographic-strokes . 11)
     (total-strokes	 . 18)
     (=ucs		. #x8EC0)	; 軀
-    (=gb12345		. #x477B)	; 軀 [39-91]
+    (->subsumptive
+     ((=jis-x0208@1978	  . #x366D)	; &M-38137; [22-77]
+      (=ks-x1001	  . #x4F46)	; &I-K0-4F46; [47-38]
+      (=jis-x0212	  . #x6054)	; &I-JSP-6054; [64-52]
+      (=jis-x0213-1-2000  . #x7C4A)	; &I-JX1-7C4A; [92-42]
+      (=daikanwa	  . 38137)	; &I-M-38137;
+      (=ucs@jis		  . #x8EC0)	; &M-38137;
+      )
+     ((=gb12345		  . #x477B)	; &UU+8EC0; [39-91]
+      (=ucs@unicode	  . #x8EC0)	; &UU+8EC0;
+      )
+     ((=cns11643-1	  . #x774A)	; &C1-774A; [87-42]
+      ))
     ))
 (define-char
-  '((=>ucs		. #x8EAF)	; 躯
-    (morohashi-daikanwa	38137 0 4)
-    (ideographic-radical . 158)	; ⾝
-    (ideographic-strokes . 4)
-    (total-strokes	 . 11)
-    (=jis-x0208-1983	. #x366D)	; &GT-50820; [22-77]
-    (=jis-x0208-1990	. #x366D)	; &I-J90-366D; [22-77]
-    (=gt		. 50820)	; &I-GT-50820;
-    (=gt-pj-1		. #x366D)	; &I-GT-50820; [22-77]
-    (=ucs@jis		. #x8EAF)	; &GT-50820;
+  '((ideographic-radical . 158)	; ⾝
+    (=jis-x0208@1997	. #x366D)	; &J97-366D; [22-77]
     ))
 (define-char
-  '((morohashi-daikanwa	38137 0 5)
+  '((<-denotational
+     ((=jis-x0208@1997	  . #x366D)	; &J97-366D; [22-77]
+      ))
     (ideographic-radical . 158)	; ⾝
     (ideographic-strokes . 4)
     (total-strokes	 . 11)
     (=ucs		. #x8EAF)	; 躯
-    (=gb2312		. #x477B)	; &I-G0-477B; [39-91]
-    ))
-(define-char
-  '((=>ucs		. #x8EAF)	; 躯
-    (morohashi-daikanwa	38137 0 6)
-    (ideographic-radical . 158)	; ⾝
-    (ideographic-strokes . 4)
-    (total-strokes	 . 11)
-    (=cns11643-3	. #x3940)	; &C3-3940; [25-32]
+    (->subsumptive
+     ((<-denotational
+       ((=jis-x0208@1978    . #x366D)	; &M-38137; [22-77]
+	(=ks-x1001	    . #x4F46)	; &I-K0-4F46; [47-38]
+	(=jis-x0212	    . #x6054)	; &I-JSP-6054; [64-52]
+	(=jis-x0213-1-2000  . #x7C4A)	; &I-JX1-7C4A; [92-42]
+	(=daikanwa	    . 38137)	; &I-M-38137;
+	))
+      (=jis-x0208@1983	  . #x366D)	; &GT-50820; [22-77]
+      (=jis-x0208@1990	  . #x366D)	; &I-J90-366D; [22-77]
+      (=gt		  . 50820)	; &I-GT-50820;
+      (=gt-pj-1		  . #x366D)	; &I-GT-50820; [22-77]
+      (=ucs@jis		  . #x8EAF)	; &GT-50820;
+      )
+     ((=jef-china3	  . #x66EA)	; &JC3-66EA;
+      )
+     ((=gb2312		  . #x477B)	; &G0-477B; [39-91]
+      (=ucs@unicode	  . #x8EAF)	; &G0-477B;
+      )
+     ((=cns11643-3	  . #x3940)	; &C3-3940; [25-32]
+      ))
     ))
 (define-char
   '((ideographic-radical . 158)	; ⾝
     (ideographic-strokes . 11)
     (total-strokes	 . 18)
     (=ucs		. #x8EC1)	; 軁
-    (=jis-x0212		. #x6055)	; &I-JSP-6055; [64-53]
-    (=cns11643-3	. #x5936)	; &I-C3-5936; [57-22]
-    (=daikanwa		. 38138)	; &I-M-38138;
+    (->subsumptive
+     ((=jis-x0212	  . #x6055)	; &M-38138; [64-53]
+      (=daikanwa	  . 38138)	; &I-M-38138;
+      (=ucs@jis		  . #x8EC1)	; &M-38138;
+      )
+     ((=cns11643-3	  . #x5936)	; &C3-5936; [57-22]
+      )
+     ((=ucs@unicode	  . #x8EC1)	; &UU+8EC1;
+      ))
     ))
 (define-char
   '((ideographic-radical . 158)	; ⾝