(C6-2C23): Map to U-0002F8D6.

(U-0002F8D7): Add `=>ucs*' for U+43D9; add `sound@ja/on'; add
`<-same@ucs' for U+43D9; add `->mistakable' for U+43D9.
(U-0002F8D8): Add `=>ucs@cns' for U-0002F8D8; add `=>ucs@jis' for
U+F929; add `=>ucs@ks' for U+6717.
(U+F929): Add `=>ucs*' for U+6717.
(U+671B): Unify B-B1E6.
(M-14368): Use `<-denotational' for U+671B instead of `<-subsumptive'
for B-B1E6.
(C1-5B2C): Likewise.
(C6-4058): Map to U-0002F8D9.

diff --git a/lisp/utf-2000/Ideograph-R074-Moon.el b/lisp/utf-2000/Ideograph-R074-Moon.el
index 0b55bb9..3761d92 100644 (file)
--- a/lisp/utf-2000/Ideograph-R074-Moon.el
+++ b/lisp/utf-2000/Ideograph-R074-Moon.el
@@ -220,17 +220,18 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 74) ; ⽉
-    (ideographic-strokes . 4)
-    (total-strokes      . 8)
-    (=daikanwa         . 14342)        ; &M-14342;
-    ))
-(define-char
-  '((morohashi-daikanwa        14342 0 0)
+  '((=>ucs*            . #x80AD)       ; 肭
     (ideographic-radical . 74) ; ⽉
     (ideographic-strokes . 4)
     (total-strokes      . 8)
-    (=cns11643-6       . #x2C23)       ; &C6-2C23; [12-03]
+    (=ucs              . #x2F8D6)      ; 肭
+    (->subsumptive
+     ((=daikanwa         . 14342)      ; &M-14342;
+      (=ucs@iso                  . #x2F8D6)    ; &M-14342;
+      )
+     ((=cns11643-6       . #x2C23)     ; &C6-2C23; [12-03]
+      (=ucs@cns                  . #x2F8D6)    ; &C6-2C23;
+      ))
     ))
 (define-char
   '((ideographic-radical . 74) ; ⽉
@@ -246,12 +247,20 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 74) ; ⽉
+  '((=>ucs*            . #x43D9)       ; 䏙
+    (ideographic-radical . 74) ; ⽉
     (ideographic-strokes . 4)
     (total-strokes      . 8)
+    (sound@ja/on       "teN" "deN")
     (=ucs              . #x2F8D7)      ; 䏙
     (=cns11643-5       . #x264A)       ; &I-C5-264A; [06-42]
     (=daikanwa         . 14344)        ; &I-M-14344;
+    (<-same@ucs
+     ((=ucs              . #x43D9)     ; 䏙
+      ))
+    (->mistakable
+     ((=ucs              . #x43D9)     ; 䏙
+      ))
     ))
 (define-char
   '((ideographic-radical . 74) ; ⽉
@@ -647,12 +656,16 @@
      ((=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)      ; 朗
     (->subsumptive
-     ((=ucs              . #xF929)     ; 朗
+     ((=>ucs*            . #x6717)     ; 朗
+      (=ucs              . #xF929)     ; 朗
       (=jis-x0213-1-2000  . #x754E)    ; &I-JX1-754E; [85-46]
       (=daikanwa         . 14364)      ; &I-M-14364;
       (->subsumptive
@@ -795,6 +808,7 @@
     (ideographic-strokes . 7)
     (total-strokes      . 11)
     (=ucs              . #x671B)       ; 望
+    (=big5             . #xB1E6)       ; &I-B-B1E6;
     ))
 (define-char
   '((<-denotational
@@ -803,22 +817,31 @@
     (ideographic-radical . 74) ; ⽉
     (ideographic-strokes . 7)
     (total-strokes      . 11)
-    (=big5             . #xB1E6)       ; &B-B1E6;
-    (=ucs@big5         . #x671B)       ; &B-B1E6;
-    (->subsumptive
-     ((=daikanwa         . 14368)      ; &M-14368;
-      (=jef-china3       . #x52A6)     ; &I-JC3-52A6;
-      )
-     ((=cns11643-1       . #x5B2C)     ; &C1-5B2C; [59-12]
+    (=daikanwa         . 14368)        ; &M-14368;
+    (=jef-china3       . #x52A6)       ; &I-JC3-52A6;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x671B)     ; 望
       ))
+    (ideographic-radical . 74) ; ⽉
+    (ideographic-strokes . 7)
+    (total-strokes      . 11)
+    (=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)      ; 望
     (->subsumptive
      ((morohashi-daikanwa      14368 1)
       (=jis-x0208        . #x4B3E)     ; &GT-18223; [43-30]
@@ -827,8 +850,10 @@
       (=gt-k             . 07876)      ; &I-GT-K07876;
       (=gt-pj-1                  . #x4B3E)     ; &I-GT-18223; [43-30]
       (=ucs@jis                  . #x671B)     ; &GT-18223;
+      (=ucs@ks           . #x671B)     ; &GT-18223;
       )
      ((=cns11643-6       . #x4058)     ; &C6-4058; [32-56]
+      (=ucs@iso                  . #x2F8D9)    ; &C6-4058;
       )
      ((=gb2312           . #x4D7B)     ; &G0-4D7B; [45-91]
       (=ucs@unicode      . #x671B)     ; &G0-4D7B;