(U+663C): Add `<-denotational@component' for A-IWDSU+663C; apply new
authorMORIOKA Tomohiko <tomo.git@chise.org>
Fri, 13 Oct 2023 18:48:50 +0000 (03:48 +0900)
committerMORIOKA Tomohiko <tomo.git@chise.org>
Sat, 14 Oct 2023 16:31:09 +0000 (01:31 +0900)
conventions for glyph granularity.
(A-U+99AC-itaiji-004): New abstract node.
(U+99AC-itaiji-004): New character; use `<-denotational' for
A-U+99AC-itaiji-004.
(A-GT-K07007): Unify U-0002ECA1.
(GT-K07007): Unify hanaJU+2ECA1.
(A-U+27C2E-itaiji-001): New abstract node.
(U+27C2E-itaiji-001): New character; use `<-denotational' for
A-U+27C2E-itaiji-001.
(U+66B4): Add `<-denotational@usage' for BUCS+66B4.
(UU+66B4): Unify DJT-04608.
(U-0002D9D2): New character.
(U-0002D9D4): New character.
(U-000232B1): New character.
(A-CB09946): Moved to Ideograph-R119-Rice.el; unify U-00031E56.
(CB09946): Moved to Ideograph-R119-Rice.el; unify hanaJU+31E56.
(BUCS+66B4): New abstract node; unify A2-DJT-04608.

lisp/utf-2000/Ideograph-R072-Sun.el

