Reformatted.

diff --git a/lisp/utf-2000/Ideograph-R087-Claw.el b/lisp/utf-2000/Ideograph-R087-Claw.el
index 00382e4..854b876 100644 (file)
--- a/lisp/utf-2000/Ideograph-R087-Claw.el
+++ b/lisp/utf-2000/Ideograph-R087-Claw.el
@@ -495,9 +495,9 @@
     (ideographic-radical . 87) ; ⽖
     (ideographic-strokes . 0)
     (total-strokes      . 3)
-    (=gt-k             . 00277)        ; &U-i003+722A;
-    (=gt-pj-k1         . #x5A5E)       ; &U-i003+722A; [58-62]
-    (=ucs-itaiji-003   . #x722A)       ; &U-i003+722A;
+    (=gt-k             . 00277)        ; &GT-K00277;
+    (=gt-pj-k1         . #x5A5E)       ; &GT-K00277; [58-62]
+    (=ucs-itaiji-003   . #x722A)       ; &GT-K00277;
     (->subsumptive
      ((==ucs-itaiji-003          . #x722A)     ; &g2-U-i003+722A;
       )
@@ -1675,9 +1675,9 @@
       )
      ((=ucs              . #x4E93)     ; 亓
       ))
-    (=gt-k             . 04632)        ; &U-i008+5176;
-    (=gt-pj-k1         . #x5D76)       ; &U-i008+5176; [61-86]
-    (=ucs-itaiji-008   . #x5176)       ; &U-i008+5176;
+    (=gt-k             . 04632)        ; &GT-K04632;
+    (=gt-pj-k1         . #x5D76)       ; &GT-K04632; [61-86]
+    (=ucs-itaiji-008   . #x5176)       ; &GT-K04632;
     (->subsumptive
      ((==gt-k            . 04632)      ; &g2-GT-K04632;
       (==gt-pj-k1        . #x5D76)     ; &g2-GT-K04632; [61-86]
@@ -2585,9 +2585,9 @@
       )
      ((=ucs              . #x65E7)     ; 旧
       ))
-    (=gt-k             . 05976)        ; &U-i005+8200;
-    (=gt-pj-k2         . #x3F3E)       ; &U-i005+8200; [31-30]
-    (=ucs-itaiji-005   . #x8200)       ; &U-i005+8200;
+    (=gt-k             . 05976)        ; &GT-K05976;
+    (=gt-pj-k2         . #x3F3E)       ; &GT-K05976; [31-30]
+    (=ucs-itaiji-005   . #x8200)       ; &GT-K05976;
     (<-formed@component
      ((=ucs              . #x8200)     ; 舀
       ))
@@ -2608,9 +2608,9 @@
       )
      ((=ucs              . #x65E7)     ; 旧
       ))
-    (=gt-k             . 06065)        ; &U-v001+8200;
-    (=gt-pj-k2         . #x3E7C)       ; &U-v001+8200; [30-92]
-    (=ucs-var-001      . #x8200)       ; &U-v001+8200;
+    (=gt-k             . 06065)        ; &GT-K06065;
+    (=gt-pj-k2         . #x3E7C)       ; &GT-K06065; [30-92]
+    (=ucs-var-001      . #x8200)       ; &GT-K06065;
     (<-formed@component
      ((=ucs              . #x8200)     ; 舀
       ))
@@ -2865,9 +2865,9 @@
       )
      ((=ucs              . #x233BC)    ; 𣎼
       ))
-    (=gt-k             . 07314)        ; &U-i001+244FD;
-    (=gt-pj-k1         . #x453C)       ; &U-i001+244FD; [37-28]
-    (=ucs-itaiji-001   . #x244FD)      ; &U-i001+244FD;
+    (=gt-k             . 07314)        ; &GT-K07314;
+    (=gt-pj-k1         . #x453C)       ; &GT-K07314; [37-28]
+    (=ucs-itaiji-001   . #x244FD)      ; &GT-K07314;
     (->subsumptive
      ((==gt-k            . 07314)      ; &g2-U-i001+244FD;
       (==gt-pj-k1        . #x453C)     ; &g2-U-i001+244FD; [37-28]
@@ -3076,9 +3076,9 @@
      ((=ucs@unicode      . #x7CF8)     ; &AJ1-02227;
       (=adobe-japan1-0   . 02227)      ; &AJ1-02227;
       ))
-    (=gt-k             . 07307)        ; &U-i005+24514;
-    (=gt-pj-k1         . #x6443)       ; &U-i005+24514; [68-35]
-    (=ucs-itaiji-005   . #x24514)      ; &U-i005+24514;
+    (=gt-k             . 07307)        ; &GT-K07307;
+    (=gt-pj-k1         . #x6443)       ; &GT-K07307; [68-35]
+    (=ucs-itaiji-005   . #x24514)      ; &GT-K07307;
     (->subsumptive
      ((==gt-k            . 07307)      ; &g2-U-i005+24514;
       (==gt-pj-k1        . #x6443)     ; &g2-U-i005+24514; [68-35]
@@ -3398,7 +3398,7 @@
       ))
     (=ucs-itaiji-006   . #x8200)       ; &U-i006+8200;
     (<-formed
-     ((=gt-k             . 05976)      ; &U-i005+8200;
+     ((=gt-k             . 05976)      ; &GT-K05976;
       ))
     ))
 (define-char
@@ -4172,9 +4172,9 @@
       )
      ((=gt               . 36228)      ; &GT-36228;
       ))
-    (=gt-k             . 10987)        ; &U-i001+4FDD;
-    (=gt-pj-k2         . #x3770)       ; &U-i001+4FDD; [23-80]
-    (=ucs-itaiji-001   . #x4FDD)       ; &U-i001+4FDD;
+    (=gt-k             . 10987)        ; &GT-K10987;
+    (=gt-pj-k2         . #x3770)       ; &GT-K10987; [23-80]
+    (=ucs-itaiji-001   . #x4FDD)       ; &GT-K10987;
     (->subsumptive
      ((==gt-k            . 10987)      ; &g2-U-i001+4FDD;
       (==gt-pj-k2        . #x3770)     ; &g2-U-i001+4FDD; [23-80]