`ideographic-radical@{ucs|gt}*sources' instead of `ideographic-';
delete `ideograph-cdp'.
))
(define-char
'((name* . "ideographic component person for top")
- (ideographic- (:radical 4 ; ⼃
- :strokes 1
- :sources (ucs))
- (:radical 1 ; ⼀
- :strokes 1
- :sources (gt))
- (:radical 9 ; ⼈
- :strokes 0))
+ (ideographic-radical@ucs . 4) ; ⼃
+ (ideographic-strokes@ucs . 1)
+ (ideographic-radical@ucs*sources
+ ucs)
+ (ideographic-radical@gt . 1) ; ⼀
+ (ideographic-strokes@gt . 1)
+ (ideographic-radical@gt*sources
+ gt)
+ (ideographic-radical@misc . 9) ; ⼈
+ (ideographic-strokes@misc . 0)
(total-strokes . 2)
- (ideograph-cdp . -63)
(=jis-x0213-2-2000 . #x2121) ;
(=gt-pj-9 . #x4D4A) ;
(=big5-cdp . #x8B4A) ;