From 273161ff0a38026129e149fed587f9fec6d40d2a Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 12 Sep 2007 04:38:37 +0000
Subject: [PATCH] (U+8D19): Use `->denotational' and `->subsumptive'.
 (U+478B): Use `->subsumptive'.

---
 lisp/utf-2000/Ideograph-R154-Shell.el |   33 +++++++++++++++++++++++++++++----
 1 file changed, 29 insertions(+), 4 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R154-Shell.el b/lisp/utf-2000/Ideograph-R154-Shell.el
index 00627db..6f70691 100644
--- a/lisp/utf-2000/Ideograph-R154-Shell.el
+++ b/lisp/utf-2000/Ideograph-R154-Shell.el
@@ -4775,16 +4775,41 @@
     (ideographic-strokes . 16)
     (total-strokes	 . 23)
     (=ucs		. #x8D19)	; 贙
-    (=cns11643-2	. #x6F53)	; &I-C2-6F53; [79-51]
-    (=daikanwa		. 36978)	; &I-M-36978;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x8D19)	; 贙
+      ))
+    (ideographic-radical . 154)	; ⾙
+    (ideographic-strokes . 16)
+    (total-strokes	 . 23)
+    (->subsumptive
+     ((=daikanwa	  . 36978)	; &M-36978;
+      )
+     ((=cns11643-2	  . #x6F53)	; &C2-6F53; [79-51]
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x8D19)	; 贙
+      ))
+    (ideographic-radical . 154)	; ⾙
+    (ideographic-strokes . 16)
+    (total-strokes	 . 23)
+    (=ucs@unicode	. #x8D19)	; &UU+8D19;
     ))
 (define-char
   '((ideographic-radical . 154)	; ⾙
     (ideographic-strokes . 16)
     (total-strokes	 . 23)
     (=ucs		. #x478B)	; 䞋
-    (=cns11643-4	. #x6B21)	; &I-C4-6B21; [75-01]
-    (=daikanwa		. 36979)	; &I-M-36979;
+    (->subsumptive
+     ((=daikanwa	  . 36979)	; &M-36979;
+      )
+     ((=cns11643-4	  . #x6B21)	; &C4-6B21; [75-01]
+      )
+     ((=ucs@unicode	  . #x478B)	; &UU+478B;
+      ))
     ))
 (define-char
   '((=>ucs		. #x8D1A)	; 贚
-- 
1.7.10.4