X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R058-Snout.el;h=be53384a4e50657ccc98378e36784dad282503ff;hb=62a0db7cf4dbe06a69f1590aa83b1da154a1d7fe;hp=39ac080ef161ac7e71d3626e7610ed1a7eb786cd;hpb=0bb73ef4a7debbf3c52fa03137e717a32092392c;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/Ideograph-R058-Snout.el b/lisp/utf-2000/Ideograph-R058-Snout.el
index 39ac080..be53384 100644
--- a/lisp/utf-2000/Ideograph-R058-Snout.el
+++ b/lisp/utf-2000/Ideograph-R058-Snout.el
@@ -59,57 +59,73 @@
   '((<-denotational
      ((=ucs		  . #x5F50)	; 彐
       ))
+    (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)
-    (=decomposition@cid
-     ((=ucs		  . #x5F50)	; 彐
-      )
-     ((=ucs		  . #xE0101)	; 󠄁
+    (=ucs		. #x2E95)	; ⺕
+    (=>ucs@unicode	. #x5F50)	; ⺕
+    (=>big5-cdp		. #x8BAB)	; ⺕
+    (=>gt		. 67403)	; ⺕
+    ))
+(define-char
+  '((<-denotational
+     ((name		  . "CJK RADICAL SNOUT TWO")
+      (=ucs		  . #x2E95)	; ⺕
       ))
+    (ideographic-radical . 58)	; â¼¹
+    (ideographic-strokes . 0)
+    (total-strokes	 . 3)
     (=adobe-japan1-4	. 15391)	; &AJ1-15391;
     (=big5-cdp		. #x8BAB)	; &I-CDP-8BAB;
     (=gt		. 67403)	; &I-GT-67403;
     (=gt-pj-11		. #x5A40)	; &I-GT-67403; [58-32]
     (->subsumptive
+     ((=decomposition@cid
+       ((=ucs		    . #x5F50)	; 彐
+	)
+       ((=ucs		    . #xE0101)	; 󠄁
+	))
+      (==adobe-japan1-4	  . 15391)	; &g2-AJ1-15391;
+      (==big5-cdp	  . #x8BAB)	; &g2-AJ1-15391;
+      (==gt		  . 67403)	; &g2-AJ1-15391;
+      (->subsumptive
+       ((===adobe-japan1-4  . 15391)	; &R-AJ1-15391;
+	)
+       ((===big5-cdp	    . #x8BAB)	; &R-CDP-8BAB;
+	)
+       ((===gt		    . 67403)	; &R-GT-67403;
+	))
+      )
      ((=gt-k		  . 00267)	; &GT-K00267;
       (=gt-pj-k1	  . #x3974)	; &GT-K00267; [25-84]
       ))
     ))
 (define-char
   '((<-denotational
-     ((=ucs		  . #x5F50)	; 彐
-      ))
-    (=>ucs		. #x2E95)	; ⺕
-    (ideographic-radical . 58)	; â¼¹
-    (ideographic-strokes . 0)
-    (total-strokes	 . 3)
-    (=gt-k		. 00266)	; &GT-K00266;
-    (=gt-pj-k1		. #x3663)	; &GT-K00266; [22-67]
-    ))
-(define-char
-  '((<-denotational
-     ((=gt-k		  . 00266)	; &GT-K00266;
+     ((name		  . "CJK RADICAL SNOUT TWO")
+      (=ucs		  . #x2E95)	; ⺕
       ))
-    (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)	; ⺕
-    (=ucs@unicode	. #x5F50)	; ⺕
-    (=gb2312		. #x6566)	; &I-G0-6566; [69-70]
-    ))
-(define-char
-  '((<-denotational
+    (=ucs@unicode	. #x5F50)	; &G0-6566;
+    (=ucs@JP/hanazono	. nil)
+    (=gb2312		. #x6566)	; &G0-6566; [69-70]
+    (=big5-cdp		. #x897C)	; &I-CDP-897C;
+    (->subsumptive
+     ((==ucs@unicode	  . #x5F50)	; &g2-UU+5F50;
+      (==ucs@JP/hanazono  . nil)
+      (==gb2312		  . #x6566)	; &g2-UU+5F50; [69-70]
+      )
      ((=gt-k		  . 00266)	; &GT-K00266;
+      (=gt-pj-k1	  . #x3663)	; &GT-K00266; [22-67]
+      )
+     ((==big5-cdp	  . #x897C)	; &g2-CDP-897C;
       ))
-    (ideographic-radical . 58)	; â¼¹
-    (ideographic-strokes . 0)
-    (total-strokes	 . 3)
-    (=big5-cdp		. #x897C)	; &CDP-897C;
     ))
 (define-char
   '((ideographic-radical . 58)	; â¼¹
@@ -192,7 +208,9 @@
     (=gt-pj-3		. #x497B)	; &GT-12505; [41-91]
     (=daikanwa/+p	. 09909)	; &GT-12505;
     (<-vulgar
-     ((=ucs@jis		  . #x6B78)	; &MJ014849;
+     ((=ucs@cns		  . #x6B78)	; &MJ014849;
+      (=ucs@jis		  . #x6B78)	; &MJ014849;
+      (=ucs@ks		  . #x6B78)	; &MJ014849;
       (=mj		  . 014849)	; &MJ014849;
       (=daikanwa	  . 16349)	; &I-M-16349;
       ))
@@ -247,15 +265,66 @@
   '((ideographic-radical . 58)	; â¼¹
     (ideographic-strokes . 3)
     (total-strokes	 . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x5F50)	; 彐
+      )
+     ((=ucs		  . #x5F50)	; 彐
+      ))
     (=ucs		. #x22451)	; 𢑑
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x22451)	; 𢑑
+      ))
+    (ideographic-radical . 58)	; â¼¹
+    (ideographic-strokes . 3)
+    (total-strokes	 . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs@unicode	  . #x5F50)	; &G0-6566;
+      (=gb2312		  . #x6566)	; &G0-6566; [69-70]
+      )
+     ((=ucs@unicode	  . #x5F50)	; &G0-6566;
+      (=gb2312		  . #x6566)	; &G0-6566; [69-70]
+      ))
+    (=ucs@iso		. #x22451)	; &C6-246C;
+    (=cns11643-6	. #x246C)	; &C6-246C; [04-76]
+    (=daikanwa		. 09911)	; &I-M-09911;
     (->subsumptive
-     ((=daikanwa	  . 09911)	; &M-09911;
+     ((==daikanwa	  . 09911)	; &g2-M-09911;
       )
-     ((=ucs@iso		  . #x22451)	; &C6-246C;
-      (=cns11643-6	  . #x246C)	; &C6-246C; [04-76]
+     ((==ucs@iso	  . #x22451)	; &g2-IU-00022451;
+      (==cns11643-6	  . #x246C)	; &g2-IU-00022451; [04-76]
+      (->subsumptive
+       ((===cns11643-6	    . #x246C)	; &R-C6-246C; [04-76]
+	)
+       ((===ucs@iso	    . #x22451)	; &R-U-00022451;
+	))
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=ucs		  . #x22451)	; 𢑑
+      ))
+    (ideographic-radical . 58)	; â¼¹
+    (ideographic-strokes . 3)
+    (total-strokes	 . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=adobe-japan1-4	  . 15391)	; &AJ1-15391;
+      )
+     ((=adobe-japan1-4	  . 15391)	; &AJ1-15391;
+      ))
+    (=ucs-itaiji-001	. #x22451)	; &U-i001+22451;
+    ))
+(define-char
   '((ideographic-radical . 58)	; â¼¹
     (ideographic-strokes . 3)
     (total-strokes	 . 6)
@@ -398,21 +467,40 @@
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
     (=ucs		. #x5F54)	; 彔
+    (=adobe-japan1-5	. 16858)	; &I-AJ1-16858;
+    (=jis-x0212		. #x3C78)	; &I-JSP-3C78; [28-88]
+    (=cns11643-2	. #x2655)	; &I-C2-2655; [06-53]
+    (=jis-x0213-1	. #x743B)	; &I-JX1-743B; [84-27]
     (=big5		. #xCC74)	; &I-B-CC74;
+    (=daikanwa		. 09918)	; &I-M-09918;
+    (=jef-china3	. #x4CFA)	; &I-JC3-4CFA;
     (->subsumptive
      ((=decomposition@cid
        ((=ucs		    . #x5F54)	; 彔
 	)
        ((=ucs		    . #xE0100)	; 󠄀
 	))
-      (=ucs@unicode	  . #x5F54)	; &AJ1-16858;
-      (=adobe-japan1-5	  . 16858)	; &AJ1-16858;
-      (=jis-x0212	  . #x3C78)	; &I-JSP-3C78; [28-88]
-      (=jis-x0213-1	  . #x743B)	; &I-JX1-743B; [84-27]
-      (=daikanwa	  . 09918)	; &I-M-09918;
-      (=jef-china3	  . #x4CFA)	; &I-JC3-4CFA;
+      (==ucs@unicode	  . #x5F54)	; &g2-AJ1-16858;
+      (==adobe-japan1-5	  . 16858)	; &g2-AJ1-16858;
+      (==jis-x0212	  . #x3C78)	; &g2-AJ1-16858; [28-88]
+      (==jis-x0213-1	  . #x743B)	; &g2-AJ1-16858; [84-27]
+      (==daikanwa	  . 09918)	; &g2-AJ1-16858;
+      (==jef-china3	  . #x4CFA)	; &g2-AJ1-16858;
+      (->subsumptive
+       ((===daikanwa	    . 09918)	; &R-M-09918;
+	)
+       ((===jis-x0212	    . #x3C78)	; &R-JX1-743B; [28-88]
+	(===jis-x0213-1	    . #x743B)	; &R-JX1-743B; [84-27]
+	)
+       ((===adobe-japan1-5  . 16858)	; &R-AJ1-16858;
+	)
+       ((===ucs@unicode	    . #x5F54)	; &R-UU+5F54;
+	)
+       ((===jef-china3	    . #x4CFA)	; &R-JC3-4CFA;
+	))
       )
-     ((=cns11643-2	  . #x2655)	; &C2-2655; [06-53]
+     ((==ucs@cns	  . #x5F54)	; &g2-CU+5F54;
+      (==cns11643-2	  . #x2655)	; &g2-CU+5F54; [06-53]
       ))
     ))
 (define-char
@@ -423,12 +511,21 @@
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
     (=ucs		. #x5F55)	; 录
+    (=gb2312		. #x423C)	; &I-G0-423C; [34-28]
+    (=cns11643-3	. #x2871)	; &I-C3-2871; [08-81]
+    (=jef-china3	. #x82B3)	; &I-JC3-82B3;
     (->subsumptive
-     ((=ucs@unicode	  . #x5F55)	; &G0-423C;
-      (=gb2312		  . #x423C)	; &G0-423C; [34-28]
-      (=jef-china3	  . #x82B3)	; &I-JC3-82B3;
+     ((==ucs@unicode	  . #x5F55)	; &g2-UU+5F55;
+      (==gb2312		  . #x423C)	; &g2-UU+5F55; [34-28]
+      (==jef-china3	  . #x82B3)	; &g2-UU+5F55;
+      (->subsumptive
+       ((===ucs@unicode	    . #x5F55)	; &R-UU+5F55;
+	)
+       ((===jef-china3	    . #x82B3)	; &R-JC3-82B3;
+	))
       )
-     ((=cns11643-3	  . #x2871)	; &C3-2871; [08-81]
+     ((==ucs@cns	  . #x5F55)	; &g2-CU+5F55;
+      (==cns11643-3	  . #x2871)	; &g2-CU+5F55; [08-81]
       ))
     ))
 (define-char
@@ -516,9 +613,10 @@
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
 	(=ucs		    . #x2FF1)	; ⿱
 	)
-       ((=ucs		    . #x5F51)	; 彑
+       ((name		    . "CJK RADICAL SNOUT ONE")
+	(=ucs		    . #x2E94)	; ⺔
 	)
-       ((=daikanwa	    . 36336)	; &M-36336;
+       ((==daikanwa	    . 36336)	; &g2-M-36336;
 	))
       (==daikanwa	  . 09920)	; &g2-M-09920;
       )
@@ -562,9 +660,10 @@
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
 	(=ucs		    . #x2FF1)	; ⿱
 	)
-       ((=ucs		    . #x5F51)	; 彑
+       ((name		    . "CJK RADICAL SNOUT ONE")
+	(=ucs		    . #x2E94)	; ⺔
 	)
-       ((=ucs		    . #x27C28)	; 𧰨
+       ((==ucs@iso	    . #x27C28)	; &g2-IU-00027C28;
 	))
       (==ucs@unicode	  . #x5F56)	; &g2-UU+5F56;
       (==ucs@JP/hanazono  . nil)
@@ -576,10 +675,33 @@
 	)
        ((=ucs		    . #x5F51)	; 彑
 	)
-       ((=cns11643-5	    . #x2329)	; &C5-2329; [03-09]
+       ((=>>ucs@cns	    . #x27C28)	; &G-CDP-8BC9;
+	))
+      (=mj		  . 011235)	; &MJ011235;
+      (=hanyo-denshi/ft	  . #x356D)	; &I-HD-FT-356D; [21-77]
+      (->subsumptive
+       ((ideographic-structure
+	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	  (=ucs		      . #x2FF1)	; ⿱
+	  )
+	 ((name		      . "CJK RADICAL SNOUT ONE")
+	  (=ucs		      . #x2E94)	; ⺔
+	  )
+	 ((==ucs@cns	      . #x27C28)	; &g2-CDP-8BC9;
+	  (==cns11643-5	      . #x2329)	; &g2-CDP-8BC9; [03-09]
+	  ))
+	(==ucs@cns	    . #x5F56)	; &g2-MJ011235;
+	(==mj		    . 011235)	; &g2-MJ011235;
+	(==cns11643-2	    . #x2A3E)	; &g2-MJ011235; [10-30]
+	(==hanyo-denshi/ft  . #x356D)	; &g2-MJ011235; [21-77]
+	(->subsumptive
+	 ((===hanyo-denshi/ft . #x356D)	; &R-HD-FT-356D; [21-77]
+	  )
+	 ((===mj	      . 011235)	; &R-MJ011235;
+	  )
+	 ((===cns11643-2      . #x2A3E)	; &R-C2-2A3E; [10-30]
+	  ))
 	))
-      (==ucs@cns	  . #x5F56)	; &g2-CU+5F56;
-      (==cns11643-2	  . #x2A3E)	; &g2-CU+5F56; [10-30]
       ))
     ))
 (define-char
@@ -598,9 +720,14 @@
       )
      ((=ucs		  . #x27C28)	; 𧰨
       ))
-    (=hanyo-denshi/ks	. 112230)	; &HD-KS-112230;
-    (=gt-k		. 06232)	; &HD-KS-112230;
-    (=gt-pj-k1		. #x4C29)	; &HD-KS-112230; [44-09]
+    (=mj		. 011234)	; &MJ011234;
+    (=hanyo-denshi/ks	. 112230)	; &MJ011234;
+    (<-formed
+     ((=ucs@unicode	  . #x5F56)	; &MJ011233;
+      (=mj		  . 011233)	; &MJ011233;
+      ))
+    (<-formed*sources
+     koseki)
     (->subsumptive
      ((=decomposition@hanyo-denshi
        ((=ucs		    . #x5F56)	; 彖
@@ -613,12 +740,19 @@
 	)
        ((==ucs@cns	    . #x5F50)	; &g2-GT-12503;
 	(==ucs@jis	    . #x5F50)	; &g2-GT-12503;
-	(==daikanwa	    . 09908)	; &g2-GT-12503;
+	(==jis-x0212	    . #x3C77)	; &g2-GT-12503; [28-87]
 	)
-       ((=cns11643-5	    . #x2329)	; &C5-2329; [03-09]
+       ((==ucs@cns	    . #x27C28)	; &g2-CDP-8BC9;
+	(==cns11643-5	    . #x2329)	; &g2-CDP-8BC9; [03-09]
+	))
+      (==mj		  . 011234)	; &g2-MJ011234;
+      (==hanyo-denshi/ks  . 112230)	; &g2-MJ011234;
+      (->subsumptive
+       ((===hanyo-denshi/ks . 112230)	; &R-HD-KS-112230;
+	(=hanyo-denshi/ks/mf . #x2BD7)	; &R-HD-KS-112230;
+	)
+       ((===mj		    . 011234)	; &R-MJ011234;
 	))
-      (==hanyo-denshi/ks  . 112230)	; &g2-HD-KS-112230;
-      (=hanyo-denshi/ks/mf . #x2BD7)	; &g2-HD-KS-112230;
       )
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
@@ -626,11 +760,12 @@
 	)
        ((==ucs@cns	    . #x5F50)	; &g2-GT-12503;
 	(==ucs@jis	    . #x5F50)	; &g2-GT-12503;
-	(==daikanwa	    . 09908)	; &g2-GT-12503;
+	(==jis-x0212	    . #x3C77)	; &g2-GT-12503; [28-87]
 	)
        ((=gt-k		    . 02141)	; &GT-K02141;
 	))
-      (==gt-k		  . 06232)	; &g2-GT-K06232;
+      (=gt-k		  . 06232)	; &GT-K06232;
+      (=gt-pj-k1	  . #x4C29)	; &GT-K06232; [44-09]
       ))
     ))
 (define-char
@@ -988,12 +1123,23 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°
       )
-     ((=daikanwa	  . 09911)	; &M-09911;
+     ((=ucs@iso		  . #x22451)	; &C6-246C;
+      (=cns11643-6	  . #x246C)	; &C6-246C; [04-76]
+      (=daikanwa	  . 09911)	; &I-M-09911;
       )
      ((=ucs		  . #x675F)	; 束
       ))
     (=ucs@iso		. #x22467)	; &M-09938;
     (=daikanwa		. 09938)	; &M-09938;
+    (->subsumptive
+     ((==ucs@iso	  . #x22467)	; &g2-M-09938;
+      (==daikanwa	  . 09938)	; &g2-M-09938;
+      (->subsumptive
+       ((===daikanwa	    . 09938)	; &R-M-09938;
+	)
+       ((===ucs@iso	    . #x22467)	; &R-U-00022467;
+	))
+      ))
     ))
 (define-char
   '((<-denotational
@@ -1052,7 +1198,9 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°
       )
-     ((=daikanwa	  . 09911)	; &M-09911;
+     ((=ucs@iso		  . #x22451)	; &C6-246C;
+      (=cns11643-6	  . #x246C)	; &C6-246C; [04-76]
+      (=daikanwa	  . 09911)	; &I-M-09911;
       )
      ((=ucs		  . #x4F86)	; 來
       ))
@@ -1063,7 +1211,7 @@
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
 	(=ucs		    . #x2FF0)	; â¿°
 	)
-       ((=daikanwa	    . 09911)	; &M-09911;
+       ((==daikanwa	    . 09911)	; &g2-M-09911;
 	)
        ((==ucs@unicode	    . #x4F86)	; &g2-AJ1-04141;
 	(==adobe-japan1-0   . 04141)	; &g2-AJ1-04141;