index ef9be2c..4c4ebb4 100644 (file)
       ))
     ))
 (define-char
-  '((<-denotational@usage
+  '((<-denotational@component
+     ((=>ucs@iwds-1      . #x663C)     ; &A-IWDSU+663C;
+      ))
+    (<-denotational@usage
      ((==>daijiten       . 04542)      ; &A2-DJT-04542;
       ))
     (ideographic-radical@r044 . 44)    ; ⼫
     (ideographic-radical@r072 . 72)    ; ⽇
     (ideographic-strokes@r072 . 5)
     (total-strokes      . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
+      (=ucs              . #x2FF5)     ; ⿵
+      )
+     ((=ucs              . #x5C3A)     ; 尺
+      )
+     ((=ucs              . #x65E6)     ; 旦
+      ))
     (=ucs              . #x663C)       ; 昼
     (=adobe-japan1-0   . 02985)        ; &I-AJ1-02985;
     (=jis-x0208                . #x436B)       ; &I-J90-436B; [35-75]
       (=adobe-japan1-0   . 05105)      ; &AJ1-05105;
       (=jis-x0208        . #x5A6C)     ; &I-J90-5A6C; [58-76]
       ))
+    (<-vulgar
+     ((=ucs@unicode      . #x665D)     ; &AJ1-05105;
+      (=adobe-japan1-0   . 05105)      ; &AJ1-05105;
+      (=daikanwa         . 13948)      ; &I-M-13948;
+      ))
+    (<-vulgar*sources
+     songyuan-yilai-suzipu daikanwa)
     (->subsumptive
      ((==gt              . 17517)      ; &g2-GT-17517;
-      (<-vulgar
-       ((=ucs@unicode      . #x665D)   ; &AJ1-05105;
-       (=adobe-japan1-0    . 05105)    ; &AJ1-05105;
-       (=daikanwa          . 13948)    ; &I-M-13948;
-       ))
-      (<-vulgar*sources
-       songyuan-yilai-suzipu daikanwa)
       (->subsumptive
        ((ideographic-radical . 44)     ; ⼫
        (ideographic-strokes . 6)
       ))
     ))
 (define-char
+  '((ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 5)
+    (total-strokes      . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (=ucs              . #x2FF3)     ; ⿳
+      )
+     ((=ucs              . #x65E5)     ; 日
+      )
+     ((=>ucs@component   . #x5200)     ; &A-compU+5200;
+      (=>iwds-1                  .  0149)      ; &A-compU+5200;
+      )
+     ((=ucs              . #x5DFE)     ; 巾
+      ))
+    (=>ucs-itaiji-004  . #x99AC)       ; &A-U-i004+99AC;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-itaiji-004          . #x99AC)     ; &A-U-i004+99AC;
+      ))
+    (ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 5)
+    (total-strokes      . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (=ucs              . #x2FF3)     ; ⿳
+      )
+     ((=ucs              . #x65E5)     ; 日
+      )
+     ((=ucs@iso                  . #x2008A)    ; &U-0002008A;
+      )
+     ((=ucs              . #x5DFE)     ; 巾
+      ))
+    (=ucs-itaiji-004   . #x99AC)       ; &U-i004+99AC;
+    ))
+(define-char
   '((<-denotational@usage
      ((==>ucs@bucs       . #x661F)     ; &BUCS+661F;
       ))
     (<-Large-Seal*sources
      shuowen daikanwa)
     (<-same
-     ((=ucs@iso                  . #x26618)    ; &C6-4D36;
-      (=cns11643-6       . #x4D36)     ; &C6-4D36; [45-22]
+     ((=ucs@iso                  . #x26618)    ; &MJ045450;
+      (=mj               . 045450)     ; &MJ045450;
       (=daikanwa         . 29223)      ; &I-M-29223;
       ))
     (<-same*sources
     ))
 (define-char
   '((ideographic-radical . 72) ; ⽇
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=>ucs@component   . #x65E5)     ; &A-compU+65E5;
+      (=>iwds-1                  .  0118)      ; &A-compU+65E5;
+      )
+     ((=>ucs@iwds-1      . #x5171)     ; &A-IWDSU+5171;
+      ))
+    (=ucs              . #x2ECA1)      ; 𮲡
+    (=>gt-k            . 07007)        ; 𮲡
+    (=>ucs-itaiji-007  . #x66B4)       ; 𮲡
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x2ECA1)    ; 𮲡
+      ))
+    (ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 6)
+    (total-strokes      . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x65E5)     ; 日
+      )
+     ((=ucs@unicode      . #x5171)     ; &AJ1-01694;
+      (=adobe-japan1-0   . 01694)      ; &AJ1-01694;
+      ))
+    (=ucs@JP/hanazono  . #x2ECA1)      ; &GT-K07007;
+    (=gt-k             . 07007)        ; &GT-K07007;
+    (=gt-pj-k1         . #x383A)       ; &GT-K07007; [24-26]
+    (=ucs-itaiji-007   . #x66B4)       ; &GT-K07007;
+    (->subsumptive
+     ((==ucs@JP/hanazono  . #x2ECA1)   ; &g2-hanaJU+2ECA1;
+      )
+     ((==gt-k            . 07007)      ; &g2-GT-K07007;
+      (==gt-pj-k1        . #x383A)     ; &g2-GT-K07007; [24-26]
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 72) ; ⽇
     (ideographic-strokes . 6)
     (total-strokes      . 10)
     (ideographic-structure
     ))
 (define-char
   '((ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 6)
+    (total-strokes      . 10)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
      ((=>ucs@component   . #x65E5)     ; &A-compU+65E5;
       (=>iwds-1                  .  0118)      ; &A-compU+65E5;
       )
-     ((=>ucs@iwds-1      . #x5171)     ; &A-IWDSU+5171;
+     ((=>ucs@iwds-1      . #x4E51)     ; &A-IWDSU+4E51;
+      (=>iwds-1                  .  0328)      ; &A-IWDSU+4E51;
+      ))
+    (=>ucs-itaiji-001  . #x27C2E)      ; &A-U-i001+27C2E;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-itaiji-001          . #x27C2E)    ; &A-U-i001+27C2E;
+      ))
+    (ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 6)
+    (total-strokes      . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x65E5)     ; 日
+      )
+     ((=ucs              . #x27C28)    ; 𧰨
       ))
-    (=>gt-k            . 07007)        ; &A-GT-K07007;
-    (=>ucs-itaiji-007  . #x66B4)       ; &A-GT-K07007;
+    (=ucs-itaiji-001   . #x27C2E)      ; &U-i001+27C2E;
     ))
 (define-char
   '((ideographic-radical . 72) ; ⽇
       ))
     ))
 (define-char
-  '((<-denotational
-     ((=>gt-k            . 07007)      ; &A-GT-K07007;
-      ))
-    (ideographic-radical . 72) ; ⽇
-    (ideographic-strokes . 6)
-    (total-strokes      . 10)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs              . #x2FF1)     ; ⿱
-      )
-     ((=ucs              . #x65E5)     ; 日
-      )
-     ((=ucs@unicode      . #x5171)     ; &AJ1-01694;
-      (=adobe-japan1-0   . 01694)      ; &AJ1-01694;
-      ))
-    (=gt-k             . 07007)        ; &GT-K07007;
-    (=gt-pj-k1         . #x383A)       ; &GT-K07007; [24-26]
-    (=ucs-itaiji-007   . #x66B4)       ; &GT-K07007;
-    (->subsumptive
-     ((==gt-k            . 07007)      ; &g2-GT-K07007;
-      (==gt-pj-k1        . #x383A)     ; &g2-GT-K07007; [24-26]
-      ))
-    ))
-(define-char
   '((ideographic-radical . 72) ; ⽇
     (ideographic-strokes . 6)
     (total-strokes      . 10)
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
       )
-     ((=>gt-k            . 07007)      ; &A-GT-K07007;
+     ((=ucs              . #x2ECA1)    ; 𮲡
       )
      ((=ucs              . #x38FA)     ; 㣺
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
       )
-     ((=gt-k             . 07007)      ; &GT-K07007;
+     ((=ucs@JP/hanazono          . #x2ECA1)    ; &GT-K07007;
+      (=gt-k             . 07007)      ; &GT-K07007;
       )
      ((name              . "CJK RADICAL HEART TWO")
       (=ucs              . #x2E97)     ; ⺗
       ))
     ))
 (define-char
-  '((ideographic-radical . 72) ; ⽇
+  '((<-denotational@usage
+     ((==>ucs@bucs       . #x66B4)     ; &BUCS+66B4;
+      ))
+    (ideographic-radical . 72) ; ⽇
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
       )
-     ((=>gt-k            . 07007)      ; &A-GT-K07007;
+     ((=ucs              . #x2ECA1)    ; 𮲡
       )
      ((=ucs              . #x6C3A)     ; 氺
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
       )
-     ((=gt-k             . 07007)      ; &GT-K07007;
+     ((=ucs@JP/hanazono          . #x2ECA1)    ; &GT-K07007;
+      (=gt-k             . 07007)      ; &GT-K07007;
       )
      ((=ucs              . #x6C3A)     ; 氺
       ))
     (=gt-k             . 11951)        ; &I-GT-K11951;
     (=gt-pj-1          . #x4B3D)       ; &I-GT-17897; [43-29]
     (=daikanwa         . 14137)        ; &I-M-14137;
+    (=daijiten         . 04608)        ; &I-DJT-04608;
     (=shinjigen                .  3381)        ; &AJ1-03691;
     (->subsumptive
      ((=decomposition@cid
       (==gt              . 17897)      ; &g2-AJ1-03691;
       (==gt-k            . 11951)      ; &g2-AJ1-03691;
       (==daikanwa        . 14137)      ; &g2-AJ1-03691;
+      (==daijiten        . 04608)      ; &g2-AJ1-03691;
       (==shinjigen       .  3381)      ; &g2-AJ1-03691;
       (->subsumptive
        ((===daikanwa       . 14137)    ; &R-M-14137;
        )
+       ((===daijiten       . 04608)    ; &R-DJT-04608;
+       )
        ((===jis-x0208      . #x4B3D)   ; &R-J0-4B3D; [43-29]
        (===jis-x0213-1     . #x4B3D)   ; &R-J0-4B3D; [43-29]
        )
     ))
 (define-char
   '((ideographic-radical . 72) ; ⽇
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x65E5)     ; 日
+      )
+     ((=ucs              . #x9023)     ; 連
+      ))
+    (=ucs              . #x2D9D2)      ; 𭧒
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x2D9D2)    ; 𭧒
+      ))
+    (ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 11)
+    (total-strokes      . 15)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x65E5)     ; 日
+      )
+     ((=ucs@ks           . #x9023)     ; &AJ1-14097;
+      (=adobe-japan1-4   . 14097)      ; &AJ1-14097;
+      ))
+    (=ucs@JP/hanazono  . #x2D9D2)      ; &hanaJU+2D9D2;
+    ))
+(define-char
+  '((ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 11)
+    (total-strokes      . 15)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER RIGHT")
+      (=ucs              . #x2FFD)     ; ⿽
+      )
+     ((=ucs              . #x687C)     ; 桼
+      )
+     ((=ucs              . #x65E5)     ; 日
+      ))
+    (=ucs              . #x2D9D4)      ; 𭧔
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x2D9D4)    ; 𭧔
+      ))
+    (ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 11)
+    (total-strokes      . 15)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER RIGHT")
+      (=ucs              . #x2FFD)     ; ⿽
+      )
+     ((=ucs@unicode      . #x687C)     ; &AJ1-17800;
+      (=adobe-japan1-5   . 17800)      ; &AJ1-17800;
+      )
+     ((=ucs              . #x65E5)     ; 日
+      ))
+    (=ucs@JP/hanazono  . #x2D9D4)      ; &CB03392;
+    (=cbeta            . 03392)        ; &CB03392;
+    (->subsumptive
+     ((==ucs@JP/hanazono  . #x2D9D4)   ; &g2-CB03392;
+      (==cbeta           . 03392)      ; &g2-CB03392;
+      (->subsumptive
+       ((===cbeta          . 03392)    ; &R-CB03392;
+       ))
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 72) ; ⽇
     (ideographic-strokes . 11)
     (total-strokes      . 15)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
       )
-     ((=>gt-k            . 07007)      ; &A-GT-K07007;
+     ((=ucs              . #x2ECA1)    ; 𮲡
       )
      ((=ucs              . #x20982)    ; 𠦂
       ))
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
       )
-     ((=gt-k             . 07007)      ; &GT-K07007;
+     ((=ucs@JP/hanazono          . #x2ECA1)    ; &GT-K07007;
+      (=gt-k             . 07007)      ; &GT-K07007;
       )
      ((=ucs              . #x20982)    ; 𠦂
       ))
       )
      ((=ucs              . #x65E5)     ; 日
       )
+     ((=ucs              . #x28CDA)    ; 𨳚
+      ))
+    (=ucs              . #x232B1)      ; 𣊱
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x232B1)    ; 𣊱
+      ))
+    (ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 12)
+    (total-strokes      . 16)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x65E5)     ; 日
+      )
+     ((=ucs@iso                  . #x28CDA)    ; &C4-3B6A;
+      (=cns11643-4       . #x3B6A)     ; &C4-3B6A; [27-74]
+      (=daikanwa         . 41235)      ; &I-M-41235;
+      ))
+    (=ucs@iso          . #x232B1)      ; &U-000232B1;
+    ))
+(define-char
+  '((ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 12)
+    (total-strokes      . 16)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x65E5)     ; 日
+      )
      ((=ucs-itaiji-001   . #x242F1)    ; &U-i001+242F1;
       ))
     (=ucs              . #x232B3)      ; 𣊳
       ))
     ))
 (define-char
-  '((ideographic-radical . 72) ; ⽇
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs              . #x2FF1)     ; ⿱
-      )
-     ((=>gt-k            . 07007)      ; &A-GT-K07007;
-      )
-     ((=ucs              . #x7C73)     ; 米
-      ))
-    (=>cbeta           . 09946)        ; &A-CB09946;
-    ))
-(define-char
-  '((<-denotational
-     ((=>cbeta           . 09946)      ; &A-CB09946;
-      ))
-    (ideographic-radical . 72) ; ⽇
-    (ideographic-strokes . 12)
-    (total-strokes      . 16)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs              . #x2FF1)     ; ⿱
-      )
-     ((=gt-k             . 07007)      ; &GT-K07007;
-      )
-     ((=ucs              . #x7C73)     ; 米
-      ))
-    (=cbeta            . 09946)        ; &CB09946;
-    ))
-(define-char
   '((<-denotational@usage
      ((==>daijiten       . 09633)      ; &BUCS+820A;
       ))
     ))
 (define-char
   '((ideographic-radical . 72) ; ⽇
+    (==>ucs@bucs       . #x66B4)       ; &BUCS+66B4;
+    (==>daijiten       . 04608)        ; &BUCS+66B4;
+    ))
+(define-char
+  '((ideographic-radical . 72) ; ⽇
     (==>ucs@bucs       . #x66C1)       ; &BUCS+66C1;
     (==>daijiten       . 04617)        ; &BUCS+66C1;
     ))