From 3f64919477bbdfd99d993a853643568ec2c6b0fd Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 25 Feb 2004 12:01:00 +0000
Subject: [PATCH] (JC3-82B5): Omit features except `->identical'; add
 `->identical*sources'. (U+5367): Unify C3-2A5C; use
 `ideographic-{radical|strokes}@{ucs|cns}',
 `total-strokes@{ucs|cns}' and
 `ideographic-radical@ucs*sources'.

---
 lisp/utf-2000/Ideograph-R025-Divination.el |   24 ++++++++++++++----------
 1 file changed, 14 insertions(+), 10 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R025-Divination.el b/lisp/utf-2000/Ideograph-R025-Divination.el
index 29a21d4..ac0ea0a 100644
--- a/lisp/utf-2000/Ideograph-R025-Divination.el
+++ b/lisp/utf-2000/Ideograph-R025-Divination.el
@@ -173,14 +173,12 @@
     (=jef-china3	. #x45CB)	; øº„—‹
     ))
 (define-char
-  '((=>ucs		. #x5361)	; 卡
-    (morohashi-daikanwa	2781 0 0)
-    (ideographic-radical . 25)	; ⼘
-    (ideographic-strokes . 3)
-    (total-strokes	 . 5)
-    (->identical
-     ((=jef-china3	  . #x45CB)	; øº„—‹
+  '((->identical
+     ((=ucs		  . #x5361)	; 卡
+      (=jef-china3	  . #x45CB)	; øº„—‹
       ))
+    (->identical*sources
+     jef-china3)
     (=jef-china3	. #x82B5)	; øºˆŠµ
     ))
 (define-char
@@ -508,9 +506,14 @@
     (=cns11643-6	. #x2A22)	; ø»œ¿
     ))
 (define-char
-  '((ideographic-radical . 25)	; ⼘
-    (ideographic-strokes . 6)
-    (total-strokes	 . 8)
+  '((ideographic-radical@ucs . 25)	; ⼘
+    (ideographic-strokes@ucs . 6)
+    (total-strokes@ucs	     . 8)
+    (ideographic-radical@ucs*sources
+     daikanwa ucs)
+    (ideographic-radical@cns . 131)	; ⾂
+    (ideographic-strokes@cns . 2)
+    (total-strokes@cns	     . 9)
     (hanyu-dazidian	4 2801 2)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -522,6 +525,7 @@
       ))
     (=ucs		. #x5367)	; 卧
     (=gb2312		. #x4E54)	; ø»…ˆ½
+    (=cns11643-3	. #x2A5C)	; ø»•¤­
     (=jis-x0213-2-2000	. #x2354)	; ø»¤ ¯
     (=daikanwa		. 02808)	; ø¸€«¸
     (=hanziku-7		. #xEECB)	; ý¢¾»‹
-- 
1.7.10.4