- Use A-compU+793A instead of U+793A as left components of abstract
authorMORIOKA Tomohiko <tomo.git@chise.org>
Sun, 26 Feb 2017 05:47:04 +0000 (14:47 +0900)
committerMORIOKA Tomohiko <tomo.git@chise.org>
Sun, 26 Feb 2017 05:47:04 +0000 (14:47 +0900)
  characters.
- Use U+793A/U+793B instead of <CJK RADICAL SPIRIT ONE>/<CJK RADICAL
  SPIRIT TWO> as left components of abstract glyphs.
(A-compU+793A): New abstract component.
(U+793A): Add `<-denotational' for A-compU+793A.
(U+793B): Likewise.
(JU+7994): Apply new conventions for glyph granularity.

lisp/utf-2000/Ideograph-R113-Spirit.el

index b0c71e0..22bdd35 100644 (file)
@@ -2,6 +2,14 @@
 (define-char
   '((ideographic-radical . 113)        ; ⽰
     (ideographic-strokes . 0)
+    (=>ucs@component   . #x793A)       ; &A-compU+793A;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
+      ))
+    (ideographic-radical . 113)        ; ⽰
+    (ideographic-strokes . 0)
     (total-strokes      . 5)
     (=ucs              . #x793A)       ; 示
     (=adobe-japan1-0   . 02260)        ; &I-AJ1-02260;
       ))
     ))
 (define-char
-  '((ideographic-radical . 113)        ; ⽰
+  '((<-denotational
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
+      ))
+    (ideographic-radical . 113)        ; ⽰
     (ideographic-strokes . 0)
     (total-strokes      . 5)
     (=ucs              . #x793B)       ; 礻
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x793A)     ; 示
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
       )
      ((=ucs              . #x6C0F)     ; 氏
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((name              . "CJK RADICAL SPIRIT ONE")
-      (=ucs              . #x2EAC)     ; ⺬
+     ((=ucs              . #x793A)     ; 示
       )
      ((=ucs              . #x6C0F)     ; 氏
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((name              . "CJK RADICAL SPIRIT TWO")
-      (=ucs              . #x2EAD)     ; ⺭
+     ((=ucs              . #x793B)     ; 礻
       )
      ((=ucs              . #x2B795)    ; 𫞕
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x793A)     ; 示
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
       )
      ((=ucs              . #x72AE)     ; 犮
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((name              . "CJK RADICAL SPIRIT ONE")
-      (=ucs              . #x2EAC)     ; ⺬
+     ((=ucs              . #x793A)     ; 示
       )
      ((=ucs@cns                  . #x72AE)     ; &JX2-703B;
       (=ucs@jis                  . #x72AE)     ; &JX2-703B;
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((name              . "CJK RADICAL SPIRIT TWO")
-      (=ucs              . #x2EAD)     ; ⺭
+     ((=ucs              . #x793B)     ; 礻
       )
      ((=ucs              . #x53CB)     ; 友
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((name              . "CJK RADICAL SPIRIT TWO")
-      (=ucs              . #x2EAD)     ; ⺭
+     ((=ucs              . #x793B)     ; 礻
       )
      ((=ucs@cns                  . #x72AE)     ; &JX2-703B;
       (=ucs@jis                  . #x72AE)     ; &JX2-703B;
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x793A)     ; 示
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
       )
      ((=ucs              . #x7533)     ; 申
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((name              . "CJK RADICAL SPIRIT ONE")
-      (=ucs              . #x2EAC)     ; ⺬
+     ((=ucs              . #x793A)     ; 示
       )
      ((=ucs              . #x7533)     ; 申
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x793A)     ; 示
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
       )
      ((=ucs              . #x65E6)     ; 旦
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((name              . "CJK RADICAL SPIRIT TWO")
-      (=ucs              . #x2EAD)     ; ⺭
+     ((=ucs              . #x793B)     ; 礻
       )
      ((=ucs              . #x65E6)     ; 旦
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x793A)     ; 示
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
       )
      ((=ucs              . #x7F8A)     ; 羊
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((name              . "CJK RADICAL SPIRIT ONE")
-      (=ucs              . #x2EAC)     ; ⺬
+     ((=ucs              . #x793A)     ; 示
       )
      ((=ucs              . #x7F8A)     ; 羊
       ))
     (=daikanwa/ho      .  0402)        ; &M-H0402;
     (=cbeta            . 00865)        ; &M-H0402;
     (<-vulgar
-     ((=ucs@jis                  . #x6834)     ; &AJ1-02711;
-      (=adobe-japan1-0   . 02711)      ; &AJ1-02711;
+     ((=ucs@jis                  . #x6834)     ; &MJ013869;
+      (=mj               . 013869)     ; &MJ013869;
       (=daikanwa         . 14737)      ; &I-M-14737;
       ))
     (<-vulgar*sources
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x793A)     ; 示
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
       )
      ((=ucs              . #x7550)     ; 畐
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x793A)     ; 示
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
       )
      ((=ucs@unicode      . #x7550)     ; &JX2-713B;
       (=jis-x0212        . #x4D35)     ; &JX2-713B; [45-21]
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((name              . "CJK RADICAL SPIRIT ONE")
-      (=ucs              . #x2EAC)     ; ⺬
+     ((=ucs              . #x793A)     ; 示
       )
      ((=ucs              . #x7550)     ; 畐
       ))
     (=shinjigen                .  5573)        ; 福
     (=jef-china3       . #x5CE4)       ; &I-JC3-5CE4;
     (<-formed
-     ((=ucs@jis/2004     . #x903C)     ; &AJ1-07783;
-      (=ucs@ks           . #x903C)     ; &AJ1-07783;
-      (=adobe-japan1-0   . 07783)      ; &AJ1-07783;
+     ((=ucs@jis/2004     . #x903C)     ; &MJ026003;
+      (=ucs@ks           . #x903C)     ; &MJ026003;
+      (=mj               . 026003)     ; &MJ026003;
       ))
     (->subsumptive
      ((=decomposition@cid
   '((ideographic-radical . 113)        ; ⽰
     (ideographic-strokes . 9)
     (total-strokes      . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
+      )
+     ((=ucs              . #x662F)     ; 是
+      ))
     (=ucs              . #x7994)       ; 禔
     (=big5             . #xE2FD)       ; &I-B-E2FD;
     ))
     (ideographic-radical . 113)        ; ⽰
     (ideographic-strokes . 9)
     (total-strokes      . 14)
-    (=decomposition@cid
-     ((=ucs              . #x7994)     ; 禔
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #xE0100)    ; 󠄀
-      ))
-    (=decomposition@hanyo-denshi
-     ((=ucs              . #x7994)     ; 禔
+     ((=ucs              . #x793A)     ; 示
       )
-     ((=ucs              . #xE0101)    ; 󠄁
+     ((=ucs              . #x662F)     ; 是
       ))
     (=ucs@jis          . #x7994)       ; &AJ1-08582;
     (=adobe-japan1-2   . 08582)        ; &AJ1-08582;
     (=hanyo-denshi/jb  . #x5065)       ; &I-HD-JB-5065; [48-69]
     (=daikanwa         . 24773)        ; &I-M-24773;
     (=jef-china3       . #x5CE6)       ; &I-JC3-5CE6;
+    (->subsumptive
+     ((=decomposition@cid
+       ((=ucs              . #x7994)   ; 禔
+       )
+       ((=ucs              . #xE0100)  ; 󠄀
+       ))
+      (=decomposition@hanyo-denshi
+       ((=ucs              . #x7994)   ; 禔
+       )
+       ((=ucs              . #xE0101)  ; 󠄁
+       ))
+      (==ucs@jis         . #x7994)     ; &g2-AJ1-08582;
+      (==adobe-japan1-2          . 08582)      ; &g2-AJ1-08582;
+      (==jis-x0212       . #x5065)     ; &g2-AJ1-08582; [48-69]
+      (==jis-x0213-2     . #x7267)     ; &g2-AJ1-08582; [82-71]
+      (==hanyo-denshi/jb  . #x5065)    ; &g2-AJ1-08582; [48-69]
+      (==daikanwa        . 24773)      ; &g2-AJ1-08582;
+      (==jef-china3      . #x5CE6)     ; &g2-AJ1-08582;
+      (->subsumptive
+       ((===daikanwa       . 24773)    ; &R-M-24773;
+       )
+       ((===jis-x0212      . #x5065)   ; &R-HD-JB-5065; [48-69]
+       (===jis-x0213-2     . #x7267)   ; &R-HD-JB-5065; [82-71]
+       (===hanyo-denshi/jb . #x5065)   ; &R-HD-JB-5065; [48-69]
+       )
+       ((===adobe-japan1-2  . 08582)   ; &R-AJ1-08582;
+       )
+       ((===jef-china3     . #x5CE6)   ; &R-JC3-5CE6;
+       ))
+      ))
     ))
 (define-char
   '((<-denotational
     (ideographic-radical . 113)        ; ⽰
     (ideographic-strokes . 9)
     (total-strokes      . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x793B)     ; 礻
+      )
+     ((=ucs              . #x662F)     ; 是
+      ))
     (=ucs@unicode      . #x7994)       ; &HD-IB-2826;
     (=ucs@JP/hanazono  . nil)
     (=cns11643-2       . #x4C45)       ; &HD-IB-2826; [44-37]
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x793A)     ; 示
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
       )
      ((=ucs              . #x67D0)     ; 某
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((name              . "CJK RADICAL SPIRIT ONE")
-      (=ucs              . #x2EAC)     ; ⺬
+     ((=ucs              . #x793A)     ; 示
       )
      ((=ucs              . #x67D0)     ; 某
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x793A)     ; 示
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
       )
      ((=ucs              . #x771E)     ; 眞
       ))
        )
        ((=ucs              . #x793A)   ; 示
        )
-       ((=ucs@unicode      . #x771E)   ; &AJ1-05816;
-       (=adobe-japan1-0    . 05816)    ; &AJ1-05816;
+       ((=ucs@unicode      . #x771E)   ; &MJ018170;
+       (=mj                . 018170)   ; &MJ018170;
        ))
       (=ucs@jis                  . #x799B)     ; &AJ1-08584;
       (=adobe-japan1-2   . 08584)      ; &AJ1-08584;
          )
         ((==adobe-japan1-5   . 19130)  ; &g2-AJ1-19130;
          )
-        ((==ucs@unicode      . #x771E) ; &g2-AJ1-05816;
-         (==adobe-japan1-0   . 05816)  ; &g2-AJ1-05816;
+        ((==ucs@unicode      . #x771E) ; &g2-MJ018170;
+         (==mj               . 018170) ; &g2-MJ018170;
          ))
        (==ucs@jis          . #x799B)   ; &g2-AJ1-08584;
        (==adobe-japan1-2   . 08584)    ; &g2-AJ1-08584;
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x793A)     ; 示
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
       )
      ((=gt-k             . 07666)      ; &GT-K07666;
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((name              . "CJK RADICAL SPIRIT ONE")
-      (=ucs              . #x2EAC)     ; ⺬
+     ((=ucs              . #x793A)     ; 示
       )
      ((=gt-k             . 07666)      ; &GT-K07666;
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x793A)     ; 示
+     ((=>ucs@component   . #x793A)     ; &A-compU+793A;
       )
      ((=ucs              . #x8FB1)     ; 辱
       ))