X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R125-Old.el;h=77acfba3f499ed08a91189473db0e3b58535daaf;hb=35a46b890bfd96a72831943c7c715886343ea727;hp=a0199a37d1a2f60e5a1069e4b4274080cf241647;hpb=6fbfaee7992fbd9710be9cf31a0aef5f54b72ee0;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/Ideograph-R125-Old.el b/lisp/utf-2000/Ideograph-R125-Old.el
index a0199a3..77acfba 100644
--- a/lisp/utf-2000/Ideograph-R125-Old.el
+++ b/lisp/utf-2000/Ideograph-R125-Old.el
@@ -126,7 +126,7 @@
       )
      ((=ucs		  . #x8002)	; 耂
       )
-     ((=ucs		  . #x4E02)	; 丂
+     ((=>ucs@cognate	  . #x4E02)	; &A-cgnU+4E02;
       ))
     (=ucs		. #x8003)	; 考
     (=+>jis-x0208	. #x394D)	; 考 [25-45]
@@ -171,7 +171,7 @@
 	 ((name		      . "CJK RADICAL OLD")
 	  (=ucs		      . #x2EB9)	; ⺹
 	  )
-	 ((=big5-cdp	      . #x8BBF)	; &CDP-8BBF;
+	 ((==big5-cdp	      . #x8BBF)	; &g2-CDP-8BBF;
 	  ))
 	(==jis-x0208@1978   . #x394D)	; &g2-HD-FT-303C; [25-45]
 	(==jis-x0208@1983   . #x394D)	; &g2-HD-FT-303C; [25-45]
@@ -199,7 +199,7 @@
 	 ((name		      . "CJK RADICAL OLD")
 	  (=ucs		      . #x2EB9)	; ⺹
 	  )
-	 ((=gt-k	      . 00125)	; &GT-K00125;
+	 ((==gt-k	      . 00125)	; &g2-GT-K00125;
 	  ))
 	(==ucs@jis/1990	    . #x8003)	; &g2-AJ1-02015;
 	(==ucs@jis/2000	    . #x8003)	; &g2-AJ1-02015;
@@ -234,8 +234,7 @@
 	)
        ((=ucs		    . #x8002)	; 耂
 	)
-       ((=ucs@unicode	    . #x4E02)	; &AJ1-17234;
-	(=adobe-japan1-5    . 17234)	; &AJ1-17234;
+       ((=ucs		    . #x4E02)	; 丂
 	))
       (=ucs@unicode	  . #x8003)	; &C1-4853;
       (=ucs@JP/hanazono	  . nil)
@@ -281,6 +280,25 @@
     ))
 (define-char
   '((ideographic-radical . 125)	; â½¼
+    (ideographic-strokes . 2)
+    (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x8001)	; 老
+      )
+     ((=ucs		  . #x4EBA)	; 人
+      ))
+    (=gt-k		. 04397)	; &GT-K04397;
+    (=gt-pj-k2		. #x4552)	; &GT-K04397; [37-50]
+    (->subsumptive
+     ((==gt-k		  . 04397)	; &g2-GT-K04397;
+      (==gt-pj-k2	  . #x4552)	; &g2-GT-K04397; [37-50]
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 125)	; â½¼
     (ideographic-strokes . 3)
     (total-strokes	 . 9)
     (=ucs		. #x264B4)	; 𦒴
@@ -705,6 +723,26 @@
     ))
 (define-char
   '((ideographic-radical . 125)	; â½¼
+    (ideographic-strokes . 5)
+    (total-strokes	 . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x8002)	; 耂
+      )
+     ((=ucs		  . #x53E4)	; 古
+      ))
+    (=ucs		. #x2C68B)	; 𬚋
+    (=ruimoku-v6	. #xE0E0)	; &I-RUI6-E0E0;
+    (->subsumptive
+     ((==ucs@JP/hanazono  . #x2C68B)	; &g2-hanaJU+2C68B;
+      )
+     ((==ruimoku-v6	  . #xE0E0)	; &g2-RUI6-E0E0;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 125)	; â½¼
     (ideographic-strokes . 6)
     (total-strokes	 . 12)
     (=ucs		. #x439C)	; 䎜