X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R037-Big.el;h=d8ee9a621ae0c695d63aaeb3884cde98bb4d6db6;hb=bbe826bcb24be0095442b941c4651c0121522f66;hp=f4bbec408e6b6672f3a36e97d66c26918303ca82;hpb=eacc47f5fcd9bb2b944f4a040afb0f9fe024acf8;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/utf-2000/Ideograph-R037-Big.el b/lisp/utf-2000/Ideograph-R037-Big.el
index f4bbec4..d8ee9a6 100644
--- a/lisp/utf-2000/Ideograph-R037-Big.el
+++ b/lisp/utf-2000/Ideograph-R037-Big.el
@@ -1105,10 +1105,22 @@
     (=ucs@unicode	. #x4E54)	; &C3-2345;
     (=gb2312		. #x4747)	; &C3-2345; [39-39]
     (=cns11643-3	. #x2345)	; &I-C3-2345; [03-37]
-    (=hanziku-1		. #xABD7)	; &I-HZK01-ABD7;
     (<-simplified@CN
-     ((=ucs		  . #x55AC)	; 喬
-      (=gb12345		  . #x4747)	; 喬 [39-39]
+     ((=ucs@unicode	  . #x55AC)	; &AJ1-01700;
+      (=adobe-japan1-0	  . 01700)	; &AJ1-01700;
+      (=gb12345		  . #x4747)	; &AJ1-01700; [39-39]
+      ))
+    (->subsumptive
+     ((==ucs@unicode	  . #x4E54)	; &g2-UU+4E54;
+      (==gb2312		  . #x4747)	; &g2-UU+4E54; [39-39]
+      (==cns11643-3	  . #x2345)	; &g2-UU+4E54; [03-37]
+      (->subsumptive
+       ((===cns11643-3	    . #x2345)	; &R-C3-2345; [03-37]
+	)
+       ((===ucs@unicode	    . #x4E54)	; &R-UU+4E54;
+	)
+       ((=hanziku-1	    . #xABD7)	; &HZK01-ABD7;
+	))
       ))
     ))
 (define-char
@@ -1255,6 +1267,23 @@
     ))
 (define-char
   '((ideographic-radical . 37)	; ⼤
+    (ideographic-strokes . 3)
+    (total-strokes	 . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x5927)	; 大
+      )
+     ((=ucs		  . #x5DFE)	; å·¾
+      ))
+    (=ucs		. #x2BBDC)	; 𫯜
+    (->subsumptive
+     ((==ucs@iso	  . #x2BBDC)	; &g2-IU-0002BBDC;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 4)
     (total-strokes	 . 7)
     (hanyu-dazidian	1 529 6)
@@ -3173,6 +3202,12 @@
     (->subsumptive
      ((==gt		  . 07490)	; &g2-GT-07490;
       (==gt-k		  . 06722)	; &g2-GT-07490;
+      )
+     ((=gt-k		  . 06723)	; &GT-K06723;
+      (=gt-pj-k1	  . #x3465)	; &GT-K06723; [20-69]
+      (<-formed@component/connect-right
+       ((=gt		    . 07490)	; &GT-07490;
+	))
       ))
     ))
 (define-char