From: tomo <tomo>
Date: Thu, 22 Apr 2004 08:27:24 +0000 (+0000)
Subject: (U+5918): Add `->mistakable' for M-02843 and M-02847; add `->same' for
X-Git-Tag: r21-4-14-chise-0_21-26-si-vulgar^2~34
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=57e1aef22e6fc3b527b394173400a5f150ec7cd5;p=chise%2Fxemacs-chise.git-

(U+5918): Add `->mistakable' for M-02843 and M-02847; add `->same' for
U+5917; use `<-vulgar*sources' instead of char-ref in `<-vulgar'.
(JSP-3869): Moved into U+5923; use `<-vulgar*sources' instead of
char-ref in `<-vulgar'.
(U+5923): Use `->subsumptive'.
(C3-405F): Moved into U+5923.
---

diff --git a/lisp/utf-2000/Ideograph-R036-Evening.el b/lisp/utf-2000/Ideograph-R036-Evening.el
index 3686d49..318561c 100644
--- a/lisp/utf-2000/Ideograph-R036-Evening.el
+++ b/lisp/utf-2000/Ideograph-R036-Evening.el
@@ -63,13 +63,26 @@
   '((ideographic-radical . 36)	; â¼£
     (ideographic-strokes . 2)
     (total-strokes	 . 5)
+    (->mistakable
+     ((=daikanwa	  . 02843)	; &I-M-02843;
+      )
+     ((=daikanwa	  . 02847)	; &I-M-02847;
+      ))
+    (->mistakable*sources
+     kangxi daikanwa)
+    (->same
+     ((=ucs		  . #x5917)	; 夗
+      (=daikanwa	  . 05752)	; &I-M-05752;
+      ))
+    (->same*sources
+     zihui daikanwa)
     (<-vulgar
-     (:sources	(shinjigen-1)
-      :char	((ideographic-radical . 26)	; ⼙
-		 (shinjigen-1	     . 848)
-		 (=daikanwa	     . 02847)	; &I-M-02847;
-		 )
+     ((shinjigen-1	  . 848)
+      (=ucs		  . #x536F)	; 卯
+      (=jis-x0208	  . #x312C)	; &I-J90-312C;
       ))
+    (<-vulgar*sources
+     shinjigen-1)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°
@@ -607,7 +620,9 @@
 (define-char
   '((total-strokes	 . 11)
     (<-vulgar
-     ((=daikanwa	  . 05802)	; &I-M-05802;
+     ((shinjigen-1	  . 1550)
+      (=cns11643-1	  . #x6842)	; &M-05802;
+      (=daikanwa	  . 05802)	; &I-M-05802;
       ))
     (<-vulgar*sources
      songyuan-yilai-suzipu zihui daikanwa shinjigen-1)
@@ -841,35 +856,31 @@
     (=ucs@big5		. #x5922)	; &M-05802;
     ))
 (define-char
-  '((=>ucs		. #x5923)	; 夣
-    (ideographic-radical . 36)	; â¼£
-    (ideographic-strokes . 11)
-    (total-strokes	 . 14)
-    (<-vulgar
-     ((shinjigen-1	  . 1550)
-      (=daikanwa	  . 05802)	; &I-M-05802;
-      ))
-    (<-vulgar*sources
-     shinjigen-1)
-    (shinjigen-1	. 1553)
-    (=jis-x0212		. #x3869)	; &M-05803;
-    (=daikanwa		. 05803)	; &I-M-05803;
-    (=ucs@jis		. #x5923)	; &M-05803;
-    ))
-(define-char
-  '((morohashi-daikanwa	5803 0 0)
-    (ideographic-radical . 36)	; â¼£
-    (ideographic-strokes . 11)
-    (total-strokes	 . 14)
+  '((ideographic-radical . 36)	; â¼£
     (=ucs		. #x5923)	; 夣
-    ))
-(define-char
-  '((=>ucs		. #x5923)	; 夣
-    (morohashi-daikanwa	5803 0 1)
-    (ideographic-radical . 36)	; â¼£
-    (ideographic-strokes . 10)
-    (total-strokes	 . 13)
-    (=cns11643-3	. #x405F)	; &C3-405F;
+    (->subsumptive
+     ((ideographic-strokes . 11)
+      (total-strokes	   . 14)
+      (<-vulgar
+       ((shinjigen-1	    . 1550)
+	(=cns11643-1	    . #x6842)	; &M-05802;
+	(=daikanwa	    . 05802)	; &I-M-05802;
+	))
+      (<-vulgar*sources
+       shinjigen-1)
+      (shinjigen-1	  . 1553)
+      (=jis-x0212	  . #x3869)	; &M-05803;
+      (=daikanwa	  . 05803)	; &I-M-05803;
+      (=ucs@jis		  . #x5923)	; &M-05803;
+      )
+     ((ideographic-strokes . 11)
+      (total-strokes	   . 14)
+      (=ucs@unicode	  . #x5923)	; &UU+5923;
+      )
+     ((ideographic-strokes . 10)
+      (total-strokes	   . 13)
+      (=cns11643-3	  . #x405F)	; &C3-405F;
+      ))
     ))
 (define-char
   '((ideographic-radical . 36)	; â¼£