X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R058-Snout.el;h=711faa66ea776192461c327c86bcf0c1655d4ebe;hb=2edea30a7786f6456cc2ac53b5e12866352f862c;hp=f0dc59d4e014be027079dbe97a8b61a86e1261bf;hpb=6fb52423368bb607a3ea70ef2b4c6ca518657ee6;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/Ideograph-R058-Snout.el b/lisp/utf-2000/Ideograph-R058-Snout.el
index f0dc59d..711faa6 100644
--- a/lisp/utf-2000/Ideograph-R058-Snout.el
+++ b/lisp/utf-2000/Ideograph-R058-Snout.el
@@ -47,17 +47,30 @@
     (total-strokes	 . 3)
     (=gt-k		. 00266)	; &GT-K00266;
     (=gt-pj-k1		. #x3663)	; &GT-K00266; [22-67]
-    (->subsumptive
-     ((name		  . "CJK RADICAL SNOUT TWO")
-      (general-category	symbol other) ; Informative Category
-      (bidi-category	. "ON")
-      (mirrored		. nil)
-      (=ucs		  . #x2E95)	; ⺕
-      (=gb2312		  . #x6566)	; &I-G0-6566; [69-70]
-      (=ucs@unicode	  . #x5F50)	; ⺕
-      )
-     ((=big5-cdp	  . #x897C)	; &CDP-897C;
+    ))
+(define-char
+  '((<-denotational
+     ((=gt-k		  . 00266)	; &GT-K00266;
+      ))
+    (name		. "CJK RADICAL SNOUT TWO")
+    (general-category	symbol other) ; Informative Category
+    (bidi-category	. "ON")
+    (mirrored		. nil)
+    (ideographic-radical . 58)	; â¼¹
+    (ideographic-strokes . 0)
+    (total-strokes	 . 3)
+    (=ucs		. #x2E95)	; ⺕
+    (=gb2312		. #x6566)	; &I-G0-6566; [69-70]
+    (=ucs@unicode	. #x5F50)	; ⺕
+    ))
+(define-char
+  '((<-denotational
+     ((=gt-k		  . 00266)	; &GT-K00266;
       ))
+    (ideographic-radical . 58)	; â¼¹
+    (ideographic-strokes . 0)
+    (total-strokes	 . 3)
+    (=big5-cdp		. #x897C)	; &CDP-897C;
     ))
 (define-char
   '((ideographic-radical . 58)	; â¼¹
@@ -71,6 +84,29 @@
     (=gt-k		. 00234)	; &I-GT-K00234;
     (=gt-pj-1		. #x5740)	; &I-GT-12504; [55-32]
     (=daikanwa		. 09909)	; &I-M-09909;
+    (<-same
+     ((=jis-x0212	  . #x3C77)	; &GT-12503; [28-87]
+      (=cns11643-3	  . #x2140)	; &I-C3-2140; [01-32]
+      (=daikanwa	  . 09908)	; &I-M-09908;
+      ))
+    (<-same*sources
+     guangyun daikanwa)
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x5F51)	; 彑
+      ))
+    (name		. "CJK RADICAL SNOUT ONE")
+    (general-category	symbol other) ; Informative Category
+    (bidi-category	. "ON")
+    (mirrored		. nil)
+    (=ucs		. #x2E94)	; ⺔
+    (<-formed@component
+     ((=ucs		  . #x5F50)	; 彐
+      ))
+    (<-identical@component
+     ((=ucs		  . #x5F51)	; 彑
+      ))
     ))
 (define-char
   '((ideographic-radical . 58)	; â¼¹
@@ -79,6 +115,7 @@
     (=ucs		. #x5F52)	; 归
     (->subsumptive
      ((morohashi-daikanwa	9909 1)
+      (=cns11643-3	  . #x224A)	; &C3-224A; [02-42]
       (<-vulgar
        ((=jis-x0208	    . #x5D45)	; &GT-20995; [61-37]
 	(=ks-x1001	    . #x4F7D)	; &I-K0-4F7D; [47-93]
@@ -87,10 +124,13 @@
 	))
       (<-vulgar*sources
        daikanwa)
-      (=cns11643-3	  . #x224A)	; &C3-224A; [02-42]
       )
      ((=gb2312		  . #x3969)	; &G0-3969; [25-73]
       (=ucs@unicode	  . #x5F52)	; &G0-3969;
+      (<-simplified@CN
+       ((=ucs		    . #x6B78)	; æ­¸
+	(=gb12345	    . #x3969)	; æ­¸ [25-73]
+	))
       ))
     ))
 (define-char
@@ -101,7 +141,7 @@
     (=daikanwa		. 09910)	; &M-09910;
     ))
 (define-char
-  '((morohashi-daikanwa	9910 0 1)
+  '((=>daikanwa		. 09910)	; &M-09910;
     (ideographic-radical . 58)	; â¼¹
     (ideographic-strokes . 3)
     (total-strokes	 . 6)
@@ -113,34 +153,31 @@
     (ideographic-strokes . 3)
     (total-strokes	 . 6)
     (=ucs		. #x22451)	; 𢑑
-    (=cns11643-6	. #x246C)	; &I-C6-246C; [04-76]
-    (=daikanwa		. 09911)	; &I-M-09911;
+    (->subsumptive
+     ((=daikanwa	  . 09911)	; &M-09911;
+      )
+     ((=cns11643-6	  . #x246C)	; &C6-246C; [04-76]
+      (=ucs@iso		  . #x22451)	; &C6-246C;
+      ))
     ))
 (define-char
   '((ideographic-radical . 58)	; â¼¹
     (ideographic-strokes . 3)
     (total-strokes	 . 6)
+    (=ucs		. #x22450)	; 𢑐
+    (=cns11643-6	. #x246E)	; &I-C6-246E; [04-78]
+    (=daikanwa		. 09912)	; &I-M-09912;
     (<-vulgar
      ((=ucs		  . #x7576)	; 當
       (=daikanwa	  . 21890)	; &I-M-21890;
       ))
     (<-vulgar*sources
      daikanwa)
-    (=ucs		. #x22450)	; 𢑐
-    (=cns11643-6	. #x246E)	; &I-C6-246E; [04-78]
-    (=daikanwa		. 09912)	; &I-M-09912;
     ))
 (define-char
   '((ideographic-radical . 58)	; â¼¹
     (ideographic-strokes . 3)
     (total-strokes	 . 6)
-    (<-simplified@JP/Jouyou
-     ((=ucs		  . #x7576)	; 當
-      (=jis-x0208	  . #x6144)	; &I-J90-6144; [65-36]
-      (=daikanwa	  . 21890)	; &I-M-21890;
-      ))
-    (<-simplified@JP/Jouyou*sources
-     daikanwa JP/Jouyou)
     (shinjigen-2	. 5071)
     (=ucs		. #x5F53)	; 当
     (=jis-x0208		. #x4576)	; &I-J90-4576; [37-86]
@@ -150,44 +187,67 @@
     (=gt-k		. 01674)	; &I-GT-K01674;
     (=gt-pj-1		. #x4576)	; &I-GT-12509; [37-86]
     (=daikanwa		. 09913)	; &I-M-09913;
+    (<-simplified@CN
+     ((=ucs		  . #x7576)	; 當
+      (=gb12345		  . #x3531)	; 當 [21-17]
+      )
+     ((=ucs		  . #x5679)	; 噹
+      (=gb12345		  . #x782B)	; 噹 [88-11]
+      ))
+    (<-simplified@JP/Jouyou
+     ((=ucs		  . #x7576)	; 當
+      (=jis-x0208	  . #x6144)	; &I-J90-6144; [65-36]
+      (=daikanwa	  . 21890)	; &I-M-21890;
+      ))
+    (<-simplified@JP/Jouyou*sources
+     daikanwa JP/Jouyou)
+    (<-simplified@ucs
+     ((=ucs		  . #x7576)	; 當
+      ))
     ))
 (define-char
-  '((=>ucs		. #x22453)	; 𢑓
-    (ideographic-radical . 58)	; â¼¹
-    (ideographic-strokes . 4)
-    (total-strokes	 . 7)
-    (=daikanwa		. 09914)	; &M-09914;
-    ))
-(define-char
-  '((morohashi-daikanwa	9914 0 0)
-    (ideographic-radical . 58)	; â¼¹
+  '((ideographic-radical . 58)	; â¼¹
     (ideographic-strokes . 4)
     (total-strokes	 . 7)
     (=ucs		. #x22453)	; 𢑓
-    (=cns11643-5	. #x2433)	; &I-C5-2433; [04-19]
+    (->subsumptive
+     ((=daikanwa	  . 09914)	; &M-09914;
+      )
+     ((=cns11643-5	  . #x2433)	; &C5-2433; [04-19]
+      (=ucs@iso		  . #x22453)	; &C5-2433;
+      ))
     ))
 (define-char
   '((ideographic-radical . 58)	; â¼¹
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
     (=ucs		. #x38C7)	; 㣇
-    (=cns11643-4	. #x2642)	; &I-C4-2642; [06-34]
-    (=daikanwa		. 09915)	; &I-M-09915;
+    (->subsumptive
+     ((=big5-cdp	  . #x8950)	; &CDP-8950;
+      (=daikanwa	  . 09915)	; &I-M-09915;
+      )
+     ((=ucs@unicode	  . #x38C7)	; &UU+38C7;
+      )
+     ((=cns11643-4	  . #x2642)	; &C4-2642; [06-34]
+      )
+     ((=gt		  . 12511)	; &GT-12511;
+      (=gt-k		  . 04509)	; &I-GT-K04509;
+      (=gt-pj-3		  . #x4A22)	; &GT-12511; [42-02]
+      ))
     ))
 (define-char
   '((ideographic-radical . 58)	; â¼¹
-    (ideographic-strokes . 5)
-    (total-strokes	 . 8)
     (=ucs		. #x22454)	; 𢑔
-    (=daikanwa		. 09916)	; &I-M-09916;
-    ))
-(define-char
-  '((=>ucs		. #x22454)	; 𢑔
-    (morohashi-daikanwa	9916 0 2)
-    (ideographic-radical . 58)	; â¼¹
-    (ideographic-strokes . 6)
-    (total-strokes	 . 9)
-    (=cns11643-6	. #x3121)	; &C6-3121; [17-01]
+    (->subsumptive
+     ((ideographic-strokes . 5)
+      (total-strokes	   . 8)
+      (=daikanwa	  . 09916)	; &M-09916;
+      (=ucs@iso		  . #x22454)	; &M-09916;
+      )
+     ((ideographic-strokes . 6)
+      (total-strokes	   . 9)
+      (=cns11643-6	  . #x3121)	; &C6-3121; [17-01]
+      ))
     ))
 (define-char
   '((ideographic-radical . 58)	; â¼¹
@@ -233,8 +293,14 @@
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
     (=ucs		. #x2F896)	; 㣇
-    (=cns11643-6	. #x2B39)	; &I-C6-2B39; [11-25]
-    (=daikanwa		. 49088)	; &I-M-49088;
+    (->subsumptive
+     ((=gt		  . 12512)	; &GT-12512;
+      (=gt-pj-3		  . #x4A26)	; &GT-12512; [42-06]
+      (=daikanwa	  . 49088)	; &I-M-49088;
+      )
+     ((=cns11643-6	  . #x2B39)	; &C6-2B39; [11-25]
+      (=ucs@iso		  . #x2F896)	; &C6-2B39;
+      ))
     ))
 (define-char
   '((ideographic-radical@ucs . 58)	; â¼¹
@@ -755,12 +821,19 @@
     (=daikanwa		. 09957)	; &I-M-09957;
     ))
 (define-char
-  '((ideographic-radical . 58)	; â¼¹
+  '((=>ucs*		. #x261DA)	; 𦇚
+    (ideographic-radical . 58)	; â¼¹
     (ideographic-strokes . 19)
     (total-strokes	 . 22)
     (=ucs		. #x2F898)	; 𦇚
     (->subsumptive
      ((=daikanwa	  . 09958)	; &M-09958;
+      (<-ancient
+       ((=ucs		    . #x5F5D)	; 彝
+	(=daikanwa	    . 09950)	; &I-M-09950;
+	))
+      (<-ancient*sources
+       shuowen daikanwa)
       )
      ((=cns11643-5	  . #x7340)	; &C5-7340; [83-32]
       (=ucs@iso		  . #x2F898)	; &C5-7340;