`ideographic-radical' and `ideographic-strokes'; delete `->identical'
for GT-00008.
     (mojikyo           . 000117)       ; 
     ))
 (define-char
-  '((ideographic-radical . 4)  ; ⼃
-    (ideographic-strokes . 1)
+  '((name              . "cjk radical person for top")
+    (ideographic-      (:radical       4 ; ⼃
+                        :strokes       1)
+                       (:radical       1 ; ⼀
+                        :strokes       1)
+                       (:radical       9 ; ⼈
+                        :strokes       0))
     (total-strokes      . 2)
-    (->identical
-     ((ideograph-gt      . 00008)      ; 
-      ))
+    (ideograph-cdp     . -63)
     (japanese-jisx0213-2       . #x2121)       ; 
+    (ideograph-gt-pj-9         . #x4D4A)       ; 
+    (chinese-big5-cdp          . #x8B4A)       ; 
+    (ideograph-gt              . 00008)        ; 
+    (mojikyo                   . 070276)       ; 
     (ucs                       . #x20089)      ; 𠂉
     ))
 (define-char