From 2d1e994f4fc012461c1814d47139875c8360ffee Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 17 Mar 2004 10:07:00 +0000
Subject: [PATCH] (U+663C): Use `->subsumptive' for M-07705, M-13886 and
 C3-2C37. (C6-3836): Unify U-0002F8CC and M-13928; use
 `->confusing' instead of `->same' for M-14294; add `->same'
 for U-00026618; add `<-large-seal' for M-13948.

---
 lisp/utf-2000/Ideograph-R072-Sun.el |   54 ++++++++++++++++++++++++++---------
 1 file changed, 40 insertions(+), 14 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R072-Sun.el b/lisp/utf-2000/Ideograph-R072-Sun.el
index 386681e..ce78679 100644
--- a/lisp/utf-2000/Ideograph-R072-Sun.el
+++ b/lisp/utf-2000/Ideograph-R072-Sun.el
@@ -1825,9 +1825,7 @@
     (=daikanwa		. 13885)	; ø¸ƒ˜½
     ))
 (define-char
-  '((ideographic-radical . 72)	; ⽇
-    (ideographic-strokes . 5)
-    (total-strokes	 . 9)
+  '((total-strokes	 . 9)
     (<-simplified@JP/Jouyou
      ((=ucs		  . #x665D)	; 晝
       (=jis-x0208	  . #x5A6C)	; ø½‹Šµ
@@ -1843,7 +1841,19 @@
     (=gb2312		. #x5667)	; ø»…•€
     (=gt		. 17517)	; ý¡€„‘­
     (=gt-pj-1		. #x436B)	; ý¡€„‘­
-    (=daikanwa		. 13886)	; ø¸ƒ˜¾
+    (->subsumptive
+     ((ideographic-radical . 44)	; ⼫
+      (ideographic-strokes . 6)
+      (=daikanwa	  . 07705)	; ø¸¸™
+      )
+     ((ideographic-radical . 72)	; ⽇
+      (ideographic-strokes . 5)
+      (=daikanwa	  . 13886)	; ø¸ƒ˜¾
+      )
+     ((ideographic-radical . 44)	; ⼫
+      (ideographic-strokes . 6)
+      (=cns11643-3	  . #x2C37)	; ø»•§„
+      ))
     ))
 (define-char
   '((ideographic-radical . 72)	; ⽇
@@ -2311,6 +2321,32 @@
     (=daikanwa		. 13924)	; ø¸ƒ™¤
     ))
 (define-char
+  '((script		Large-Seal Ideograph)
+    (=>ucs*		. #x66F8)	; 書
+    (ideographic-radical . 72)	; ⽇
+    (ideographic-strokes . 6)
+    (total-strokes	 . 10)
+    (->confusing
+     ((=daikanwa	  . 14294)	; ø¸ƒŸ–
+      ))
+    (->confusing*sources
+     daikanwa)
+    (->same
+     ((=ucs		  . #x26618)	; 𦘘
+      (=daikanwa	  . 29223)	; ø¸‡ˆ§
+      ))
+    (->same*sources
+     daikanwa)
+    (<-Large-Seal
+     ((=daikanwa	  . 13948)	; ø¸ƒ™¼
+      ))
+    (<-Large-Seal*sources
+     shuowen daikanwa)
+    (=ucs		. #x2F8CC)	; 書
+    (=cns11643-6	. #x3836)	; ø»œ–·
+    (=daikanwa		. 13928)	; ø¸ƒ™¨
+    ))
+(define-char
   '((ideographic-radical . 72)	; ⽇
     (ideographic-strokes . 6)
     (total-strokes	 . 10)
@@ -2424,16 +2460,6 @@
     (=gb2312		. #x6A4D)	; ø»…±¾
     ))
 (define-char
-  '((=>ucs		. #x66F8)	; 書
-    (ideographic-radical . 72)	; ⽇
-    (ideographic-strokes . 6)
-    (total-strokes	 . 10)
-    (->same
-     ((=daikanwa	  . 14294)	; ø¸ƒŸ–
-      ))
-    (=cns11643-6	. #x3836)	; ø»œ–·
-    ))
-(define-char
   '((ideographic-radical . 72)	; ⽇
     (ideographic-strokes . 6)
     (total-strokes	 . 10)
-- 
1.7.10.4