(U+5177): Separate A-J0-3671.

(A-J0-3671): Add `<-denotational' for U+5177; unify A-UU+5177 and
IWDS1-0110.
(U-0002F811): Use A-UU+5177 instead of U+5177 as its mother.
(UU+5177): Ditto.
(GT-K04005): New character; use `<-denotational' for U+5177.
(GT-K04006): New character; use `<-subsumptive' for GT-K04005.

diff --git a/lisp/utf-2000/Ideograph-R012-Eight.el b/lisp/utf-2000/Ideograph-R012-Eight.el
index 0166e65..b6ad8cb 100644 (file)
--- a/lisp/utf-2000/Ideograph-R012-Eight.el
+++ b/lisp/utf-2000/Ideograph-R012-Eight.el
@@ -2218,22 +2218,44 @@
     (ideographic-radical . 12) ; ⼋
     (ideographic-strokes . 6)
     (total-strokes      . 8)
+    (=>iwds-1*note     "110+139a")
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
       )
-     ((=>big5-cdp        . #x8BA5)     ; &A-CDP-8BA5;
+     ((=ucs              . #x76EE)     ; 目
       )
-     ((=ucs              . #x516B)     ; 八
+     ((=>ucs@component   . #x5C22)     ; &A-compU+5C22;
+      (=>iwds-1                  .  0099)      ; &A-compU+5C22;
       ))
     (=ucs              . #x5177)       ; 具
-    (=>jis-x0208       . #x3671)       ; 具 [22-81]
-    (=>jis-x0213-1     . #x3671)       ; 具 [22-81]
+    (=>iwds-1          .  11039)       ; 具
     ))
 (define-char
   '((<-denotational
      ((=ucs              . #x5177)     ; 具
       ))
+    (ideographic-radical . 12) ; ⼋
+    (ideographic-strokes . 6)
+    (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=>big5-cdp        . #x8BA5)     ; &A-CDP-8BA5;
+      )
+     ((=ucs              . #x516B)     ; 八
+      ))
+    (=>ucs@unicode     . #x5177)       ; &J97-3671;
+    (=>jis-x0208       . #x3671)       ; &J97-3671; [22-81]
+    (=>jis-x0213-1     . #x3671)       ; &J97-3671; [22-81]
+    (=>iwds-1          .  0110)        ; &J97-3671;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@unicode     . #x5177)     ; &J97-3671;
+      (=>jis-x0208       . #x3671)     ; &J97-3671; [22-81]
+      ))
     (=>ucs*            . #x5177)       ; 具
     (ideographic-radical . 12) ; ⼋
     (ideographic-strokes . 6)
@@ -2307,7 +2329,8 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs              . #x5177)     ; 具
+     ((=>ucs@unicode     . #x5177)     ; &J97-3671;
+      (=>jis-x0208       . #x3671)     ; &J97-3671; [22-81]
       ))
     (ideographic-radical . 12) ; ⼋
     (ideographic-strokes . 6)
@@ -2381,6 +2404,35 @@
     ))
 (define-char
   '((<-denotational
+     ((=ucs              . #x5177)     ; 具
+      ))
+    (ideographic-radical . 12) ; ⼋
+    (ideographic-strokes . 6)
+    (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x76EE)     ; 目
+      )
+     ((=ucs              . #x5927)     ; 大
+      ))
+    (=gt-k             . 04005)        ; &GT-K04005;
+    (=gt-pj-k1         . #x406A)       ; &GT-K04005; [32-74]
+    (->subsumptive
+     ((==gt-k            . 04005)      ; &g2-GT-K04005;
+      (==gt-pj-k1        . #x406A)     ; &g2-GT-K04005; [32-74]
+      )
+     ((=gt-k             . 04006)      ; &GT-K04006;
+      (=gt-pj-k1         . #x6A5B)     ; &GT-K04006; [74-59]
+      (->subsumptive
+       ((==gt-k                    . 04006)    ; &g2-GT-K04006;
+       (==gt-pj-k1         . #x6A5B)   ; &g2-GT-K04006; [74-59]
+       ))
+      ))
+    ))
+(define-char
+  '((<-denotational
      ((=>ucs@cognate     . #x5177)     ; &A-cgnU+5177;
       ))
     (ideographic-radical . 12) ; ⼋