From f61b9e62028e3f1c0f90773bc9c43c2756880918 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Fri, 7 May 2004 14:18:31 +0000
Subject: [PATCH] (U-0002162C): Use `->subsumptive'. (U-00021643): Likewise.

---
 lisp/utf-2000/Ideograph-R037-Big.el |   19 ++++++++++++++-----
 1 file changed, 14 insertions(+), 5 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R037-Big.el b/lisp/utf-2000/Ideograph-R037-Big.el
index 664625d..74a0a05 100644
--- a/lisp/utf-2000/Ideograph-R037-Big.el
+++ b/lisp/utf-2000/Ideograph-R037-Big.el
@@ -1960,7 +1960,8 @@
     (ideographic-strokes . 8)
     (total-strokes	 . 11)
     (<-vulgar
-     ((=daikanwa	  . 19746)	; &I-M-19746;
+     ((=ucs		  . #x723D)	; 爽
+      (=daikanwa	  . 19746)	; &I-M-19746;
       ))
     (<-vulgar*sources
      songyuan-yilai-suzipu daikanwa)
@@ -1973,17 +1974,25 @@
   '((ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 8)
     (total-strokes	 . 11)
-    (hanyu-dazidian	1 542 1)
     (=ucs		. #x2162C)	; 𡘬
-    (=hanziku-2		. #xBF74)	; &I-HZK02-BF74;
+    (->subsumptive
+     ((=ucs@iso		  . #x2162C)	; &UU+2162C;
+      )
+     ((hanyu-dazidian	  1 542 1)
+      (=hanziku-2	  . #xBF74)	; &HZK02-BF74;
+      ))
     ))
 (define-char
   '((ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 8)
     (total-strokes	 . 11)
-    (hanyu-dazidian	1 543 3)
     (=ucs		. #x21643)	; 𡙃
-    (=hanziku-2		. #xBFB8)	; &I-HZK02-BFB8;
+    (->subsumptive
+     ((hanyu-dazidian	  1 543 3)
+      (=hanziku-2	  . #xBFB8)	; &HZK02-BFB8;
+      )
+     ((=ucs@iso		  . #x21643)	; &UU+21643;
+      ))
     ))
 (define-char
   '((ideographic-radical . 37)	; ⼤
-- 
1.7.10.4