+2004-02-22 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
+
+ * JC3-to-UCS.txt (JC3-81F6): Map to U+6EE8 instead of U+6EEB.
+ (JC3-82BF): Map to U+6CA7 instead of U+6CA6.
+
+2004-02-20 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
+
+ * JC3-to-UCS.txt (JC3-81F7): Map to U+5BBE instead of U+6EE8.
+
2004-02-06 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
* jp-jouyou.txt (J0-482F): Fix map.
JC3-81F2 U+5907
JC3-81F4 U+7B14
JC3-81F5 U+6807
-JC3-81F6 U+6EEB
-JC3-81F7 U+6EE8
+JC3-81F6 U+6EE8
+JC3-81F7 U+5BBE
JC3-81F8 U+629A
JC3-81F9 U+829C
JC3-81FB U+590D
JC3-82BC U+5C97
JC3-82BD U+5E2E
JC3-82BE U+6D51
-JC3-82BF U+6CA6
+JC3-82BF U+6CA7
JC3-82C0 U+6CF8
JC3-82C1 U+7B79
JC3-82C2 U+8138
+2004-02-22 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
+
+ * Ideograph-R042-Small.el (U+5C12): Use `->subsumptive'; add
+ JC3-41E1.
+
+ * Ideograph-R113-Spirit.el (U+7962): Use `->subsumptive'; add
+ JC3-5CDB.
+
+2004-02-22 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
+
+ * Ideograph-R112-Stone.el (U+78CC): Use `->subsumptive'; add
+ JC3-5CB9.
+
+ * Ideograph-R109-Eye.el (U+7784): Use `->subsumptive'; add
+ JC3-8FA2.
+
+ * Ideograph-R104-Sickness.el (U+764E): Use `->subsumptive'; add
+ JC3-5AF0.
+
+ * Ideograph-R086-Fire.el (U+70D2): Use `->subsumptive'; add
+ JC3-8EE2.
+ (U+70E7): Unify JC3-81CF.
+ (U+70ED): Unify JC3-81E9.
+ (U+70EE): Use `->subsumptive'.
+
+2004-02-20 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
+
+ * Ideograph-R075-Tree.el (U+672F): Unify JC3-81CB.
+ (U+67A6): Use `->subsumptive'; add JC3-70C9.
+ (U+67CA): Use `->subsumptive'; add JC3-70C7.
+ (U+6962): Unify JC3-70C5.
+ (U+6994): Unify JC3-70C8.
+ (U+69CC): Unify JC3-70C4.
+
+ * Ideograph-R069-Axe.el (U+65B5): Use `->subsumptive'; add
+ JC3-50E5.
+
+ * Ideograph-R064-Hand.el (U+62D0): Use `->subsumptive'; add
+ JC3-4FBA.
+
+ * Ideograph-R046-Mountain.el (U+5C72): Use `->subsumptive' to add
+ JC3-8EFA.
+
+2004-02-19 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
+
+ * Ideograph-R040-Roof.el (U+5BBE): Unify JC3-81F7.
+
+ * u03000-CJK-Symbols-and-Punctuation.el (<IDEOGRAPHIC ITERATION
+ MARK>): Unify GT-00135, GT-K00282, M-00097 and CB02728; modify
+ `script'.
+
+ * Ideograph-R003-Dot.el (GT-00135): Unify <IDEOGRAPHIC ITERATION
+ MARK>; set `Ideograph symbol' instead of `Ideograph' into
+ `script'.
+
+2004-02-18 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
+
+ * Ideograph-R064-Hand.el: Add some GT code points.
+ (U+624D): Separate GT-00010 and GT-K00176; use
+ `ideographic-{radical|strokes}' instead of `ideographic-'.
+ (U-00022A65): Use `->subsumptive'; add `<-original' for M-05844.
+ (U+39C3): Use `->subsumptive'.
+ (U+6252): Likewise.
+ (U-00022A69): Likewise.
+ (U+6256): Likewise.
+
+ * Ideograph-R003-Dot.el (C3-2740): Use
+ `<-ancient-ideograph*sources' instead of char-ref in
+ `<-ancient-ideograph'.
+
+ * Ideograph-R001-One.el (GT-00010): Separate U+624D, G0-3245 and
+ C1-445F; use `ideographic-{radical|strokes}' instead of
+ `ideographic-'; use `<-unknown' for U+624D.
+ (U+4E22): Unify C3-2263, GT-00193, GT-K02131, M-00144, H1-F56D and
+ JC3-41BA instead of using `->same-ideograph' for M-00144; use
+ `ideographic-radical@{ucs|cns}'; don't use
+ `hanyu-dazidian-{vol|page|char}'.
+ (C6-2936): Use `<-ancient-ideograph*sources' instead of char-ref
+ in `<-ancient-ideograph'.
+ (C3-2740): Likewise.
+
+ * Ideograph-R004-Slash.el (C3-2263): Unify U+4E22 and G0-362A; use
+ `ideographic-radical@{ucs|cns}'.
+
+2004-02-17 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
+
+ * ideograph-util.el (char-ideographic-strokes): Modify preferences
+ to support inheritance.
+ (update-ideograph-radical-table): Check radical of inherited
+ character.
+ (char-daikanwa): Modify preferences to support inheritance.
+ (char-ucs): Use `char-feature' instead of `get-char-attribute' to
+ refer '=>ucs'.
+
+2004-02-16 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
+
+ * char-db-util.el (char-db-insert-char-spec): Delete unused local
+ variables `al', `cal' and `key'.
+ (char-db-insert-alist): Don't use deleted local variable `cal'.
+
+2004-02-16 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
+
+ * char-db-util.el (insert-char-attributes): Check each character
+ specified in `->subsumptive' with `char-db-ignored-attributes'.
+
2004-02-16 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
* char-db-util.el (char-attribute-name<): Fixed.
(mojikyo . 000018) ;
))
(define-char
- '((morohashi-daikanwa 11769 0 1)
- (ideographic- (:radical 64 ; ⼿
- :strokes 0
- :sources (morohashi-daikanwa cns-11643 ucs))
- (:radical 1 ; ⼀
- :strokes 2
- :sources (gt)))
+ '((ideographic-radical . 1) ; ⼀
+ (ideographic-strokes . 2)
(total-strokes . 3)
- (=ucs . #x624D) ; 才
- (=gb2312 . #x3245) ;
- (=cns11643-1 . #x445F) ;
+ (<-unknown
+ ((=ucs . #x624D) ; 才
+ ))
(=gt . 00010) ;
(=gt-k . 00176) ;
(=gt-pj-9 . #x4A2B) ;
(mojikyo . 000046) ;
))
(define-char
+ '((ideographic-radical@ucs . 1) ; ⼀
+ (ideographic-radical@cns . 4) ; ⼃
+ (ideographic-strokes . 5)
+ (total-strokes . 6)
+ (hanyu-dazidian 1 386 3)
+ (ideographic-structure
+ ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+ (=ucs . #x2FF1) ; ⿱
+ )
+ ((=ucs . #x4E3F) ; 丿
+ )
+ ((=ucs . #x53BB) ; 去
+ ))
+ (=ucs . #x4E22) ; 丢
+ (=gb2312 . #x362A) ;
+ (=cns11643-3 . #x2263) ;
+ (=gt . 00193) ;
+ (=gt-k . 02131) ;
+ (=gt-pj-2 . #x3132) ;
+ (=daikanwa . 00144) ;
+ (=hanziku-1 . #xF56D) ;
+ (=jef-china3 . #x41BA) ;
+ (mojikyo . 000144) ;
+ ))
+(define-char
'((ideographic- (:radical 1 ; ⼀
:strokes 5)
(:radical 55 ; ⼶
'((ideographic-radical . 1) ; ⼀
(ideographic-strokes . 5)
(total-strokes . 6)
- (hanyu-dazidian-vol . 1)
- (hanyu-dazidian-page . 386)
- (hanyu-dazidian-char . 3)
- (->same-ideograph
- ((=daikanwa . 00144) ;
- ))
- (ideographic-structure
- ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
- (=ucs . #x2FF1) ; ⿱
- )
- ((=ucs . #x4E3F) ; 丿
- )
- ((=ucs . #x53BB) ; 去
- ))
- (=ucs . #x4E22) ; 丢
- (=gb2312 . #x362A) ;
- ))
-(define-char
- '((ideographic-radical . 1) ; ⼀
- (ideographic-strokes . 5)
- (total-strokes . 6)
(hanyu-dazidian 1 17 9)
(ideographic-structure
((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
((=daikanwa . 00104) ;
))
(<-ancient-ideograph
- (:sources (morohashi-daikanwa)
- :char ((ideographic-radical . 198) ; ⿅
- (=daikanwa . 47663) ;
- )
+ ((ideographic-radical . 198) ; ⿅
+ (=daikanwa . 47663) ;
))
+ (<-ancient-ideograph*sources
+ daikanwa)
(=cns11643-6 . #x2936) ;
(=gt . 00087) ;
(=gt-pj-2 . #x304B) ;
(=daikanwa . 00059) ;
))
(<-ancient-ideograph
- (:char ((ideographic-radical . 198) ; ⿅
- (=daikanwa . 47663) ;
- )
- :sources (morohashi-daikanwa)))
+ ((ideographic-radical . 198) ; ⿅
+ (=daikanwa . 47663) ;
+ ))
+ (<-ancient-ideograph*sources
+ daikanwa)
(hanyu-dazidian 1 24 5)
(ideographic-structure
((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
(mojikyo . 000096) ;
))
(define-char
- '((script Ideograph)
- (=>ucs . #x3005) ; 々
+ '((name . "IDEOGRAPHIC ITERATION MARK")
+ (script Ideograph symbol)
+ (general-category letter modifier) ; Informative Category
+ (bidi-category . "L")
+ (mirrored . nil)
(ideographic-radical . 3) ; ⼂
(ideographic-strokes . 2)
(total-strokes . 3)
+ (=ucs . #x3005) ; 々
+ (=jis-x0208 . #x2139) ;
+ (=gb2312 . #x2129) ;
(=gt . 00135) ;
(=gt-k . 00282) ;
(=gt-pj-2 . #x306C) ;
(=daikanwa . 00097) ;
+ (=big5-eten . #xC6E0) ;
(=cbeta . 02728) ;
(mojikyo . 000097) ;
))
(=daikanwa . 00059) ;
))
(<-ancient-ideograph
- (:char ((ideographic-radical . 198) ; ⿅
- (=daikanwa . 47663) ;
- )
- :sources (morohashi-daikanwa)))
+ ((ideographic-radical . 198) ; ⿅
+ (=daikanwa . 47663) ;
+ ))
+ (<-ancient-ideograph*sources
+ daikanwa)
(hanyu-dazidian 1 24 5)
(ideographic-structure
((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
(mojikyo . 000143) ;
))
(define-char
- '((=>ucs . #x4E22) ; 丢
- (ideographic-radical . 4) ; ⼃
+ '((ideographic-radical@ucs . 1) ; ⼀
+ (ideographic-radical@cns . 4) ; ⼃
(ideographic-strokes . 5)
(total-strokes . 6)
(hanyu-dazidian 1 386 3)
)
((=ucs . #x53BB) ; 去
))
+ (=ucs . #x4E22) ; 丢
+ (=gb2312 . #x362A) ;
(=cns11643-3 . #x2263) ;
(=gt . 00193) ;
(=gt-k . 02131) ;
(=daikanwa . 00144) ;
(=hanziku-1 . #xF56D) ;
(=jef-china3 . #x41BA) ;
- (=ucs@cns . #x4E22) ;
(mojikyo . 000144) ;
))
(define-char
(total-strokes . 10)
(=ucs . #x5BBE) ; 宾
(=gb2312 . #x3176) ;
+ (=jef-china3 . #x81F7) ;
))
(define-char
'((ideographic-radical . 40) ; ⼧
(=daikanwa . 07476) ;
))
(define-char
- '((ideographic-radical . 42) ; ⼩
+ '((=>daikanwa . 07477) ;
+ (ideographic-radical . 42) ; ⼩
(ideographic-strokes . 2)
(total-strokes . 5)
(=ucs . #x5C12) ; 尒
- (=cns11643-2 . #x2155) ;
- (=jis-x0213-1-2000 . #x4F5B) ;
- (=big5 . #xC974) ;
- (=daikanwa . 07477) ;
+ (->subsumptive
+ ((=daikanwa . 07477) ;
+ (=jef-china3 . #x41E1) ;
+ )
+ ((=cns11643-2 . #x2155) ;
+ (=jis-x0213-1-2000 . #x4F5B) ;
+ (=big5 . #xC974) ;
+ (=ucs@unicode . #x5C12) ;
+ ))
))
(define-char
'((ideographic-radical . 42) ; ⼩
(ideographic-strokes . 1)
(total-strokes . 4)
(=ucs . #x5C72) ; 屲
- (=iso-ir165 . #x2E39) ;
+ (->subsumptive
+ ((=iso-ir165 . #x2E39) ;
+ (=ucs@unicode . #x5C72) ;
+ )
+ ((=jef-china3 . #x8EFA) ;
+ ))
))
(define-char
'((ideographic-radical . 46) ; ⼭
))
(define-char
'((morohashi-daikanwa 11769 0 1)
- (ideographic- (:radical 64 ; ⼿
- :strokes 0
- :sources (morohashi-daikanwa cns-11643 ucs))
- (:radical 1 ; ⼀
- :strokes 2
- :sources (gt)))
+ (ideographic-radical . 64) ; ⼿
+ (ideographic-strokes . 0)
(total-strokes . 3)
(=ucs . #x624D) ; 才
(=gb2312 . #x3245) ;
(=cns11643-1 . #x445F) ;
- (=gt . 00010) ;
- (=gt-k . 00176) ;
- (=gt-pj-9 . #x4A2B) ;
(mojikyo . 051101) ;
))
(define-char
(=jis-x0212 . #x3F37) ;
(=cns11643-4 . #x2137) ;
(=jis-x0213-2-2000 . #x2C77) ;
+ (=gt . 14887) ;
+ (=gt-k . 00334) ;
+ (=gt-pj-3 . #x5B72) ;
(=daikanwa . 11770) ;
(=cbeta . 02854) ;
(=jef-china3 . #x4FA3) ;
(=daikanwa . 11771) ;
))
(define-char
- '((ideographic-radical . 64) ; ⼿
+ '((=>daikanwa . 11772) ;
+ (ideographic-radical . 64) ; ⼿
(ideographic-strokes . 1)
(total-strokes . 5)
- (hanyu-dazidian 3 1825 2)
+ (<-original
+ ((=daikanwa . 05844) ;
+ ))
+ (<-original*sources
+ zhengzi-tong daikanwa)
(=ucs . #x22A65) ; 𢩥
- (=cns11643-6 . #x2328) ;
- (=daikanwa . 11772) ;
- (=hanziku-5 . #xCE43) ;
+ (->subsumptive
+ ((=cns11643-6 . #x2328) ;
+ (=gt . 14896) ;
+ (=gt-pj-3 . #x5B73) ;
+ (=daikanwa . 11772) ;
+ )
+ ((hanyu-dazidian 3 1825 2)
+ (=hanziku-5 . #xCE43) ;
+ (=ucs@iso . #x22A65) ;
+ ))
))
(define-char
'((ideographic-radical . 64) ; ⼿
(hanyu-dazidian 3 1825 1)
(=ucs . #x22A66) ; 𢩦
(=cns11643-5 . #x216E) ;
+ (=gt . 14893) ;
+ (=gt-pj-3 . #x5B74) ;
(=daikanwa . 11773) ;
(=hanziku-5 . #xCE42) ;
))
(define-char
- '((=>ucs . #x39C3) ; 㧃
- (ideographic-radical . 64) ; ⼿
- (ideographic-strokes . 2)
- (total-strokes . 5)
- (=daikanwa . 11774) ;
- ))
-(define-char
- '((morohashi-daikanwa 11774 0 1)
+ '((=>daikanwa . 11774) ;
(ideographic-radical . 64) ; ⼿
(ideographic-strokes . 2)
(total-strokes . 5)
(=ucs . #x39C3) ; 㧃
- (=cns11643-4 . #x217B) ;
+ (->subsumptive
+ ((=gt . 14891) ;
+ (=gt-pj-3 . #x5B75) ;
+ (=daikanwa . 11774) ;
+ (=ucs@unicode . #x39C3) ;
+ )
+ ((=cns11643-4 . #x217B) ;
+ ))
))
(define-char
'((ideographic-radical . 64) ; ⼿
(total-strokes . 5)
(=ucs . #x624F) ; 扏
(=cns11643-3 . #x2250) ;
+ (=gt . 14892) ;
+ (=gt-pj-3 . #x5B77) ;
(=daikanwa . 11776) ;
))
(define-char
(total-strokes . 5)
(=ucs . #x39C4) ; 㧄
(=cns11643-4 . #x217A) ;
+ (=gt . 14890) ;
+ (=gt-pj-3 . #x5B78) ;
(=daikanwa . 11777) ;
))
(define-char
(=jis-x0212 . #x3F38) ;
(=cns11643-2 . #x215E) ;
(=big5 . #xC97D) ;
+ (=gt . 14906) ;
+ (=gt-pj-3 . #x5B79) ;
(=daikanwa . 11778) ;
))
(define-char
(=cns11643-1 . #x4657) ;
(=jis-x0213-2-2000 . #x2C78) ;
(=big5 . #xA5B7) ;
+ (=gt . 14903) ;
+ (=gt-pj-3 . #x5B7A) ;
(=daikanwa . 11779) ;
(=jef-china3 . #x4FA9) ;
))
(define-char
- '((=>ucs . #x6252) ; 扒
- (ideographic-radical . 64) ; ⼿
- (ideographic-strokes . 2)
- (total-strokes . 5)
- (=jis-x0212 . #x3F3A) ;
- (=jis-x0213-2-2000 . #x2C79) ;
- (=big5 . #xA5B6) ;
- (=daikanwa . 11780) ;
- (=jef-china3 . #x4FAA) ;
- (=ucs@jis . #x6252) ;
- (=ucs@big5 . #x6252) ;
- ))
-(define-char
- '((morohashi-daikanwa 11780 0 0)
+ '((=>daikanwa . 11780) ;
(ideographic-radical . 64) ; ⼿
(ideographic-strokes . 2)
(total-strokes . 5)
(=ucs . #x6252) ; 扒
- (=gb2312 . #x3047) ;
- (=cns11643-1 . #x4656) ;
+ (->subsumptive
+ ((=jis-x0212 . #x3F3A) ;
+ (=jis-x0213-2-2000 . #x2C79) ;
+ (=big5 . #xA5B6) ;
+ (=gt . 14900) ;
+ (=gt-pj-3 . #x5B7B) ;
+ (=daikanwa . 11780) ;
+ (=jef-china3 . #x4FAA) ;
+ (=ucs@jis . #x6252) ;
+ (=ucs@big5 . #x6252) ;
+ )
+ ((=cns11643-1 . #x4656) ;
+ )
+ ((=gb2312 . #x3047) ;
+ (=ucs@unicode . #x6252) ;
+ ))
))
(define-char
'((ideographic-radical . 64) ; ⼿
(=jis-x0212 . #x3F3B) ;
(=cns11643-1 . #x4655) ;
(=big5 . #xA5B5) ;
+ (=gt . 14897) ;
+ (=gt-pj-3 . #x5B7C) ;
(=daikanwa . 11782) ;
(=jef-china3 . #x80D8) ;
))
(hanyu-dazidian 3 1827 6)
(=ucs . #x22A6B) ; 𢩫
(=cns11643-5 . #x216F) ;
+ (=gt . 14898) ;
+ (=gt-pj-3 . #x5B7D) ;
(=daikanwa . 11783) ;
(=hanziku-5 . #xCEA9) ;
))
(=hanziku-5 . #xCE45) ;
))
(define-char
- '((=>ucs . #x22A69) ; 𢩩
+ '((=>daikanwa . 11786) ;
(ideographic-radical . 64) ; ⼿
(ideographic-strokes . 2)
(total-strokes . 5)
- (=daikanwa . 11786) ;
- (mojikyo . 011786) ;
- ))
-(define-char
- '((morohashi-daikanwa 11786 0 0)
- (ideographic-radical . 64) ; ⼿
- (ideographic-strokes . 2)
- (total-strokes . 5)
- (hanyu-dazidian 3 1827 4)
(=ucs . #x22A69) ; 𢩩
- (=cns11643-6 . #x232A) ;
- (=hanziku-5 . #xCEA7) ;
+ (->subsumptive
+ ((=gt . 14895) ;
+ (=gt-pj-3 . #x5C21) ;
+ (=daikanwa . 11786) ;
+ )
+ ((hanyu-dazidian 3 1827 4)
+ (=cns11643-6 . #x232A) ;
+ (=hanziku-5 . #xCEA7) ;
+ (=ucs@iso . #x22A69) ;
+ (mojikyo . 011786) ;
+ ))
))
(define-char
'((ideographic-radical . 64) ; ⼿
(total-strokes . 5)
(=ucs . #x39C5) ; 㧅
(=cns11643-3 . #x224F) ;
+ (=gt . 14904) ;
+ (=gt-pj-3 . #x5C22) ;
(=daikanwa . 11787) ;
(=cbeta . 06599) ;
))
(ideographic-strokes . 2)
(total-strokes . 5)
(=ucs . #x6256) ; 扖
- (=jis-x0212 . #x3F3C) ;
- (=jis-x0213-1-2000 . #x7465) ;
- (=daikanwa . 11788) ;
- (=jef-china3 . #x4FAB) ;
+ (->subsumptive
+ ((=jis-x0212 . #x3F3C) ;
+ (=jis-x0213-1-2000 . #x7465) ;
+ (=gt . 14901) ;
+ (=gt-pj-3 . #x5C23) ;
+ (=daikanwa . 11788) ;
+ (=jef-china3 . #x4FAB) ;
+ (=ucs@jis-1990 . #x6256) ;
+ (=ucs@jis-2000 . #x6256) ;
+ )
+ ((=ucs@unicode . #x6256) ;
+ ))
))
(define-char
'((ideographic-radical . 64) ; ⼿
(=cns11643-2 . #x2A55) ;
))
(define-char
- '((=>ucs . #x62D0) ; 拐
- (ideographic-radical . 64) ; ⼿
- (ideographic-strokes . 5)
- (total-strokes . 8)
- (shinjigen-2 . 2851)
- (=jis-x0208-1983 . #x327D) ;
- (=jis-x0208-1990 . #x327D) ;
- (=cns11643-1 . #x4D66) ;
- (=big5 . #xA9E4) ;
- (=gt . 15032) ;
- (=gt-k . 03656) ;
- (=gt-pj-1 . #x327D) ;
- (=daikanwa . 11955) ;
- (=jef-china3 . #x4FBB) ;
- (=ucs@jis . #x62D0) ;
- (=ucs@big5 . #x62D0) ;
- ))
-(define-char
- '((morohashi-daikanwa 11955 0 5)
+ '((=>daikanwa . 11955) ;
(ideographic-radical . 64) ; ⼿
(ideographic-strokes . 5)
(total-strokes . 8)
(=ucs . #x62D0) ; 拐
- (=jis-x0208-1978 . #x327D) ;
- (=gb2312 . #x3955) ;
- (=ks-x1001 . #x4E58) ;
+ (->subsumptive
+ ((shinjigen-1 . 2852)
+ (shinjigen-2 . 2851)
+ (=jis-x0208-1983 . #x327D) ;
+ (=jis-x0208-1990 . #x327D) ;
+ (=cns11643-1 . #x4D66) ;
+ (=big5 . #xA9E4) ;
+ (=gt . 15032) ;
+ (=gt-k . 03656) ;
+ (=gt-pj-1 . #x327D) ;
+ (=daikanwa . 11955) ;
+ (=jef-china3 . #x4FBB) ;
+ (=ucs@jis . #x62D0) ;
+ (=ucs@big5 . #x62D0) ;
+ )
+ ((shinjigen-1 . 2851)
+ (=jef-china3 . #x4FBA) ;
+ )
+ ((=jis-x0208-1978 . #x327D) ;
+ (=gb2312 . #x3955) ;
+ (=ks-x1001 . #x4E58) ;
+ (=ucs@unicode . #x62D0) ;
+ ))
))
(define-char
'((ideographic-radical . 64) ; ⼿
(=cns11643-4 . #x504D) ;
))
(define-char
- '((ideographic-radical . 69) ; ⽄
+ '((=>daikanwa . 13604) ;
+ (ideographic-radical . 69) ; ⽄
(ideographic-strokes . 13)
(total-strokes . 17)
(=ucs . #x65B5) ; 斵
- (=cns11643-3 . #x546B) ;
- (=jis-x0213-2-2000 . #x2D6B) ;
- (=daikanwa . 13604) ;
- (=cbeta . 00010) ;
- (mojikyo . 013604) ;
+ (->subsumptive
+ ((=jis-x0213-2-2000 . #x2D6B) ;
+ (=daikanwa . 13604) ;
+ )
+ ((=cns11643-3 . #x546B) ;
+ (=cbeta . 00010) ;
+ (=jef-china3 . #x50E5) ;
+ (=ucs@unicode . #x65B5) ;
+ (mojikyo . 013604) ;
+ ))
))
(define-char
'((ideographic-radical . 69) ; ⽄
(=gb2312 . #x4A75) ;
(=cns11643-3 . #x2252) ;
(=big5-cdp . #x8A61) ;
+ (=jef-china3 . #x81CB) ;
))
(define-char
'((=>ucs . #x672F) ; 术
(ideographic-strokes . 4)
(total-strokes . 8)
(=ucs . #x67A6) ; 枦
- (=jis-x0208-1983 . #x5B45) ;
- (=jis-x0208-1990 . #x5B45) ;
- (=gt . 18539) ;
- (=gt-pj-1 . #x5B45) ;
- (mojikyo . 055279) ;
- ))
-(define-char
- '((=>ucs . #x67A6) ; 枦
- (ideographic-radical . 75) ; ⽊
- (ideographic-strokes . 4)
- (total-strokes . 8)
- (=jis-x0208-1978 . #x5B45) ;
+ (->subsumptive
+ ((=jis-x0208-1978 . #x5B45) ;
+ )
+ ((=jis-x0208-1983 . #x5B45) ;
+ (=jis-x0208-1990 . #x5B45) ;
+ (=gt . 18539) ;
+ (=gt-pj-1 . #x5B45) ;
+ (=jef-china3 . #x70C9) ;
+ (=ucs@jis . #x67A6) ;
+ (mojikyo . 055279) ;
+ )
+ ((=ucs@unicode . #x67A6) ;
+ ))
))
(define-char
'((ideographic-radical . 75) ; ⽊
(mojikyo . 014609) ;
))
(define-char
- '((=>ucs . #x67CA) ; 柊
- (ideographic-radical . 75) ; ⽊
- (ideographic-strokes . 5)
- (total-strokes . 9)
- (=jis-x0208-1978 . #x4922) ;
- (=big5 . #xCF60) ;
- (=daikanwa . 14610) ;
- (=ucs@big5 . #x67CA) ;
- ))
-(define-char
- '((morohashi-daikanwa 14610 0 1)
+ '((=>daikanwa . 14610) ;
(ideographic-radical . 75) ; ⽊
(ideographic-strokes . 5)
(total-strokes . 9)
(=ucs . #x67CA) ; 柊
- (=jis-x0208-1983 . #x4922) ;
- (=jis-x0208-1990 . #x4922) ;
- (=cns11643-2 . #x2B42) ;
- (=gt . 18605) ;
- (=gt-pj-1 . #x4922) ;
+ (->subsumptive
+ ((=jis-x0208-1978 . #x4922) ;
+ (=big5 . #xCF60) ;
+ (=daikanwa . 14610) ;
+ (=ucs@big5 . #x67CA) ;
+ )
+ ((=jis-x0208-1983 . #x4922) ;
+ (=jis-x0208-1990 . #x4922) ;
+ (=gt . 18605) ;
+ (=gt-pj-1 . #x4922) ;
+ (=ucs@unicode . #x67CA) ;
+ )
+ ((=cns11643-2 . #x2B42) ;
+ (=jef-china3 . #x70C7) ;
+ ))
))
(define-char
'((ideographic-radical . 75) ; ⽊
(=cns11643-2 . #x4353) ;
(=gt . 19314) ;
(=gt-pj-1 . #x466A) ;
+ (=jef-china3 . #x70C5) ;
))
(define-char
'((ideographic-radical . 75) ; ⽊
(=ucs . #x6994) ; 榔
(=gb2312 . #x4046) ;
(=cns11643-1 . #x6445) ;
+ (=jef-china3 . #x70C8) ;
))
(define-char
'((=>ucs . #x3BA4) ; 㮤
(=jis-x0208-1990 . #x4448) ;
(=gt . 19365) ;
(=gt-pj-1 . #x4448) ;
+ (=jef-china3 . #x70C4) ;
))
(define-char
'((=>ucs . #x69CD) ; 槍
(=cns11643-2 . #x304F) ;
))
(define-char
- '((ideographic-radical . 86) ; ⽕
- (ideographic-strokes . 6)
- (total-strokes . 10)
- (=ucs . #x70D2) ; 烒
- (=big5 . #xD272) ;
- (=daikanwa . 19001) ;
- (mojikyo . 019001) ;
- ))
-(define-char
- '((=>ucs . #x70D2) ; 烒
- (morohashi-daikanwa 19001 0 0)
+ '((=>daikanwa . 19001) ;
(ideographic-radical . 86) ; ⽕
(ideographic-strokes . 6)
(total-strokes . 10)
- (=cns11643-2 . #x3055) ;
+ (=ucs . #x70D2) ; 烒
+ (->subsumptive
+ ((=big5 . #xD272) ;
+ (=daikanwa . 19001) ;
+ (=jef-china3 . #x8EE2) ;
+ (=ucs@unicode . #x70D2) ;
+ (mojikyo . 019001) ;
+ )
+ ((=cns11643-2 . #x3055) ;
+ ))
))
(define-char
'((ideographic-radical . 86) ; ⽕
(total-strokes . 10)
(=ucs . #x70E7) ; 烧
(=gb2312 . #x4955) ;
+ (=jef-china3 . #x81CF) ;
))
(define-char
'((ideographic-radical . 86) ; ⽕
(total-strokes . 10)
(=ucs . #x70ED) ; 热
(=gb2312 . #x4848) ;
+ (=jef-china3 . #x81E9) ;
))
(define-char
'((ideographic-radical . 86) ; ⽕
(ideographic-strokes . 6)
(total-strokes . 10)
(=ucs . #x70EE) ; 烮
- (=cns11643-3 . #x3230) ;
- (mojikyo . 059745) ;
+ (->subsumptive
+ ((=ucs@unicode . #x70EE) ;
+ (mojikyo . 059745) ;
+ )
+ ((=cns11643-3 . #x3230) ;
+ ))
))
(define-char
'((ideographic-radical . 86) ; ⽕
(ideographic-strokes . 12)
(total-strokes . 17)
(=ucs . #x764E) ; 癎
- (=ks-x1001 . #x4A56) ;
- (=cns11643-3 . #x5554) ;
+ (->subsumptive
+ ((=ks-x1001 . #x4A56) ;
+ (=jef-china3 . #x5AF0) ;
+ )
+ ((=cns11643-3 . #x5554) ;
+ (=ucs@unicode . #x764E) ;
+ ))
))
(define-char
'((ideographic-radical . 104) ; ⽧
(=daikanwa . 23553) ;
))
(define-char
- '((=>ucs . #x7784) ; 瞄
+ '((=>daikanwa . 23554) ;
(ideographic-radical . 109) ; ⽬
- (ideographic-strokes . 9)
- (total-strokes . 14)
- (=cns11643-1 . #x6972) ;
- (=daikanwa . 23554) ;
- ))
-(define-char
- '((morohashi-daikanwa 23554 0 2)
- (ideographic-radical . 109) ; ⽬
- (ideographic-strokes . 8)
- (total-strokes . 13)
(=ucs . #x7784) ; 瞄
- (=gb2312 . #x4369) ;
- (=jis-x0212 . #x4F2C) ;
- (=big5 . #xBACB) ;
+ (->subsumptive
+ ((ideographic-strokes . 9)
+ (total-strokes . 14)
+ (=cns11643-1 . #x6972) ;
+ (=daikanwa . 23554) ;
+ )
+ ((ideographic-strokes . 8)
+ (total-strokes . 13)
+ (=gb2312 . #x4369) ;
+ (=jis-x0212 . #x4F2C) ;
+ (=big5 . #xBACB) ;
+ (=jef-china3 . #x8FA2) ;
+ (=ucs@unicode . #x7784) ;
+ ))
))
(define-char
'((ideographic-radical . 109) ; ⽬
(=gb2312 . #x3468) ;
))
(define-char
- '((=>ucs . #x78CC) ; 磌
- (ideographic-radical . 112) ; ⽯
- (ideographic-strokes . 10)
- (total-strokes . 15)
- (=jis-x0212 . #x5027) ;
- (=jis-x0213-2-2000 . #x7251) ;
- (=big5 . #xE6C3) ;
- (=daikanwa . 24396) ;
- (=ucs@jis . #x78CC) ;
- ))
-(define-char
- '((morohashi-daikanwa 24396 0 5)
+ '((=>daikanwa . 24396) ;
(ideographic-radical . 112) ; ⽯
(ideographic-strokes . 10)
(total-strokes . 15)
(=ucs . #x78CC) ; 磌
- (=cns11643-2 . #x524B) ;
+ (->subsumptive
+ ((=jis-x0212 . #x5027) ;
+ (=jis-x0213-2-2000 . #x7251) ;
+ (=big5 . #xE6C3) ;
+ (=daikanwa . 24396) ;
+ (=ucs@jis . #x78CC) ;
+ )
+ ((=jef-china3 . #x5CB9) ;
+ )
+ ((=cns11643-2 . #x524B) ;
+ (=ucs@unicode . #x78CC) ;
+ ))
))
(define-char
'((=>ucs . #x78CD) ; 磍
(=ucs . #x7961) ; 祡
))
(define-char
- '((=>ucs . #x7962) ; 祢
- (ideographic-radical . 113) ; ⽰
- (ideographic-strokes . 5)
- (total-strokes . 10)
- (=daikanwa . 24679) ;
- ))
-(define-char
- '((=>ucs . #x7962) ; 祢
- (morohashi-daikanwa 24679 0 2)
- (ideographic-radical . 113) ; ⽰
- (ideographic-strokes . 5)
- (total-strokes . 10)
- (=jis-x0208 . #x472A) ;
- (=gt . 31587) ;
- (=gt-pj-1 . #x472A) ;
- (=ucs@jis . #x7962) ;
- ))
-(define-char
- '((morohashi-daikanwa 24679 0 3)
+ '((=>daikanwa . 24679) ;
(ideographic-radical . 113) ; ⽰
(ideographic-strokes . 5)
(total-strokes . 10)
(=ucs . #x7962) ; 祢
- (=gb2312 . #x6C72) ;
- (=cns11643-3 . #x3272) ;
- (=jef-china3 . #x70E4) ;
+ (->subsumptive
+ ((=daikanwa . 24679) ;
+ (=jef-china3 . #x5CDB) ;
+ )
+ ((=jis-x0208 . #x472A) ;
+ (=gt . 31587) ;
+ (=gt-pj-1 . #x472A) ;
+ (=ucs@jis . #x7962) ;
+ )
+ ((=cns11643-3 . #x3272) ;
+ (=jef-china3 . #x70E4) ;
+ )
+ ((=gb2312 . #x6C72) ;
+ (=ucs@unicode . #x7962) ;
+ ))
))
(define-char
'((ideographic-radical . 113) ; ⽰
(=daikanwa . 30177) ;
(=ucs@jis . #x81FD) ;
)
- ((=ucs@unicode . #x81FD) ;
+ ((=ucs@unicode . #x81FD) ;
))
))
(define-char
required-features)
(unless column
(setq column (current-column)))
- (let (char-spec al cal key temp-char)
+ (let (char-spec temp-char)
(setq char-spec (char-db-make-char-spec char))
(unless (or (characterp char) ; char
(condition-case nil
char-spec)))
(remove-char-attribute temp-char 'ideograph-daikanwa)
(setq char temp-char))
- ;; (setq al nil
- ;; cal nil)
- ;; (while char-spec
- ;; (setq key (car (car char-spec)))
- ;; (unless (memq key char-db-ignored-attributes)
- ;; (if (find-charset key)
- ;; (if (encode-char char key 'defined-only)
- ;; (setq cal (cons key cal)))
- ;; (setq al (cons key al))))
- ;; (setq char-spec (cdr char-spec)))
- ;; (unless cal
- ;; (setq char-spec (char-db-make-char-spec char))
- ;; (while char-spec
- ;; (setq key (car (car char-spec)))
- ;; (unless (memq key char-db-ignored-attributes)
- ;; (if (find-charset key)
- ;; (setq cal (cons key cal))
- ;; (setq al (cons key al))))
- ;; (setq char-spec (cdr char-spec)))
- ;; )
- ;; (unless (or cal
- ;; (memq 'ideographic-structure al))
- ;; (push 'ideographic-structure al))
- ;; (dolist (feature required-features)
- ;; (if (find-charset feature)
- ;; (if (encode-char char feature 'defined-only)
- ;; (setq cal (adjoin feature cal)))
- ;; (setq al (adjoin feature al))))
(insert-char-attributes char
readable
- ;; (or al 'none) cal
- (union (mapcar #'car char-spec)
- required-features)
- )
+ (union (mapcar #'car char-spec)
+ required-features))
(when temp-char
;; undefine temporary character
;; Current implementation is dirty.
(error nil)))
(progn
(setq al nil
- cal nil)
+ ;; cal nil
+ )
(while value
(setq key (car (car value)))
;; (if (find-charset key)
(progn
(setq rest cell
al nil
- cal nil)
+ ;; cal nil
+ )
(while rest
(setq key (car (car rest)))
;; (if (find-charset key)
'defined-only))
ccss))
(if separator
- (insert lbs))
+ (insert lbs))
(let ((char-db-ignored-attributes
(cons '<-subsumptive
char-db-ignored-attributes)))
;;;###autoload
(defun char-ideographic-strokes (char &optional radical preferred-domains)
(let (ret)
- (or (char-ideographic-strokes-from-domains
- char preferred-domains radical)
- (char-feature char 'ideographic-strokes)
- (char-ideographic-strokes-from-domains
- char char-db-feature-domains radical)
- (catch 'tag
+ (or (catch 'tag
(dolist (cell (get-char-attribute char 'ideographic-))
(if (and (setq ret (plist-get cell :radical))
(or (eq ret radical)
(null radical)))
(throw 'tag (plist-get cell :strokes)))))
+ (char-ideographic-strokes-from-domains
+ char preferred-domains radical)
+ (get-char-attribute char 'ideographic-strokes)
+ (char-ideographic-strokes-from-domains
+ char char-db-feature-domains radical)
+ (char-feature char 'ideographic-strokes)
(get-char-attribute char 'daikanwa-strokes)
(let ((strokes
(or (get-char-attribute char 'kangxi-strokes)
(dolist (char (cons chr
(get-char-attribute chr '->denotational)))
(when (and radical
+ (eq radical
+ (char-ideographic-radical char radical))
(or (null (setq script
(get-char-attribute char 'script)))
(memq 'Ideograph script)))
(defun char-daikanwa (char)
(or (encode-char char 'ideograph-daikanwa 'defined-only)
(encode-char char '=daikanwa-rev2 'defined-only)
+ (get-char-attribute char 'morohashi-daikanwa)
(let ((ret (char-feature char '=>daikanwa)))
(and ret
(if (or (get-char-attribute char '<-subsumptive)
(get-char-attribute char '<-denotational))
(list ret 0)
- ret)))
- (get-char-attribute char 'morohashi-daikanwa)))
+ ret)))))
;;;###autoload
(defun char-ucs (char)
(or (encode-char char '=ucs 'defined-only)
- (get-char-attribute char '=>ucs)))
+ (char-feature char '=>ucs)))
(defun char-id (char)
(logand (char-int char) #x3FFFFFFF))
))
(define-char
'((name . "IDEOGRAPHIC ITERATION MARK")
- (script Ideographic symbol)
+ (script Ideograph symbol)
(general-category letter modifier) ; Informative Category
(bidi-category . "L")
(mirrored . nil)
- (morohashi-daikanwa 97)
+ (ideographic-radical . 3) ; ⼂
+ (ideographic-strokes . 2)
+ (total-strokes . 3)
(=ucs . #x3005) ; 々
(=jis-x0208 . #x2139) ;
(=gb2312 . #x2129) ;
+ (=gt . 00135) ;
+ (=gt-k . 00282) ;
+ (=gt-pj-2 . #x306C) ;
+ (=daikanwa . 00097) ;
(=big5-eten . #xC6E0) ;
+ (=cbeta . 02728) ;
+ (mojikyo . 000097) ;
))
(define-char
'((name . "IDEOGRAPHIC CLOSING MARK")
projects / chise / xemacs-chise.git.1 / commitdiff