(U+5C22): Add J97-5577.

(<CJK RADICAL LAME THREE>): Copied from
u02E00-CJK-Radical-Supplement.el.
(U+5C23): Use `->subsumptive'.
(<CJK RADICAL LAME TWO>): Copied from
u02E00-CJK-Radical-Supplement.el.
(BC-8DEF): Use `<-denotational' for JSP-3A6D instead of `=>ucs' for
U+5C23; add `<-formed@component' for C1-4452; add
`<-identical@component' for JSP-3A6D.
(U-00021BC2): Use `->subsumptive'.
(<CJK RADICAL LAME FOUR>): Copied from
u02E00-CJK-Radical-Supplement.el.
(M-07542): Add `=>ucs*' for U+5140.
(<CJK RADICAL LAME ONE>): Copied from
u02E00-CJK-Radical-Supplement.el.

diff --git a/lisp/utf-2000/Ideograph-R043-Lame.el b/lisp/utf-2000/Ideograph-R043-Lame.el
index c6ea935..96072fc 100644 (file)
--- a/lisp/utf-2000/Ideograph-R043-Lame.el
+++ b/lisp/utf-2000/Ideograph-R043-Lame.el
@@ -4,6 +4,7 @@
     (ideographic-strokes . 0)
     (total-strokes      . 3)
     (=ucs              . #x5C22)       ; 尢
+    (=jis-x0208@1997   . #x5577)       ; 尢 [53-87]
     ))
 (define-char
   '((<-denotational
@@ -20,6 +21,19 @@
   '((<-denotational
      ((=ucs              . #x5C22)     ; 尢
       ))
+    (name              . "CJK RADICAL LAME THREE")
+    (general-category  symbol other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (<-identical@component
+     ((=ucs              . #x5C22)     ; 尢
+      ))
+    (=ucs              . #x2E90)       ; ⺐
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x5C22)     ; 尢
+      ))
     (=>ucs*            . #x5C22)       ; 尢
     (ideographic-radical . 43) ; ⼪
     (ideographic-strokes . 0)
@@ -41,50 +55,94 @@
     (ideographic-strokes . 0)
     (total-strokes      . 4)
     (=ucs              . #x5C23)       ; 尣
-    (=jis-x0212                . #x3A6D)       ; &I-JSP-3A6D; [26-77]
-    (=jis-x0213-1-2000 . #x4F5D)       ; &I-JX1-4F5D; [47-61]
-    (=daikanwa         . 07540)        ; &I-M-07540;
+    (->subsumptive
+     ((<-same
+       ((=cns11643-1       . #x4452)   ; &M-07538; [36-50]
+       (=daikanwa          . 07538)    ; &I-M-07538;
+       ))
+      (<-same*sources
+       zihui daikanwa)
+      (=jis-x0212        . #x3A6D)     ; &M-07540; [26-77]
+      (=jis-x0213-1-2000  . #x4F5D)    ; &I-JX1-4F5D; [47-61]
+      (=daikanwa         . 07540)      ; &I-M-07540;
+      (=ucs@unicode      . #x5C23)     ; &M-07540;
+      (->formed
+       ((=daikanwa         . 07583)    ; &I-M-07583;
+       ))
+      (->formed*sources
+       daikanwa)
+      )
+     ((=cns11643-4       . #x214B)     ; &C4-214B; [01-43]
+      ))
     ))
 (define-char
-  '((=>ucs             . #x5C23)       ; 尣
-    (morohashi-daikanwa        7540 0 0)
-    (ideographic-radical . 43) ; ⼪
-    (ideographic-strokes . 0)
-    (total-strokes      . 4)
-    (=cns11643-4       . #x214B)       ; &C4-214B; [01-43]
+  '((<-denotational
+     ((=ucs              . #x5C23)     ; 尣
+      ))
+    (name              . "CJK RADICAL LAME TWO")
+    (general-category  symbol other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (<-identical@component
+     ((=ucs              . #x5C23)     ; 尣
+      ))
+    (=ucs              . #x2E8F)       ; ⺏
     ))
 (define-char
-  '((=>ucs             . #x5C23)       ; 尣
-    (morohashi-daikanwa        7540 0 2)
+  '((<-denotational
+     ((=jis-x0212        . #x3A6D)     ; &M-07540; [26-77]
+      (=jis-x0213-1-2000  . #x4F5D)    ; &I-JX1-4F5D; [47-61]
+      (=daikanwa         . 07540)      ; &I-M-07540;
+      ))
     (ideographic-radical . 43) ; ⼪
     (ideographic-strokes . 0)
     (total-strokes      . 4)
+    (<-formed@component
+     ((=cns11643-1       . #x4452)     ; &M-07538; [36-50]
+      (=daikanwa         . 07538)      ; &I-M-07538;
+      ))
+    (<-identical@component
+     ((=jis-x0212        . #x3A6D)     ; &M-07540; [26-77]
+      (=jis-x0213-1-2000  . #x4F5D)    ; &I-JX1-4F5D; [47-61]
+      (=daikanwa         . 07540)      ; &I-M-07540;
+      ))
     (=big5-cdp         . #x8DEF)       ; &CDP-8DEF;
     ))
 (define-char
-  '((=>ucs             . #x21BC2)      ; 𡯂
-    (ideographic-radical . 43) ; ⼪
-    (ideographic-strokes . 0)
-    (total-strokes      . 4)
-    (=daikanwa         . 07541)        ; &M-07541;
-    ))
-(define-char
-  '((=>ucs             . #x21BC2)      ; 𡯂
-    (morohashi-daikanwa        7541 0 0)
-    (ideographic-radical . 43) ; ⼪
+  '((ideographic-radical . 43) ; ⼪
     (ideographic-strokes . 0)
     (total-strokes      . 4)
-    (=cns11643-4       . #x214A)       ; &C4-214A; [01-42]
+    (=ucs              . #x21BC2)      ; 𡯂
+    (->subsumptive
+     ((<-same
+       ((=cns11643-1       . #x4452)   ; &M-07538; [36-50]
+       (=daikanwa          . 07538)    ; &I-M-07538;
+       ))
+      (<-same*sources
+       zihui daikanwa)
+      (=daikanwa         . 07541)      ; &M-07541;
+      )
+     ((=cns11643-4       . #x214A)     ; &C4-214A; [01-42]
+      )
+     ((=ucs@iso                  . #x21BC2)    ; &U-00021BC2;
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa        7541 0 1)
-    (ideographic-radical . 43) ; ⼪
-    (ideographic-strokes . 0)
-    (total-strokes      . 4)
-    (=ucs              . #x21BC2)      ; 𡯂
+  '((<-denotational
+     ((=ucs              . #x21BC2)    ; 𡯂
+      ))
+    (name              . "CJK RADICAL LAME FOUR")
+    (general-category  symbol other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (<-identical@component
+     ((=daikanwa         . 07541)      ; &M-07541;
+      ))
+    (=ucs              . #x2E91)       ; ⺑
     ))
 (define-char
   '((=>ucs             . #xFA0C)       ; 兀
+    (=>ucs*            . #x5140)       ; 兀
     (ideographic-radical . 43) ; ⼪
     (ideographic-strokes . 0)
     (total-strokes      . 3)
@@ -115,6 +173,22 @@
     (=big5             . #xC94A)       ; &I-B-C94A;
     ))
 (define-char
+  '((<-denotational
+     ((=daikanwa         . 07542)      ; &M-07542;
+      ))
+    (name              . "CJK RADICAL LAME ONE")
+    (general-category  symbol other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (<-formed@component
+     ((=ucs              . #x5C22)     ; 尢
+      ))
+    (<-identical@component
+     ((=daikanwa         . 07542)      ; &M-07542;
+      ))
+    (=ucs              . #x2E8E)       ; ⺎
+    ))
+(define-char
   '((ideographic-radical . 43) ; ⼪
     (ideographic-strokes . 1)
     (total-strokes      . 4)