(U-00024532): Use `->denotational' and `->subsumptive'.

(M-19709): Use `<-denotational' for U-00024532; unify GT-25311.
(IU-00024532): Unify GT-25312.

diff --git a/lisp/utf-2000/Ideograph-R087-Claw.el b/lisp/utf-2000/Ideograph-R087-Claw.el
index 570ece7..18671fe 100644 (file)
--- a/lisp/utf-2000/Ideograph-R087-Claw.el
+++ b/lisp/utf-2000/Ideograph-R087-Claw.el
@@ -923,19 +923,36 @@
     (=cns11643-5       . #x553F)       ; &I-C5-553F; [53-31]
     ))
 (define-char
-  '((=>ucs             . #x24532)      ; 𤔲
+  '((ideographic-radical . 87) ; ⽖
+    (ideographic-strokes . 13)
+    (total-strokes      . 17)
+    (=ucs              . #x24532)      ; 𤔲
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x24532)    ; 𤔲
+      ))
     (ideographic-radical . 87) ; ⽖
     (ideographic-strokes . 13)
     (total-strokes      . 17)
-    (=daikanwa         . 19709)        ; &M-19709;
+    (=gt               . 25311)        ; &GT-25311;
+    (=gt-pj-4          . #x6262)       ; &GT-25311; [66-66]
+    (=daikanwa         . 19709)        ; &I-M-19709;
     ))
 (define-char
-  '((morohashi-daikanwa        19709 0 2)
+  '((<-denotational
+     ((=ucs              . #x24532)    ; 𤔲
+      ))
     (ideographic-radical . 87) ; ⽖
     (ideographic-strokes . 13)
     (total-strokes      . 17)
-    (=ucs              . #x24532)      ; 𤔲
-    (=cns11643-4       . #x5665)       ; &I-C4-5665; [54-69]
+    (->subsumptive
+     ((=gt               . 25312)      ; &GT-25312;
+      (=gt-pj-9                  . #x663F)     ; &GT-25312; [70-31]
+      (=ucs@iso                  . #x24532)    ; &GT-25312;
+      )
+     ((=cns11643-4       . #x5665)     ; &C4-5665; [54-69]
+      ))
     ))
 (define-char
   '((ideographic-radical . 87) ; ⽖