=>iso-ir 42
;; final ?@
graphic 0))
+ (make-charset
+ '=+>jis-x0213-1
+ "JIS X 0213 Plain 1 unified abstract glyphs (unchanged part)"
+ '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
+ dimension 2
+ chars 94
+ mother =>>jis-x0213-1
+ =>iso-ir 228
+ ;; final ?O
+ graphic 0
+ ;; partial t
+ ))
(make-charset
'=>jis-x0208
'(registry "jisx0213\\(\\.[0-9]+\\)?-1"
dimension 2
chars 94
- mother =>>jis-x0213-1
+ mother =+>jis-x0213-1
=>iso-ir 228
;; final ?O
graphic 0
mother =>>>gt))
(define-charset-alias '<=>gt '=>>gt)
(define-charset-alias '<==>gt '=>>gt)
+ (make-charset '=+>gt
+ "GT 2000 unified abstract glyphs"
+ '(long-name "Unified abstract GT glyphs"
+ chars 256
+ dimension 3
+ columns 2
+ graphic 2
+ direction l2r
+ mother =>>gt))
(make-charset '=>gt
"GT 2000 abstract characters"
'(long-name "abstract GT characters"
columns 2
graphic 2
direction l2r
- mother =>>gt))
+ mother =+>gt))
(make-charset '=gt-k
"Ideographic components of GT"
`(long-name "GT components"
=>iso-ir 177
mother =>ucs@iso))
(make-charset '=>ucs@jis
- "UCS Representative characters for JIS X0208/0212/0213"
+ "UCS representative characters for JIS X0208/0212/0213"
'(long-name "UCS characters for JIS"
chars 256
dimension 3
direction l2r
=>iso-ir 177
mother =>ucs@unicode))
- (make-charset '=+>ucs@jis
- "UCS based on Japanese usual unification"
- '(long-name "UCS unified abstract glyphs for JP"
+ (make-charset '=>ucs@ks
+ "UCS representative characters for Korean Standards"
+ '(long-name "UCS characters for KS"
chars 256
dimension 3
columns 2
graphic 2
direction l2r
=>iso-ir 177
- mother =>ucs@jis))
- (define-charset-alias '=>ucs@JP '=+>ucs@jis)
- (make-charset '=+>ucs@jis/1990
- "UCS Representative characters for JIS X0208/0212:1990"
- '(long-name "UCS characters for JIS:1990"
+ mother =>ucs@unicode))
+ (make-charset '=>ucs@cns
+ "UCS representatives characters for CNS 11643 sources"
+ '(long-name "UCS characters for CNS 11643"
chars 256
dimension 3
columns 2
graphic 2
direction l2r
=>iso-ir 177
- mother =+>ucs@jis))
- (define-charset-alias '=>ucs@jis/1990 '=+>ucs@jis/1990)
- (make-charset '=>ucs@ks
- "UCS Representative characters for Korean Standards"
- '(long-name "UCS characters for KS"
+ mother =>ucs@unicode))
+
+ (make-charset '=+>ucs@iso
+ "UCS based on ISO/IEC 10646 representative glyphs"
+ '(long-name "Unified abstract glyphs of UCS"
chars 256
dimension 3
columns 2
graphic 2
direction l2r
=>iso-ir 177
- mother =>ucs@unicode))
- (make-charset '=+>ucs@ks
- "UCS Representative unified abstract glyphs for Korean Standards"
- '(long-name "UCS unified abstract glyphs for KS"
+ mother =>ucs@iso))
+ (make-charset '=+>ucs@unicode
+ "Unicode representative unified abstract glyphs"
+ '(long-name "UCS unified abstract glyphs for Unicode"
chars 256
dimension 3
columns 2
graphic 2
direction l2r
=>iso-ir 177
- mother =>ucs@ks))
- (make-charset '=>ucs@cns
- "UCS representatives characters for CNS 11643 sources"
- '(long-name "UCS characters for CNS 11643"
+ mother =+>ucs@iso))
+ (make-charset '=+>ucs@jis
+ "UCS based on Japanese usual unification"
+ '(long-name "UCS unified abstract glyphs for JP"
chars 256
dimension 3
columns 2
graphic 2
direction l2r
=>iso-ir 177
- mother =>ucs@unicode))
-
- (make-charset '=+>ucs@iso
- "UCS based on ISO/IEC 10646 representative glyphs"
- '(long-name "Unified abstract glyphs of UCS"
+ mother =+>ucs@unicode))
+ (define-charset-alias '=>ucs@JP '=+>ucs@jis)
+ (make-charset '=+>ucs@jis/1990
+ "UCS representative characters for JIS X0208/0212:1990"
+ '(long-name "UCS characters for JIS:1990"
chars 256
dimension 3
columns 2
graphic 2
direction l2r
=>iso-ir 177
- mother =>ucs@iso))
+ mother =+>ucs@jis))
+ (define-charset-alias '=>ucs@jis/1990 '=+>ucs@jis/1990)
+ (make-charset '=+>ucs@ks
+ "UCS representative unified abstract glyphs for Korean Standards"
+ '(long-name "UCS unified abstract glyphs for KS"
+ chars 256
+ dimension 3
+ columns 2
+ graphic 2
+ direction l2r
+ =>iso-ir 177
+ mother =+>ucs@unicode))
+ (make-charset '=+>ucs@cns
+ "UCS representatives unified abstract glyphs for CNS 11643 sources"
+ '(long-name "UCS unified abstract glyphs for CNS"
+ chars 256
+ dimension 3
+ columns 2
+ graphic 2
+ direction l2r
+ =>iso-ir 177
+ mother =+>ucs@unicode))
(make-charset '=>>ucs@iso
"Representative abstract-glyphs of ISO/IEC 10646"
;; max-code #xA4CF
))
(make-charset
+ '=>ucs-bmp-cjk@unicode
+ "Unicode representative characters of CJK Unified Ideographs in BMP"
+ '(long-name "Unicode-BMP-CJK"
+ chars 256
+ dimension 2
+ columns 2
+ graphic 2
+ direction l2r
+ registry "-zh-.*-ucs-0"
+ mother =>ucs@unicode
+ min-code #x2E00
+ max-code #x9FA5
+ ;; max-code #xA4CF
+ ))
+ (make-charset
'==>ucs-bmp-cjk@bucs
"CJK Characters in BMP of BUCS"
'(long-name "BUCS-BMP-CJK"
;; max-code #xA4CF
))
(make-charset
+ '=ucs-bmp-cjk-compat
+ "CJK Compatibility Ideographs in BMP of UCS"
+ '(long-name "CJK Compatibility Ideographs"
+ chars 256
+ dimension 2
+ columns 2
+ graphic 2
+ direction l2r
+ registry "-ja-.*-ucs-0"
+ mother ucs-bmp
+ min-code #xF900
+ max-code #xFAFF
+ ))
+ (make-charset
+ '=ucs-bmp-cjk-compat@unicode
+ "CJK Compatibility Ideographs of Unicode representatives"
+ '(long-name "CJK Compatibility Ideographs of Unicode"
+ chars 256
+ dimension 2
+ columns 2
+ graphic 2
+ direction l2r
+ registry "-ja-.*-ucs-0"
+ mother =ucs@unicode
+ min-code #xF900
+ max-code #xFAFF
+ ))
+ (make-charset
'=ucs-sip-ext-b
"CJK Ideographs Extension B"
'(long-name "UCS CJK Ext-B"