X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R025-Divination.el;h=22f5ad1abe6e0251385e12aa4896bfee07c7b894;hb=6ffb60737f3b5dd42721c167cdf2acf3a3d79af6;hp=5eba97ee5bc3ce80c85c5b6f64c34a7c1611caf2;hpb=169c7f38fb3bf09f78723caa1f3f6032f6425b79;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/Ideograph-R025-Divination.el b/lisp/utf-2000/Ideograph-R025-Divination.el
index 5eba97e..22f5ad1 100644
--- a/lisp/utf-2000/Ideograph-R025-Divination.el
+++ b/lisp/utf-2000/Ideograph-R025-Divination.el
@@ -662,15 +662,27 @@
     (ideographic-strokes . 6)
     (total-strokes	 . 8)
     (=ucs		. #x209E1)	; 𠧡
+    (=cns11643-6	. #x297B)	; &I-C6-297B; [09-91]
     (=daikanwa		. 02801)	; &I-M-02801;
-    ))
-(define-char
-  '((=>ucs		. #x209E1)	; 𠧡
-    (morohashi-daikanwa	2801 0 0)
-    (ideographic-radical . 25)	; ⼘
-    (ideographic-strokes . 6)
-    (total-strokes	 . 8)
-    (=cns11643-6	. #x297B)	; &C6-297B; [09-91]
+    (<-ancient
+     ((=ucs@unicode	  . #x5C08)	; &AJ1-04642;
+      (=adobe-japan1-0	  . 04642)	; &AJ1-04642;
+      (=daikanwa	  . 07439)	; &I-M-07439;
+      ))
+    (<-ancient*sources
+     kangxi daikanwa)
+    (->subsumptive
+     ((==ucs@iso	  . #x209E1)	; &g2-M-02801;
+      (==daikanwa	  . 02801)	; &g2-M-02801;
+      (->subsumptive
+       ((===daikanwa	    . 02801)	; &R-M-02801;
+	)
+       ((===ucs@iso	    . #x209E1)	; &R-U-000209E1;
+	))
+      )
+     ((==ucs@cns	  . #x209E1)	; &g2-CU+209E1;
+      (==cns11643-6	  . #x297B)	; &g2-CU+209E1; [09-91]
+      ))
     ))
 (define-char
   '((ideographic-radical . 25)	; ⼘