(U+662D): Apply new conventions for glyph granularity; add

`<-denotational@usage' for BUCS+662D.
(A-IWDSU+3ADF): New abstract node.
(BUCS+662D): New abstract node; unify A2-DJT-04510.

diff --git a/lisp/utf-2000/Ideograph-R072-Sun.el b/lisp/utf-2000/Ideograph-R072-Sun.el
index 5de7c0c..540fe16 100644 (file)
--- a/lisp/utf-2000/Ideograph-R072-Sun.el
+++ b/lisp/utf-2000/Ideograph-R072-Sun.el
@@ -6937,7 +6937,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 72) ; ⽇
+  '((<-denotational@usage
+     ((==>ucs@bucs       . #x662D)     ; &BUCS+662D;
+      ))
+    (ideographic-radical . 72) ; ⽇
     (ideographic-strokes . 5)
     (total-strokes      . 9)
     (ideographic-structure
@@ -6946,10 +6949,27 @@
       )
      ((=ucs              . #x65E5)     ; 日
       )
-     ((=ucs              . #x53EC)     ; 召
+     ((=>ucs@iwds-1      . #x53EC)     ; &A-IWDSU+53EC;
       ))
     (=ucs              . #x662D)       ; 昭
-    (=adobe-japan1-0   . 02468)        ; &I-AJ1-02468;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x662D)     ; 昭
+      ))
+    (ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 5)
+    (total-strokes      . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x65E5)     ; 日
+      )
+     ((=ucs              . #x53EC)     ; 召
+      ))
+    (=ucs@unicode      . #x662D)       ; &AJ1-02468;
+    (=adobe-japan1-0   . 02468)        ; &AJ1-02468;
     (=jis-x0208                . #x3E3C)       ; &I-J90-3E3C; [30-28]
     (=gb2312           . #x5551)       ; &I-G0-5551; [53-49]
     (=ks-x1001         . #x6139)       ; &I-K0-6139; [65-25]
@@ -6960,7 +6980,8 @@
     (=gt-k             . 05106)        ; &I-GT-K05106;
     (=gt-pj-1          . #x3E3C)       ; &I-GT-17506; [30-28]
     (=daikanwa         . 13855)        ; &I-M-13855;
-    (=shinjigen                .  3304)        ; 昭
+    (=daijiten         . 04510)        ; &I-DJT-04510;
+    (=shinjigen                .  3304)        ; &AJ1-02468;
     (->subsumptive
      ((=decomposition@cid
        ((=ucs              . #x662D)   ; 昭
@@ -6977,10 +6998,13 @@
       (==gt              . 17506)      ; &g2-AJ1-02468;
       (==gt-k            . 05106)      ; &g2-AJ1-02468;
       (==daikanwa        . 13855)      ; &g2-AJ1-02468;
+      (==daijiten        . 04510)      ; &g2-AJ1-02468;
       (==shinjigen       .  3304)      ; &g2-AJ1-02468;
       (->subsumptive
        ((===daikanwa       . 13855)    ; &R-M-13855;
        )
+       ((===daijiten       . 04510)    ; &R-DJT-04510;
+       )
        ((===jis-x0208      . #x3E3C)   ; &R-J0-3E3C; [30-28]
        (===jis-x0213-1     . #x3E3C)   ; &R-J0-3E3C; [30-28]
        )
@@ -7252,6 +7276,23 @@
       ))
     ))
 (define-char
+  '((<-denotational@component
+     ((=>ucs@iwds-1      . #x3ADF)     ; &A-IWDSU+3ADF;
+      ))
+    (ideographic-radical . 72) ; ⽇
+    (ideographic-strokes . 5)
+    (total-strokes      . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x65E5)     ; 日
+      )
+     ((=ucs              . #x20BA6)    ; 𠮦
+      ))
+    (=ucs              . #x2B783)      ; 𫞃
+    ))
+(define-char
   '((ideographic-radical . 72) ; ⽇
     (ideographic-strokes . 5)
     (total-strokes      . 9)
@@ -8406,23 +8447,6 @@
     (=ucs              . #x2AC11)      ; 𪰑
     ))
 (define-char
-  '((<-denotational@component
-     ((=>ucs@iwds-1      . #x3ADF)     ; &A-IWDSU+3ADF;
-      ))
-    (ideographic-radical . 72) ; ⽇
-    (ideographic-strokes . 5)
-    (total-strokes      . 9)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs              . #x2FF0)     ; ⿰
-      )
-     ((=ucs              . #x65E5)     ; 日
-      )
-     ((=ucs              . #x20BA6)    ; 𠮦
-      ))
-    (=ucs              . #x2B783)      ; 𫞃
-    ))
-(define-char
   '((ideographic-radical . 72) ; ⽇
     (ideographic-strokes . 5)
     (total-strokes      . 9)
@@ -27814,6 +27838,18 @@
     ))
 (define-char
   '((ideographic-radical . 72) ; ⽇
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x65E5)     ; 日
+      )
+     ((=>ucs@iwds-1      . #x3563)     ; &A-IWDSU+3563;
+      ))
+    (=>ucs@iwds-1      . #x3ADF)       ; &A-IWDSU+3ADF;
+    ))
+(define-char
+  '((ideographic-radical . 72) ; ⽇
     (=>ucs@iwds-1      . #x23196)      ; &A-IWDSU+23196;
     ))
 (define-char
@@ -27887,6 +27923,11 @@
     ))
 (define-char
   '((ideographic-radical . 72) ; ⽇
+    (==>ucs@bucs       . #x662D)       ; &BUCS+662D;
+    (==>daijiten       . 04510)        ; &BUCS+662D;
+    ))
+(define-char
+  '((ideographic-radical . 72) ; ⽇
     (==>ucs@bucs       . #x664F)       ; &BUCS+664F;
     (==>daijiten       . 04533)        ; &BUCS+664F;
     ))