(parent of JX1-754E): Separate U-0002F8D8; add `=>>ucs@jis',

`=>>ucs@ks' and `=>>ucs@cns'.
(C4-323E): Unify U-0002F8D8.
(U+671B): Unify A-J0-4B3E.
(A-CU+671B): New abstract character.
(M-14368): Use A-CU+671B instead of U+671B as the value of
`<-denotational'.
(C1-5B2C): Likewise; unify CU+671B.
(parent of G0-4D7B): Separate U-0002F8D9; add `=>ucs@unicode',
`=>ucs@cns' and `=>gt'.
(C6-4058): Unify U-0002F8D9.

diff --git a/lisp/utf-2000/Ideograph-R074-Moon.el b/lisp/utf-2000/Ideograph-R074-Moon.el
index 877d4b7..ba21d74 100644 (file)
--- a/lisp/utf-2000/Ideograph-R074-Moon.el
+++ b/lisp/utf-2000/Ideograph-R074-Moon.el
@@ -682,14 +682,12 @@
   '((<-denotational
      ((=ucs              . #x6717)     ; 朗
       ))
-    (=>ucs*            . #x6717)       ; 朗
-    (=>ucs@cns         . #x2F8D8)      ; &C4-323E;
-    (=>ucs@jis         . #xF929)       ; 朗
-    (=>ucs@ks          . #x6717)       ; &K0-5547;
     (ideographic-radical . 74) ; ⽉
     (ideographic-strokes . 7)
     (total-strokes      . 11)
-    (=ucs              . #x2F8D8)      ; 朗
+    (=>>ucs@jis                . #xF929)       ; &G-JU+F929;
+    (=>>ucs@ks         . #x6717)       ; &G-JU+F929;
+    (=>>ucs@cns                . #x2F8D8)      ; &G-JU+F929;
     (->subsumptive
      ((=>ucs*            . #x6717)     ; 朗
       (=ucs              . #xF929)     ; 朗
@@ -703,10 +701,11 @@
        (=ks-x1001          . #x5228)   ; &K0-5228; [50-08]
        ))
       )
-     ((=jef-china3       . #x52AD)     ; &JC3-52AD;
+     ((=>ucs*            . #x6717)     ; 朗
+      (=ucs              . #x2F8D8)    ; 朗
+      (=cns11643-4       . #x323E)     ; &I-C4-323E; [18-30]
       )
-     ((=ucs@iso                  . #x2F8D8)    ; &C4-323E;
-      (=cns11643-4       . #x323E)     ; &C4-323E; [18-30]
+     ((=jef-china3       . #x52AD)     ; &JC3-52AD;
       ))
     ))
 (define-char
@@ -844,6 +843,8 @@
     (ideographic-strokes . 7)
     (total-strokes      . 11)
     (=ucs              . #x671B)       ; 望
+    (=>jis-x0208       . #x4B3E)       ; 望 [43-30]
+    (=>jis-x0213-1     . #x4B3E)       ; 望 [43-30]
     (=big5             . #xB1E6)       ; &I-B-B1E6;
     ))
 (define-char
@@ -853,44 +854,60 @@
     (ideographic-radical . 74) ; ⽉
     (ideographic-strokes . 7)
     (total-strokes      . 11)
+    (=>ucs@cns         . #x671B)       ; &A-CU+671B;
+    (=>daikanwa                . 14368)        ; &A-CU+671B;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@cns         . #x671B)     ; &A-CU+671B;
+      ))
+    (ideographic-radical . 74) ; ⽉
+    (ideographic-strokes . 7)
+    (total-strokes      . 11)
     (=daikanwa         . 14368)        ; &M-14368;
     (=jef-china3       . #x52A6)       ; &I-JC3-52A6;
     ))
 (define-char
   '((<-denotational
-     ((=ucs              . #x671B)     ; 望
+     ((=>ucs@cns         . #x671B)     ; &A-CU+671B;
       ))
     (ideographic-radical . 74) ; ⽉
     (ideographic-strokes . 7)
     (total-strokes      . 11)
+    (=ucs@cns          . #x671B)       ; &C1-5B2C;
     (=cns11643-1       . #x5B2C)       ; &C1-5B2C; [59-12]
     ))
 (define-char
   '((<-denotational
      ((=ucs              . #x671B)     ; 望
       ))
-    (=>ucs*            . #x671B)       ; 望
-    (=>ucs@gb          . #x671B)       ; &G0-4D7B;
-    (=>ucs@cns         . #x2F8D9)      ; &C6-4058;
-    (=>ucs@jis         . #x671B)       ; &GT-18223;
-    (=>ucs@ks          . #x671B)       ; &GT-18223;
     (ideographic-radical . 74) ; ⽉
     (ideographic-strokes . 7)
     (total-strokes      . 11)
-    (=ucs              . #x2F8D9)      ; 望
+    (=>ucs@unicode     . #x671B)       ; &A-GT-18223;
+    (=>ucs@cns         . #x2F8D9)      ; &A-GT-18223;
+    (=>gt              . 18223)        ; &A-GT-18223;
     (->subsumptive
-     ((morohashi-daikanwa      14368 1)
-      (=ucs@jis                  . #x671B)     ; &GT-18223;
-      (=ucs@ks           . #x671B)     ; &GT-18223;
-      (=jis-x0208        . #x4B3E)     ; &GT-18223; [43-30]
-      (=ks-x1001         . #x5850)     ; &I-K0-5850; [56-48]
-      (=jis-x0213-1      . #x4B3E)     ; &I-JX1-4B3E; [43-30]
-      (=gt               . 18223)      ; &I-GT-18223;
-      (=gt-k             . 07876)      ; &I-GT-K07876;
-      (=gt-pj-1                  . #x4B3E)     ; &I-GT-18223; [43-30]
-      )
-     ((=ucs@iso                  . #x2F8D9)    ; &C6-4058;
-      (=cns11643-6       . #x4058)     ; &C6-4058; [32-56]
+     ((=>>ucs@jis        . #x671B)     ; &G-GT-18223;
+      (=>>ucs@ks         . #x671B)     ; &G-GT-18223;
+      (=>>ucs@cns        . #x2F8D9)    ; &G-GT-18223;
+      (=>>jis-x0208      . #x4B3E)     ; &G-GT-18223; [43-30]
+      (=>>gt             . 18223)      ; &G-GT-18223;
+      (->subsumptive
+       ((morohashi-daikanwa    14368 1)
+       (=ucs@jis           . #x671B)   ; &GT-18223;
+       (=ucs@ks            . #x671B)   ; &GT-18223;
+       (=jis-x0208         . #x4B3E)   ; &GT-18223; [43-30]
+       (=ks-x1001          . #x5850)   ; &I-K0-5850; [56-48]
+       (=jis-x0213-1       . #x4B3E)   ; &I-JX1-4B3E; [43-30]
+       (=gt                . 18223)    ; &I-GT-18223;
+       (=gt-k              . 07876)    ; &I-GT-K07876;
+       (=gt-pj-1           . #x4B3E)   ; &I-GT-18223; [43-30]
+       )
+       ((=>ucs*                    . #x671B)   ; 望
+       (=ucs               . #x2F8D9)  ; 望
+       (=cns11643-6        . #x4058)   ; &I-C6-4058; [32-56]
+       ))
       )
      ((=ucs@unicode      . #x671B)     ; &G0-4D7B;
       (=gb2312           . #x4D7B)     ; &G0-4D7B; [45-91]