(U-0002232C): Apply new conventions for glyph granularity; unify

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R004-Slash.el

diff --git a/lisp/utf-2000/Ideograph-R004-Slash.el b/lisp/utf-2000/Ideograph-R004-Slash.el
index 53dd7b8..7f8fd9d 100644 (file)
--- a/lisp/utf-2000/Ideograph-R004-Slash.el
+++ b/lisp/utf-2000/Ideograph-R004-Slash.el
@@ -34,7 +34,10 @@
     (=daikanwa         . 00107)        ; &I-M-00107;
     ))
 (define-char
-  '((ideographic-radical . 4)  ; ⼃
+  '((<-denotational@component
+     ((=>ucs@component   . #x5382)     ; &A-compU+5382;
+      ))
+    (ideographic-radical . 4)  ; ⼃
     (ideographic-strokes@ucs . 0)
     (total-strokes@ucs      . 1)
     (ideographic-strokes@ucs*sources
@@ -181,20 +184,68 @@
       ))
     ))
 (define-char
+  '((ideographic-radical . 4)  ; ⼃
+    (ideographic-strokes . 1)
+    (total-strokes      . 2)
+    (=>ucs@component   . #x20087)      ; &A-compU+20087;
+    ))
+(define-char
   '((<-denotational@component
-     ((=>ucs@component   . #x5341)     ; &A-compU+5341;
-      (=>iwds-1                  .  0037)      ; &A-compU+5341;
+     ((=>ucs@iwds-1      . #x5341)     ; &A-IWDSU+5341;
+      (=>iwds-1                  .  0037)      ; &A-IWDSU+5341;
+      )
+     ((=>ucs@component   . #x20087)    ; &A-compU+20087;
       ))
     (ideographic-radical . 4)  ; ⼃
     (ideographic-strokes . 1)
     (total-strokes      . 2)
     (hanyu-dazidian    1 3 2)
+    (sound@ja/on       "sa")
     (=ucs              . #x20087)      ; 𠂇
     (=cns11643-5       . #x2126)       ; &I-C5-2126; [01-06]
     (=gt               . 00156)        ; &I-GT-00156;
     (=gt-k             . 00104)        ; &I-GT-K00104;
     (=gt-pj-2          . #x3077)       ; &I-GT-00156; [16-87]
     (=daikanwa         . 00112)        ; &I-M-00112;
+    (<-ancient
+     ((=ucs@unicode      . #x5DE6)     ; &AJ1-02088;
+      (=adobe-japan1-0   . 02088)      ; &AJ1-02088;
+      ))
+    (<-ancient*sources
+     zhengzitong)
+    (<-formed@flipped-horizontally
+     ((=ucs              . #x53C8)     ; 又
+      ))
+    (<-original
+     ((=ucs@unicode      . #x5DE6)     ; &AJ1-02088;
+      (=adobe-japan1-0   . 02088)      ; &AJ1-02088;
+      (=daikanwa         . 08720)      ; &I-M-08720;
+      ))
+    (<-original*sources
+     jiyun zhengzitong daikanwa)
+    (->formed
+     ((=ucs@unicode      . #x5DE6)     ; &AJ1-02088;
+      (=adobe-japan1-0   . 02088)      ; &AJ1-02088;
+      ))
+    (->formed*sources
+     jiyun)
+    (->subsumptive
+     ((==ucs@iso         . #x20087)    ; &g2-GT-00156;
+      (==cns11643-5      . #x2126)     ; &g2-GT-00156; [01-06]
+      (==gt              . 00156)      ; &g2-GT-00156;
+      (==gt-k            . 00104)      ; &g2-GT-00156;
+      (==daikanwa        . 00112)      ; &g2-GT-00156;
+      (->subsumptive
+       ((===daikanwa       . 00112)    ; &R-M-00112;
+       )
+       ((===cns11643-5     . #x2126)   ; &R-C5-2126; [01-06]
+       )
+       ((===gt             . 00156)    ; &R-GT-00156;
+       (===gt-k            . 00104)    ; &R-GT-00156;
+       )
+       ((===ucs@iso        . #x20087)  ; &R-U-00020087;
+       ))
+      ))
     ))
 (define-char
   '((<-denotational
@@ -364,7 +415,10 @@
     (=daikanwa         . 00117)        ; &I-M-00117;
     ))
 (define-char
-  '((name*             . "ideographic component person for top")
+  '((<-denotational@component
+     ((=>ucs@component   . #x20089)    ; &A-compU+20089;
+      ))
+    (name*             . "ideographic component person for top")
     (ideographic-radical@ucs . 4)      ; ⼃
     (ideographic-strokes@ucs . 1)
     (ideographic-radical@ucs*sources
@@ -1173,7 +1227,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical@ucs . 20)     ; ⼓
+  '((<-denotational@component
+     ((=>ucs@component   . #x5301)     ; &A-compU+5301;
+      ))
+    (ideographic-radical@ucs . 20)     ; ⼓
     (ideographic-strokes@ucs . 2)
     (ideographic-radical@ucs*sources
      daikanwa=02502)
@@ -1951,13 +2008,13 @@
   '((ideographic-radical . 4)  ; ⼃
     (ideographic-strokes . 5)
     (total-strokes      . 6)
-    (=>ucs@component   . #x4E51)       ; &A-compU+4E51;
-    (=>iwds-1          .  0328)        ; &A-compU+4E51;
+    (=>ucs@iwds-1      . #x4E51)       ; &A-IWDSU+4E51;
+    (=>iwds-1          .  0328)        ; &A-IWDSU+4E51;
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@component   . #x4E51)     ; &A-compU+4E51;
-      (=>iwds-1                  .  0328)      ; &A-compU+4E51;
+     ((=>ucs@iwds-1      . #x4E51)     ; &A-IWDSU+4E51;
+      (=>iwds-1                  .  0328)      ; &A-IWDSU+4E51;
       ))
     (ideographic-radical . 4)  ; ⼃
     (ideographic-strokes . 5)
@@ -2671,7 +2728,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical@ucs . 85)     ; ⽔
+  '((<-denotational
+     ((=>ucs@cognate     . #x23D92)    ; &A-cgnU+23D92;
+      ))
+    (ideographic-radical@ucs . 85)     ; ⽔
     (ideographic-strokes@ucs . 8)
     (ideographic-radical@cns . 2)      ; ⼁
     (ideographic-strokes@cns . 7)
@@ -2698,17 +2758,47 @@
      ((=ucs              . #x4E00)     ; 一
       ))
     (=ucs              . #x23D92)      ; 𣶒
+    (=cns11643-4       . #x252F)       ; &I-C4-252F; [05-15]
+    (=big5-cdp         . #x8DD9)       ; &I-CDP-8DD9;
+    (=gt               . 00119)        ; &I-GT-00119;
+    (=gt-pj-2          . #x3060)       ; &I-GT-00119; [16-64]
+    (=daikanwa         . 00084)        ; &I-M-00084;
     (->subsumptive
-     ((=ucs@iso                  . #x23D92)    ; &GT-00119;
-      (=cns11643-4       . #x252F)     ; &GT-00119; [05-15]
-      (=gt               . 00119)      ; &I-GT-00119;
-      (=gt-pj-2                  . #x3060)     ; &I-GT-00119; [16-64]
-      (=daikanwa         . 00084)      ; &I-M-00084;
-      )
-     ((=big5-cdp         . #x8DD9)     ; &GT-00120;
-      (=gt               . 00120)      ; &I-GT-00120;
+     ((=>>ucs@iso        . #x23D92)    ; &G-GT-00119;
+      (=>>cns11643-4     . #x252F)     ; &G-GT-00119; [05-15]
+      (=>>gt             . 00119)      ; &G-GT-00119;
+      (=>>daikanwa       . 00084)      ; &G-GT-00119;
+      (->subsumptive
+       ((==ucs@iso         . #x23D92)  ; &g2-GT-00119;
+       (==cns11643-4       . #x252F)   ; &g2-GT-00119; [05-15]
+       (==gt               . 00119)    ; &g2-GT-00119;
+       (==daikanwa         . 00084)    ; &g2-GT-00119;
+       (->subsumptive
+        ((===daikanwa        . 00084)  ; &R-M-00084;
+         )
+        ((===cns11643-4      . #x252F) ; &R-C4-252F; [05-15]
+         )
+        ((===gt              . 00119)  ; &R-GT-00119;
+         )
+        ((===ucs@iso         . #x23D92)        ; &R-U-00023D92;
+         ))
+       ))
+      )
+     ((=>>big5-cdp       . #x8DD9)     ; &GT-00120;
+      (=gt               . 00120)      ; &GT-00120;
       (=gt-k             . 06263)      ; &I-GT-K06263;
-      (=gt-pj-9                  . #x4B25)     ; &I-GT-00120; [43-05]
+      (=gt-pj-9                  . #x4B25)     ; &GT-00120; [43-05]
+      (->subsumptive
+       ((==big5-cdp        . #x8DD9)   ; &g2-GT-00120;
+       (==gt               . 00120)    ; &g2-GT-00120;
+       (==gt-k             . 06263)    ; &g2-GT-00120;
+       (->subsumptive
+        ((===big5-cdp        . #x8DD9) ; &R-CDP-8DD9;
+         )
+        ((===gt              . 00120)  ; &R-GT-00120;
+         (===gt-k            . 06263)  ; &R-GT-00120;
+         ))
+       ))
       ))
     ))
 (define-char