(U+508D): Unify MJ006979, HD-JT-AD8A and KOSEKI-011080.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R058-Snout.el

diff --git a/lisp/utf-2000/Ideograph-R058-Snout.el b/lisp/utf-2000/Ideograph-R058-Snout.el
index a7af358..8c6d62c 100644 (file)
--- a/lisp/utf-2000/Ideograph-R058-Snout.el
+++ b/lisp/utf-2000/Ideograph-R058-Snout.el
@@ -2,13 +2,24 @@
 (define-char
   '((ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 0)
-    (total-strokes      . 3)
-    (=ucs              . #x5F50)       ; 彐
+    (=>ucs@component   . #x5F51)       ; &A-compU+5F51;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@component   . #x5F51)     ; &A-compU+5F51;
+      ))
+    (ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 0)
+    (=>big5-cdp                . #x8A6E)       ; &IWDS1-372;
+    (=>iwds-1          .  0372)        ; &IWDS1-372;
     ))
 (define-char
   '((<-denotational
      ((=ucs              . #x5F50)     ; 彐
       ))
+    (<-denotational@component
+     ((=>iwds-1                  .  0372)      ; &IWDS1-372;
+      ))
     (ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 0)
     (total-strokes      . 3)
@@ -59,6 +70,10 @@
   '((<-denotational
      ((=ucs              . #x5F50)     ; 彐
       ))
+    (<-denotational@component
+     ((=>ucs@component   . #x2E95)     ; &A-compU+2E95;
+      (=>iwds-1                  .  0373)      ; &A-compU+2E95;
+      ))
     (name              . "CJK RADICAL SNOUT TWO")
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
@@ -116,19 +131,39 @@
     (=ucs@JP/hanazono  . nil)
     (=gb2312           . #x6566)       ; &G0-6566; [69-70]
     (=big5-cdp         . #x897C)       ; &I-CDP-897C;
+    (=gt-k             . 00266)        ; &GT-K00266;
+    (=gt-pj-k1         . #x3663)       ; &G0-6566; [22-67]
     (->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]
+     ((==gt-k            . 00266)      ; &g2-GT-K00266;
+      (==gt-pj-k1        . #x3663)     ; &g2-GT-K00266; [22-67]
       )
      ((==big5-cdp        . #x897C)     ; &g2-CDP-897C;
       ))
     ))
 (define-char
-  '((ideographic-radical . 58) ; ⼹
+  '((<-denotational
+     ((=>ucs@component   . #x5F51)     ; &A-compU+5F51;
+      ))
+    (ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 0)
+    (=>ucs@component   . #x2E95)       ; &A-compU+2E95;
+    (=>iwds-1          .  0373)        ; &A-compU+2E95;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@component   . #x5F51)     ; &A-compU+5F51;
+      ))
+    (<-denotational@component
+     ((=>iwds-1                  .  0372)      ; &IWDS1-372;
+      )
+     ((=>ucs@component   . #x2E95)     ; &A-compU+2E95;
+      (=>iwds-1                  .  0373)      ; &A-compU+2E95;
+      ))
+    (ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 0)
     (=ucs              . #x5F51)       ; 彑
     ))
@@ -192,6 +227,16 @@
     (=ucs-itaiji-001   . #x5F51)       ; &U-i001+5F51;
     ))
 (define-char
+  '((<-denotational
+     ((=>ucs@component   . #x5F51)     ; &A-compU+5F51;
+      ))
+    (ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 0)
+    (total-strokes      . 3)
+    (=ucs              . #x5F50)       ; 彐
+    (=>iwds-1          .  0080)        ; 彐
+    ))
+(define-char
   '((ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 2)
     (total-strokes      . 5)
@@ -405,6 +450,16 @@
   '((ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 5)
     (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (=ucs              . #x2FF3)     ; ⿳
+      )
+     ((=>ucs@component   . #x5F51)     ; &A-compU+5F51;
+      )
+     ((=big5-cdp         . #x89A6)     ; &CDP-89A6;
+      )
+     ((=ucs              . #x5DFE)     ; 巾
+      ))
     (=ucs              . #x38C7)       ; 㣇
     ))
 (define-char
@@ -414,21 +469,41 @@
     (ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 5)
     (total-strokes      . 8)
-    (=>>ucs@unicode    . #x38C7)       ; &G-GT-12511;
-    (=>>big5-cdp       . #x8950)       ; &G-GT-12511;
-    (=>>gt             . 12511)        ; &G-GT-12511;
-    (->subsumptive
-     ((=daikanwa         . 09915)      ; &M-09915;
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (=ucs              . #x2FF3)     ; ⿳
+      )
+     ((=ucs@unicode      . #x5F51)     ; &AJ1-04779;
+      (=adobe-japan1-0   . 04779)      ; &AJ1-04779;
+      )
+     ((=big5-cdp         . #x89A6)     ; &CDP-89A6;
       )
-     ((=cns11643-4       . #x2642)     ; &C4-2642; [06-34]
+     ((=ucs              . #x5DFE)     ; 巾
+      ))
+    (=ucs@unicode      . #x38C7)       ; &GT-12511;
+    (=cns11643-4       . #x2642)       ; &GT-12511; [06-34]
+    (=big5-cdp         . #x8950)       ; &I-CDP-8950;
+    (=gt               . 12511)        ; &I-GT-12511;
+    (=gt-k             . 04509)        ; &I-GT-K04509;
+    (=gt-pj-3          . #x4A22)       ; &I-GT-12511; [42-02]
+    (=daikanwa         . 09915)        ; &I-M-09915;
+    (->subsumptive
+     ((==big5-cdp        . #x8950)     ; &g2-CDP-8950;
+      (==daikanwa        . 09915)      ; &g2-CDP-8950;
+      (->subsumptive
+       ((===daikanwa       . 09915)    ; &R-M-09915;
+       )
+       ((===big5-cdp       . #x8950)   ; &R-CDP-8950;
+       ))
       )
-     ((=gt               . 12511)      ; &GT-12511;
-      (=gt-k             . 04509)      ; &I-GT-K04509;
-      (=gt-pj-3                  . #x4A22)     ; &GT-12511; [42-02]
+     ((==ucs@cns         . #x38C7)     ; &g2-CU+38C7;
+      (==cns11643-4      . #x2642)     ; &g2-CU+38C7; [06-34]
       )
-     ((=big5-cdp         . #x8950)     ; &CDP-8950;
+     ((==gt              . 12511)      ; &g2-GT-12511;
+      (==gt-k            . 04509)      ; &g2-GT-12511;
       )
-     ((=ucs@unicode      . #x38C7)     ; &UU+38C7;
+     ((==ucs@unicode     . #x38C7)     ; &g2-UU+38C7;
+      (==ucs@JP/hanazono  . nil)
       ))
     ))
 (define-char
@@ -457,15 +532,25 @@
   '((ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 5)
     (total-strokes      . 8)
-    (=>daikanwa                . 09918)        ; &A-M-09918;
+    (=>ucs@iwds-1      . #x5F54)       ; &A-IWDSU+5F54;
+    (=>daikanwa                . 09918)        ; &A-IWDSU+5F54;
     ))
 (define-char
   '((<-denotational
-     ((=>daikanwa        . 09918)      ; &A-M-09918;
+     ((=>ucs@iwds-1      . #x5F54)     ; &A-IWDSU+5F54;
+      (=>daikanwa        . 09918)      ; &A-IWDSU+5F54;
       ))
     (ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 5)
     (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x5F51)     ; 彑
+      )
+     ((=ucs              . #x6C3A)     ; 氺
+      ))
     (=ucs              . #x5F54)       ; 彔
     (=adobe-japan1-5   . 16858)        ; &I-AJ1-16858;
     (=jis-x0212                . #x3C78)       ; &I-JSP-3C78; [28-88]
@@ -505,13 +590,40 @@
     ))
 (define-char
   '((<-denotational
-     ((=>daikanwa        . 09918)      ; &A-M-09918;
+     ((=>ucs@iwds-1      . #x5F54)     ; &A-IWDSU+5F54;
+      (=>daikanwa        . 09918)      ; &A-IWDSU+5F54;
       ))
     (ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 5)
     (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x5F50)     ; 彐
+      )
+     ((=ucs              . #x6C3A)     ; 氺
+      ))
     (=ucs              . #x5F55)       ; 录
-    (=gb2312           . #x423C)       ; &I-G0-423C; [34-28]
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x5F55)     ; 录
+      ))
+    (ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 5)
+    (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs@jis                  . #x5F50)     ; &AJ1-14521;
+      (=adobe-japan1-4   . 14521)      ; &AJ1-14521;
+      )
+     ((=ucs              . #x6C3A)     ; 氺
+      ))
+    (=ucs@unicode      . #x5F55)       ; &C3-2871;
+    (=gb2312           . #x423C)       ; &C3-2871; [34-28]
     (=cns11643-3       . #x2871)       ; &I-C3-2871; [08-81]
     (=jef-china3       . #x82B3)       ; &I-JC3-82B3;
     (->subsumptive
@@ -566,16 +678,85 @@
     ))
 (define-char
   '((ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 5)
+    (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x5F50)     ; 彐
+      )
+     ((=ucs              . #x72AE)     ; 犮
+      ))
+    (=>gt-k            . 04940)        ; &A-GT-K04940;
+    ))
+(define-char
+  '((<-denotational
+     ((=>gt-k            . 04940)      ; &A-GT-K04940;
+      ))
+    (ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 5)
+    (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=adobe-japan1-4   . 15391)      ; &AJ1-15391;
+      )
+     ((=ucs@cns                  . #x72AE)     ; &AJ1-18056;
+      (=ucs@jis                  . #x72AE)     ; &AJ1-18056;
+      (=adobe-japan1-5   . 18056)      ; &AJ1-18056;
+      ))
+    (=gt-k             . 04940)        ; &GT-K04940;
+    (=gt-pj-k1         . #x626D)       ; &GT-K04940; [66-77]
+    (->subsumptive
+     ((==gt-k            . 04940)      ; &g2-GT-K04940;
+      (==gt-pj-k1        . #x626D)     ; &g2-GT-K04940; [66-77]
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 6)
     (total-strokes      . 9)
+    (sound@ja/on       "siN")
     (=ucs              . #x2245A)      ; 𢑚
     (=cns11643-6       . #x3123)       ; &I-C6-3123; [17-03]
+    (=big5-cdp         . #x88B0)       ; &I-CDP-88B0;
     (=daikanwa         . 09919)        ; &I-M-09919;
+    (<-ancient
+     ((=ucs              . #x7533)     ; 申
+      (=daikanwa         . 21726)      ; &I-M-21726;
+      ))
+    (<-ancient*sources
+     jiyun daikanwa)
+    (->subsumptive
+     ((==ucs@iso         . #x2245A)    ; &g2-CDP-88B0;
+      (==cns11643-6      . #x3123)     ; &g2-CDP-88B0; [17-03]
+      (==big5-cdp        . #x88B0)     ; &g2-CDP-88B0;
+      (==daikanwa        . 09919)      ; &g2-CDP-88B0;
+      (->subsumptive
+       ((===daikanwa       . 09919)    ; &R-M-09919;
+       )
+       ((===cns11643-6     . #x3123)   ; &R-C6-3123; [17-03]
+       )
+       ((===ucs@iso        . #x2245A)  ; &R-U-0002245A;
+       )
+       ((===big5-cdp       . #x88B0)   ; &R-CDP-88B0;
+       ))
+      ))
     ))
 (define-char
   '((ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 6)
     (total-strokes      . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=>ucs@component   . #x5F51)     ; &A-compU+5F51;
+      )
+     ((=ucs              . #x27C28)    ; 𧰨
+      ))
     (=ucs              . #x5F56)       ; 彖
     ))
 (define-char
@@ -981,6 +1162,14 @@
   '((ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 9)
     (total-strokes      . 12)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x5F51)     ; 彑
+      )
+     ((=gt-k             . 05697)      ; &U-i003+20917;
+      ))
     (=ucs              . #x5F58)       ; 彘
     (=adobe-japan1-4   . 14522)        ; &I-AJ1-14522;
     (=gb2312           . #x6569)       ; &I-G0-6569; [69-73]