From b43dcf2e942ce1287a2420eec53408ab3d6de9d6 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 18 Aug 2004 13:05:39 +0000
Subject: [PATCH] (U+8289): Use `->subsumptive'. (CB06151): New character.

---
 lisp/utf-2000/Ideograph-R140-Grass.el |   28 +++++++++++++++++-----------
 1 file changed, 17 insertions(+), 11 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R140-Grass.el b/lisp/utf-2000/Ideograph-R140-Grass.el
index 419c60a..01b69a8 100644
--- a/lisp/utf-2000/Ideograph-R140-Grass.el
+++ b/lisp/utf-2000/Ideograph-R140-Grass.el
@@ -709,22 +709,28 @@
     (=hanziku-8		. #xE7DB)	; &I-HZK08-E7DB;
     ))
 (define-char
-  '((=>ucs		. #x8289)	; 芉
-    (ideographic-radical . 140)	; ⾋
+  '((ideographic-radical . 140)	; ⾋
     (ideographic-strokes . 3)
-    (total-strokes	 . 7)
-    (=cns11643-4	. #x2475)	; &M-30668; [04-85]
-    (=daikanwa		. 30668)	; &I-M-30668;
+    (=ucs		. #x8289)	; 芉
+    (->subsumptive
+     ((total-strokes	   . 7)
+      (=cns11643-4	  . #x2475)	; &M-30668; [04-85]
+      (=daikanwa	  . 30668)	; &I-M-30668;
+      )
+     ((total-strokes	   . 6)
+      (hanyu-dazidian	  5 3174 4)
+      (=jis-x0212	  . #x5734)	; &HZK08-E7BB; [55-20]
+      (=hanziku-8	  . #xE7BB)	; &I-HZK08-E7BB;
+      (=ucs@unicode	  . #x8289)	; &HZK08-E7BB;
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa	30668 0 1)
+  '((=>ucs		. #x8289)	; 芉
+    (=>daikanwa		. 30668)	; &M-30668;
     (ideographic-radical . 140)	; ⾋
     (ideographic-strokes . 3)
-    (total-strokes	 . 6)
-    (hanyu-dazidian	5 3174 4)
-    (=ucs		. #x8289)	; 芉
-    (=jis-x0212		. #x5734)	; &I-JSP-5734; [55-20]
-    (=hanziku-8		. #xE7BB)	; &I-HZK08-E7BB;
+    (total-strokes	 . 7)
+    (=cbeta		. 06151)	; &CB06151;
     ))
 (define-char
   '((=>ucs		. #x828A)	; 芊
-- 
1.7.10.4