X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R009-Man.el;h=60e30fc112e3b62da5061d6d4c4f5d952d78907c;hb=e95a3c63cc393e786528a0e1e55dd382bf3a24c6;hp=d9c285ebf473ff1e5e72745b80a9361b8ed1c3f9;hpb=0d7a43fdc42645140b402ca9e4dc9b537d91dbaa;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/Ideograph-R009-Man.el b/lisp/utf-2000/Ideograph-R009-Man.el
index d9c285e..60e30fc 100644
--- a/lisp/utf-2000/Ideograph-R009-Man.el
+++ b/lisp/utf-2000/Ideograph-R009-Man.el
@@ -18,22 +18,43 @@
     (=daikanwa		. 00344)	; &I-M-00344;
     ))
 (define-char
-  '((=>ucs		. #x4EBA)	; 人
-    (morohashi-daikanwa	344 0 0)
+  '((<-denotational
+     ((=ucs		  . #x4EBA)	; 人
+      ))
     (ideographic-radical . 9)	; ⼈
     (ideographic-strokes . 0)
     (total-strokes	 . 2)
+    (<-formed@component
+     ((=ucs		  . #x4EBA)	; 人
+      ))
     (=gt-k		. 00049)	; &GT-K00049;
     (=gt-pj-k1		. #x3357)	; &GT-K00049; [19-55]
     ))
 (define-char
-  '((name*		. "ideographic component person as roof")
-    (=>ucs		. #x4EBA)	; 人
-    (morohashi-daikanwa	344 0 1)
+  '((<-denotational
+     ((=ucs		  . #x4EBA)	; 人
+      ))
+    (name*		. "ideographic component person as left roof")
     (ideographic-radical . 9)	; ⼈
     (ideographic-strokes . 0)
     (total-strokes	 . 2)
-    (ideograph-cdp	. -70)
+    (<-formed@component/connect-below
+     ((=ucs		  . #x4EBA)	; 人
+      ))
+    (=gt-k		. 00058)	; &GT-K00058;
+    (=gt-pj-k1		. #x3C53)	; &GT-K00058; [28-51]
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x4EBA)	; 人
+      ))
+    (name*		. "ideographic component person as roof")
+    (ideographic-radical . 9)	; ⼈
+    (ideographic-strokes . 0)
+    (total-strokes	 . 2)
+    (<-formed@component/connect-below
+     ((=ucs		  . #x4EBA)	; 人
+      ))
     (=big5-cdp		. #x8B5D)	; &GT-00458;
     (=gt		. 00458)	; &I-GT-00458;
     (=gt-k		. 00057)	; &I-GT-K00057;
@@ -41,22 +62,30 @@
     (=jef-china3	. #x71FA)	; &I-JC3-71FA;
     ))
 (define-char
-  '((name*		. "ideographic component person as left roof")
-    (=>ucs		. #x4EBA)	; 人
-    (morohashi-daikanwa	344 0 2)
-    (ideographic-radical . 9)	; ⼈
-    (ideographic-strokes . 0)
+  '((<-denotational
+     ((=ucs		  . #x4EBB)	; 亻
+      ))
+    (name		. "CJK RADICAL PERSON")
+    (general-category	symbol other) ; Informative Category
+    (bidi-category	. "ON")
+    (mirrored		. nil)
     (total-strokes	 . 2)
-    (=gt-k		. 00058)	; &GT-K00058;
-    (=gt-pj-k1		. #x3C53)	; &GT-K00058; [28-51]
+    (<-identical@component/connect-right
+     ((=ucs		  . #x4EBB)	; 亻
+      ))
+    (=ucs		. #x2E85)	; ⺅
     ))
 (define-char
   '((ideographic-radical . 9)	; ⼈
     (ideographic-strokes . 0)
     (total-strokes	 . 2)
+    (<-formed@component/connect-right
+     ((=ucs		  . #x4EBA)	; 人
+      ))
     (=ucs		. #x4EBB)	; 亻
     (=gb2312		. #x5869)	; &I-G0-5869; [56-73]
     (=jis-x0213-2-2000	. #x2135)	; &I-JX2-2135; [01-21]
+    (=big5-cdp		. #x8AF5)	; &I-CDP-8AF5;
     (=gt		. 00457)	; &I-GT-00457;
     (=gt-k		. 00141)	; &I-GT-K00141;
     (=gt-pj-9		. #x4D4D)	; &I-GT-00457; [45-45]
@@ -13221,25 +13250,28 @@
     (total-strokes	 . 10)
     (hanyu-dazidian	1 170 6)
     (=ucs		. #x5016)	; 倖
+    (=big5		. #xADC6)	; &I-B-ADC6;
     (->subsumptive
+     ((=daikanwa	  . 00771)	; &M-00771;
+      )
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
 	(=ucs		    . #x2FF0)	; â¿°
 	)
-       ((=ucs		    . #x4EBB)	; 亻
+       ((name		    . "CJK RADICAL PERSON")
+	(=ucs		    . #x2E85)	; ⺅
 	)
        ((=ucs@unicode	    . #x5E78)	; &C1-4D31;
 	))
-      (=cns11643-1	  . #x5429)	; &M-00771; [52-09]
-      (=big5		  . #xADC6)	; &I-B-ADC6;
-      (=daikanwa	  . 00771)	; &I-M-00771;
-      (=ucs@unicode	  . #x5016)	; &M-00771;
+      (=cns11643-1	  . #x5429)	; &C1-5429; [52-09]
+      (=ucs@unicode	  . #x5016)	; &C1-5429;
       )
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
 	(=ucs		    . #x2FF0)	; â¿°
 	)
-       ((=ucs		    . #x4EBB)	; 亻
+       ((name		    . "CJK RADICAL PERSON")
+	(=ucs		    . #x2E85)	; ⺅
 	)
        ((=jis-x0208	    . #x392C)	; &GT-11561; [25-12]
 	(=ks-x1001	    . #x7A39)	; &I-K0-7A39; [90-25]
@@ -13271,9 +13303,11 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°
       )
-     ((=ucs		  . #x4EBB)	; 亻
+     ((name		  . "CJK RADICAL PERSON")
+      (=ucs		  . #x2E85)	; ⺅
       )
-     ((=daikanwa	  . 14340)	; &M-14340;
+     ((=gt		  . 18172)	; &GT-18172;
+      (=daikanwa	  . 14340)	; &I-M-14340;
       ))
     (=jis-x0212		. #x3152)	; &M-00772; [17-50]
     (=daikanwa		. 00772)	; &I-M-00772;
@@ -13292,7 +13326,8 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°
       )
-     ((=ucs		  . #x4EBB)	; 亻
+     ((name		  . "CJK RADICAL PERSON")
+      (=ucs		  . #x2E85)	; ⺅
       )
      ((=ucs@unicode	  . #x670B)	; &UU+670B;
       ))
@@ -16193,6 +16228,15 @@
   '((ideographic-radical . 9)	; ⼈
     (ideographic-strokes . 9)
     (total-strokes	 . 11)
+    (<-formed
+     ((shinjigen-1	  . 211)
+      (=jis-x0208	  . #x3426)	; &GT-00718; [20-06]
+      (=gb2312		  . #x5929)	; &I-G0-5929; [57-09]
+      (=ks-x1001	  . #x4A49)	; &I-K0-4A49; [42-41]
+      (=daikanwa	  . 00577)	; &I-M-00577;
+      ))
+    (<-formed*sources
+     shinjigen-1)
     (<-same
      ((=jis-x0208	  . #x3426)	; &GT-00718; [20-06]
       (=gb2312		  . #x5929)	; &I-G0-5929; [57-09]
@@ -16217,12 +16261,6 @@
     (=hanziku-1		. #xCDBC)	; &I-HZK01-CDBC;
     (=cbeta		. 00130)	; &I-CB00130;
     (=jef-china3	. #x91A6)	; &I-JC3-91A6;
-    (->ideographic-variants
-     ((shinjigen-1	  . 211)
-      (=daikanwa	  . 00577)	; &I-M-00577;
-      ))
-    (->ideographic-variants*sources
-     shinjigen-1)
     ))
 (define-char
   '((ideographic-radical . 9)	; ⼈