=ucs-itaiji-004
=ucs-itaiji-005
=ucs-itaiji-006
+ =ucs-itaiji-007
=ucs-itaiji-009
=ucs-itaiji-084
=ucs-var-001
=daikanwa
=ruimoku-v6
=cbeta =jef-china3
+ =daikanwa/+2p
=+>ucs@iso =+>ucs@unicode
=+>ucs@jis
=+>ucs@cns
==ucs@gb
==ucs-itaiji-003
==ucs@JP/hanazono
+ ==daikanwa/+2p
=>>jis-x0208 =>>jis-x0213-1 =>>jis-x0213-2
=+>jis-x0208 =+>jis-x0213-1 =+>jis-x0213-2
=+>hanyo-denshi/jt
":denotation-of")
((eq '<-formed feature-name)
":form-of")
+ ((eq '<-same feature-name)
+ "ideo:same-as")
+ ((eq '<-simplified feature-name)
+ "ideo:simplified-form-of")
+ ((eq '<-vulgar feature-name)
+ "ideo:vulgar-form-of")
+ ((eq '<-original feature-name)
+ "ideo:original-form-of")
+ ((eq '<-ancient feature-name)
+ "ideo:ancient-form-of")
+ ((eq '<-Small-Seal feature-name)
+ "ideo:Small-Seal-of")
+ ((eq '<-interchangeable feature-name)
+ "ideo:interchangeable-form-of")
+ ((eq '->interchangeable feature-name)
+ "ideo:interchangeable")
+ ((eq '->mistakable feature-name)
+ "ideo:mistakable")
((eq 'hanyu-dazidian feature-name)
"ideo:hanyu-dazidian")
(t
))
)
((eq name 'ideographic-structure)
- (insert (isd-turtle-format-char nil nil value nil
+ (insert (isd-turtle-format-char nil nil value (/ column 4)
'isd 'without-head-char))
(insert " ;")
)