(=ucs-sip-var-008): New coded-charset for XEmacs CHISE.
[chise/xemacs-chise.git] / lisp / mule / mule-conf.el
1 ;;; mule-conf.el --- configure multilingual environment
2
3 ;; Copyright (C) 1995,1999 Electrotechnical Laboratory, JAPAN.
4 ;; Licensed to the Free Software Foundation.
5 ;; Copyright (C) 1997, 1999, 2000, 2002, 2003, 2004, 2005, 2006, 2008,
6 ;;   2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016, 2017, 2018, 2019,
7 ;;   2020, 2021, 2022, 2023 MORIOKA Tomohiko
8
9 ;; Keywords: mule, multilingual, character set, coding system
10
11 ;; This file is part of XEmacs.
12
13 ;; XEmacs is free software; you can redistribute it and/or modify
14 ;; it under the terms of the GNU General Public License as published by
15 ;; the Free Software Foundation; either version 2, or (at your option)
16 ;; any later version.
17
18 ;; XEmacs is distributed in the hope that it will be useful,
19 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
20 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
21 ;; GNU General Public License for more details.
22
23 ;; You should have received a copy of the GNU General Public License
24 ;; along with XEmacs; see the file COPYING.  If not, write to the
25 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
26 ;; Boston, MA 02111-1307, USA.
27
28 ;;; Code:
29
30 (cond
31  ((featurep 'utf-2000)
32   (make-charset
33    '=adobe-japan1-base
34    "Adobe-Japan1 Character Collection for CID-Keyed Fonts"
35    `(long-name "Adobe-Japan1"
36                chars 256
37                dimension 2
38                columns 2
39                graphic 2
40                direction l2r
41                registry "AdobeJapan1-[0-6]$"
42                min-code     #xE10000
43                max-code ,(+ #xE10000 23057)
44                code-offset  #xE10000
45                ;; min-code      ,(lsh #x6300 16)
46                ;; max-code      ,(+ (lsh #x6300 16) 23057)
47                ;; code-offset   ,(lsh #x6300 16)
48                ))
49   (make-charset
50    '=adobe-japan1-0
51    "Adobe-Japan1-0 Character Collection for CID-Keyed Fonts"
52    '(long-name "Adobe-Japan1-0"
53                chars 256
54                dimension 2
55                columns 2
56                graphic 2
57                direction l2r
58                mother =adobe-japan1-base
59                min-code 0
60                max-code 8283
61                registry "AdobeJapan1-[0-6]$"))
62   (make-charset
63    '=adobe-japan1-1
64    "Adobe-Japan1-1 Character Collection for CID-Keyed Fonts"
65    '(long-name "Adobe-Japan1-1"
66                chars 256
67                dimension 2
68                columns 2
69                graphic 2
70                direction l2r
71                mother =adobe-japan1-0
72                min-code 0
73                max-code 8358
74                registry "AdobeJapan1-[1-6]$"))
75   (make-charset
76    '=adobe-japan1-2
77    "Adobe-Japan1-2 Character Collection for CID-Keyed Fonts"
78    '(long-name "Adobe-Japan1-2"
79                chars 256
80                dimension 2
81                columns 2
82                graphic 2
83                direction l2r
84                mother =adobe-japan1-1
85                min-code 0
86                max-code 8719
87                registry "AdobeJapan1-[2-6]$"))
88   (make-charset
89    '=adobe-japan1-3
90    "Adobe-Japan1-3 Character Collection for CID-Keyed Fonts"
91    '(long-name "Adobe-Japan1-3"
92                chars 256
93                dimension 2
94                columns 2
95                graphic 2
96                direction l2r
97                mother =adobe-japan1-2
98                min-code 0
99                max-code 9353
100                registry "AdobeJapan1-[3-6]$"))
101   (make-charset
102    '=adobe-japan1-4
103    "Adobe-Japan1-4 Character Collection for CID-Keyed Fonts"
104    '(long-name "Adobe-Japan1-4"
105                chars 256
106                dimension 2
107                columns 2
108                graphic 2
109                direction l2r
110                mother =adobe-japan1-3
111                min-code 0
112                max-code 15443
113                registry "AdobeJapan1-[4-6]$"))
114   (make-charset
115    '=adobe-japan1-5
116    "Adobe-Japan1-5 Character Collection for CID-Keyed Fonts"
117    '(long-name "Adobe-Japan1-5"
118                chars 256
119                dimension 2
120                columns 2
121                graphic 2
122                direction l2r
123                mother =adobe-japan1-4
124                min-code 0
125                max-code 20316
126                registry "AdobeJapan1-[5-6]$"))
127   (make-charset
128    '=adobe-japan1-6
129    "Adobe-Japan1-6 Character Collection for CID-Keyed Fonts"
130    '(long-name "Adobe-Japan1-6"
131                chars 256
132                dimension 2
133                columns 2
134                graphic 2
135                direction l2r
136                mother =adobe-japan1-5
137                min-code 0
138                max-code 23057
139                registry "AdobeJapan1-6$"))
140   (define-charset-alias '=adobe-japan1 '=adobe-japan1-6)
141
142   (make-charset
143    '==adobe-japan1-0
144    "Adobe-Japan1-0 abstract glyph-forms."
145    '(long-name "Adobe-Japan1-0 abstract glyph-forms"
146                chars 256
147                dimension 2
148                columns 2
149                graphic 2
150                direction l2r
151                mother =adobe-japan1-0
152                registry "AdobeJapan1-0$"))
153   (make-charset
154    '==adobe-japan1-1
155    "Adobe-Japan1-1 abstract glyph-forms."
156    '(long-name "Adobe-Japan1-1 abstract glyph-forms"
157                chars 256
158                dimension 2
159                columns 2
160                graphic 2
161                direction l2r
162                mother ==adobe-japan1-0
163                registry "AdobeJapan1-1$"))
164   (make-charset
165    '==adobe-japan1-2
166    "Adobe-Japan1-2 abstract glyph-forms."
167    '(long-name "Adobe-Japan1-2 abstract glyph-forms"
168                chars 256
169                dimension 2
170                columns 2
171                graphic 2
172                direction l2r
173                mother ==adobe-japan1-1
174                registry "AdobeJapan1-2$"))
175   (make-charset
176    '==adobe-japan1-3
177    "Adobe-Japan1-3 abstract glyph-forms."
178    '(long-name "Adobe-Japan1-3 abstract glyph-forms"
179                chars 256
180                dimension 2
181                columns 2
182                graphic 2
183                direction l2r
184                mother ==adobe-japan1-2
185                registry "AdobeJapan1-3$"))
186   (make-charset
187    '==adobe-japan1-4
188    "Adobe-Japan1-4 abstract glyph-forms."
189    '(long-name "Adobe-Japan1-4 abstract glyph-forms"
190                chars 256
191                dimension 2
192                columns 2
193                graphic 2
194                direction l2r
195                mother ==adobe-japan1-3
196                registry "AdobeJapan1-4$"))
197   (make-charset
198    '==adobe-japan1-5
199    "Adobe-Japan1-5 abstract glyph-forms."
200    '(long-name "Adobe-Japan1-5 abstract glyph-forms"
201                chars 256
202                dimension 2
203                columns 2
204                graphic 2
205                direction l2r
206                mother ==adobe-japan1-4
207                registry "AdobeJapan1-5$"))
208   (make-charset
209    '==adobe-japan1-6
210    "Adobe-Japan1-6 abstract glyph-forms."
211    '(long-name "Adobe-Japan1-6 abstract glyph-forms"
212                chars 256
213                dimension 2
214                columns 2
215                graphic 2
216                direction l2r
217                mother ==adobe-japan1-5
218                registry "AdobeJapan1-6$"))
219   (define-charset-alias '==adobe-japan1 '==adobe-japan1-6)
220
221   (define-charset-alias '=>>>adobe-japan1-0 '==adobe-japan1-0)
222   (define-charset-alias '=>>>adobe-japan1-1 '==adobe-japan1-1)
223   (define-charset-alias '=>>>adobe-japan1-2 '==adobe-japan1-2)
224   (define-charset-alias '=>>>adobe-japan1-3 '==adobe-japan1-3)
225   (define-charset-alias '=>>>adobe-japan1-4 '==adobe-japan1-4)
226   (define-charset-alias '=>>>adobe-japan1-5 '==adobe-japan1-5)
227   (define-charset-alias '=>>>adobe-japan1-6 '==adobe-japan1-6)
228   (define-charset-alias '=>>>adobe-japan1 '=>>>adobe-japan1-6)
229
230   (make-charset
231    '===adobe-japan1-0
232    "Adobe-Japan1-0 detailed glyph-images."
233    '(long-name "Adobe-Japan1-0 glyph-images"
234                chars 256
235                dimension 2
236                columns 2
237                graphic 2
238                direction l2r
239                mother ==adobe-japan1-0
240                registry "AdobeJapan1-0$"))
241   (make-charset
242    '===adobe-japan1-1
243    "Adobe-Japan1-1 detailed glyph-images."
244    '(long-name "Adobe-Japan1-1 glyph-images"
245                chars 256
246                dimension 2
247                columns 2
248                graphic 2
249                direction l2r
250                mother ===adobe-japan1-0
251                registry "AdobeJapan1-1$"))
252   (make-charset
253    '===adobe-japan1-2
254    "Adobe-Japan1-2 detailed glyph-images."
255    '(long-name "Adobe-Japan1-2 glyph-images"
256                chars 256
257                dimension 2
258                columns 2
259                graphic 2
260                direction l2r
261                mother ===adobe-japan1-1
262                registry "AdobeJapan1-2$"))
263   (make-charset
264    '===adobe-japan1-3
265    "Adobe-Japan1-3 detailed glyph-images."
266    '(long-name "Adobe-Japan1-3 glyph-images"
267                chars 256
268                dimension 2
269                columns 2
270                graphic 2
271                direction l2r
272                mother ===adobe-japan1-2
273                registry "AdobeJapan1-3$"))
274   (make-charset
275    '===adobe-japan1-4
276    "Adobe-Japan1-4 detailed glyph-images."
277    '(long-name "Adobe-Japan1-4 glyph-images"
278                chars 256
279                dimension 2
280                columns 2
281                graphic 2
282                direction l2r
283                mother ===adobe-japan1-3
284                registry "AdobeJapan1-4$"))
285   (make-charset
286    '===adobe-japan1-5
287    "Adobe-Japan1-5 detailed glyph-images."
288    '(long-name "Adobe-Japan1-5 glyph-images"
289                chars 256
290                dimension 2
291                columns 2
292                graphic 2
293                direction l2r
294                mother ===adobe-japan1-4
295                registry "AdobeJapan1-5$"))
296   (make-charset
297    '===adobe-japan1-6
298    "Adobe-Japan1-6 detailed glyph-images."
299    '(long-name "Adobe-Japan1-6 glyph-images"
300                chars 256
301                dimension 2
302                columns 2
303                graphic 2
304                direction l2r
305                mother ===adobe-japan1-5
306                registry "AdobeJapan1-6$"))
307   (define-charset-alias '===adobe-japan1 '===adobe-japan1-6)
308
309   (make-charset
310    '=>>adobe-japan1-0
311    "Adobe-Japan1-0 abstract glyphs"
312    '(long-name "Adobe-Japan1-0 abstract glyphs"
313                chars 256
314                dimension 2
315                columns 2
316                graphic 2
317                direction l2r
318                mother =adobe-japan1
319                registry "AdobeJapan1-0$"))
320   (make-charset
321    '=>>adobe-japan1-1
322    "Adobe-Japan1-1 abstract glyphs"
323    '(long-name "Adobe-Japan1-1 abstract glyphs"
324                chars 256
325                dimension 2
326                columns 2
327                graphic 2
328                direction l2r
329                mother =>>adobe-japan1-0
330                registry "AdobeJapan1-1"))
331   (make-charset
332    '=>>adobe-japan1-2
333    "Adobe-Japan1-2 abstract glyphs"
334    '(long-name "Adobe-Japan1-2 abstract glyphs"
335                chars 256
336                dimension 2
337                columns 2
338                graphic 2
339                direction l2r
340                mother =>>adobe-japan1-1
341                registry "AdobeJapan1-2"))
342   (make-charset
343    '=>>adobe-japan1-3
344    "Adobe-Japan1-3 abstract glyphs"
345    '(long-name "Adobe-Japan1-3 abstract glyphs"
346                chars 256
347                dimension 2
348                columns 2
349                graphic 2
350                direction l2r
351                mother =>>adobe-japan1-2
352                registry "AdobeJapan1-3"))
353   (make-charset
354    '=>>adobe-japan1-4
355    "Adobe-Japan1-4 abstract glyphs"
356    '(long-name "Adobe-Japan1-4 abstract glyphs"
357                chars 256
358                dimension 2
359                columns 2
360                graphic 2
361                direction l2r
362                mother =>>adobe-japan1-3
363                registry "AdobeJapan1-4"))
364   (make-charset
365    '=>>adobe-japan1-5
366    "Adobe-Japan1-5 abstract glyphs"
367    '(long-name "Adobe-Japan1-5 abstract glyphs"
368                chars 256
369                dimension 2
370                columns 2
371                graphic 2
372                direction l2r
373                mother =>>adobe-japan1-4
374                registry "AdobeJapan1-5"))
375   (make-charset
376    '=>>adobe-japan1-6
377    "Adobe-Japan1-6 abstract glyphs"
378    '(long-name "Adobe-Japan1-6 abstract glyphs"
379                chars 256
380                dimension 2
381                columns 2
382                graphic 2
383                direction l2r
384                mother =>>adobe-japan1-5
385                registry "AdobeJapan1-6"))
386   (define-charset-alias '=>>adobe-japan1 '=>>adobe-japan1-6)
387
388   (make-charset
389    '=+>adobe-japan1-0
390    "Adobe-Japan1-0 unified abstract glyphs"
391    '(long-name "Adobe-Japan1-0 unified abstract glyphs"
392                chars 256
393                dimension 2
394                columns 2
395                graphic 2
396                direction l2r
397                mother =adobe-japan1
398                registry "AdobeJapan1-0$"))
399   (make-charset
400    '=+>adobe-japan1-1
401    "Adobe-Japan1-1 unified abstract glyphs"
402    '(long-name "Adobe-Japan1-1 unified abstract glyphs"
403                chars 256
404                dimension 2
405                columns 2
406                graphic 2
407                direction l2r
408                mother =+>adobe-japan1-0
409                registry "AdobeJapan1-1"))
410   (make-charset
411    '=+>adobe-japan1-2
412    "Adobe-Japan1-2 unified abstract glyphs"
413    '(long-name "Adobe-Japan1-2 unified abstract glyphs"
414                chars 256
415                dimension 2
416                columns 2
417                graphic 2
418                direction l2r
419                mother =+>adobe-japan1-1
420                registry "AdobeJapan1-2"))
421   (make-charset
422    '=+>adobe-japan1-3
423    "Adobe-Japan1-3 unified abstract glyphs"
424    '(long-name "Adobe-Japan1-3 unified abstract glyphs"
425                chars 256
426                dimension 2
427                columns 2
428                graphic 2
429                direction l2r
430                mother =+>adobe-japan1-2
431                registry "AdobeJapan1-3"))
432   (make-charset
433    '=+>adobe-japan1-4
434    "Adobe-Japan1-4 unified abstract glyphs"
435    '(long-name "Adobe-Japan1-4 unified abstract glyphs"
436                chars 256
437                dimension 2
438                columns 2
439                graphic 2
440                direction l2r
441                mother =+>adobe-japan1-3
442                registry "AdobeJapan1-4"))
443   (make-charset
444    '=+>adobe-japan1-5
445    "Adobe-Japan1-5 unified abstract glyphs"
446    '(long-name "Adobe-Japan1-5 unified abstract glyphs"
447                chars 256
448                dimension 2
449                columns 2
450                graphic 2
451                direction l2r
452                mother =+>adobe-japan1-4
453                registry "AdobeJapan1-5"))
454   (make-charset
455    '=+>adobe-japan1-6
456    "Adobe-Japan1-6 unified abstract glyphs"
457    '(long-name "Adobe-Japan1-6 unified abstract glyphs"
458                chars 256
459                dimension 2
460                columns 2
461                graphic 2
462                direction l2r
463                mother =+>adobe-japan1-5
464                registry "AdobeJapan1-6"))
465   (define-charset-alias '=+>adobe-japan1 '=+>adobe-japan1-6)
466
467   (make-charset
468    '=jis-x0208@1978
469    "JIS X 0208:1978, unchanged part."
470    '(registry "jisx0208\\.1978"
471               dimension 2
472               chars 94
473               mother =jis-x0208
474               =>iso-ir 42
475               final ?@
476               graphic 0
477               partial t))
478   (make-charset
479    '=jis-x0208@1978/-4pr
480    "JIS X 0208:1978, 1st - 3rd impressions."
481    '(registry "jisx0208\\.1978"
482               dimension 2
483               chars 94
484               mother =jis-x0208@1978
485               =>iso-ir 42
486               final ?@
487               graphic 0
488               partial t))
489   (make-charset
490    '=jis-x0208@1978/1pr
491    "JIS X 0208:1978, 1st impression."
492    '(iso-ir 42
493             registry "jisx0208\\.1978"
494             dimension 2
495             chars 94
496             mother =jis-x0208@1978/-4pr
497             final ?@
498             graphic 0))
499   (make-charset
500    '=jis-x0208@1978/1pr/fixed
501    "JIS X 0208:1978, correct glyph in the errata of 1st impression."
502    '(registry "jisx0208\\.1978"
503               dimension 2
504               chars 94
505               mother =jis-x0208@1978/1pr
506               =>iso-ir 42
507               ;; final ?@
508               graphic 0
509               partial t))
510   (make-charset
511    '=jis-x0208@1978/-4X
512    "JIS X 0208:1978, index before the 4th impression."
513    '(registry "jisx0208\\.1978"
514               dimension 2
515               chars 94
516               mother =jis-x0208@1978
517               =>iso-ir 42
518               ;; final ?@
519               graphic 0
520               partial t))
521   ;; (make-charset
522   ;;  '=jis-x0208@1978/1er-pr
523   ;;  "JIS X 0208:1978, fixed by errata [Nov 1978]."
524   ;;  '(registry "jisx0208\\.1978"
525   ;;             dimension 2
526   ;;             chars 94
527   ;;             mother =jis-x0208@1978
528   ;;             =>iso-ir 42
529   ;;             ;; final ?@
530   ;;             graphic 0
531   ;;             partial t))
532   (make-charset
533    '=jis-x0208@1978/2-pr
534    "JIS X 0208:1978, 2nd impression or later."
535    '(registry "jisx0208\\.1978"
536               dimension 2
537               chars 94
538               ;; mother =jis-x0208@1978/1er-pr
539               mother =jis-x0208@1978
540               =>iso-ir 42
541               ;; final ?@
542               graphic 0
543               partial t))
544   (make-charset
545    '=jis-x0208@1978/4er
546    "JIS X 0208:1978, replaced by errata of 4th impression."
547    '(registry "jisx0208\\.1978"
548               dimension 2
549               chars 94
550               mother =jis-x0208@1978/2-pr
551               =>iso-ir 42
552               ;; final ?@
553               graphic 0
554               partial t))
555   (make-charset
556    '=jis-x0208@1978/4-pr
557    "JIS X 0208:1978, 4th impression or later."
558    '(registry "jisx0208\\.1978"
559               dimension 2
560               chars 94
561               mother =jis-x0208@1978/2-pr
562               =>iso-ir 42
563               ;; final ?@
564               graphic 0
565               partial t))
566   (make-charset
567    '=jis-x0208@1978/5pr
568    "JIS X 0208:1978, 5th impression."
569    '(registry "jisx0208\\.1978"
570               dimension 2
571               chars 94
572               mother =jis-x0208@1978/4-pr
573               =>iso-ir 42
574               ;; final ?@
575               graphic 0
576               partial t))
577   (define-charset-alias '=jis-x0208@1978/i1 '=jis-x0208@1978/1pr)
578   (define-charset-alias '=jis-x0208@1978/i-4 '=jis-x0208@1978/-4pr)
579   (define-charset-alias '=jis-x0208@1978/i4- '=jis-x0208@1978/4-pr)
580   )
581  (t
582   (make-charset
583    '=jis-x0208@1978
584    "JIS X0208:1978 Japanese Kanji (so called \"old JIS\")."
585    '(iso-ir 42
586             registry "jisx0208\\.1978"
587             dimension 2
588             chars 94
589             mother =jis-x0208
590             final ?@
591             graphic 0))
592   ))
593
594 (define-charset-alias '=jis-x0208-1978          '=jis-x0208@1978)
595 (define-charset-alias 'japanese-jisx0208-1978   '=jis-x0208@1978)
596 (define-charset-alias 'chinese-gb2312           '=gb2312)
597 (define-charset-alias '=jis-x0208-1983          '=jis-x0208@1983)
598 (define-charset-alias 'japanese-jisx0208        '=jis-x0208@1983)
599 (define-charset-alias 'korean-ksc5601           '=ks-x1001)
600 (define-charset-alias 'japanese-jisx0212        '=jis-x0212)
601 (define-charset-alias 'chinese-cns11643-1       '=cns11643-1)
602 (define-charset-alias 'chinese-cns11643-2       '=cns11643-2)
603 (define-charset-alias 'chinese-gb12345          '=gb12345)
604 (define-charset-alias 'chinese-big5             '=big5)
605
606 ;; PinYin-ZhuYin
607 (make-charset 'sisheng "PinYin-ZhuYin"
608               '(registry "sisheng_cwnn\\|OMRON_UDC_ZH"
609                 dimension 1
610                 chars 94
611                 final ?0
612                 graphic 0
613                 ))
614
615 ;; Lao script.
616 ;; ISO10646's 0x0E80..0x0EDF are mapped to 0x20..0x7F.
617 (make-charset 'lao "Lao script"
618               '(registry "MuleLao-1"
619                 dimension 1
620                 chars 94
621                 final ?1
622                 graphic 1))
623
624 ;; IPA (International Phonetic Alphabet)
625 (make-charset 'ipa "International Phonetic Alphabet"
626               '(registry "MuleIPA"
627                 dimension 1
628                 chars 96
629                 final ?0
630                 graphic 1))
631
632 ;; Ethiopic
633 (make-charset 'ethiopic "Ethiopic"
634               '(registry "Ethio"
635                 dimension 2
636                 chars 94
637                 final ?3
638                 graphic 0
639                 ))
640
641 ;; ISO-IR-165 (CCITT Extended GB)
642 ;;    It is based on CCITT Recommendation T.101, includes GB 2312-80 +
643 ;;    GB 8565-88 table A4 + 293 characters.
644 (if (featurep 'utf-2000)
645     (progn
646       (make-charset '=iso-ir165
647                     "ISO-IR-165 (CCITT Extended GB; Chinese simplified)"
648                     '(iso-ir 165
649                              dimension 2
650                              chars 94
651                              mother =gb2312
652                              final ?E
653                              registry "isoir165"
654                              graphic 0))
655       (define-charset-alias 'chinese-isoir165 '=iso-ir165))
656   (make-charset 'chinese-isoir165
657                 "ISO-IR-165 (CCITT Extended GB; Chinese simplified)"
658                 '(iso-ir 165
659                          dimension 2
660                          chars 94
661                          final ?E
662                          registry "isoir165"
663                          graphic 0)))
664
665 ;; CNS11643 Plane3 thru Plane7
666 ;; These represent more and more obscure Chinese characters.
667 ;; By the time you get to Plane 7, we're talking about characters
668 ;; that appear once in some ancient manuscript and whose meaning
669 ;; is unknown.
670
671 (flet
672     ((make-chinese-cns11643-charset
673       (name iso-ir plane final)
674       (make-charset
675        name (concat "CNS 11643 Plane " plane " (Chinese traditional)")
676        `(iso-ir ,iso-ir
677          registry 
678          ,(concat "CNS11643[.-]\\(.*[.-]\\)?" plane "$")
679          dimension 2
680          chars 94
681          final ,final
682          graphic 0))
683       ))
684   (make-chinese-cns11643-charset '=cns11643-3 183 "3" ?I)
685   (make-chinese-cns11643-charset '=cns11643-4 184 "4" ?J)
686   (make-chinese-cns11643-charset '=cns11643-5 185 "5" ?K)
687   (make-chinese-cns11643-charset '=cns11643-6 186 "6" ?L)
688   (make-chinese-cns11643-charset '=cns11643-7 187 "7" ?M)
689   (define-charset-alias 'chinese-cns11643-3     '=cns11643-3)
690   (define-charset-alias 'chinese-cns11643-4     '=cns11643-4)
691   (define-charset-alias 'chinese-cns11643-5     '=cns11643-5)
692   (define-charset-alias 'chinese-cns11643-6     '=cns11643-6)
693   (define-charset-alias 'chinese-cns11643-7     '=cns11643-7)
694   )
695
696 ;; JIS X 0213:2000
697 (cond
698  ((featurep 'utf-2000)
699   (make-charset
700    '=jis-x0213-1
701    "JIS X 0213 Plain 1 (unchanged part)"
702    '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
703               dimension 2
704               chars 94
705               =>iso-ir 228
706               final ?O
707               graphic 0
708               partial t))
709
710   (make-charset
711    '=jis-x0213-1@2000
712    "JIS X 0213:2000 Plain 1"
713    '(iso-ir 228
714             registry "jisx0213\\(\\.2000\\)-1"
715             dimension 2
716             chars 94
717             mother =jis-x0213-1
718             final ?O
719             graphic 0))
720   (make-charset
721    '=jis-x0213-2
722    "JIS X 0213 Plain 2"
723    '(iso-ir 229
724             registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
725             dimension 2
726             chars 94
727             final ?P
728             graphic 0))
729
730   (make-charset
731    '=jis-x0213-1@2004
732    "JIS X 0213:2004 Plain 1"
733    '(iso-ir 233
734             registry "jisx0213\\.2004-1"
735             dimension 2
736             chars 94
737             mother =jis-x0213-1
738             final ?Q
739             graphic 0))
740
741   (define-charset-alias 'japanese-jisx0213-1 '=jis-x0213-1@2000)
742   (define-charset-alias 'japanese-jisx0213-2 '=jis-x0213-2)
743   (define-charset-alias '=jis-x0213-1-2000 '=jis-x0213-1@2000)
744   (define-charset-alias '=jis-x0213-2-2000 '=jis-x0213-2)
745   )
746  (t
747   (make-charset
748    'japanese-jisx0213-1
749    "JIS X 0213:2000 Plain 1"
750    '(registry "jisx0213\\(\\.2000\\)-1"
751               dimension 2
752               chars 94
753               final ?O
754               graphic 0))
755   (make-charset
756    'japanese-jisx0213-2
757    "JIS X 0213:2000 Plain 2"
758    '(registry "jisx0213\\(\\.2000\\)-2"
759               dimension 2
760               chars 94
761               final ?P
762               graphic 0))
763   ))
764
765 (when (featurep 'utf-2000)
766   (define-charset-alias 'ucs '=ucs)
767   (define-charset-alias '=jis-x0208-1990 '=jis-x0208@1990)
768   (define-charset-alias 'japanese-jisx0208-1990 '=jis-x0208@1990)
769
770   (make-charset
771    '==jis-x0208
772    "JIS X 0208 abstract glyph-forms (unchanged part)."
773    '(registry "jisx0208\\.1990"
774               dimension 2
775               chars 94
776               mother =jis-x0208
777               =>iso-ir 168
778               ;; final ?B
779               graphic 0))
780   (make-charset
781    '==jis-x0208@1978
782    "JIS X 0208:1978 abstract glyph-forms."
783    '(registry "jisx0208\\.1978"
784               dimension 2
785               chars 94
786               mother ==jis-x0208
787               =>iso-ir 42
788               ;; final ?@
789               graphic 0))
790   (make-charset
791    '==jis-x0208@1978/-4pr
792    "JIS X 0208:1978, 1st - 3rd impressions."
793    '(registry "jisx0208\\.1978"
794               dimension 2
795               chars 94
796               mother ==jis-x0208@1978
797               =>iso-ir 42
798               ;; final ?@
799               graphic 0
800               ;; partial t
801               ))
802   (make-charset
803    '==jis-x0208@1978/1pr
804    "JIS X 0208:1978, 1st impression."
805    '(registry "jisx0208\\.1978"
806               =>iso-ir 42
807               dimension 2
808               chars 94
809               mother ==jis-x0208@1978/-4pr
810               ;; final ?@
811               graphic 0))
812   (make-charset
813    '==jis-x0208@1978/1pr/fixed
814    "JIS X 0208:1978, correct glyph in the errata of 1st impression."
815    '(registry "jisx0208\\.1978"
816               dimension 2
817               chars 94
818               mother ==jis-x0208@1978/1pr
819               =>iso-ir 42
820               ;; final ?@
821               graphic 0
822               partial t))
823   (make-charset
824    '==jis-x0208@1978/-4X
825    "JIS X 0208:1978, index before the 4th impression."
826    '(registry "jisx0208\\.1978"
827               dimension 2
828               chars 94
829               mother ==jis-x0208@1978
830               =>iso-ir 42
831               ;; final ?@
832               graphic 0
833               partial t))
834   (make-charset
835    '==jis-x0208@1978/2-pr
836    "JIS X 0208:1978, 2nd impression or later."
837    '(registry "jisx0208\\.1978"
838               dimension 2
839               chars 94
840               ;; mother =jis-x0208@1978/1er-pr
841               mother ==jis-x0208@1978
842               =>iso-ir 42
843               ;; final ?@
844               graphic 0
845               ;; partial t
846               ))
847   (make-charset
848    '==jis-x0208@1978/4er
849    "JIS X 0208:1978, replaced by errata of 4th impression."
850    '(registry "jisx0208\\.1978"
851               dimension 2
852               chars 94
853               mother ==jis-x0208@1978/2-pr
854               =>iso-ir 42
855               ;; final ?@
856               graphic 0
857               partial t))
858   (make-charset
859    '==jis-x0208@1978/4-pr
860    "JIS X 0208:1978, 4th impression or later."
861    '(registry "jisx0208\\.1978"
862               dimension 2
863               chars 94
864               mother ==jis-x0208@1978/2-pr
865               =>iso-ir 42
866               ;; final ?@
867               graphic 0
868               partial t))
869   (make-charset
870    '==jis-x0208@1978/5pr
871    "JIS X 0208:1978, 5th impression."
872    '(registry "jisx0208\\.1978"
873               dimension 2
874               chars 94
875               mother ==jis-x0208@1978/4-pr
876               =>iso-ir 42
877               ;; final ?@
878               graphic 0
879               partial t))
880   (make-charset
881    '==jis-x0208@1983
882    "JIS X 0208:1983 abstract glyph-forms."
883    '(registry "jisx0208\\.1983"
884               dimension 2
885               chars 94
886               mother ==jis-x0208
887               =>iso-ir 87
888               graphic 0))
889   (make-charset
890    '==jis-x0208@1990
891    "JIS X 0208:1990 abstract glyph-forms."
892    '(registry "jisx0208\\.1990"
893               dimension 2
894               chars 94
895               mother ==jis-x0208
896               =>iso-ir 168
897               ;; final ?B
898               graphic 0))
899
900   (make-charset
901    '==jis-x0213-1
902    "JIS X 0213 Plain 1 abstract glyph-forms (unchanged part)"
903    '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
904               dimension 2
905               chars 94
906               mother =jis-x0213-1
907               =>iso-ir 228
908               ;; final ?O
909               graphic 0
910               ;; partial t
911               ))
912   (make-charset
913    '==jis-x0213-1@2000
914    "JIS X 0213:2000 Plain 1 abstract glyph-forms"
915    '(registry "jisx0213\\(\\.2000\\)-1"
916               dimension 2
917               chars 94
918               mother ==jis-x0213-1
919               =>iso-ir 228
920               ;; final ?O
921               graphic 0
922               ;; partial t
923               ))
924   (make-charset
925    '==jis-x0213-1@2004
926    "JIS X 0213:2004 Plain 1 abstract glyph-forms"
927    '(mother ==jis-x0213-1
928             =>iso-ir 233
929             registry "jisx0213\\.2004-1"
930             dimension 2
931             chars 94
932             graphic 0))
933
934   (make-charset
935    '==jis-x0213-2
936    "JIS X 0213 Plain 2 abstract glyph-forms"
937    '(mother =jis-x0213-2
938             =>iso-ir 229
939             registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
940             dimension 2
941             chars 94
942             graphic 0))
943
944   (make-charset
945    '==jis-x0212
946    "JIS X 0212 representative glyph-images."
947    '(registry "jisx0212"
948               dimension 2
949               chars 94
950               mother =jis-x0212
951               =>iso-ir 159
952               ;; final ?D
953               graphic 0))
954
955   (make-charset
956    '==gb2312
957    "GB 2312 representative glyph-images."
958    '(registry "gb2312"
959               dimension 2
960               chars 94
961               mother =gb2312
962               =>iso-ir 58
963               ;; final ?A
964               graphic 0))
965   (make-charset
966    '==iso-ir165
967    "ISO-IR-165 (CCITT Extended GB; Chinese simplified)"
968    '(registry "isoir165"
969               =>iso-ir 165
970               dimension 2
971               chars 94
972               mother =iso-ir165
973               ;; final ?E
974               graphic 0))
975   (make-charset
976    '==gb12345
977    "GB 12345 representative glyph-images."
978    '(registry "gb12345"
979               dimension 2
980               chars 94
981               mother =gb12345
982               graphic 0))
983
984   (make-charset
985    '==ks-x1001
986    "KS X 1001 representative glyph-images."
987    '(registry "ksc5601"
988               dimension 2
989               chars 94
990               mother =ks-x1001
991               =>iso-ir 149
992               ;; final ?C
993               graphic 0))
994
995   (define-charset-alias '=>>>jis-x0208      '==jis-x0208)
996   (define-charset-alias '=>>>jis-x0208@1978 '==jis-x0208@1978)
997   (define-charset-alias '=>>>jis-x0208@1983 '==jis-x0208@1983)
998   (define-charset-alias '=>>>jis-x0208@1990 '==jis-x0208@1990)
999
1000   (define-charset-alias '=>>>jis-x0213-1      '==jis-x0213-1)
1001   (define-charset-alias '=>>>jis-x0213-1@2000 '==jis-x0213-1@2000)
1002   (define-charset-alias '=>>>jis-x0213-1@2004 '==jis-x0213-1@2004)
1003   (define-charset-alias '=>>>jis-x0213-2      '==jis-x0213-2)
1004
1005   (make-charset
1006    '===jis-x0208
1007    "JIS X 0208 detailed representative glyph-images (unchanged part)."
1008    '(registry "jisx0208\\.1990"
1009               dimension 2
1010               chars 94
1011               mother ==jis-x0208
1012               =>iso-ir 168
1013               ;; final ?B
1014               graphic 0))
1015   (make-charset
1016    '===jis-x0208@1978
1017    "JIS X 0208:1978 detailed representative glyph-images."
1018    '(registry "jisx0208\\.1978"
1019               dimension 2
1020               chars 94
1021               mother ==jis-x0208@1978
1022               =>iso-ir 42
1023               ;; final ?@
1024               graphic 0))
1025   (make-charset
1026    '===jis-x0208@1983
1027    "JIS X 0208:1983 detailed representative glyph-images."
1028    '(registry "jisx0208\\.1983"
1029               dimension 2
1030               chars 94
1031               mother ==jis-x0208@1983
1032               =>iso-ir 87
1033               graphic 0))
1034   (make-charset
1035    '===jis-x0208@1990
1036    "JIS X 0208:1990 detailed representative glyph-images."
1037    '(registry "jisx0208\\.1990"
1038               dimension 2
1039               chars 94
1040               mother ==jis-x0208@1990
1041               =>iso-ir 168
1042               ;; final ?B
1043               graphic 0))
1044
1045   (make-charset
1046    '===jis-x0213-1
1047    "JIS X 0213 Plain 1 detailed representative glyph-images (unchanged part)."
1048    '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
1049               dimension 2
1050               chars 94
1051               mother ==jis-x0213-1
1052               =>iso-ir 228
1053               ;; final ?O
1054               graphic 0
1055               ;; partial t
1056               ))
1057   (make-charset
1058    '===jis-x0213-1@2000
1059    "JIS X 0213:2000 Plain 1 detailed representative glyph-images."
1060    '(registry "jisx0213\\(\\.2000\\)-1"
1061               dimension 2
1062               chars 94
1063               mother ==jis-x0213-1@2000
1064               =>iso-ir 228
1065               ;; final ?O
1066               graphic 0
1067               ;; partial t
1068               ))
1069   (make-charset
1070    '===jis-x0213-1@2004
1071    "JIS X 0213:2004 Plain 1 detailed representative glyph-images."
1072    '(mother ==jis-x0213-1@2004
1073             =>iso-ir 233
1074             registry "jisx0213\\.2004-1"
1075             dimension 2
1076             chars 94
1077             graphic 0))
1078   (make-charset
1079    '===jis-x0213-2
1080    "JIS X 0213 Plain 2 detailed representative glyph-images."
1081    '(mother ==jis-x0213-2
1082             =>iso-ir 229
1083             registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
1084             dimension 2
1085             chars 94
1086             graphic 0))
1087
1088   (make-charset
1089    '===jis-x0212
1090    "JIS X 0212 representative glyph-images."
1091    '(registry "jisx0212"
1092               dimension 2
1093               chars 94
1094               mother ==jis-x0212
1095               =>iso-ir 159
1096               ;; final ?D
1097               graphic 0))
1098
1099   (make-charset
1100    '===ks-x1001
1101    "KS X 1001 representative glyph-images."
1102    '(registry "ksc5601"
1103               dimension 2
1104               chars 94
1105               mother ==ks-x1001
1106               =>iso-ir 149
1107               ;; final ?C
1108               graphic 0))
1109
1110   (make-charset
1111    '=>>jis-x0208
1112    "JIS X 0208 abstract glyphs (unchanged part)."
1113    '(registry "jisx0208\\.1990"
1114               dimension 2
1115               chars 94
1116               mother =jis-x0208
1117               =>iso-ir 168
1118               ;; final ?B
1119               graphic 0))
1120   (make-charset
1121    '=>>jis-x0208@1978
1122    "JIS X 0208:1978 abstract glyphs."
1123    '(registry "jisx0208\\.1978"
1124               dimension 2
1125               chars 94
1126               mother =>>jis-x0208
1127               =>iso-ir 42
1128               ;; final ?@
1129               graphic 0))
1130   (make-charset
1131    '=>>jis-x0208@1983
1132    "JIS X 0208:1983 abstract glyphs."
1133    '(registry "jisx0208\\.1983"
1134               dimension 2
1135               chars 94
1136               mother =>>jis-x0208
1137               =>iso-ir 87
1138               graphic 0))
1139   (make-charset
1140    '=>>jis-x0208@1990
1141    "JIS X 0208:1990 abstract glyphs."
1142    '(registry "jisx0208\\.1990"
1143               dimension 2
1144               chars 94
1145               mother =>>jis-x0208
1146               =>iso-ir 168
1147               graphic 0))
1148
1149   (make-charset
1150    '=>>jis-x0213-1
1151    "JIS X 0213 Plain 1 abstract glyphs (unchanged part)"
1152    '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
1153               dimension 2
1154               chars 94
1155               mother =jis-x0213-1
1156               =>iso-ir 228
1157               ;; final ?O
1158               graphic 0
1159               ;; partial t
1160               ))
1161   (make-charset
1162    '=>>jis-x0213-1@2000
1163    "JIS X 0213:2000 Plain 1 abstract glyphs"
1164    '(registry "jisx0213\\(\\.2000\\)-1"
1165               dimension 2
1166               chars 94
1167               mother =>>jis-x0213-1
1168               =>iso-ir 228
1169               ;; final ?O
1170               graphic 0
1171               ;; partial t
1172               ))
1173   (make-charset
1174    '=>>jis-x0213-2
1175    "JIS X 0213 Plain 2 abstract glyphs"
1176    '(registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
1177               dimension 2
1178               chars 94
1179               mother =jis-x0213-2
1180               =>iso-ir 229
1181               ;; final ?P
1182               graphic 0))
1183   (make-charset
1184    '=>>jis-x0213-1@2004
1185    "JIS X 0213:2004 Plain 1 abstract glyphs"
1186    '(registry "jisx0213\\.2004-1"
1187               dimension 2
1188               chars 94
1189               mother =>>jis-x0213-1
1190               =>iso-ir 233
1191               ;; final ?Q
1192               graphic 0
1193               ;; partial t
1194               ))
1195
1196   (make-charset
1197    '=+>jis-x0208
1198    "JIS X 0208 based on usual unification."
1199    '(registry "jisx0208\\.1990"
1200               dimension 2
1201               chars 94
1202               mother =>>jis-x0208
1203               =>iso-ir 168
1204               ;; final ?B
1205               graphic 0))
1206   (define-charset-alias '=>jis-x0208@usual '=+>jis-x0208)
1207   (make-charset
1208    '=+>jis-x0208@1978
1209    "JIS X 0208:1978 unified abstract glyphs."
1210    '(registry "jisx0208\\.1978"
1211               dimension 2
1212               chars 94
1213               mother =+>jis-x0208
1214               =>iso-ir 42
1215               ;; final ?@
1216               graphic 0))
1217   (make-charset
1218    '=+>jis-x0208@1983
1219    "JIS X 0208:1983 unified abstract glyphs."
1220    '(registry "jisx0208\\.1983"
1221               dimension 2
1222               chars 94
1223               mother =+>jis-x0208
1224               =>iso-ir 87
1225               graphic 0))
1226   (make-charset
1227    '=+>jis-x0208@1990
1228    "JIS X 0208:1990 unified abstract glyphs."
1229    '(registry "jisx0208\\.1990"
1230               dimension 2
1231               chars 94
1232               mother =+>jis-x0208
1233               =>iso-ir 168
1234               graphic 0))
1235   (make-charset
1236    '=+>jis-x0213-1
1237    "JIS X 0213 Plain 1 unified abstract glyphs (unchanged part)"
1238    '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
1239               dimension 2
1240               chars 94
1241               mother =>>jis-x0213-1
1242               =>iso-ir 228
1243               ;; final ?O
1244               graphic 0
1245               ;; partial t
1246               ))
1247   (make-charset
1248    '=+>jis-x0213-1@2000
1249    "JIS X 0213:2000 Plain 1 unified abstract glyphs"
1250    '(registry "jisx0213\\(\\.2000\\)-1"
1251               dimension 2
1252               chars 94
1253               mother =+>jis-x0213-1
1254               =>iso-ir 228
1255               ;; final ?O
1256               graphic 0
1257               ;; partial t
1258               ))
1259   (make-charset
1260    '=+>jis-x0213-1@2004
1261    "JIS X 0213:2004 Plain 1 unified abstract glyphs"
1262    '(registry "jisx0213\\.2004-1"
1263               dimension 2
1264               chars 94
1265               mother =+>jis-x0213-1
1266               =>iso-ir 233
1267               ;; final ?Q
1268               graphic 0
1269               ;; partial t
1270               ))
1271
1272   (make-charset
1273    '=>jis-x0208
1274    "JIS X 0208 based on the unchanged unification rules."
1275    '(registry "jisx0208\\.1990"
1276               dimension 2
1277               chars 94
1278               mother =+>jis-x0208
1279               =>iso-ir 168
1280               ;; final ?B
1281               graphic 0))
1282   (define-charset-alias '<=>jis-x0208 '=>jis-x0208)
1283   (make-charset
1284    '=>jis-x0208@1997
1285    "JIS X 0208 based on the unification rule of 1997 edition."
1286    '(registry "jisx0208\\.1990"
1287               dimension 2
1288               chars 94
1289               mother =>jis-x0208
1290               =>iso-ir 168
1291               ;; final ?B
1292               graphic 0))
1293   (define-charset-alias '<=>jis-x0208@1997 '=>jis-x0208@1997)
1294   (define-charset-alias '  =jis-x0208@1997 '=>jis-x0208@1997)
1295
1296   (make-charset
1297    '=>jis-x0213-1
1298    "JIS X 0213 Plain 1 abstract characters (unchanged part)"
1299    '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
1300               dimension 2
1301               chars 94
1302               mother =+>jis-x0213-1
1303               =>iso-ir 228
1304               ;; final ?O
1305               graphic 0
1306               ;; partial t
1307               ))
1308   (define-charset-alias '<=>jis-x0213-1 '=>jis-x0213-1)
1309   (make-charset
1310    '=>jis-x0213-1@2000
1311    "JIS X 0213:2000 Plain 1 abstract characters"
1312    '(registry "jisx0213\\(\\.2000\\)-1"
1313               dimension 2
1314               chars 94
1315               mother =>jis-x0213-1
1316               =>iso-ir 228
1317               ;; final ?O
1318               graphic 0
1319               ;; partial t
1320               ))
1321   (define-charset-alias '<=>jis-x0213-1@2000 '=>jis-x0213-1@2000)
1322   (make-charset
1323    '=>jis-x0213-1@2004
1324    "JIS X 0213:2004 Plain 1 abstract characters"
1325    '(registry "jisx0213\\.2004-1"
1326               dimension 2
1327               chars 94
1328               mother =>jis-x0213-1
1329               =>iso-ir 233
1330               ;; final ?Q
1331               graphic 0
1332               ;; partial t
1333               ))
1334   (define-charset-alias '<=>jis-x0213-1@2004 '=>jis-x0213-1@2004)
1335   (make-charset
1336    '=+>jis-x0213-2
1337    "JIS X 0213 Plain 2 based on usual unification."
1338    '(registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
1339               dimension 2
1340               chars 94
1341               mother =>>jis-x0213-2
1342               =>iso-ir 229
1343               ;; final ?P
1344               graphic 0))
1345   (define-charset-alias '=>jis-x0213-2@usual '=+>jis-x0213-2)
1346   (make-charset
1347    '=>jis-x0213-2
1348    "JIS X 0213 Plain 2 abstract characters"
1349    '(registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
1350               dimension 2
1351               chars 94
1352               mother =+>jis-x0213-2
1353               =>iso-ir 229
1354               ;; final ?P
1355               graphic 0))
1356
1357   (make-charset
1358    '==cns11643-1
1359    "CNS 11643 Plane 1 representative glyph-images."
1360    '(registry "CNS11643[.-]\\(.*[.-]\\)?1$"
1361               dimension 2
1362               chars 94
1363               mother =cns11643-1
1364               =>iso-ir 171
1365               graphic 0))
1366   (make-charset
1367    '==cns11643-2
1368    "CNS 11643 Plane 2 representative glyph-images."
1369    '(registry "CNS11643[.-]\\(.*[.-]\\)?2$"
1370               dimension 2
1371               chars 94
1372               mother =cns11643-2
1373               =>iso-ir 172
1374               graphic 0))
1375   (make-charset
1376    '==cns11643-3
1377    "CNS 11643 Plane 3 representative glyph-images."
1378    '(registry "CNS11643[.-]\\(.*[.-]\\)?3$"
1379               dimension 2
1380               chars 94
1381               mother =cns11643-3
1382               =>iso-ir 183
1383               graphic 0))
1384   (make-charset
1385    '==cns11643-4
1386    "CNS 11643 Plane 4 representative glyph-images."
1387    '(registry "CNS11643[.-]\\(.*[.-]\\)?4$"
1388               dimension 2
1389               chars 94
1390               mother =cns11643-4
1391               =>iso-ir 184
1392               graphic 0))
1393   (make-charset
1394    '==cns11643-5
1395    "CNS 11643 Plane 5 representative glyph-images."
1396    '(registry "CNS11643[.-]\\(.*[.-]\\)?5$"
1397               dimension 2
1398               chars 94
1399               mother =cns11643-5
1400               =>iso-ir 185
1401               graphic 0))
1402   (make-charset
1403    '==cns11643-6
1404    "CNS 11643 Plane 6 representative glyph-images."
1405    '(registry "CNS11643[.-]\\(.*[.-]\\)?6$"
1406               dimension 2
1407               chars 94
1408               mother =cns11643-6
1409               =>iso-ir 186
1410               graphic 0))
1411   (make-charset
1412    '==cns11643-7
1413    "CNS 11643 Plane 7 representative glyph-images."
1414    '(registry "CNS11643[.-]\\(.*[.-]\\)?7$"
1415               dimension 2
1416               chars 94
1417               mother =cns11643-7
1418               =>iso-ir 187
1419               graphic 0))
1420
1421   (make-charset
1422    '===cns11643-1
1423    "CNS 11643 Plane 1 representative glyph-images."
1424    '(registry "CNS11643[.-]\\(.*[.-]\\)?1$"
1425               dimension 2
1426               chars 94
1427               mother ==cns11643-1
1428               =>iso-ir 171
1429               graphic 0))
1430   (make-charset
1431    '===cns11643-2
1432    "CNS 11643 Plane 2 representative glyph-images."
1433    '(registry "CNS11643[.-]\\(.*[.-]\\)?2$"
1434               dimension 2
1435               chars 94
1436               mother ==cns11643-2
1437               =>iso-ir 172
1438               graphic 0))
1439   (make-charset
1440    '===cns11643-3
1441    "CNS 11643 Plane 3 representative glyph-images."
1442    '(registry "CNS11643[.-]\\(.*[.-]\\)?3$"
1443               dimension 2
1444               chars 94
1445               mother ==cns11643-3
1446               =>iso-ir 183
1447               graphic 0))
1448   (make-charset
1449    '===cns11643-4
1450    "CNS 11643 Plane 4 representative glyph-images."
1451    '(registry "CNS11643[.-]\\(.*[.-]\\)?4$"
1452               dimension 2
1453               chars 94
1454               mother ==cns11643-4
1455               =>iso-ir 184
1456               graphic 0))
1457   (make-charset
1458    '===cns11643-5
1459    "CNS 11643 Plane 5 representative glyph-images."
1460    '(registry "CNS11643[.-]\\(.*[.-]\\)?5$"
1461               dimension 2
1462               chars 94
1463               mother ==cns11643-5
1464               =>iso-ir 185
1465               graphic 0))
1466   (make-charset
1467    '===cns11643-6
1468    "CNS 11643 Plane 6 representative glyph-images."
1469    '(registry "CNS11643[.-]\\(.*[.-]\\)?6$"
1470               dimension 2
1471               chars 94
1472               mother ==cns11643-6
1473               =>iso-ir 186
1474               graphic 0))
1475   (make-charset
1476    '===cns11643-7
1477    "CNS 11643 Plane 7 representative glyph-images."
1478    '(registry "CNS11643[.-]\\(.*[.-]\\)?7$"
1479               dimension 2
1480               chars 94
1481               mother ==cns11643-7
1482               =>iso-ir 187
1483               graphic 0))
1484
1485   (make-charset
1486    '=>>cns11643-1
1487    "CNS 11643 Plane 1 detailed glyphs."
1488    '(registry "CNS11643[.-]\\(.*[.-]\\)?1$"
1489               dimension 2
1490               chars 94
1491               mother =cns11643-1
1492               =>iso-ir 171
1493               graphic 0))
1494   (make-charset
1495    '=>>cns11643-2
1496    "CNS 11643 Plane 2 detailed glyphs."
1497    '(registry "CNS11643[.-]\\(.*[.-]\\)?2$"
1498               dimension 2
1499               chars 94
1500               mother =cns11643-2
1501               =>iso-ir 172
1502               graphic 0))
1503   (make-charset
1504    '=>>cns11643-3
1505    "CNS 11643 Plane 3 detailed glyphs."
1506    '(registry "CNS11643[.-]\\(.*[.-]\\)?3$"
1507               dimension 2
1508               chars 94
1509               mother =cns11643-3
1510               =>iso-ir 183
1511               graphic 0))
1512   (make-charset
1513    '=>>cns11643-4
1514    "CNS 11643 Plane 4 detailed glyphs."
1515    '(registry "CNS11643[.-]\\(.*[.-]\\)?4$"
1516               dimension 2
1517               chars 94
1518               mother =cns11643-4
1519               =>iso-ir 184
1520               graphic 0))
1521   (make-charset
1522    '=>>cns11643-6
1523    "CNS 11643 Plane 6 detailed glyphs."
1524    '(registry "CNS11643[.-]\\(.*[.-]\\)?6$"
1525               dimension 2
1526               chars 94
1527               mother =cns11643-6
1528               =>iso-ir 186
1529               graphic 0))
1530
1531   (make-charset
1532    '=>cns11643-1
1533    "CNS 11643 Plane 1 abstract characters."
1534    '(registry "CNS11643[.-]\\(.*[.-]\\)?1$"
1535               dimension 2
1536               chars 94
1537               mother =cns11643-1
1538               =>iso-ir 171
1539               graphic 0))
1540   (make-charset
1541    '=>cns11643-2
1542    "CNS 11643 Plane 2 abstract characters."
1543    '(registry "CNS11643[.-]\\(.*[.-]\\)?2$"
1544               dimension 2
1545               chars 94
1546               mother =cns11643-2
1547               =>iso-ir 172
1548               graphic 0))
1549   (make-charset
1550    '=>cns11643-4
1551    "CNS 11643 Plane 4 abstract characters."
1552    '(registry "CNS11643[.-]\\(.*[.-]\\)?4$"
1553               dimension 2
1554               chars 94
1555               mother =cns11643-4
1556               =>iso-ir 184
1557               graphic 0))
1558   (make-charset
1559    '=>cns11643-5
1560    "CNS 11643 Plane 5 abstract characters."
1561    '(registry "CNS11643[.-]\\(.*[.-]\\)?5$"
1562               dimension 2
1563               chars 94
1564               mother =cns11643-5
1565               =>iso-ir 185
1566               graphic 0))
1567   (make-charset
1568    '=>cns11643-6
1569    "CNS 11643 Plane 6 abstract characters."
1570    '(registry "CNS11643[.-]\\(.*[.-]\\)?6$"
1571               dimension 2
1572               chars 94
1573               mother =cns11643-6
1574               =>iso-ir 186
1575               graphic 0))
1576   (make-charset
1577    '=>cns11643-7
1578    "CNS 11643 Plane 7 abstract characters."
1579    '(registry "CNS11643[.-]\\(.*[.-]\\)?7$"
1580               dimension 2
1581               chars 94
1582               mother =cns11643-7
1583               =>iso-ir 187
1584               graphic 0))
1585
1586   (make-charset '=big5-eten
1587                 "Big5 ETEN"
1588                 '(long-name     "Big5-ETEN"
1589                   chars         256
1590                   dimension     2
1591                   columns       2
1592                   graphic       2
1593                   direction     l2r
1594                   mother        chinese-big5
1595                   min-code      #x8140
1596                   max-code      #xFEFE
1597                   registry      "Big5\\.ETEN"))
1598   (define-charset-alias 'chinese-big5-eten '=big5-eten)
1599   (make-charset 'chinese-big5-eten-a
1600                 "Big5 ETEN (#xF9D6 .. #xF9FE)"
1601                 '(long-name     "Big5-ETEN-a"
1602                   chars         256
1603                   dimension     2
1604                   columns       2
1605                   graphic       2
1606                   direction     l2r
1607                   mother        chinese-big5
1608                   min-code      #xF9D6
1609                   max-code      #xF9FE
1610                   registry      "Big5\\.ETEN"))
1611   (make-charset 'chinese-big5-eten-b
1612                 "Big5 ETEN (#xC6A1 .. #xC8FE)"
1613                 '(long-name     "Big5-ETEN-b"
1614                   chars         256
1615                   dimension     2
1616                   columns       2
1617                   graphic       2
1618                   direction     l2r
1619                   mother        chinese-big5
1620                   min-code      #xC6A1
1621                   max-code      #xC8FE
1622                   registry      "Big5\\.ETEN"))
1623
1624   (make-charset '=big5-cdp
1625                 "Big5 with CDP extension"
1626                 '(long-name     "Big5-CDP"
1627                   chars         256
1628                   dimension     2
1629                   columns       2
1630                   graphic       2
1631                   direction     l2r
1632                   registry      "big5\\.cdp-0"
1633                   mother        chinese-big5
1634                   min-code      #x8140
1635                   max-code      #x8DFE))
1636   (define-charset-alias 'chinese-big5-cdp '=big5-cdp)
1637
1638   (make-charset '==big5-cdp
1639                 "Abstract glyph-images of Big5-CDP"
1640                 '(long-name     "Big5-CDP glyph-forms"
1641                   chars         256
1642                   dimension     2
1643                   columns       2
1644                   graphic       2
1645                   direction     l2r
1646                   registry      "big5\\.cdp-0"
1647                   mother        =big5-cdp))
1648   (make-charset '===big5-cdp
1649                 "Representative glyph-images of Big5-CDP"
1650                 '(long-name     "Big5-CDP glyph-images"
1651                   chars         256
1652                   dimension     2
1653                   columns       2
1654                   graphic       2
1655                   direction     l2r
1656                   registry      "big5\\.cdp-0"
1657                   mother        ==big5-cdp))
1658
1659   (make-charset '=>>big5-cdp
1660                 "Abstract glyphs of Big5-CDP"
1661                 '(long-name     "Big5-CDP glyphs"
1662                   chars         256
1663                   dimension     2
1664                   columns       2
1665                   graphic       2
1666                   direction     l2r
1667                   registry      "big5\\.cdp-0"
1668                   mother        =big5-cdp))
1669
1670   (make-charset '=+>big5-cdp
1671                 "Big5-CDP unified glyphs"
1672                 '(long-name     "Big5-CDP unified glyphs"
1673                   chars         256
1674                   dimension     2
1675                   columns       2
1676                   graphic       2
1677                   direction     l2r
1678                   registry      "big5\\.cdp-0"
1679                   mother        =big5-cdp))
1680
1681   (make-charset '=>big5-cdp
1682                 "Big5-CDP abstract characters"
1683                 '(long-name     "Big5-CDP abstract characters"
1684                   chars         256
1685                   dimension     2
1686                   columns       2
1687                   graphic       2
1688                   direction     l2r
1689                   registry      "big5\\.cdp-0"
1690                   mother        =big5-cdp))
1691
1692   (make-charset '=>big5-cdp@iwds-1
1693                 "Big5-CDP abstract characters based on IWDS-1"
1694                 '(long-name     "Big5-CDP IWDS-1 abstract characters"
1695                   chars         256
1696                   dimension     2
1697                   columns       2
1698                   graphic       2
1699                   direction     l2r
1700                   registry      "big5\\.cdp-0"
1701                   mother        =>big5-cdp))
1702
1703   (make-charset '=>big5-cdp@component
1704                 "Big5-CDP abstract components"
1705                 '(long-name     "Big5-CDP abstract components"
1706                   chars         256
1707                   dimension     2
1708                   columns       2
1709                   graphic       2
1710                   direction     l2r
1711                   registry      "big5\\.cdp-0"
1712                   mother        =>big5-cdp))
1713
1714   (make-charset '=>big5-cdp@cognate
1715                 "Big5-CDP abstract components based on cognate"
1716                 '(long-name     "Big5-CDP abstract cognate components"
1717                   chars         256
1718                   dimension     2
1719                   columns       2
1720                   graphic       2
1721                   direction     l2r
1722                   registry      "big5\\.cdp-0"
1723                   mother        =>big5-cdp))
1724
1725   (make-charset
1726    '=mj
1727    "Moji-Jouhou-Kiban characters"
1728    `(long-name "Moji-Jouhou-Kiban"
1729                chars 256
1730                dimension 3
1731                columns 2
1732                graphic 2
1733                direction l2r
1734                ;; registry "mj-0$"
1735                min-code     #xE30000
1736                max-code ,(+ #xE30000 68053)
1737                code-offset  #xE30000
1738                ;; min-code            ,(lsh #x6404 16)
1739                ;; max-code         ,(+ (lsh #x6404 16) 68053)
1740                ;; code-offset    ,(lsh #x6404 16)
1741                ))
1742   (make-charset
1743    '=mj-0
1744    "Moji-Jouhou-Kiban plane 0"
1745    '(long-name "Moji-Jouhou-Kiban-0"
1746                chars 256
1747                dimension 2
1748                columns 2
1749                graphic 2
1750                direction l2r
1751                registry "mj-0$"
1752                mother =mj
1753                min-code 0
1754                max-code #xFFFF))
1755   (make-charset
1756    '=mj-1
1757    "Moji-Jouhou-Kiban plane 1"
1758    '(long-name "Moji-Jouhou-Kiban-1"
1759                chars 256
1760                dimension 2
1761                columns 2
1762                graphic 2
1763                direction l2r
1764                registry "mj-1$"
1765                mother =mj
1766                min-code #x10000
1767                code-offset #x10000))
1768   (make-charset
1769    '=>mj
1770    "Moji-Jouhou-Kiban abstract characters"
1771    `(long-name "Moji-Jouhou-Kiban"
1772                chars 256
1773                dimension 3
1774                columns 2
1775                graphic 2
1776                direction l2r
1777                mother =mj
1778                ))
1779   (make-charset
1780    '=>mj-0
1781    "Moji-Jouhou-Kiban plane 0"
1782    '(long-name "Moji-Jouhou-Kiban-0"
1783                chars 256
1784                dimension 2
1785                columns 2
1786                graphic 2
1787                direction l2r
1788                registry "mj-0$"
1789                mother =>mj
1790                min-code 0
1791                max-code #xFFFF))
1792
1793   (make-charset
1794    '=hanyo-denshi/ja
1795    "JA (JIS X0208) part of Han'you-Denshi characters"
1796    `(long-name "Han'you-Denshi/JA"
1797                chars 94
1798                dimension 2
1799                columns 2
1800                graphic 2
1801                direction l2r
1802                registry "HanyoDenshi\\.JA-0$"
1803                min-code ,(lsh #x6400 16)
1804                max-code ,(+ (lsh #x6400 16) (1- (* 94 94)))
1805                code-offset ,(lsh #x6400 16)))
1806   (make-charset
1807    '=hanyo-denshi/jb
1808    "JB (JIS X0212) part of Han'you-Denshi characters"
1809    `(long-name "Han'you-Denshi/JB"
1810                chars 94
1811                dimension 2
1812                columns 2
1813                graphic 2
1814                direction l2r
1815                registry "HanyoDenshi\\.JB-0$"
1816                min-code    ,(+ (lsh #x6400 16) (* 94 94))
1817                max-code    ,(+ (lsh #x6400 16) (1- (* 94 94 2)))
1818                code-offset ,(+ (lsh #x6400 16) (* 94 94))))
1819   (make-charset
1820    '=hanyo-denshi/jc
1821    "JC (JIS X0213:2000 Plane 1) part of Han'you-Denshi characters"
1822    `(long-name "Han'you-Denshi/JC"
1823                chars 94
1824                dimension 2
1825                columns 2
1826                graphic 2
1827                direction l2r
1828                registry "HanyoDenshi\\.JC-0$"
1829                min-code    ,(+ (lsh #x6400 16) (* 94 94 2))
1830                max-code    ,(+ (lsh #x6400 16) (1- (* 94 94 3)))
1831                code-offset ,(+ (lsh #x6400 16) (* 94 94 2))))
1832   (make-charset
1833    '=hanyo-denshi/jd
1834    "JD (JIS X0213:2000 Plane 1) part of Han'you-Denshi characters"
1835    `(long-name "Han'you-Denshi/JD"
1836                chars 94
1837                dimension 2
1838                columns 2
1839                graphic 2
1840                direction l2r
1841                registry "HanyoDenshi\\.JD-0$"
1842                min-code    ,(+ (lsh #x6400 16) (* 94 94 3))
1843                max-code    ,(+ (lsh #x6400 16) (1- (* 94 94 4)))
1844                code-offset ,(+ (lsh #x6400 16) (* 94 94 3))))
1845   (make-charset
1846    '=hanyo-denshi/ft
1847    "FT (FDPC additional) part of Han'you-Denshi characters"
1848    `(long-name "Han'you-Denshi/FT"
1849                chars 94
1850                dimension 2
1851                columns 2
1852                graphic 2
1853                direction l2r
1854                registry "HanyoDenshi\\.FT-0$"
1855                min-code    ,(+ (lsh #x6400 16) (* 94 94 4))
1856                max-code    ,(+ (lsh #x6400 16) (1- (* 94 94 5)))
1857                code-offset ,(+ (lsh #x6400 16) (* 94 94 4))))
1858   (make-charset
1859    '=hanyo-denshi/ia
1860    "IA part of Han'you-Denshi characters"
1861    `(long-name "Han'you-Denshi/IA"
1862                chars 94
1863                dimension 2
1864                columns 2
1865                graphic 2
1866                direction l2r
1867                registry "HanyoDenshi\\.IA-0$"
1868                min-code    ,(+ (lsh #x6400 16) (* 94 94 5))
1869                max-code    ,(+ (lsh #x6400 16) (1- (* 94 94 6)))
1870                code-offset ,(+ (lsh #x6400 16) (* 94 94 5))))
1871   (make-charset
1872    '=hanyo-denshi/ib
1873    "IB part of Han'you-Denshi characters"
1874    `(long-name "Han'you-Denshi/IB"
1875                chars 94
1876                dimension 2
1877                columns 2
1878                graphic 2
1879                direction l2r
1880                registry "HanyoDenshi\\.IB-0$"
1881                min-code    ,(+ (lsh #x6400 16) (* 94 94 6))
1882                max-code    ,(+ (lsh #x6400 16) (1- (* 94 94 7)))
1883                code-offset ,(+ (lsh #x6400 16) (* 94 94 6))))
1884   (make-charset
1885    '=hanyo-denshi/hg
1886    "HG (HyouGai Kanji) part of Han'you-Denshi characters"
1887    `(long-name "Han'you-Denshi/HG"
1888                chars 94
1889                dimension 2
1890                columns 2
1891                graphic 2
1892                direction l2r
1893                registry "HanyoDenshi\\.HG-0$"
1894                min-code    ,(+ (lsh #x6400 16) (* 94 94 7))
1895                max-code    ,(+ (lsh #x6400 16) (1- (* 94 94 8)))
1896                code-offset ,(+ (lsh #x6400 16) (* 94 94 7))))
1897   (make-charset
1898    '=hanyo-denshi/ip
1899    "IP (for IPA) part of Han'you-Denshi characters"
1900    `(long-name "Han'you-Denshi/IP"
1901                chars 256
1902                dimension 2
1903                columns 2
1904                graphic 2
1905                direction l2r
1906                registry "HanyoDenshi\\.IP-0$"
1907                min-code    ,(+ (lsh #x6402 16) #x4E00)
1908                max-code    ,(+ (lsh #x6402 16) #x9FFF)
1909                code-offset ,(+ (lsh #x6402 16))))
1910   (make-charset
1911    '=hanyo-denshi/jt
1912    "JT (Juuki Touitsu Moji) part of Han'you-Denshi characters"
1913    `(long-name "Han'you-Denshi/JT"
1914                chars 256
1915                dimension 2
1916                columns 2
1917                graphic 2
1918                direction l2r
1919                registry "HanyoDenshi\\.JT-0$"
1920                min-code    ,(+ (lsh #x6402 16) #xAC00)
1921                max-code    ,(+ (lsh #x6402 16) #xD7AF)
1922                code-offset ,(+ (lsh #x6402 16))))
1923   (make-charset
1924    '=hanyo-denshi/ks
1925    "KS (KoSeki) part of Han'you-Denshi characters"
1926    `(long-name "Han'you-Denshi/KS"
1927                chars 256
1928                dimension 3
1929                columns 2
1930                graphic 2
1931                direction l2r))
1932   (make-charset
1933    '=hanyo-denshi/tk
1934    "TK (TouKi) part of Han'you-Denshi characters"
1935    `(long-name "Han'you-Denshi/TK"
1936                chars 256
1937                dimension 3
1938                columns 2
1939                graphic 2
1940                direction l2r))
1941
1942   (make-charset
1943    '=>hanyo-denshi/tk
1944    "TK (TouKi) part of Han'you-Denshi abstract characters"
1945    `(long-name "Han'you-Denshi/TK"
1946                chars 256
1947                dimension 3
1948                columns 2
1949                graphic 2
1950                direction l2r
1951                mother =hanyo-denshi/tk))
1952
1953   (make-charset
1954    '==mj
1955    "Moji-Jouhou-Kiban detailed glyph-images."
1956    '(long-name "MJ glyph-images"
1957                chars 256
1958                dimension 2
1959                columns 2
1960                graphic 2
1961                direction l2r
1962                mother =mj))
1963   (make-charset
1964    '==mj-0
1965    "MJ detailed glyph-images plane 0"
1966    '(long-name "MJ glyph-images-0"
1967                chars 256
1968                dimension 2
1969                columns 2
1970                graphic 2
1971                direction l2r
1972                registry "mj-0$"
1973                mother ==mj
1974                min-code 0
1975                max-code #xFFFF))
1976   (make-charset
1977    '==mj-1
1978    "MJ detailed glyph-images plane 1"
1979    '(long-name "MJ glyph-images-1"
1980                chars 256
1981                dimension 2
1982                columns 2
1983                graphic 2
1984                direction l2r
1985                registry "mj-1$"
1986                mother ==mj
1987                min-code #x10000
1988                code-offset #x10000))
1989
1990   (make-charset
1991    '==hanyo-denshi/ja
1992    "Han'you-Denshi/JA abstract glyph-forms."
1993    '(long-name "Han'you-Denshi/JA glyph-forms"
1994                chars 94
1995                dimension 2
1996                columns 2
1997                graphic 2
1998                direction l2r
1999                registry "HanyoDenshi\\.JA-0$"
2000                mother =hanyo-denshi/ja))
2001   (make-charset
2002    '==hanyo-denshi/jb
2003    "Han'you-Denshi/JB abstract glyph-forms."
2004    '(long-name "Han'you-Denshi/JB glyph-forms"
2005                chars 94
2006                dimension 2
2007                columns 2
2008                graphic 2
2009                direction l2r
2010                registry "HanyoDenshi\\.JB-0$"
2011                mother =hanyo-denshi/jb))
2012   (make-charset
2013    '==hanyo-denshi/jc
2014    "Han'you-Denshi/JC abstract glyph-forms."
2015    '(long-name "Han'you-Denshi/JC glyph-forms"
2016                chars 94
2017                dimension 2
2018                columns 2
2019                graphic 2
2020                direction l2r
2021                registry "HanyoDenshi\\.JC-0$"
2022                mother =hanyo-denshi/jc))
2023   (make-charset
2024    '==hanyo-denshi/jd
2025    "Han'you-Denshi/JD abstract glyph-forms."
2026    '(long-name "Han'you-Denshi/JD glyph-forms"
2027                chars 94
2028                dimension 2
2029                columns 2
2030                graphic 2
2031                direction l2r
2032                registry "HanyoDenshi\\.JD-0$"
2033                mother =hanyo-denshi/jd))
2034   (make-charset
2035    '==hanyo-denshi/ft
2036    "Han'you-Denshi/FT abstract glyph-forms."
2037    '(long-name "Han'you-Denshi/FT glyph-forms"
2038                chars 94
2039                dimension 2
2040                columns 2
2041                graphic 2
2042                direction l2r
2043                registry "HanyoDenshi\\.FT-0$"
2044                mother =hanyo-denshi/ft))
2045   (make-charset
2046    '==hanyo-denshi/ia
2047    "Han'you-Denshi/IA abstract glyph-forms."
2048    '(long-name "Han'you-Denshi/IA glyph-images"
2049                chars 94
2050                dimension 2
2051                columns 2
2052                graphic 2
2053                direction l2r
2054                registry "HanyoDenshi\\.IA-0$"
2055                mother =hanyo-denshi/ia))
2056   (make-charset
2057    '==hanyo-denshi/ib
2058    "Han'you-Denshi/IB abstract glyph-forms."
2059    '(long-name "Han'you-Denshi/IB glyph-forms"
2060                chars 94
2061                dimension 2
2062                columns 2
2063                graphic 2
2064                direction l2r
2065                registry "HanyoDenshi\\.IB-0$"
2066                mother =hanyo-denshi/ib))
2067   (make-charset
2068    '==hanyo-denshi/hg
2069    "Han'you-Denshi/HG abstract glyph-forms."
2070    '(long-name "Han'you-Denshi/HG glyph-forms"
2071                chars 94
2072                dimension 2
2073                columns 2
2074                graphic 2
2075                direction l2r
2076                registry "HanyoDenshi\\.HG-0$"
2077                mother =hanyo-denshi/hg))
2078   (make-charset
2079    '==hanyo-denshi/ip
2080    "Han'you-Denshi/IP abstract glyph-forms."
2081    '(long-name "Han'you-Denshi/IP glyph-images"
2082                chars 256
2083                dimension 2
2084                columns 2
2085                graphic 2
2086                direction l2r
2087                registry "HanyoDenshi\\.IP-0$"
2088                mother =hanyo-denshi/ip))
2089   (make-charset
2090    '==hanyo-denshi/jt
2091    "JT (Juuki Touitsu Moji) abstract glyph-forms."
2092    '(long-name "Han'you-Denshi/JT glyph-forms"
2093                chars 256
2094                dimension 2
2095                columns 2
2096                graphic 2
2097                direction l2r
2098                registry "HanyoDenshi\\.JT-0$"
2099                mother =hanyo-denshi/jt))
2100   (make-charset
2101    '==hanyo-denshi/ks
2102    "KoSeki-touitsu-moji abstract glyph-forms."
2103    '(long-name "Han'you-Denshi/KS glyph-forms"
2104                chars 256
2105                dimension 3
2106                columns 2
2107                graphic 2
2108                direction l2r
2109                mother =hanyo-denshi/ks))
2110   (make-charset
2111    '==hanyo-denshi/tk
2112    "TK (TouKi) part of Han'you-Denshi abstract glyph-forms."
2113    `(long-name "Han'you-Denshi/TK glyph-forms"
2114                chars 256
2115                dimension 3
2116                columns 2
2117                graphic 2
2118                direction l2r
2119                mother =hanyo-denshi/tk))
2120
2121   (make-charset
2122    '=koseki
2123    "Abstract glyph-forms of KoSeki-touitsu-moji."
2124    '(long-name "KoSeki-touitsu-moji glyph-forms"
2125                chars 256
2126                dimension 3
2127                columns 2
2128                graphic 2
2129                direction l2r
2130                mother =hanyo-denshi/ks))
2131   (make-charset
2132    '==koseki
2133    "Representative glyph-images of KoSeki-touitsu-moji."
2134    '(long-name "KoSeki-touitsu-moji glyph-images"
2135                chars 256
2136                dimension 3
2137                columns 2
2138                graphic 2
2139                direction l2r
2140                mother =koseki))
2141
2142   (define-charset-alias '=>>>hanyo-denshi/ja '==hanyo-denshi/ja)
2143   (define-charset-alias '=>>>hanyo-denshi/jb '==hanyo-denshi/jb)
2144   (define-charset-alias '=>>>hanyo-denshi/jc '==hanyo-denshi/jc)
2145   (define-charset-alias '=>>>hanyo-denshi/jd '==hanyo-denshi/jd)
2146   (define-charset-alias '=>>>hanyo-denshi/ft '==hanyo-denshi/ft)
2147   (define-charset-alias '=>>>hanyo-denshi/ib '==hanyo-denshi/ib)
2148   (define-charset-alias '=>>>hanyo-denshi/hg '==hanyo-denshi/hg)
2149   (define-charset-alias '=>>>hanyo-denshi/jt '==hanyo-denshi/jt)
2150   (define-charset-alias '=>>>hanyo-denshi/ks '==hanyo-denshi/ks)
2151
2152   ;; (make-charset
2153   ;;  '===hanyo-denshi/ja
2154   ;;  "Han'you-Denshi/JA detailed glyph-images."
2155   ;;  '(long-name "Han'you-Denshi/JA glyph-images"
2156   ;;              chars 94
2157   ;;              dimension 2
2158   ;;              columns 2
2159   ;;              graphic 2
2160   ;;              direction l2r
2161   ;;              registry "HanyoDenshi\\.JA-0$"
2162   ;;              mother ==hanyo-denshi/ja))
2163   (make-charset
2164    '===hanyo-denshi/jb
2165    "Han'you-Denshi/JB detailed glyph-images."
2166    '(long-name "Han'you-Denshi/JB glyph-images"
2167                chars 94
2168                dimension 2
2169                columns 2
2170                graphic 2
2171                direction l2r
2172                registry "HanyoDenshi\\.JB-0$"
2173                mother ==hanyo-denshi/jb))
2174   (make-charset
2175    '===hanyo-denshi/jc
2176    "Han'you-Denshi/JC representative glyph-images."
2177    '(long-name "Han'you-Denshi/JC glyph-images"
2178                chars 94
2179                dimension 2
2180                columns 2
2181                graphic 2
2182                direction l2r
2183                registry "HanyoDenshi\\.JC-0$"
2184                mother ==hanyo-denshi/jc))
2185   (make-charset
2186    '===hanyo-denshi/jd
2187    "Han'you-Denshi/JD representative glyph-images."
2188    '(long-name "Han'you-Denshi/JD glyph-images"
2189                chars 94
2190                dimension 2
2191                columns 2
2192                graphic 2
2193                direction l2r
2194                registry "HanyoDenshi\\.JD-0$"
2195                mother ==hanyo-denshi/jd))
2196   (make-charset
2197    '===hanyo-denshi/ft
2198    "Han'you-Denshi/FT detailed glyph-images."
2199    '(long-name "Han'you-Denshi/FT glyph-images"
2200                chars 94
2201                dimension 2
2202                columns 2
2203                graphic 2
2204                direction l2r
2205                registry "HanyoDenshi\\.FT-0$"
2206                mother ==hanyo-denshi/ft))
2207   (make-charset
2208    '===hanyo-denshi/ia
2209    "Han'you-Denshi/IA detailed glyph-images."
2210    '(long-name "Han'you-Denshi/IA glyph-images"
2211                chars 94
2212                dimension 2
2213                columns 2
2214                graphic 2
2215                direction l2r
2216                registry "HanyoDenshi\\.IA-0$"
2217                mother ==hanyo-denshi/ia))
2218   (make-charset
2219    '===hanyo-denshi/ib
2220    "Han'you-Denshi/IB detailed glyph-images."
2221    '(long-name "Han'you-Denshi/IB glyph-images"
2222                chars 94
2223                dimension 2
2224                columns 2
2225                graphic 2
2226                direction l2r
2227                registry "HanyoDenshi\\.IB-0$"
2228                mother ==hanyo-denshi/ib))
2229   (make-charset
2230    '===hanyo-denshi/hg
2231    "Han'you-Denshi/HG detailed glyph-images."
2232    '(long-name "Han'you-Denshi/HG glyph-images"
2233                chars 94
2234                dimension 2
2235                columns 2
2236                graphic 2
2237                direction l2r
2238                registry "HanyoDenshi\\.HG-0$"
2239                mother ==hanyo-denshi/hg))
2240   (make-charset
2241    '===hanyo-denshi/ip
2242    "Han'you-Denshi/IP representative glyph-images."
2243    '(long-name "Han'you-Denshi/IP glyph-images"
2244                chars 256
2245                dimension 2
2246                columns 2
2247                graphic 2
2248                direction l2r
2249                registry "HanyoDenshi\\.IP-0$"
2250                mother ==hanyo-denshi/ip))
2251   (make-charset
2252    '===hanyo-denshi/jt
2253    "JT (Juuki Touitsu Moji) detailed glyph-images."
2254    '(long-name "Han'you-Denshi/JT glyph-images"
2255                chars 256
2256                dimension 2
2257                columns 2
2258                graphic 2
2259                direction l2r
2260                registry "HanyoDenshi\\.JT-0$"
2261                mother ==hanyo-denshi/jt))
2262   (make-charset
2263    '===hanyo-denshi/ks
2264    "KoSeki-touitsu-moji detailed glyph-images."
2265    '(long-name "Han'you-Denshi/KS glyph-images"
2266                chars 256
2267                dimension 3
2268                columns 2
2269                graphic 2
2270                direction l2r
2271                mother ==hanyo-denshi/ks))
2272
2273   (make-charset
2274    '=hanyo-denshi/ks/mf
2275    "font encoding for KS (KoSeki) characters"
2276    `(long-name "Han'you-Denshi/KS font encoding"
2277                chars 256
2278                dimension 2
2279                columns 2
2280                graphic 2
2281                direction l2r
2282                registry "HanyoDenshi\\.KSMF-0$"
2283                min-code       ,(lsh #x6403 16)
2284                max-code    ,(+ (lsh #x6403 16) #xFFFF)
2285                code-offset    ,(lsh #x6403 16)))
2286   (make-charset
2287    '=hanyo-denshi/tk/mf-01
2288    "font encoding for TK (TouKi) characters"
2289    `(long-name "Han'you-Denshi/TK font encoding"
2290                chars 256
2291                dimension 2
2292                columns 2
2293                graphic 2
2294                direction l2r
2295                registry "HanyoDenshi\\.TKMF-1$"))
2296   (make-charset
2297    '=>hanyo-denshi/tk/mf-01
2298    "font encoding for TK (TouKi) abstract characters"
2299    `(long-name "Han'you-Denshi/TK font encoding"
2300                chars 256
2301                dimension 2
2302                columns 2
2303                graphic 2
2304                direction l2r
2305                mother =hanyo-denshi/tk/mf-01
2306                registry "HanyoDenshi\\.TKMF-1$"))
2307   (make-charset
2308    '==hanyo-denshi/tk/mf-01
2309    "font encoding for TK (TouKi) glyphs"
2310    `(long-name "Han'you-Denshi/TK font encoding"
2311                chars 256
2312                dimension 2
2313                columns 2
2314                graphic 2
2315                direction l2r
2316                mother =hanyo-denshi/tk/mf-01
2317                registry "HanyoDenshi\\.TKMF-1$"))
2318
2319   (make-charset
2320    '===mj
2321    "Moji-Jouhou-Kiban detailed glyph-images."
2322    '(long-name "MJ glyph-images"
2323                chars 256
2324                dimension 2
2325                columns 2
2326                graphic 2
2327                direction l2r
2328                mother ==mj))
2329   (make-charset
2330    '===mj-0
2331    "MJ detailed glyph-images plane 0"
2332    '(long-name "MJ glyph-images-0"
2333                chars 256
2334                dimension 2
2335                columns 2
2336                graphic 2
2337                direction l2r
2338                registry "mj-0$"
2339                mother ===mj
2340                min-code 0
2341                max-code #xFFFF))
2342   (make-charset
2343    '===mj-1
2344    "MJ detailed glyph-images plane 1"
2345    '(long-name "MJ glyph-images-1"
2346                chars 256
2347                dimension 2
2348                columns 2
2349                graphic 2
2350                direction l2r
2351                registry "mj-1$"
2352                mother ===mj
2353                min-code #x10000
2354                code-offset #x10000))
2355
2356   (make-charset
2357    '=+>hanyo-denshi/ft
2358    "Han'you-Denshi/FT abstract glyphs"
2359    '(long-name "Han'you-Denshi/FT glyphs"
2360                chars 94
2361                dimension 2
2362                columns 2
2363                graphic 2
2364                direction l2r
2365                registry "HanyoDenshi\\.FT-0$"
2366                mother =hanyo-denshi/ft))
2367   (make-charset
2368    '=+>hanyo-denshi/jt
2369    "JT (Juuki Touitsu Moji) unified abstract glyphs."
2370    '(long-name "Han'you-Denshi/JT unified glyphs"
2371                chars 256
2372                dimension 2
2373                columns 2
2374                graphic 2
2375                direction l2r
2376                registry "HanyoDenshi\\.JT-0$"
2377                mother =hanyo-denshi/jt))
2378
2379   (make-charset
2380    '=>>mj
2381    "Moji-Jouhou-Kiban abstract glyphs."
2382    '(long-name "MJ glyphs"
2383                chars 256
2384                dimension 2
2385                columns 2
2386                graphic 2
2387                direction l2r
2388                mother =mj))
2389
2390   (make-charset
2391    '=>>hanyo-denshi/ja
2392    "Han'you-Denshi/JA abstract glyphs"
2393    '(long-name "Han'you-Denshi/JA glyphs"
2394                chars 94
2395                dimension 2
2396                columns 2
2397                graphic 2
2398                direction l2r
2399                registry "HanyoDenshi\\.JA-0$"
2400                mother =hanyo-denshi/ja))
2401   (make-charset
2402    '=>>hanyo-denshi/jb
2403    "Han'you-Denshi/JB abstract glyphs"
2404    '(long-name "Han'you-Denshi/JB glyphs"
2405                chars 94
2406                dimension 2
2407                columns 2
2408                graphic 2
2409                direction l2r
2410                registry "HanyoDenshi\\.JB-0$"
2411                mother =hanyo-denshi/jb))
2412   (make-charset
2413    '=>>hanyo-denshi/jc
2414    "Han'you-Denshi/JC abstract glyphs"
2415    '(long-name "Han'you-Denshi/JC glyphs"
2416                chars 94
2417                dimension 2
2418                columns 2
2419                graphic 2
2420                direction l2r
2421                registry "HanyoDenshi\\.JC-0$"
2422                mother =hanyo-denshi/jc))
2423   (make-charset
2424    '=>>hanyo-denshi/jd
2425    "Han'you-Denshi/JD abstract glyphs"
2426    '(long-name "Han'you-Denshi/JD glyphs"
2427                chars 94
2428                dimension 2
2429                columns 2
2430                graphic 2
2431                direction l2r
2432                registry "HanyoDenshi\\.JD-0$"
2433                mother =hanyo-denshi/jd))
2434   (make-charset
2435    '=>>hanyo-denshi/ft
2436    "Han'you-Denshi/FT abstract glyphs"
2437    '(long-name "Han'you-Denshi/FT glyphs"
2438                chars 94
2439                dimension 2
2440                columns 2
2441                graphic 2
2442                direction l2r
2443                registry "HanyoDenshi\\.FT-0$"
2444                mother =hanyo-denshi/ft))
2445   (make-charset
2446    '=>>hanyo-denshi/ia
2447    "Han'you-Denshi/IA abstract glyphs"
2448    '(long-name "Han'you-Denshi/IA glyphs"
2449                chars 94
2450                dimension 2
2451                columns 2
2452                graphic 2
2453                direction l2r
2454                registry "HanyoDenshi\\.IA-0$"
2455                mother =hanyo-denshi/ia))
2456   (make-charset
2457    '=>>hanyo-denshi/ib
2458    "Han'you-Denshi/IB abstract glyphs"
2459    '(long-name "Han'you-Denshi/IB abstract glyphs"
2460                chars 94
2461                dimension 2
2462                columns 2
2463                graphic 2
2464                direction l2r
2465                registry "HanyoDenshi\\.IB-0$"
2466                mother =hanyo-denshi/ib))
2467   (make-charset
2468    '=>>hanyo-denshi/hg
2469    "Han'you-Denshi/HG abstract glyphs"
2470    '(long-name "Han'you-Denshi/HG abstract glyphs"
2471                chars 94
2472                dimension 2
2473                columns 2
2474                graphic 2
2475                direction l2r
2476                registry "HanyoDenshi\\.HG-0$"
2477                mother =hanyo-denshi/hg))
2478   (make-charset
2479    '=>>hanyo-denshi/ip
2480    "Han'you-Denshi/IP abstract glyphs"
2481    '(long-name "Han'you-Denshi/IP abstract glyphs"
2482                chars 256
2483                dimension 2
2484                columns 2
2485                graphic 2
2486                direction l2r
2487                registry "HanyoDenshi\\.IP-0$"
2488                mother =hanyo-denshi/ip))
2489   (make-charset
2490    '=>>hanyo-denshi/jt
2491    "JT (Juuki Touitsu Moji) abstract glyphs"
2492    '(long-name "Han'you-Denshi/JT glyphs"
2493                chars 256
2494                dimension 2
2495                columns 2
2496                graphic 2
2497                direction l2r
2498                registry "HanyoDenshi\\.JT-0$"
2499                mother =hanyo-denshi/jt))
2500   (make-charset
2501    '=>>hanyo-denshi/ks
2502    "Han'you-Denshi/KS abstract glyphs"
2503    '(long-name "Han'you-Denshi/KS glyphs"
2504                chars 256
2505                dimension 3
2506                columns 2
2507                graphic 2
2508                direction l2r
2509                mother =hanyo-denshi/ks))
2510
2511   (make-charset '=gt
2512                 "GT 2000"
2513                 `(long-name     "GT"
2514                   chars         256
2515                   dimension     3
2516                   columns       2
2517                   graphic       2
2518                   direction     l2r
2519                   registry      ""
2520                   min-code      ,(lsh #x6100 16)
2521                   max-code      ,(+ (lsh #x6100 16) 67547)
2522                   code-offset   ,(lsh #x6100 16)))
2523   (make-charset '==gt
2524                 "GT 2000 abstract glyph-forms."
2525                 '(long-name     "GT abstract glyph-forms"
2526                   chars         256
2527                   dimension     3
2528                   columns       2
2529                   graphic       2
2530                   direction     l2r
2531                   mother        =gt))
2532   (make-charset '===gt
2533                 "GT 2000 detailed glyph-images."
2534                 '(long-name     "GT glyph-images"
2535                   chars         256
2536                   dimension     3
2537                   columns       2
2538                   graphic       2
2539                   direction     l2r
2540                   mother        ==gt
2541                   ;; min-code   1
2542                   ;; max-code   67392
2543                   ))
2544   (define-charset-alias 'ideograph-gt '=gt)
2545   (define-charset-alias '=>>>gt '==gt)
2546   (make-charset '=>>gt
2547                 "GT 2000 abstract glyphs"
2548                 '(long-name     "GT abstract glyphs"
2549                   chars         256
2550                   dimension     3
2551                   columns       2
2552                   graphic       2
2553                   direction     l2r
2554                   mother        =gt))
2555   (define-charset-alias '<=>gt '=>>gt)
2556   (define-charset-alias '<==>gt '=>>gt)
2557   (make-charset '=+>gt
2558                 "GT 2000 unified abstract glyphs"
2559                 '(long-name     "Unified abstract GT glyphs"
2560                   chars         256
2561                   dimension     3
2562                   columns       2
2563                   graphic       2
2564                   direction     l2r
2565                   mother        =>>gt))
2566   (make-charset '=>gt
2567                 "GT 2000 abstract characters"
2568                 '(long-name     "abstract GT characters"
2569                   chars         256
2570                   dimension     3
2571                   columns       2
2572                   graphic       2
2573                   direction     l2r
2574                   mother        =+>gt))
2575   (make-charset '=gt-k
2576                 "Ideographic components of GT"
2577                 `(long-name     "GT components"
2578                   chars         256
2579                   dimension     2
2580                   columns       2
2581                   graphic       2
2582                   direction     l2r
2583                   registry      ""
2584                   min-code      ,(lsh #x6110 16)
2585                   max-code      ,(+ (lsh #x6110 16) 17090)
2586                   code-offset   ,(lsh #x6110 16)))
2587   (define-charset-alias 'ideograph-gt-k '=gt-k)
2588   (make-charset '==gt-k
2589                 "Abstract glyph-images of GT-K"
2590                 '(long-name     "GT-K glyph-images"
2591                   chars         256
2592                   dimension     2
2593                   columns       2
2594                   graphic       2
2595                   direction     l2r
2596                   mother        =gt-k))
2597   (make-charset '===gt-k
2598                 "Representative glyph-images of GT-K"
2599                 '(long-name     "GT-K glyph-images"
2600                   chars         256
2601                   dimension     2
2602                   columns       2
2603                   graphic       2
2604                   direction     l2r
2605                   mother        ==gt-k))
2606   (make-charset '=>>gt-k
2607                 "abstract glyphs of GT-K"
2608                 '(long-name     "GT-K abstract glyphs"
2609                   chars         256
2610                   dimension     2
2611                   columns       2
2612                   graphic       2
2613                   direction     l2r
2614                   mother        =gt-k))
2615   (make-charset '=>gt-k
2616                 "GT-K abstract characters"
2617                 '(long-name     "GT-K abstract characters"
2618                   chars         256
2619                   dimension     2
2620                   columns       2
2621                   graphic       2
2622                   direction     l2r
2623                   mother        =>>gt-k))
2624   (let ((i 1))
2625     (while (<= i 11)
2626       (make-charset
2627        (intern (format "=gt-pj-%d" i))
2628        (format "GT 2000 (pseudo JIS encoding) part %d" i)
2629        `(long-name ,(format "GT PJ %d" i)
2630                    chars 94
2631                    dimension 2
2632                    columns 2
2633                    graphic 0
2634                    direction l2r
2635                    registry ,(format "\\(GTpj-%d\\|jisx0208\\.GT-%d\\)$" i i)))
2636       (define-charset-alias
2637         (intern (format "ideograph-gt-pj-%d" i))
2638         (intern (format "=gt-pj-%d" i)))
2639       (setq i (1+ i))))
2640   (make-charset
2641    '=gt-pj-k1
2642    "Ideographic parts of GT (pseudo JIS encoding) part 1"
2643    '(long-name "GT K1"
2644                chars 94
2645                dimension 2
2646                columns 2
2647                graphic 0
2648                direction l2r
2649                registry "\\(GTKpj-1\\|jisx0208\\.GTK-1\\)$"))
2650   (define-charset-alias 'ideograph-gt-pj-k1 '=gt-pj-k1)
2651   (make-charset
2652    '==gt-pj-k1
2653    "Ideographic parts of GT (pseudo JIS encoding) part 1"
2654    '(long-name "GT K1"
2655                chars 94
2656                dimension 2
2657                columns 2
2658                graphic 0
2659                direction l2r
2660                registry "\\(GTKpj-1\\|jisx0208\\.GTK-1\\)$"))
2661   (make-charset
2662    '=gt-pj-k2
2663    "Ideographic parts of GT (pseudo JIS encoding) part 2"
2664    '(long-name "GT K2"
2665                chars 94
2666                dimension 2
2667                columns 2
2668                graphic 0
2669                direction l2r
2670                registry "\\(GTKpj-2\\|jisx0208\\.GTK-2\\)$"))
2671   (define-charset-alias 'ideograph-gt-pj-k2 '=gt-pj-k2)
2672   (make-charset
2673    '==gt-pj-k2
2674    "Ideographic parts of GT (pseudo JIS encoding) part 2"
2675    '(long-name "GT K2"
2676                chars 94
2677                dimension 2
2678                columns 2
2679                graphic 0
2680                direction l2r
2681                registry "\\(GTKpj-2\\|jisx0208\\.GTK-2\\)$"))
2682
2683   (make-charset '=daikanwa
2684                 "Daikanwa dictionary (unchanged part)"
2685                 `(long-name     "Daikanwa"
2686                   chars         256
2687                   dimension     2
2688                   columns       2
2689                   graphic       2
2690                   direction     l2r
2691                   registry      "Daikanwa\\(\\.[0-9]+\\)?-3"
2692                   min-code      #xE00000
2693                   max-code      ,(+ #xE00000 50100)
2694                   code-offset   #xE00000))
2695   (define-charset-alias 'ideograph-daikanwa '=daikanwa)
2696
2697   (make-charset '=daikanwa@rev1
2698                 "Daikanwa dictionary (revised version)"
2699                 '(long-name     "Daikanwa Rev."
2700                   chars         256
2701                   dimension     2
2702                   columns       2
2703                   graphic       2
2704                   direction     l2r
2705                   registry      "Daikanwa\\(\\.[0-9]+\\)?-2"
2706                   mother        =daikanwa))
2707   (define-charset-alias 'ideograph-daikanwa-2 '=daikanwa@rev1)
2708   (define-charset-alias '=daikanwa-rev1 '=daikanwa@rev1)
2709
2710   (make-charset '=daikanwa@rev2
2711                 "Daikanwa dictionary (revised version 2)"
2712                 '(long-name     "Daikanwa"
2713                   chars         256
2714                   dimension     2
2715                   columns       2
2716                   graphic       2
2717                   direction     l2r
2718                   registry      "Daikanwa\\(\\.[0-9]+\\)?-3"
2719                   mother        =daikanwa
2720                   min-code      1
2721                   max-code      49964))
2722   (define-charset-alias '=daikanwa-rev2 '=daikanwa@rev2)
2723
2724   (make-charset '=daikanwa/+p
2725                 "Daikanwa dictionary (ddddd')"
2726                 '(long-name     "Daikanwa ddddd'"
2727                   chars         256
2728                   dimension     2
2729                   columns       2
2730                   graphic       2
2731                   direction     l2r))
2732   (make-charset '=daikanwa/+2p
2733                 "Daikanwa dictionary (ddddd'')"
2734                 '(long-name     "Daikanwa ddddd''"
2735                   chars         256
2736                   dimension     2
2737                   columns       2
2738                   graphic       2
2739                   direction     l2r))
2740   (make-charset '=daikanwa/ho
2741                 "Daikanwa dictionary (Hokan)"
2742                 '(long-name     "Daikanwa-ho"
2743                   chars         256
2744                   dimension     2
2745                   columns       2
2746                   graphic       2
2747                   direction     l2r))
2748
2749   (make-charset '==daikanwa
2750                 "Daikanwa glyph-images."
2751                 '(long-name     "Daikanwa glyph-images"
2752                   chars         256
2753                   dimension     2
2754                   columns       2
2755                   graphic       2
2756                   direction     l2r
2757                   registry      "Daikanwa\\(\\.[0-9]+\\)?-3"
2758                   mother        =daikanwa))
2759   (make-charset '==daikanwa/+p
2760                 "Daikanwa detailed glyph-images (ddddd')"
2761                 '(long-name     "Daikanwa detailed glyphs-images (ddddd')"
2762                   chars         256
2763                   dimension     2
2764                   columns       2
2765                   graphic       2
2766                   direction     l2r
2767                   mother        =daikanwa/+p))
2768   (make-charset '==daikanwa/+2p
2769                 "Daikanwa detailed glyph-images (ddddd'')"
2770                 '(long-name     "Daikanwa glyph-images ddddd''"
2771                   chars         256
2772                   dimension     2
2773                   columns       2
2774                   graphic       2
2775                   direction     l2r
2776                   mother        =daikanwa/+2p))
2777   (make-charset '==daikanwa/ho
2778                 "Daikanwa detailed glyph-images (Hokan)"
2779                 '(long-name     "Daikanwa-ho detailed glyph-images"
2780                   chars         256
2781                   dimension     2
2782                   columns       2
2783                   graphic       2
2784                   direction     l2r
2785                   mother        =daikanwa/ho))
2786
2787   (make-charset '===daikanwa
2788                 "Daikanwa detailed glyph-images."
2789                 '(long-name     "Daikanwa detailed glyph-images"
2790                   chars         256
2791                   dimension     2
2792                   columns       2
2793                   graphic       2
2794                   direction     l2r
2795                   registry      "Daikanwa\\(\\.[0-9]+\\)?-3"
2796                   mother        ==daikanwa))
2797   (make-charset '===daikanwa/+p
2798                 "Daikanwa detailed glyph-images (ddddd')"
2799                 '(long-name     "Daikanwa detailed glyphs-images (ddddd')"
2800                   chars         256
2801                   dimension     2
2802                   columns       2
2803                   graphic       2
2804                   direction     l2r
2805                   mother        ==daikanwa/+p))
2806   (make-charset '===daikanwa/ho
2807                 "Daikanwa detailed glyph-images (Hokan)"
2808                 '(long-name     "Daikanwa-ho detailed glyph-images"
2809                   chars         256
2810                   dimension     2
2811                   columns       2
2812                   graphic       2
2813                   direction     l2r
2814                   mother        ==daikanwa/ho))
2815
2816   (make-charset '=>>daikanwa
2817                 "Daikanwa abstract glyphs"
2818                 '(long-name     "Daikanwa glyphs"
2819                   chars         256
2820                   dimension     2
2821                   columns       2
2822                   graphic       2
2823                   direction     l2r
2824                   registry      "Daikanwa\\(\\.[0-9]+\\)?-3"
2825                   mother        =daikanwa))
2826   (make-charset '=>>daikanwa/+p
2827                 "Daikanwa abstract glyphs (ddddd')"
2828                 '(long-name     "Daikanwa glyphs (ddddd')"
2829                   chars         256
2830                   dimension     2
2831                   columns       2
2832                   graphic       2
2833                   direction     l2r
2834                   mother        =daikanwa/+p))
2835   (make-charset '=>>daikanwa/+2p
2836                 "Daikanwa abstract glyphs (ddddd'')"
2837                 '(long-name     "Daikanwa glyphs (ddddd'')"
2838                   chars         256
2839                   dimension     2
2840                   columns       2
2841                   graphic       2
2842                   direction     l2r
2843                   mother        =daikanwa/+2p))
2844   (make-charset '=>>daikanwa/ho
2845                 "Daikanwa abstract glyphs (Hokan)"
2846                 '(long-name     "Daikanwa-ho glyph"
2847                   chars         256
2848                   dimension     2
2849                   columns       2
2850                   graphic       2
2851                   direction     l2r
2852                   mother        =daikanwa/ho))
2853
2854   (make-charset '=>daikanwa
2855                 "Daikanwa abstract characters"
2856                 '(long-name     "abstract Daikanwa"
2857                   chars         256
2858                   dimension     2
2859                   columns       2
2860                   graphic       2
2861                   direction     l2r
2862                   registry      "Daikanwa\\(\\.[0-9]+\\)?-3"
2863                   mother        =>>daikanwa))
2864   (make-charset '=>daikanwa/ho
2865                 "Daikanwa abstract characters (Hokan)"
2866                 '(long-name     "abstract Daikanwa-ho"
2867                   chars         256
2868                   dimension     2
2869                   columns       2
2870                   graphic       2
2871                   direction     l2r
2872                   mother        =>>daikanwa/ho))
2873
2874   (make-charset '=daijiten
2875                 "Daijiten dictionary glyphs"
2876                 `(long-name     "Daijiten glyphs"
2877                   chars         256
2878                   dimension     2
2879                   columns       2
2880                   graphic       2
2881                   direction     l2r
2882                   registry      "Daijiten-*"
2883                   min-code      #xE50000
2884                   max-code      ,(+ #xE50000 14924)
2885                   code-offset   #xE50000))
2886   (make-charset '==daijiten
2887                 "Daijiten dictionary glyph-forms"
2888                 `(long-name     "Daijiten glyph-forms"
2889                   chars         256
2890                   dimension     2
2891                   columns       2
2892                   graphic       2
2893                   direction     l2r
2894                   mother        =daijiten
2895                   registry      "Daijiten-*"))
2896   (make-charset '===daijiten
2897                 "Daijiten dictionary glyph-images"
2898                 `(long-name     "Daijiten glyph-images"
2899                   chars         256
2900                   dimension     2
2901                   columns       2
2902                   graphic       2
2903                   direction     l2r
2904                   mother        ==daijiten
2905                   registry      "Daijiten-*"))
2906   (make-charset '==>daijiten
2907                 "Jishu of Daijiten dictionary"
2908                 `(long-name     "Daijiten jishu"
2909                   chars         256
2910                   dimension     2
2911                   columns       2
2912                   graphic       2
2913                   direction     l2r
2914                   mother        =daijiten
2915                   registry      "Daijiten-*"))
2916   
2917   (make-charset '=shinjigen
2918                 "Kadokawa ShinJigen dictionary (common parts)"
2919                 `(long-name     "Shinjigen common parts"
2920                   chars         256
2921                   dimension     2
2922                   columns       2
2923                   graphic       2
2924                   direction     l2r
2925                   registry      "Shinjigen\\(\\.[0-9]+\\)?-*"))
2926
2927   (make-charset '=shinjigen@1ed
2928                 "Kadokawa ShinJigen dictionary (the first edition)"
2929                 `(long-name     "Shinjigen-1"
2930                   chars         256
2931                   dimension     2
2932                   columns       2
2933                   graphic       2
2934                   direction     l2r
2935                   mother        =shinjigen
2936                   registry      "Shinjigen\\(\\.[0-9]+\\)?-1"))
2937   (define-charset-alias 'shinjigen-1 '=shinjigen@1ed)
2938
2939   (make-charset '=shinjigen@1ed/24pr
2940                 "Kadokawa ShinJigen dictionary (the 24th impression)"
2941                 `(long-name     "Shinjigen-1 24pr"
2942                   chars         256
2943                   dimension     2
2944                   columns       2
2945                   graphic       2
2946                   direction     l2r
2947                   mother        =shinjigen@1ed))
2948
2949   (make-charset '=shinjigen@rev
2950                 "Kadokawa ShinJigen dictionary (the revised edition)"
2951                 `(long-name     "Shinjigen-2"
2952                   chars         256
2953                   dimension     2
2954                   columns       2
2955                   graphic       2
2956                   direction     l2r
2957                   mother        =shinjigen
2958                   registry      "Shinjigen\\(\\.[0-9]+\\)?-2"))
2959   (define-charset-alias 'shinjigen-2 '=shinjigen@rev)
2960   (make-charset '=shinjigen/+p@rev
2961                 "ShinJigen (the second edition) number with '"
2962                 `(long-name     "Shinjigen-2 with '"
2963                   chars         256
2964                   dimension     2
2965                   columns       2
2966                   graphic       2
2967                   direction     l2r))
2968   (define-charset-alias 'shinjigen-2-p '=shinjigen/+p@rev)
2969
2970   (make-charset '==shinjigen
2971                 "Detailed glyph-images of ShinJigen (common parts)"
2972                 '(long-name     "Shinjigen common parts"
2973                   chars         256
2974                   dimension     2
2975                   columns       2
2976                   graphic       2
2977                   direction     l2r
2978                   mother        =shinjigen
2979                   registry      "Shinjigen\\(\\.[0-9]+\\)?-*"))
2980   (make-charset '==shinjigen@1ed
2981                 "Detailed glyph-images of ShinJigen (the first edition)"
2982                 '(long-name     "Detailed glyph-images of Shinjigen-1"
2983                   chars         256
2984                   dimension     2
2985                   columns       2
2986                   graphic       2
2987                   direction     l2r
2988                   mother        ==shinjigen
2989                   registry      "Shinjigen\\(\\.[0-9]+\\)?-1"))
2990   (make-charset '==shinjigen@rev
2991                 "Detailed glyph-images of ShinJigen (the revised edition)"
2992                 '(long-name     "Detailed glyph-images of Shinjigen-2"
2993                   chars         256
2994                   dimension     2
2995                   columns       2
2996                   graphic       2
2997                   direction     l2r
2998                   mother        ==shinjigen
2999                   registry      "Shinjigen\\(\\.[0-9]+\\)?-2"))
3000   (make-charset
3001    '==shinjigen/+p@rev
3002    "Detailed glyph-images of ShinJigen (the second edition) number with '"
3003    '(long-name  "Detailed glyph-images of Shinjigen-2 with '"
3004                 mother  =shinjigen/+p@rev
3005                 chars           256
3006                 dimension       2
3007                 columns 2
3008                 graphic 2
3009                 direction       l2r))
3010
3011   (make-charset '=big5-pua
3012                 "Big5 with private used area"
3013                 '(long-name     "Big5-PUA"
3014                   chars         256
3015                   dimension     2
3016                   columns       2
3017                   graphic       2
3018                   direction     l2r
3019                   mother        chinese-big5
3020                   registry      "Big5\\.ETEN"))
3021   (define-charset-alias 'chinese-big5-pua '=big5-pua)
3022
3023   (let* ((i 1)
3024          (hzk-min (+ (lsh #x6200 16) 65536))
3025          (hzk-max (+ hzk-min 65535)))
3026     (while (<= i 12)
3027       (make-charset
3028        (intern (format "=hanziku-%d" i))
3029        (format "HANZIKU (pseudo BIG5 encoding) part %d" i)
3030        `(long-name ,(format "HANZIKU-%d" i)
3031                    chars 256
3032                    dimension 2
3033                    columns 2
3034                    graphic 2
3035                    direction l2r
3036                    registry ,(format "hanziku-%d$" i i)
3037                    min-code ,hzk-min
3038                    max-code ,hzk-max
3039                    code-offset ,hzk-min))
3040       (define-charset-alias
3041         (intern (format "ideograph-hanziku-%d" i))
3042         (intern (format "=hanziku-%d" i)))
3043       (setq hzk-min (1+ hzk-max)
3044             hzk-max (+ hzk-min 65535))
3045       (setq i (1+ i))))
3046
3047   (make-charset '===hng-jou "HNG:誠實論卷八(P.2179)"
3048                 '(long-name "HNG/P2179"
3049                   chars         256
3050                   dimension     2
3051                   registry      "hng-1$"
3052                   graphic       2
3053                   columns       2
3054                   direction     l2r))
3055   (make-charset '===hng-keg "HNG:華嚴經卷十六(S.2067)"
3056                 '(long-name "HNG/S2067"
3057                   chars         256
3058                   dimension     2
3059                   registry      "hng-2$"
3060                   graphic       2
3061                   columns       2
3062                   direction     l2r))
3063   (make-charset '===hng-dng "HNG:大般涅槃經卷十一(S.81)"
3064                 '(long-name "HNG/S81"
3065                   chars         256
3066                   dimension     2
3067                   registry      "hng-3$"
3068                   graphic       2
3069                   columns       2
3070                   direction     l2r))
3071   (make-charset '===hng-mam "HNG:摩訶摩耶經卷上(P.2160)"
3072                 '(long-name "HNG/P2160"
3073                   chars         256
3074                   dimension     2
3075                   registry      "hng-5$"
3076                   graphic       2
3077                   columns       2
3078                   direction     l2r))
3079   (make-charset '===hng-drt "HNG:大樓炭經卷三(P.2413)"
3080                 '(long-name "HNG/P2413"
3081                   chars         256
3082                   dimension     2
3083                   registry      "hng-6$"
3084                   graphic       2
3085                   columns       2
3086                   direction     l2r))
3087   (make-charset '===hng-kgk "HNG:賢劫經卷二(正倉院本)"
3088                 '(long-name "HNG/賢劫經二"
3089                   chars         256
3090                   dimension     2
3091                   registry      "hng-7$"
3092                   graphic       2
3093                   columns       2
3094                   direction     l2r))
3095   (make-charset '===hng-myz "HNG:妙法蓮華經卷五(P.2334)"
3096                 '(long-name "HNG/P2334"
3097                   chars         256
3098                   dimension     2
3099                   registry      "hng-8$"
3100                   graphic       2
3101                   columns       2
3102                   direction     l2r))
3103   (make-charset '===hng-kda "HNG:大品經卷二十八(京都国立博物館本)"
3104                 '(long-name "HNG/京博大品"
3105                   chars         256
3106                   dimension     2
3107                   registry      "hng-9$"
3108                   graphic       2
3109                   columns       2
3110                   direction     l2r))
3111   (make-charset '===hng-khi "HNG:妙法蓮華經卷五(今西本)"
3112                 '(long-name "HNG/宮廷今西"
3113                   chars         256
3114                   dimension     2
3115                   registry      "hng-10$"
3116                   graphic       2
3117                   columns       2
3118                   direction     l2r))
3119   (make-charset '===hng-khm "HNG:妙法蓮華經卷三(守屋本)"
3120                 '(long-name "HNG/宮廷守屋"
3121                   chars         256
3122                   dimension     2
3123                   registry      "hng-11$"
3124                   graphic       2
3125                   columns       2
3126                   direction     l2r))
3127   (make-charset '===hng-fhs "HNG:P2195妙法蓮華經卷六"
3128                 '(long-name "HNG/P2195"
3129                   chars         256
3130                   dimension     2
3131                   registry      "hng-12$"
3132                   graphic       2
3133                   columns       2
3134                   direction     l2r))
3135   (make-charset '===hng-hok "HNG:妙法蓮華經卷八(S.2577)"
3136                 '(long-name "HNG/S2577"
3137                   chars         256
3138                   dimension     2
3139                   registry      "hng-13$"
3140                   graphic       2
3141                   columns       2
3142                   direction     l2r))
3143   (make-charset '===hng-kyd "HNG:漢書楊雄傳(上野本)"
3144                 '(long-name "HNG/漢書楊雄"
3145                   chars         256
3146                   dimension     2
3147                   registry      "hng-14$"
3148                   graphic       2
3149                   columns       2
3150                   direction     l2r))
3151   (make-charset '===hng-sok "HNG:花嚴經卷八(守屋本)"
3152                 '(long-name "HNG/花嚴守屋"
3153                   chars         256
3154                   dimension     2
3155                   registry      "hng-15$"
3156                   graphic       2
3157                   columns       2
3158                   direction     l2r))
3159   (make-charset '===hng-yhk "HNG:瑜伽法鏡經(S.2423)"
3160                 '(long-name "HNG/S2423"
3161                   chars         256
3162                   dimension     2
3163                   registry      "hng-16$"
3164                   graphic       2
3165                   columns       2
3166                   direction     l2r))
3167   (make-charset '===hng-kak "HNG:開成石經孝經"
3168                 '(long-name "HNG/開成孝經"
3169                   chars         256
3170                   dimension     2
3171                   registry      "hng-17$"
3172                   graphic       2
3173                   columns       2
3174                   direction     l2r))
3175   (make-charset '===hng-kar "HNG:開成石經論語"
3176                 '(long-name "HNG/開成論語"
3177                   chars         256
3178                   dimension     2
3179                   registry      "hng-18$"
3180                   graphic       2
3181                   columns       2
3182                   direction     l2r))
3183   (make-charset '===hng-kae "HNG:開成石經周易"
3184                 '(long-name "HNG/開成周易"
3185                   chars         256
3186                   dimension     2
3187                   registry      "hng-19$"
3188                   graphic       2
3189                   columns       2
3190                   direction     l2r))
3191   (make-charset '===hng-sys "HNG:瑜伽師地論卷三十(S.5309)"
3192                 '(long-name "HNG/S5309"
3193                   chars         256
3194                   dimension     2
3195                   registry      "hng-22$"
3196                   graphic       2
3197                   columns       2
3198                   direction     l2r))
3199   (make-charset '===hng-tsu "HNG:通典卷一"
3200                 '(long-name "HNG/通典卷一"
3201                   chars         256
3202                   dimension     2
3203                   registry      "hng-24$"
3204                   graphic       2
3205                   columns       2
3206                   direction     l2r))
3207   (make-charset '===hng-tzj "HNG:阿毘達磨毘婆沙論卷百七(東禪寺版)"
3208                 '(long-name "HNG/東禪毘婆"
3209                   chars         256
3210                   dimension     2
3211                   registry      "hng-25$"
3212                   graphic       2
3213                   columns       2
3214                   direction     l2r))
3215   (make-charset '===hng-hos "HNG:齊民要術卷五(高山寺本)"
3216                 '(long-name "HNG/斉民要術"
3217                   chars         256
3218                   dimension     2
3219                   registry      "hng-26$"
3220                   graphic       2
3221                   columns       2
3222                   direction     l2r))
3223   (make-charset '===hng-kkh "HNG:金剛般若經(京都国立博物館本)"
3224                 '(long-name "HNG/京博金般"
3225                   chars         256
3226                   dimension     2
3227                   registry      "hng-27$"
3228                   graphic       2
3229                   columns       2
3230                   direction     l2r))
3231   (make-charset '===hng-nak "HNG:華嚴孔目(高山寺本)"
3232                 '(long-name "HNG/華厳孔目"
3233                   chars         256
3234                   dimension     2
3235                   registry      "hng-28$"
3236                   graphic       2
3237                   columns       2
3238                   direction     l2r))
3239   (make-charset '===hng-jhk "HNG:神足變化經(開元寺版)"
3240                 '(long-name "HNG/開元神足"
3241                   chars         256
3242                   dimension     2
3243                   registry      "hng-29$"
3244                   graphic       2
3245                   columns       2
3246                   direction     l2r))
3247   (make-charset '===hng-hod "HNG:法藏和尚傳(高山寺本)"
3248                 '(long-name "HNG/法藏和尚"
3249                   chars         256
3250                   dimension     2
3251                   registry      "hng-30$"
3252                   graphic       2
3253                   columns       2
3254                   direction     l2r))
3255   (make-charset '===hng-gok "HNG:後漢書光武帝紀"
3256                 '(long-name "HNG/光武帝紀"
3257                   chars         256
3258                   dimension     2
3259                   registry      "hng-31$"
3260                   graphic       2
3261                   columns       2
3262                   direction     l2r))
3263   (make-charset '===hng-ink "HNG:日本書紀 卷二十四(岩崎本)"
3264                 '(long-name "HNG/岩崎紀24"
3265                   chars         256
3266                   dimension     2
3267                   registry      "hng-33$"
3268                   graphic       2
3269                   columns       2
3270                   direction     l2r))
3271   (make-charset '===hng-nto "HNG:日本書紀 卷二十四(圖書寮本)"
3272                 '(long-name "HNG/圖書紀24"
3273                   chars         256
3274                   dimension     2
3275                   registry      "hng-34$"
3276                   graphic       2
3277                   columns       2
3278                   direction     l2r))
3279   (make-charset '===hng-nkm "HNG:日本書紀 卷二十四(兼右本)"
3280                 '(long-name "HNG/兼右紀24"
3281                   chars         256
3282                   dimension     2
3283                   registry      "hng-36$"
3284                   graphic       2
3285                   columns       2
3286                   direction     l2r))
3287   (make-charset '===hng-k24 "HNG:日本書紀 卷二十四(寛文九年版)"
3288                 '(long-name "HNG/寛九紀24"
3289                   chars         256
3290                   dimension     2
3291                   registry      "hng-37$"
3292                   graphic       2
3293                   columns       2
3294                   direction     l2r))
3295   (make-charset '===hng-ini "HNG:日本書紀卷二(鴨脚本)"
3296                 '(long-name "HNG/鴨脚紀2"
3297                   chars         256
3298                   dimension     2
3299                   registry      "hng-38$"
3300                   graphic       2
3301                   columns       2
3302                   direction     l2r))
3303   (make-charset '===hng-nkk "HNG:日本書紀 卷二(兼方本)"
3304                 '(long-name "HNG/兼方紀2"
3305                   chars         256
3306                   dimension     2
3307                   registry      "hng-39$"
3308                   graphic       2
3309                   columns       2
3310                   direction     l2r))
3311   (make-charset '===hng-kcc "HNG:日本書紀 卷二(慶長勅版)"
3312                 '(long-name "HNG/勅版紀2"
3313                   chars         256
3314                   dimension     2
3315                   registry      "hng-41$"
3316                   graphic       2
3317                   columns       2
3318                   direction     l2r))
3319   (make-charset '===hng-kcj "HNG:日本書紀 卷二(慶長十五年版)"
3320                 '(long-name "HNG/慶長紀2"
3321                   chars         256
3322                   dimension     2
3323                   registry      "hng-42$"
3324                   graphic       2
3325                   columns       2
3326                   direction     l2r))
3327   (make-charset '===hng-kbk "HNG:日本書紀 卷二(寛文九年版)"
3328                 '(long-name "HNG/寛九紀2"
3329                   chars         256
3330                   dimension     2
3331                   registry      "hng-43$"
3332                   graphic       2
3333                   columns       2
3334                   direction     l2r))
3335   (make-charset '===hng-sik "HNG:花嚴經卷八(新羅本寫本)"
3336                 '(long-name "HNG/花嚴新羅"
3337                   chars         256
3338                   dimension     2
3339                   registry      "hng-44$"
3340                   graphic       2
3341                   columns       2
3342                   direction     l2r))
3343   (make-charset '===hng-skk "HNG:華嚴經卷二十(晉本高麗古版)"
3344                 '(long-name "HNG/古麗華20"
3345                   chars         256
3346                   dimension     2
3347                   registry      "hng-46$"
3348                   graphic       2
3349                   columns       2
3350                   direction     l2r))
3351   (make-charset '===hng-kyu "HNG:初麗瑜5"
3352                 '(long-name "HNG/瑜伽師地論卷五(高麗初彫本)"
3353                   chars         256
3354                   dimension     2
3355                   registry      "hng-47$"
3356                   graphic       2
3357                   columns       2
3358                   direction     l2r))
3359   (make-charset '===hng-ksk "HNG:華嚴經卷六(高麗再彫本)"
3360                 '(long-name "HNG/再麗華6"
3361                   chars         256
3362                   dimension     2
3363                   registry      "hng-48$"
3364                   graphic       2
3365                   columns       2
3366                   direction     l2r))
3367   (make-charset '===hng-wan "HNG:華嚴經卷三十八(趙氏藏本)"
3368                 '(long-name "HNG/和寧華38"
3369                   chars         256
3370                   dimension     2
3371                   registry      "hng-49$"
3372                   graphic       2
3373                   columns       2
3374                   direction     l2r))
3375   (make-charset '===hng-okd "HNG:金剛場陀羅尼經(小川本)"
3376                 '(long-name "HNG/金剛小川"
3377                   chars         256
3378                   dimension     2
3379                   registry      "hng-50$"
3380                   graphic       2
3381                   columns       2
3382                   direction     l2r))
3383   (make-charset '===hng-wad "HNG:大般若經卷二百五十(和銅經)"
3384                 '(long-name "HNG/和銅250"
3385                   chars         256
3386                   dimension     2
3387                   registry      "hng-54$"
3388                   graphic       2
3389                   columns       2
3390                   direction     l2r))
3391   (make-charset '===hng-kmi "HNG:弥勒上生經(高山寺本)"
3392                 '(long-name "HNG/弥勒上生"
3393                   chars         256
3394                   dimension     2
3395                   registry      "hng-55$"
3396                   graphic       2
3397                   columns       2
3398                   direction     l2r))
3399   (make-charset '===hng-zkd "HNG:續高僧傳(五月一日經)(天平寫經)"
3400                 '(long-name "HNG/五一續高"
3401                   chars         256
3402                   dimension     2
3403                   registry      "hng-56$"
3404                   graphic       2
3405                   columns       2
3406                   direction     l2r))
3407   (make-charset '===hng-doh "HNG:金剛大教王經卷一(高山寺本)"
3408                 '(long-name "HNG/金剛大教"
3409                   chars         256
3410                   dimension     2
3411                   registry      "hng-57$"
3412                   graphic       2
3413                   columns       2
3414                   direction     l2r))
3415   (make-charset '===hng-jyu "HNG:成唯識論卷十(寛治二年刊本)"
3416                 '(long-name "HNG/成唯識10"
3417                   chars         256
3418                   dimension     2
3419                   registry      "hng-58$"
3420                   graphic       2
3421                   columns       2
3422                   direction     l2r))
3423   (make-charset '===hng-tzs "HNG:佛説大教王經卷一(東禪寺版日本寫本)"
3424                 '(long-name "HNG/佛説大教"
3425                   chars         256
3426                   dimension     2
3427                   registry      "hng-60$"
3428                   graphic       2
3429                   columns       2
3430                   direction     l2r))
3431   (make-charset '===hng-sai "HNG:最上秘密那拏天經(東禪寺版日本寫本)"
3432                 '(long-name "HNG/最上秘密"
3433                   chars         256
3434                   dimension     2
3435                   registry      "hng-61$"
3436                   graphic       2
3437                   columns       2
3438                   direction     l2r))
3439   (make-charset '===hng-kad "HNG:大般若經卷八十(春日版)"
3440                 '(long-name "HNG/春日般若"
3441                   chars         256
3442                   dimension     2
3443                   registry      "hng-62$"
3444                   graphic       2
3445                   columns       2
3446                   direction     l2r))
3447   (make-charset '===hng-kss "HNG:華嚴信種義(明惠自筆)"
3448                 '(long-name "HNG/華嚴信種"
3449                   chars         256
3450                   dimension     2
3451                   registry      "hng-64$"
3452                   graphic       2
3453                   columns       2
3454                   direction     l2r))
3455   (make-charset '===hng-kyo "HNG:教行信証卷四(親鸞自筆)"
3456                 '(long-name "HNG/教行信証"
3457                   chars         256
3458                   dimension     2
3459                   registry      "hng-66$"
3460                   graphic       2
3461                   columns       2
3462                   direction     l2r))
3463   (make-charset '===hng-ykk "HNG:守屋本藥師功徳經"
3464                 '(long-name "HNG/藥師功徳"
3465                   chars         256
3466                   dimension     2
3467                   registry      "hng-68$"
3468                   graphic       2
3469                   columns       2
3470                   direction     l2r))
3471   (make-charset '===hng-saa "HNG:阿毘達磨大毘婆沙論卷百七十(正倉院本)"
3472                 '(long-name "HNG/正毘170"
3473                   chars         256
3474                   dimension     2
3475                   registry      "hng-70$"
3476                   graphic       2
3477                   columns       2
3478                   direction     l2r))
3479   (make-charset '===hng-sab "HNG:阿毘達磨大毘婆沙論卷百七十八(正倉院本)"
3480                 '(long-name "HNG/正毘178"
3481                   chars         256
3482                   dimension     2
3483                   registry      "hng-71$"
3484                   graphic       2
3485                   columns       2
3486                   direction     l2r))
3487   (make-charset '===hng-wks "HNG:花嚴經卷六十七(守屋本)"
3488                 '(long-name "HNG/和寧華67"
3489                   chars         256
3490                   dimension     2
3491                   registry      "hng-72$"
3492                   graphic       2
3493                   columns       2
3494                   direction     l2r))
3495   (make-charset '===hng-wke "HNG:花嚴經卷六十八(守屋本)"
3496                 '(long-name "HNG/和寧華68"
3497                   chars         256
3498                   dimension     2
3499                   registry      "hng-73$"
3500                   graphic       2
3501                   columns       2
3502                   direction     l2r))
3503   (make-charset '===hng-smk "HNG:西夏版妙法蓮華經卷一"
3504                 '(long-name "HNG/西夏法華"
3505                   chars         256
3506                   dimension     2
3507                   registry      "hng-74$"
3508                   graphic       2
3509                   columns       2
3510                   direction     l2r))
3511   (make-charset '===hng-sgs "HNG:四分律卷第十六(正倉院五月一日經)"
3512                 '(long-name "HNG/正四分16"
3513                   chars         256
3514                   dimension     2
3515                   registry      "hng-77$"
3516                   graphic       2
3517                   columns       2
3518                   direction     l2r))
3519   (make-charset '===hng-sts "HNG:四分律卷第二十(正倉院唐經)"
3520                 '(long-name "HNG/正四分20"
3521                   chars         256
3522                   dimension     2
3523                   registry      "hng-78$"
3524                   graphic       2
3525                   columns       2
3526                   direction     l2r))
3527   (make-charset '===hng-kkd "HNG:金剛大教王經卷第二(高山寺本)"
3528                 '(long-name "HNG/院政大教"
3529                   chars         256
3530                   dimension     2
3531                   registry      "hng-79$"
3532                   graphic       2
3533                   columns       2
3534                   direction     l2r))
3535
3536   (make-charset '===chise-hdic-tsj "HDIC-TSJ (新撰字鏡 天治本)"
3537                 '(long-name "CHISE-HDIC/TSJ"
3538                   chars         256
3539                   dimension     2
3540                   registry      "chisetsj-0$"
3541                   graphic       2
3542                   columns       2
3543                   direction     l2r))
3544   (make-charset '=chise-hdic-tsj "HDIC-TSJ (新撰字鏡 天治本) abstract glyph"
3545                 '(long-name "CHISE-HDIC/TSJ"
3546                   chars         256
3547                   dimension     2
3548                   registry      "chisetsj-0$"
3549                   graphic       2
3550                   columns       2
3551                   direction     l2r
3552                   mother        ===chise-hdic-tsj))
3553
3554   (make-charset '===chise-hdic-syp "HDIC-SYP (宋本玉篇)"
3555                 '(long-name "CHISE-HDIC/SYP"
3556                   chars         256
3557                   dimension     2
3558                   registry      "chisesyp-0$"
3559                   graphic       2
3560                   columns       2
3561                   direction     l2r))
3562   (make-charset '=chise-hdic-syp "HDIC-SYP (宋本玉篇) abstract glyph"
3563                 '(long-name "CHISE-HDIC/SYP"
3564                   chars         256
3565                   dimension     2
3566                   registry      "chisesyp-0$"
3567                   graphic       2
3568                   columns       2
3569                   direction     l2r
3570                   mother        ===chise-hdic-syp))
3571
3572   (make-charset '===chise-hdic-ktb "HDIC-KTB (篆隸萬象名義 高山寺本)"
3573                 '(long-name "CHISE-HDIC/KTB"
3574                   chars         256
3575                   dimension     2
3576                   registry      "chisektb-0$"
3577                   graphic       2
3578                   columns       2
3579                   direction     l2r))
3580   (make-charset '=chise-hdic-ktb "HDIC-KTB (篆隸萬象名義 高山寺本) abstract glyph"
3581                 '(long-name "CHISE-HDIC/KTB"
3582                   chars         256
3583                   dimension     2
3584                   registry      "chisektb-0$"
3585                   graphic       2
3586                   columns       2
3587                   direction     l2r
3588                   mother        ===chise-hdic-ktb))
3589   (make-charset '===chise-hdic-ktb-seal "Seal-script of HDIC-KTB (篆隸萬象名義 高山寺本)"
3590                 '(long-name "CHISE-HDIC/KTB-Seal"
3591                   chars         256
3592                   dimension     2
3593                   registry      "chisektbs-0$"
3594                   graphic       2
3595                   columns       2
3596                   direction     l2r))
3597   
3598   (make-charset '=cbeta "CBETA private characters"
3599                 '(long-name     "CBETA PUA"
3600                   chars         256
3601                   dimension     2
3602                   registry      "cbeta-0"
3603                   graphic       2
3604                   min-code      #xE20000
3605                   max-code      #xE2FFFF
3606                   code-offset   #xE20000
3607                   columns       2
3608                   direction     l2r))
3609   (define-charset-alias 'ideograph-cbeta '=cbeta)
3610   (make-charset '==cbeta "CBETA private characters"
3611                 '(long-name     "CBETA PUA glyph-images"
3612                   chars         256
3613                   dimension     2
3614                   registry      "cbeta-0"
3615                   graphic       2
3616                   columns       2
3617                   direction     l2r
3618                   mother        =cbeta))
3619   (make-charset '===cbeta "CBETA private characters"
3620                 '(long-name     "CBETA PUA glyph-images"
3621                   chars         256
3622                   dimension     2
3623                   registry      "cbeta-0"
3624                   graphic       2
3625                   columns       2
3626                   direction     l2r
3627                   mother        ==cbeta))
3628   (make-charset '=>>cbeta "CBETA abstract glyphs"
3629                 '(long-name     "CBETA glyphs"
3630                   chars         256
3631                   dimension     2
3632                   registry      "cbeta-0"
3633                   graphic       2
3634                   columns       2
3635                   direction     l2r
3636                   mother        =cbeta))
3637   (make-charset '=>cbeta "CBETA abstract characters"
3638                 '(long-name     "CBETA characters"
3639                   chars         256
3640                   dimension     2
3641                   registry      "cbeta-0"
3642                   graphic       2
3643                   columns       2
3644                   direction     l2r
3645                   mother        =cbeta))
3646
3647   (make-charset '=zinbun-oracle
3648                 "Oracle Bones Script"
3649                 `(long-name     "Oracle Bones Script in Zinbun, Kyoto Univ."
3650                   chars         256
3651                   dimension     2
3652                   registry      "zob1968-0"
3653                   graphic       2
3654                   min-code      #xE70000
3655                   max-code      ,(+ #xE70000 8192)
3656                   code-offset   #xE70000
3657                   columns       2
3658                   direction     l2r))
3659
3660   (make-charset '=>zinbun-oracle
3661                 "Abstract Oracle Bones"
3662                 '(long-name     "Abstract characters of Zinbun Oracle Bones."
3663                   chars         256
3664                   dimension     2
3665                   mother        =zinbun-oracle
3666                   registry      "zob1968-0"
3667                   graphic       2
3668                   columns       2
3669                   direction     l2r))
3670
3671   (make-charset '=jef-china3
3672                 "JEF + CHINA3 private characters"
3673                 '(long-name     "JEF + CHINA3"
3674                   chars         256
3675                   dimension     2
3676                   columns       2
3677                   graphic       2
3678                   direction     l2r
3679                   registry      "china3jef-0"
3680                   min-code      #xE80000
3681                   max-code      #xE8FFFF
3682                   code-offset   #xE80000))
3683   (define-charset-alias 'china3-jef '=jef-china3)
3684   (make-charset '==jef-china3
3685                 "JEF + CHINA3 abstract glyph-images."
3686                 '(long-name     "JEF + CHINA3"
3687                   chars         256
3688                   dimension     2
3689                   columns       2
3690                   graphic       2
3691                   direction     l2r
3692                   registry      "china3jef-0"
3693                   mother        =jef-china3))
3694   (make-charset '===jef-china3
3695                 "JEF + CHINA3 glyph-images."
3696                 '(long-name     "JEF-CHINA3 glyph-images"
3697                   chars         256
3698                   dimension     2
3699                   columns       2
3700                   graphic       2
3701                   direction     l2r
3702                   registry      "china3jef-0"
3703                   mother        ==jef-china3))
3704
3705   (make-charset '=ruimoku-v6
3706                 "private characters used in RUIMOKU Version.6"
3707                 `(long-name     "RUI6"
3708                   chars         256
3709                   dimension     2
3710                   columns       2
3711                   graphic       2
3712                   direction     l2r
3713                   registry      "rui6-0"
3714                   ;; mother     ucs
3715                   min-code      #xE90000 ; #xE000
3716                   max-code      #xE908FF ; #xE8FF
3717                   code-offset   ,(- #xE90000 #xE000)))
3718   (make-charset '==ruimoku-v6
3719                 "RUIMOKU Version.6 glyph-images."
3720                 '(long-name     "RUI6 glyph-images."
3721                   chars         256
3722                   dimension     2
3723                   columns       2
3724                   graphic       2
3725                   direction     l2r
3726                   registry      "rui6-0"
3727                   mother        =ruimoku-v6))
3728   (make-charset '===ruimoku-v6
3729                 "RUIMOKU Version.6 representative glyph-images."
3730                 '(long-name     "RUI6 rep-glyph-images."
3731                   chars         256
3732                   dimension     2
3733                   columns       2
3734                   graphic       2
3735                   direction     l2r
3736                   registry      "rui6-0"
3737                   mother        ==ruimoku-v6))
3738   (make-charset '=>>ruimoku-v6
3739                 "RUIMOKU Version.6 detailed-glyphs."
3740                 '(long-name     "RUI6 characters."
3741                   chars         256
3742                   dimension     2
3743                   columns       2
3744                   graphic       2
3745                   direction     l2r
3746                   registry      "rui6-0"
3747                   mother        =ruimoku-v6))
3748   (make-charset '=>ruimoku-v6
3749                 "RUIMOKU Version.6 abstract characters."
3750                 '(long-name     "RUI6 characters."
3751                   chars         256
3752                   dimension     2
3753                   columns       2
3754                   graphic       2
3755                   direction     l2r
3756                   registry      "rui6-0"
3757                   mother        =ruimoku-v6))
3758
3759   (make-charset '=shuowen-jiguge "汲古閣本説文解字"
3760                 '(long-name "汲古閣本説文解字(抽象字体)"
3761                   chars         256
3762                   dimension     2
3763                   registry      "ShuowenJiguge-5$"
3764                   graphic       2
3765                   columns       2
3766                   direction     l2r))
3767   (make-charset '=>shuowen-jiguge "汲古閣本説文解字抽象文字"
3768                 '(long-name "汲古閣本説文解字(抽象文字)"
3769                   chars         256
3770                   dimension     2
3771                   registry      "ShuowenJiguge-5$"
3772                   mother        =shuowen-jiguge
3773                   graphic       2
3774                   columns       2
3775                   direction     l2r))
3776
3777   (make-charset '===shuowen-jiguge4 "淮南書局4次様本説文解字"
3778                 '(long-name "京大人文研所蔵説文解字淮南書局4次様本"
3779                   chars         256
3780                   dimension     2
3781                   registry      "ShuowenJiguge-4$"
3782                   graphic       2
3783                   columns       2
3784                   direction     l2r))
3785
3786   (make-charset '===shuowen-jiguge5 "汲古閣通行本説文解字"
3787                 '(long-name "京大人文研所蔵汲古閣通行本説文解字"
3788                   chars         256
3789                   dimension     2
3790                   registry      "ShuowenJiguge-5$"
3791                   graphic       2
3792                   columns       2
3793                   direction     l2r))
3794
3795   (make-charset '===shuowen-jiguge-A30 "汲古閣刊第四次修改本"
3796                 '(long-name "京大人文研所蔵汲古閣刊第四次修改本"
3797                   chars         256
3798                   dimension     2
3799                   registry      "ShuowenJiguge-30$"
3800                   graphic       2
3801                   columns       2
3802                   direction     l2r))
3803
3804   ;; (make-charset
3805   ;;  '=zihai
3806   ;;  "ZhongHua-ZiHai glyph-images"
3807   ;;  '(long-name "ZhongHua-ZiHai (pppp-nn)"
3808   ;;              chars 256
3809   ;;              dimension 3
3810   ;;              columns 2
3811   ;;              graphic 2
3812   ;;              direction l2r))
3813
3814   ;; (make-charset
3815   ;;  '=zihai-17xx
3816   ;;  "ZhongHua-ZiHai (pp.1700〜1781) glyph-images"
3817   ;;  '(long-name "ZhongHua-ZiHai pp.17xx"
3818   ;;              chars 256
3819   ;;              dimension 2
3820   ;;              columns 2
3821   ;;              graphic 2
3822   ;;              direction l2r
3823   ;;              registry "zihai\\.cp-17$"))
3824
3825   (make-charset '=big5-cdp-itaiji-001
3826                 "Big5-CDP-itaiji-001 glyphs of GlyphWiki"
3827                 '(long-name     "Big5-CDP-itaiji-001"
3828                   chars         256
3829                   dimension     2
3830                   columns       2
3831                   graphic       2
3832                   direction     l2r
3833                   registry      "cdp\\.itaiji-1$"
3834                   mother        =big5-cdp))
3835   (make-charset '=>big5-cdp-itaiji-001
3836                 "Big5-CDP-itaiji-001 abstract characters of GlyphWiki"
3837                 '(long-name     "Big5-CDP-itaiji-001"
3838                   chars         256
3839                   dimension     2
3840                   columns       2
3841                   graphic       2
3842                   direction     l2r
3843                   registry      "cdp\\.itaiji-1$"
3844                   mother        =big5-cdp-itaiji-001))
3845   (make-charset '==big5-cdp-itaiji-001
3846                 "Big5-CDP-itaiji-001 abstract glyph-image of GlyphWiki"
3847                 '(long-name     "Big5-CDP-itaiji-001"
3848                   chars         256
3849                   dimension     2
3850                   columns       2
3851                   graphic       2
3852                   direction     l2r
3853                   registry      "cdp\\.itaiji-1$"
3854                   mother        =big5-cdp-itaiji-001))
3855
3856   (make-charset '=big5-cdp-itaiji-002
3857                 "Big5-CDP-itaiji-002 glyphs of GlyphWiki"
3858                 '(long-name     "Big5-CDP-itaiji-002"
3859                   chars         256
3860                   dimension     2
3861                   columns       2
3862                   graphic       2
3863                   direction     l2r
3864                   registry      "cdp\\.itaiji-2$"
3865                   mother        =big5-cdp))
3866   (make-charset '=>big5-cdp-itaiji-002
3867                 "Big5-CDP-itaiji-002 abstract characters of GlyphWiki"
3868                 '(long-name     "Big5-CDP-itaiji-002"
3869                   chars         256
3870                   dimension     2
3871                   columns       2
3872                   graphic       2
3873                   direction     l2r
3874                   registry      "cdp\\.itaiji-2$"
3875                   mother        =big5-cdp-itaiji-002))
3876
3877   (make-charset '=big5-cdp-itaiji-003
3878                 "Big5-CDP-itaiji-003 glyphs of GlyphWiki"
3879                 '(long-name     "Big5-CDP-itaiji-003"
3880                   chars         256
3881                   dimension     2
3882                   columns       2
3883                   graphic       2
3884                   direction     l2r
3885                   registry      "cdp\\.itaiji-3$"
3886                   mother        =big5-cdp))
3887   (make-charset '=>big5-cdp-itaiji-003
3888                 "Big5-CDP-itaiji-003 abstract characters of GlyphWiki"
3889                 '(long-name     "Big5-CDP-itaiji-003"
3890                   chars         256
3891                   dimension     2
3892                   columns       2
3893                   graphic       2
3894                   direction     l2r
3895                   registry      "cdp\\.itaiji-3$"
3896                   mother        =big5-cdp-itaiji-003))
3897
3898   (make-charset '=big5-cdp-itaiji-004
3899                 "Big5-CDP-itaiji-004 glyphs of GlyphWiki"
3900                 '(long-name     "Big5-CDP-itaiji-004"
3901                   chars         256
3902                   dimension     2
3903                   columns       2
3904                   graphic       2
3905                   direction     l2r
3906                   registry      "cdp\\.itaiji-4$"
3907                   mother        =big5-cdp))
3908   (make-charset '=>big5-cdp-itaiji-004
3909                 "Big5-CDP-itaiji-004 abstract characters of GlyphWiki"
3910                 '(long-name     "Big5-CDP-itaiji-004"
3911                   chars         256
3912                   dimension     2
3913                   columns       2
3914                   graphic       2
3915                   direction     l2r
3916                   registry      "cdp\\.itaiji-4$"
3917                   mother        =big5-cdp-itaiji-004))
3918
3919   (make-charset '=big5-cdp-itaiji-005
3920                 "Big5-CDP-itaiji-005 glyphs of GlyphWiki"
3921                 '(long-name     "Big5-CDP-itaiji-005"
3922                   chars         256
3923                   dimension     2
3924                   columns       2
3925                   graphic       2
3926                   direction     l2r
3927                   registry      "cdp\\.itaiji-5$"
3928                   mother        =big5-cdp))
3929   (make-charset '=>big5-cdp-itaiji-005
3930                 "Big5-CDP-itaiji-005 abstract characters of GlyphWiki"
3931                 '(long-name     "Big5-CDP-itaiji-005"
3932                   chars         256
3933                   dimension     2
3934                   columns       2
3935                   graphic       2
3936                   direction     l2r
3937                   registry      "cdp\\.itaiji-5$"
3938                   mother        =big5-cdp-itaiji-005))
3939
3940   (make-charset '=big5-cdp-itaiji-006
3941                 "Big5-CDP-itaiji-006 glyphs of GlyphWiki"
3942                 '(long-name     "Big5-CDP-itaiji-006"
3943                   chars         256
3944                   dimension     2
3945                   columns       2
3946                   graphic       2
3947                   direction     l2r
3948                   registry      "cdp\\.itaiji-6$"
3949                   mother        =big5-cdp))
3950   (make-charset '=>big5-cdp-itaiji-006
3951                 "Big5-CDP-itaiji-006 abstract characters of GlyphWiki"
3952                 '(long-name     "Big5-CDP-itaiji-006"
3953                   chars         256
3954                   dimension     2
3955                   columns       2
3956                   graphic       2
3957                   direction     l2r
3958                   registry      "cdp\\.itaiji-6$"
3959                   mother        =big5-cdp-itaiji-006))
3960
3961   (make-charset '=big5-cdp-var-001
3962                 "Big5-CDP-var-001 glyphs of GlyphWiki"
3963                 '(long-name     "Big5-CDP-var-001"
3964                   chars         256
3965                   dimension     2
3966                   columns       2
3967                   graphic       2
3968                   direction     l2r
3969                   registry      "cdp\\.var-1$"
3970                   mother        =big5-cdp))
3971
3972   (make-charset '=>big5-cdp-var-001
3973                 "Big5-CDP-var-001 abstract characters of GlyphWiki"
3974                 '(long-name     "Big5-CDP-var-001"
3975                   chars         256
3976                   dimension     2
3977                   columns       2
3978                   graphic       2
3979                   direction     l2r
3980                   registry      "cdp\\.var-1$"
3981                   mother        =big5-cdp-var-001))
3982
3983   (make-charset '=big5-cdp-var-002
3984                 "Big5-CDP-var-002 glyph-images of GlyphWiki"
3985                 '(long-name     "Big5-CDP-var-002"
3986                   chars         256
3987                   dimension     2
3988                   columns       2
3989                   graphic       2
3990                   direction     l2r
3991                   registry      "cdp\\.var-2$"
3992                   mother        =big5-cdp))
3993
3994   (make-charset '=big5-cdp-var-003
3995                 "Big5-CDP-var-003 glyph-images of GlyphWiki"
3996                 '(long-name     "Big5-CDP-var-003"
3997                   chars         256
3998                   dimension     2
3999                   columns       2
4000                   graphic       2
4001                   direction     l2r
4002                   registry      "cdp\\.var-3$"
4003                   mother        =big5-cdp))
4004   (define-charset-alias '=big5-cdp-var-3 '=big5-cdp-var-003)
4005
4006   (make-charset '=big5-cdp-var-004
4007                 "Big5-CDP-var-004 glyph-images of GlyphWiki"
4008                 '(long-name     "Big5-CDP-var-004"
4009                   chars         256
4010                   dimension     2
4011                   columns       2
4012                   graphic       2
4013                   direction     l2r
4014                   registry      "cdp\\.var-4$"
4015                   mother        =big5-cdp))
4016
4017   (make-charset '=big5-cdp-var-005
4018                 "Big5-CDP-var-005 glyph-images of GlyphWiki"
4019                 '(long-name     "Big5-CDP-var-005"
4020                   chars         256
4021                   dimension     2
4022                   columns       2
4023                   graphic       2
4024                   direction     l2r
4025                   registry      "cdp\\.var-5$"
4026                   mother        =big5-cdp))
4027   (define-charset-alias '=big5-cdp-var-5 '=big5-cdp-var-005)
4028
4029   (make-charset '=big5-cdp-var-007
4030                 "Big5-CDP-var-007 glyph-images of GlyphWiki"
4031                 '(long-name     "Big5-CDP-var-007"
4032                   chars         256
4033                   dimension     2
4034                   columns       2
4035                   graphic       2
4036                   direction     l2r
4037                   registry      "cdp\\.var-7$"
4038                   mother        =big5-cdp))
4039
4040   (make-charset '=big5-cdp-var-008
4041                 "Big5-CDP-var-008 glyph-images of GlyphWiki"
4042                 '(long-name     "Big5-CDP-var-008"
4043                   chars         256
4044                   dimension     2
4045                   columns       2
4046                   graphic       2
4047                   direction     l2r
4048                   registry      "cdp\\.var-8$"
4049                   mother        =big5-cdp))
4050
4051   (make-charset '=big5-cdp-var-010
4052                 "Big5-CDP-var-010 glyph-images of GlyphWiki"
4053                 '(long-name     "Big5-CDP-var-010"
4054                   chars         256
4055                   dimension     2
4056                   columns       2
4057                   graphic       2
4058                   direction     l2r
4059                   registry      "cdp\\.var-10$"
4060                   mother        =big5-cdp))
4061
4062   (make-charset '==>ucs@bucs
4063                 "Basic Subset of Coded Character Sets (BUCS)"
4064                 '(long-name     "BUCS abstract characters"
4065                   chars         256
4066                   dimension     3
4067                   columns       2
4068                   graphic       2
4069                   direction     l2r
4070                   =>iso-ir      177
4071                   mother        =ucs))
4072   (make-charset '==>ucs@esu
4073                 "Extended Subset of Coded Character Sets (ESU)"
4074                 '(long-name     "BUCS abstract characters"
4075                   chars         256
4076                   dimension     3
4077                   columns       2
4078                   graphic       2
4079                   direction     l2r
4080                   =>iso-ir      177
4081                   mother        ==>ucs@bucs))
4082
4083   (make-charset '=>iwds-1
4084                 "The IRG Working Document Series 1: List of UCV of Ideograhs."
4085                 '(long-name     "IWDS 1: List of UCV"
4086                   chars         256
4087                   dimension     2
4088                   columns       2
4089                   graphic       2
4090                   direction     l2r))
4091
4092   (make-charset '=>ucs@iwds-1
4093                 "UCS abstract characters based on IWDS-1."
4094                 '(long-name     "UCS based on IWDS-1"
4095                   chars         256
4096                   dimension     3
4097                   columns       2
4098                   graphic       2
4099                   direction     l2r
4100                   =>iso-ir      177
4101                   mother        =ucs))
4102   (make-charset '=>ucs@iwds-1/normalized
4103                 "UCS abstract characters based on IWDS-1."
4104                 '(long-name     "UCS based on IWDS-1"
4105                   chars         256
4106                   dimension     3
4107                   columns       2
4108                   graphic       2
4109                   direction     l2r
4110                   =>iso-ir      177
4111                   mother        =>ucs@iwds-1))
4112
4113   (make-charset '=>ucs@cognate
4114                 "UCS abstract characters based on cognate."
4115                 '(long-name     "UCS based on cognate"
4116                   chars         256
4117                   dimension     3
4118                   columns       2
4119                   graphic       2
4120                   direction     l2r
4121                   =>iso-ir      177
4122                   mother        =ucs))
4123
4124   (make-charset '=>ucs@component
4125                 "UCS encoding for abstract components of IWDS-1."
4126                 '(long-name     "UCS for IWDS-1 abstract components"
4127                   chars         256
4128                   dimension     3
4129                   columns       2
4130                   graphic       2
4131                   direction     l2r
4132                   =>iso-ir      177
4133                   mother        =ucs))
4134
4135   ;; (make-charset '=>ucs@hanyo-denshi
4136   ;;               "UCS abstract characters based on Han'you-Denshi collection."
4137   ;;               '(long-name     "UCS base characters of Han'you-Denshi"
4138   ;;                 chars         256
4139   ;;                 dimension     3
4140   ;;                 columns       2
4141   ;;                 graphic       2
4142   ;;                 direction     l2r
4143   ;;                 =>iso-ir      177
4144   ;;                 mother        =ucs))
4145
4146   (make-charset '=>ucs@iso
4147                 "Abstract characters of ISO/IEC 10646 representatives"
4148                 '(long-name     "UCS characters for ISO"
4149                   chars         256
4150                   dimension     3
4151                   columns       2
4152                   graphic       2
4153                   direction     l2r
4154                   =>iso-ir      177
4155                   mother        =ucs))
4156   (make-charset '=>ucs@unicode
4157                 "Abstract characters of Unicode representatives"
4158                 '(long-name     "UCS characters for Unicode"
4159                   chars         256
4160                   dimension     3
4161                   columns       2
4162                   graphic       2
4163                   direction     l2r
4164                   =>iso-ir      177
4165                   mother        =>ucs@iso))
4166   (make-charset '=>ucs@jis
4167                 "UCS representative characters for JIS X0208/0212/0213"
4168                 '(long-name     "UCS characters for JIS"
4169                   chars         256
4170                   dimension     3
4171                   columns       2
4172                   graphic       2
4173                   direction     l2r
4174                   =>iso-ir      177
4175                   mother        =>ucs@unicode))
4176   (make-charset '=>ucs@jis/2000
4177                 "ISO/IEC 10646 for JIS X 0213:2000"
4178                 '(long-name     "UCS for JIS:2000"
4179                   chars         256
4180                   dimension     3
4181                   columns       2
4182                   graphic       2
4183                   direction     l2r
4184                   =>iso-ir      177
4185                   mother        =>ucs@jis))
4186   (make-charset '=>ucs@jis/2004
4187                 "ISO/IEC 10646 for JIS X 0213:2004"
4188                 '(long-name     "UCS for JIS:2004"
4189                   chars         256
4190                   dimension     3
4191                   columns       2
4192                   graphic       2
4193                   direction     l2r
4194                   =>iso-ir      177
4195                   mother        =>ucs@jis))
4196   (make-charset '=>ucs@ks
4197                 "UCS representative characters for Korean Standards"
4198                 '(long-name     "UCS characters for KS"
4199                   chars         256
4200                   dimension     3
4201                   columns       2
4202                   graphic       2
4203                   direction     l2r
4204                   =>iso-ir      177
4205                   mother        =>ucs@unicode))
4206   (make-charset '=>ucs@cns
4207                 "UCS representatives characters for CNS 11643 sources"
4208                 '(long-name     "UCS characters for CNS 11643"
4209                   chars         256
4210                   dimension     3
4211                   columns       2
4212                   graphic       2
4213                   direction     l2r
4214                   =>iso-ir      177
4215                   mother        =>ucs@unicode))
4216
4217   (make-charset '=+>ucs@iso
4218                 "UCS based on ISO/IEC 10646 representative glyphs"
4219                 '(long-name     "Unified abstract glyphs of UCS"
4220                   chars         256
4221                   dimension     3
4222                   columns       2
4223                   graphic       2
4224                   direction     l2r
4225                   =>iso-ir      177
4226                   mother        =>ucs@iso))
4227   (make-charset '=+>ucs@unicode
4228                 "Unicode representative unified abstract glyphs"
4229                 '(long-name     "UCS unified abstract glyphs for Unicode"
4230                   chars         256
4231                   dimension     3
4232                   columns       2
4233                   graphic       2
4234                   direction     l2r
4235                   =>iso-ir      177
4236                   mother        =+>ucs@iso))
4237   (make-charset '=+>ucs@jis
4238                 "UCS based on Japanese usual unification"
4239                 '(long-name     "UCS unified abstract glyphs for JP"
4240                   chars         256
4241                   dimension     3
4242                   columns       2
4243                   graphic       2
4244                   direction     l2r
4245                   =>iso-ir      177
4246                   mother        =+>ucs@unicode))
4247   (define-charset-alias '=>ucs@JP '=+>ucs@jis)
4248   (make-charset '=+>ucs@jis/1990
4249                 "UCS representative characters for JIS X0208/0212:1990"
4250                 '(long-name     "UCS characters for JIS:1990"
4251                   chars         256
4252                   dimension     3
4253                   columns       2
4254                   graphic       2
4255                   direction     l2r
4256                   =>iso-ir      177
4257                   mother        =+>ucs@jis))
4258   (define-charset-alias '=>ucs@jis/1990 '=+>ucs@jis/1990)
4259   (make-charset '=+>ucs@jis/2004
4260                 "UCS representative characters for JIS X 0213:2004"
4261                 '(long-name     "UCS characters for JIS:2004"
4262                   chars         256
4263                   dimension     3
4264                   columns       2
4265                   graphic       2
4266                   direction     l2r
4267                   =>iso-ir      177
4268                   mother        =+>ucs@jis))
4269   (make-charset '=+>ucs@ks
4270                 "UCS representative unified abstract glyphs for Korean Standards"
4271                 '(long-name     "UCS unified abstract glyphs for KS"
4272                   chars         256
4273                   dimension     3
4274                   columns       2
4275                   graphic       2
4276                   direction     l2r
4277                   =>iso-ir      177
4278                   mother        =+>ucs@unicode))
4279   (make-charset '=+>ucs@cns
4280                 "UCS representatives unified abstract glyphs for CNS 11643 sources"
4281                 '(long-name     "UCS unified abstract glyphs for CNS"
4282                   chars         256
4283                   dimension     3
4284                   columns       2
4285                   graphic       2
4286                   direction     l2r
4287                   =>iso-ir      177
4288                   mother        =+>ucs@unicode))
4289
4290   (make-charset '=ucs@iso
4291                 "ISO/IEC 10646 for its representative glyphs"
4292                 '(long-name     "UCS for ISO"
4293                   chars         256
4294                   dimension     3
4295                   columns       2
4296                   graphic       2
4297                   direction     l2r
4298                   =>iso-ir      177
4299                   mother        =+>ucs@iso
4300                   ))
4301   (make-charset '=ucs@unicode
4302                 "Unicode for its representative glyphs"
4303                 '(long-name     "UCS for Unicode"
4304                   chars         256
4305                   dimension     3
4306                   columns       2
4307                   graphic       2
4308                   direction     l2r
4309                   =>iso-ir      177
4310                   mother        =ucs@iso))
4311   (make-charset '=ucs@gb
4312                 "ISO/IEC 10646 for GB"
4313                 '(long-name     "UCS for GB"
4314                   chars         256
4315                   dimension     3
4316                   columns       2
4317                   graphic       2
4318                   direction     l2r
4319                   =>iso-ir      177
4320                   mother        =ucs@unicode))
4321   (define-charset-alias 'ucs-gb '=ucs@gb)
4322   (make-charset '=ucs@gb/fw
4323                 "ISO/IEC 10646 for GB with fullwidth"
4324                 '(long-name     "UCS for GB-fullwidth"
4325                   chars         256
4326                   dimension     3
4327                   columns       2
4328                   graphic       2
4329                   direction     l2r
4330                   =>iso-ir      177
4331                   mother        =ucs@gb))
4332   (make-charset '=ucs-bmp@gb
4333                 "ISO/IEC 10646 BMP for GB"
4334                 '(long-name     "BMP for GB"
4335                   chars         256
4336                   dimension     3
4337                   columns       2
4338                   graphic       2
4339                   direction     l2r
4340                   mother        =ucs@gb
4341                   min-code      #x0000
4342                   max-code      #xFFFF))
4343   (make-charset '=ucs@cns
4344                 "ISO/IEC 10646 for CNS 11643"
4345                 '(long-name     "UCS for CNS"
4346                   chars         256
4347                   dimension     3
4348                   columns       2
4349                   graphic       2
4350                   direction     l2r
4351                   =>iso-ir      177
4352                   mother        =ucs@unicode))
4353   (make-charset
4354    '=ucs-sip@cns
4355    "CNS glyphs of UCS SIP"
4356    '(long-name "CNS SIP glyphs"
4357                chars 256
4358                dimension 2
4359                columns 2
4360                graphic 2
4361                direction l2r
4362                registry "ucs00\\.t-2$"
4363                mother =ucs@cns
4364                min-code #x20000 max-code #x2FFFF
4365                code-offset #x20000))
4366   (define-charset-alias 'ucs-cns '=ucs@cns)
4367   (make-charset '=ucs@cns/fw
4368                 "ISO/IEC 10646 for CNS 11643 with fullwidth"
4369                 '(long-name     "UCS for CNS-fullwidth"
4370                   chars         256
4371                   dimension     3
4372                   columns       2
4373                   graphic       2
4374                   direction     l2r
4375                   =>iso-ir      177
4376                   mother        =ucs@cns))
4377   (make-charset '=ucs-bmp@cns
4378                 "ISO/IEC 10646 BMP for CNS"
4379                 '(long-name     "BMP for CNS"
4380                   chars         256
4381                   dimension     3
4382                   columns       2
4383                   graphic       2
4384                   direction     l2r
4385                   mother        =ucs@cns
4386                   min-code      #x0000
4387                   max-code      #xFFFF))
4388   (make-charset '=ucs@jis
4389                 "ISO/IEC 10646 for JIS X0208/0212/0213"
4390                 '(long-name     "UCS for JIS"
4391                   chars         256
4392                   dimension     3
4393                   columns       2
4394                   graphic       2
4395                   direction     l2r
4396                   =>iso-ir      177
4397                   mother        =ucs@unicode))
4398   (define-charset-alias 'ucs-jis '=ucs@jis)
4399   (make-charset '=ucs@jis/fw
4400                 "ISO/IEC 10646 for JIS X0208/0212/0213 with fullwidth"
4401                 '(long-name     "UCS for JIS-fullwidth"
4402                   chars         256
4403                   dimension     3
4404                   columns       2
4405                   graphic       2
4406                   direction     l2r
4407                   =>iso-ir      177
4408                   mother        =ucs@jis))
4409   (make-charset '=ucs-bmp@jis
4410                 "ISO/IEC 10646 BMP for JIS"
4411                 '(long-name     "BMP for JIS"
4412                   chars         256
4413                   dimension     3
4414                   columns       2
4415                   graphic       2
4416                   direction     l2r
4417                   mother        =ucs@jis
4418                   min-code      #x0000
4419                   max-code      #xFFFF))
4420   ;; (make-charset '=ucs@jis/1983
4421   ;;               "ISO/IEC 10646 for JIS X 0208:1983"
4422   ;;               '(long-name     "UCS for JIS:1983"
4423   ;;                 chars         256
4424   ;;                 dimension     3
4425   ;;                 columns       2
4426   ;;                 graphic       2
4427   ;;                 direction     l2r
4428   ;;                 =>iso-ir      177
4429   ;;                 mother        =ucs@jis))
4430   (make-charset '=ucs@jis/1990
4431                 "ISO/IEC 10646 for JIS X 0208/0212:1990"
4432                 '(long-name     "UCS for JIS:1990"
4433                   chars         256
4434                   dimension     3
4435                   columns       2
4436                   graphic       2
4437                   direction     l2r
4438                   =>iso-ir      177
4439                   mother        =ucs@jis))
4440   (define-charset-alias '=ucs@jis-1990 '=ucs@jis/1990)
4441   (define-charset-alias '=ucs-jis-1990 '=ucs@jis/1990)
4442   (make-charset '=ucs@jis/2000
4443                 "ISO/IEC 10646 for JIS X 0213:2000"
4444                 '(long-name     "UCS for JIS:2000"
4445                   chars         256
4446                   dimension     3
4447                   columns       2
4448                   graphic       2
4449                   direction     l2r
4450                   =>iso-ir      177
4451                   mother        =ucs@jis))
4452   (define-charset-alias '=ucs@jis-2000 '=ucs@jis/2000)
4453   (define-charset-alias '=ucs-jis-2000 '=ucs@jis/2000)
4454   (make-charset '=ucs@jis/2004
4455                 "ISO/IEC 10646 for JIS X 0213:2004"
4456                 '(long-name     "UCS for JIS:2004"
4457                   chars         256
4458                   dimension     3
4459                   columns       2
4460                   graphic       2
4461                   direction     l2r
4462                   =>iso-ir      177
4463                   mother        =ucs@jis))
4464   (make-charset '=ucs@JP
4465                 "UCS for common glyphs used in Japan"
4466                 '(long-name     "UCS for Japan"
4467                   chars         256
4468                   dimension     3
4469                   columns       2
4470                   graphic       2
4471                   direction     l2r
4472                   =>iso-ir      177
4473                   mother        =ucs@jis/2004))
4474   (define-charset-alias '=ucs@jp '=ucs@JP)
4475   (make-charset '=ucs@JP/hanazono
4476                 "Japanese glyph-images of Hanazono Mincho"
4477                 '(long-name     "UCS for Hana-Min"
4478                   chars         256
4479                   dimension     3
4480                   columns       2
4481                   graphic       2
4482                   direction     l2r
4483                   =>iso-ir      177
4484                   mother        =ucs@JP))
4485   (make-charset '=ucs@ks
4486                 "ISO/IEC 10646 for Korean Standards"
4487                 '(long-name     "UCS for KS"
4488                   chars         256
4489                   dimension     3
4490                   columns       2
4491                   graphic       2
4492                   direction     l2r
4493                   =>iso-ir      177
4494                   mother        =ucs@unicode))
4495   (define-charset-alias 'ucs-ks '=ucs@ks)
4496   (make-charset '=ucs@ks/2012
4497                 "Mapping for Korean Standards in ISO/IEC 10646:2012"
4498                 '(long-name     "UCS:2012 for KS"
4499                   chars         256
4500                   dimension     3
4501                   columns       2
4502                   graphic       2
4503                   direction     l2r
4504                   =>iso-ir      177
4505                   mother        =ucs@ks))
4506   (make-charset '=ucs-bmp@ks
4507                 "ISO/IEC 10646 BMP for KS"
4508                 '(long-name     "BMP for KS"
4509                   chars         256
4510                   dimension     3
4511                   columns       2
4512                   graphic       2
4513                   direction     l2r
4514                   mother        =ucs@ks
4515                   min-code      #x0000
4516                   max-code      #xFFFF))
4517   (make-charset '=ucs@cns11643
4518                 "ISO/IEC 10646 for CNS based on www.cns11643.gov.tw"
4519                 '(long-name     "UCS for CNS11643"
4520                   chars         256
4521                   dimension     3
4522                   columns       2
4523                   graphic       2
4524                   direction     l2r
4525                   =>iso-ir      177
4526                   mother        =ucs@cns))
4527   (make-charset '=ucs@big5
4528                 "ISO/IEC 10646 for Big5"
4529                 '(long-name     "UCS for Big5"
4530                   chars         256
4531                   dimension     3
4532                   columns       2
4533                   graphic       2
4534                   direction     l2r
4535                   =>iso-ir      177
4536                   ;; mother     =>ucs@iwds-1
4537                   mother        =ucs@cns
4538                   ;; mother     =>>ucs@cns
4539                   ))
4540   (define-charset-alias 'ucs-big5 '=ucs@big5)
4541   (make-charset '=ucs@big5/cns11643
4542                 "ISO/IEC 10646 for Big5 based on www.cns11643.gov.tw"
4543                 '(long-name     "UCS for Big5@CNS11643"
4544                   chars         256
4545                   dimension     3
4546                   columns       2
4547                   graphic       2
4548                   direction     l2r
4549                   =>iso-ir      177
4550                   mother        =ucs@big5))
4551
4552   (make-charset '=>>ucs@iso
4553                 "Representative abstract-glyphs of ISO/IEC 10646"
4554                 '(long-name     "UCS abstract glyphs for UCS"
4555                   chars         256
4556                   dimension     3
4557                   columns       2
4558                   graphic       2
4559                   direction     l2r
4560                   =>iso-ir      177
4561                   mother        =ucs@iso))
4562   (make-charset '=>>ucs@unicode
4563                 "Representative abstract-glyphs of Unicode"
4564                 '(long-name     "Unicode abstract glyphs"
4565                   chars         256
4566                   dimension     3
4567                   columns       2
4568                   graphic       2
4569                   direction     l2r
4570                   =>iso-ir      177
4571                   mother        =>>ucs@iso))
4572   (make-charset '=>>ucs@jis
4573                 "UCS Representative abstract-glyphs for JIS X0208/0212/0213"
4574                 '(long-name     "UCS abstract glyphs for JIS"
4575                   chars         256
4576                   dimension     3
4577                   columns       2
4578                   graphic       2
4579                   direction     l2r
4580                   =>iso-ir      177
4581                   mother        =>>ucs@unicode))
4582   (make-charset '=>>ucs@jis/1990
4583                 "UCS Representative glyphs for JIS X 0208/0212:1990"
4584                 '(long-name     "UCS glyphs for JIS:1990"
4585                   chars         256
4586                   dimension     3
4587                   columns       2
4588                   graphic       2
4589                   direction     l2r
4590                   =>iso-ir      177
4591                   mother        =>>ucs@jis))
4592   (make-charset '=>>ucs@jis/2000
4593                 "UCS Representative glyphs for JIS X 0213:2000"
4594                 '(long-name     "UCS glyphs for JIS:2000"
4595                   chars         256
4596                   dimension     3
4597                   columns       2
4598                   graphic       2
4599                   direction     l2r
4600                   =>iso-ir      177
4601                   mother        =>>ucs@jis))
4602   (make-charset '=>>ucs@jis/2004
4603                 "UCS Representative glyphs for JIS X 0213:2004"
4604                 '(long-name     "UCS glyphs for JIS:2004"
4605                   chars         256
4606                   dimension     3
4607                   columns       2
4608                   graphic       2
4609                   direction     l2r
4610                   =>iso-ir      177
4611                   mother        =>>ucs@jis))
4612   (make-charset '=>>ucs@JP
4613                 "UCS abstract-glyphs based on Japanese style glyphs"
4614                 '(long-name     "UCS glyphs for JP"
4615                   chars         256
4616                   dimension     3
4617                   columns       2
4618                   graphic       2
4619                   direction     l2r
4620                   =>iso-ir      177
4621                   mother        =>>ucs@jis/2004))
4622   (make-charset '=>>ucs@ks
4623                 "UCS Representative glyphs for Korean Standards"
4624                 '(long-name     "UCS glyphs for KS"
4625                   chars         256
4626                   dimension     3
4627                   columns       2
4628                   graphic       2
4629                   direction     l2r
4630                   =>iso-ir      177
4631                   mother        =>>ucs@unicode))
4632   (make-charset '=>>ucs@cns
4633                 "UCS Representative glyphs for CNS 11643 sources"
4634                 '(long-name     "UCS glyphs for CNS"
4635                   chars         256
4636                   dimension     3
4637                   columns       2
4638                   graphic       2
4639                   direction     l2r
4640                   =>iso-ir      177
4641                   mother        =>>ucs@unicode))
4642
4643   (make-charset '==ucs@iso
4644                 "Representative glyph-forms of ISO/IEC 10646."
4645                 '(long-name     "UCS glyph-forms for UCS"
4646                   chars         256
4647                   dimension     3
4648                   columns       2
4649                   graphic       2
4650                   direction     l2r
4651                   =>iso-ir      177
4652                   mother        =>>ucs@iso))
4653   (define-charset-alias '=>>>ucs@iso '==ucs@iso)
4654   (make-charset '==ucs@unicode
4655                 "Representative glyph-forms of Unicode."
4656                 '(long-name     "UCS glyph-forms for Unicode"
4657                   chars         256
4658                   dimension     3
4659                   columns       2
4660                   graphic       2
4661                   direction     l2r
4662                   =>iso-ir      177
4663                   mother        ==ucs@iso))
4664   (define-charset-alias '=>>>ucs@unicode '==ucs@unicode)
4665   (make-charset '==ucs@gb
4666                 "ISO/IEC 10646 for GB"
4667                 '(long-name     "UCS for GB"
4668                   chars         256
4669                   dimension     3
4670                   columns       2
4671                   graphic       2
4672                   direction     l2r
4673                   =>iso-ir      177
4674                   mother        ==ucs@unicode))
4675   (make-charset '==ucs-bmp@gb
4676                 "ISO/IEC 10646 BMP for GB"
4677                 '(long-name     "BMP for GB"
4678                   chars         256
4679                   dimension     3
4680                   columns       2
4681                   graphic       2
4682                   direction     l2r
4683                   mother        ==ucs@gb
4684                   min-code      #x0000
4685                   max-code      #xFFFF))
4686   (make-charset '==ucs@cns
4687                 "UCS Representative glyph-forms for CNS 11643 sources."
4688                 '(long-name     "UCS glyph-forms for CNS"
4689                   chars         256
4690                   dimension     3
4691                   columns       2
4692                   graphic       2
4693                   direction     l2r
4694                   =>iso-ir      177
4695                   mother        ==ucs@unicode))
4696   (define-charset-alias '=>>>ucs@cns '==ucs@cns)
4697   (make-charset '==ucs-bmp@cns
4698                 "ISO/IEC 10646 BMP for CNS"
4699                 '(long-name     "BMP for CNS"
4700                   chars         256
4701                   dimension     3
4702                   columns       2
4703                   graphic       2
4704                   direction     l2r
4705                   mother        ==ucs@cns
4706                   min-code      #x0000
4707                   max-code      #xFFFF))
4708   (make-charset '==ucs@jis
4709                 "UCS Representative glyph-forms for JIS X0208/0212/0213."
4710                 '(long-name     "UCS glyph-forms for JIS"
4711                   chars         256
4712                   dimension     3
4713                   columns       2
4714                   graphic       2
4715                   direction     l2r
4716                   =>iso-ir      177
4717                   mother        ==ucs@unicode))
4718   (define-charset-alias '=>>>ucs@jis '==ucs@jis)
4719   (make-charset '==ucs@jis/1990
4720                 "UCS Representative glyph-forms for JIS X 0208/0212:1990."
4721                 '(long-name     "UCS glyph-forms for JIS:1990"
4722                   chars         256
4723                   dimension     3
4724                   columns       2
4725                   graphic       2
4726                   direction     l2r
4727                   =>iso-ir      177
4728                   mother        ==ucs@jis))
4729   (define-charset-alias '=>>>ucs@jis/1990 '==ucs@jis/1990)
4730   (make-charset '==ucs@jis/2000
4731                 "UCS Representative glyph-forms for JIS X 0213:2000."
4732                 '(long-name     "UCS glyph-forms for JIS:2000"
4733                   chars         256
4734                   dimension     3
4735                   columns       2
4736                   graphic       2
4737                   direction     l2r
4738                   =>iso-ir      177
4739                   mother        ==ucs@jis))
4740   (define-charset-alias '=>>>ucs@jis/2000 '==ucs@jis/2000)
4741   (make-charset '==ucs@jis/2004
4742                 "UCS Representative glyph-forms for JIS X 0213:2004."
4743                 '(long-name     "UCS glyph-forms for JIS:2004"
4744                   chars         256
4745                   dimension     3
4746                   columns       2
4747                   graphic       2
4748                   direction     l2r
4749                   =>iso-ir      177
4750                   mother        ==ucs@jis))
4751   (define-charset-alias '=>>>ucs@jis/2004 '==ucs@jis/2004)
4752   (make-charset '==ucs@JP
4753                 "UCS for common glyph-forms used in Japan."
4754                 '(long-name     "UCS for Japan"
4755                   chars         256
4756                   dimension     3
4757                   columns       2
4758                   graphic       2
4759                   direction     l2r
4760                   =>iso-ir      177
4761                   mother        ==ucs@jis/2004))
4762   (make-charset '==ucs@JP/hanazono
4763                 "Japanese glyph-forms of Hanazono Mincho."
4764                 '(long-name     "UCS for Hana-Min"
4765                   chars         256
4766                   dimension     3
4767                   columns       2
4768                   graphic       2
4769                   direction     l2r
4770                   =>iso-ir      177
4771                   mother        ==ucs@JP))
4772   (make-charset '==ucs@ks
4773                 "UCS Representative glyph-forms for Korean Standards."
4774                 '(long-name     "UCS glyph-forms for KS"
4775                   chars         256
4776                   dimension     3
4777                   columns       2
4778                   graphic       2
4779                   direction     l2r
4780                   =>iso-ir      177
4781                   mother        ==ucs@unicode))
4782   (define-charset-alias '=>>>ucs@ks '==ucs@ks)
4783   (make-charset '==ucs-bmp@ks
4784                 "ISO/IEC 10646 BMP for KS."
4785                 '(long-name     "BMP for KS"
4786                   chars         256
4787                   dimension     3
4788                   columns       2
4789                   graphic       2
4790                   direction     l2r
4791                   mother        ==ucs@ks
4792                   min-code      #x0000
4793                   max-code      #xFFFF))
4794   (make-charset '==ucs@cns11643
4795                 "ISO/IEC 10646 for CNS based on www.cns11643.gov.tw."
4796                 '(long-name     "UCS for CNS11643"
4797                   chars         256
4798                   dimension     3
4799                   columns       2
4800                   graphic       2
4801                   direction     l2r
4802                   =>iso-ir      177
4803                   mother        ==ucs@cns))
4804
4805   (make-charset '===ucs@iso
4806                 "ISO/IEC 10646-2 representative glyph-images."
4807                 '(long-name     "ISO rep-images for UCS"
4808                   chars         256
4809                   dimension     3
4810                   columns       2
4811                   graphic       2
4812                   direction     l2r
4813                   =>iso-ir      177
4814                   mother        ==ucs@iso))
4815   (make-charset '===ucs@unicode
4816                 "Unicode for its representative glyph-images."
4817                 '(long-name     "UCS for Unicode"
4818                   chars         256
4819                   dimension     3
4820                   columns       2
4821                   graphic       2
4822                   direction     l2r
4823                   =>iso-ir      177
4824                   mother        ==ucs@unicode))
4825   (make-charset '===ucs@gb
4826                 "UCS representative glyph-images of GB."
4827                 '(long-name     "UCS rep-images for GB"
4828                   chars         256
4829                   dimension     3
4830                   columns       2
4831                   graphic       2
4832                   direction     l2r
4833                   =>iso-ir      177
4834                   mother        ===ucs@unicode))
4835   (make-charset '===ucs@ks
4836                 "UCS representative glyph-images of Korean Standards."
4837                 '(long-name     "UCS rep-images for KS"
4838                   chars         256
4839                   dimension     3
4840                   columns       2
4841                   graphic       2
4842                   direction     l2r
4843                   =>iso-ir      177
4844                   mother        ==ucs@ks))
4845
4846   (make-charset '=ucs-var-001
4847                 "uXXXX-var-001 glyph-images of GlyphWiki"
4848                 '(long-name     "UCS-var-001"
4849                   chars         256
4850                   dimension     3
4851                   columns       2
4852                   graphic       2
4853                   direction     l2r
4854                   ;; =>iso-ir   177
4855                   mother        =ucs))
4856   (make-charset '=ucs-bmp-var-001
4857                 "uXXXX-var-001 glyph-images in BMP"
4858                 '(long-name     "UCS-BMP-var-001"
4859                   chars         256
4860                   dimension     2
4861                   columns       2
4862                   graphic       2
4863                   direction     l2r
4864                   ;; =>iso-ir   177
4865                   mother        =ucs-var-001
4866                   min-code #x2E00
4867                   max-code #x9FEA
4868                   registry "ucs\\.var001-0"))
4869   (make-charset '=ucs-sip-var-001
4870                 "uXXXX-var-001 glyph-images in SIP"
4871                 '(long-name     "UCS-SIP-var-001"
4872                   chars         256
4873                   dimension     2
4874                   columns       2
4875                   graphic       2
4876                   direction     l2r
4877                   mother        =ucs-var-001
4878                   min-code #x20000 max-code #x2FFFF
4879                   registry "ucs00\\.var001-2"))
4880   (make-charset '=ucs-tip-var-001
4881                 "uXXXX-var-001 glyph-images in TIP"
4882                 '(long-name     "UCS-TIP-var-001"
4883                   chars         256
4884                   dimension     2
4885                   columns       2
4886                   graphic       2
4887                   direction     l2r
4888                   mother        =ucs-var-001
4889                   min-code #x30000 max-code #x3FFFF
4890                   registry "ucs00\\.var001-3"))
4891   (make-charset '=>ucs-var-001
4892                 "Abstract characters corresponding with uXXXX-var-001 of GlyphWiki"
4893                 '(long-name     "UCS-var-001"
4894                   chars         256
4895                   dimension     3
4896                   columns       2
4897                   graphic       2
4898                   direction     l2r
4899                   ;; =>iso-ir   177
4900                   mother        =ucs))
4901   (make-charset '=>ucs-bmp-var-001
4902                 "uXXXX-var-001's abstract characters in BMP"
4903                 '(long-name     "UCS-BMP-var-001 characters"
4904                   chars         256
4905                   dimension     2
4906                   columns       2
4907                   graphic       2
4908                   direction     l2r
4909                   ;; =>iso-ir   177
4910                   mother        =>ucs-var-001
4911                   min-code #x2E00
4912                   max-code #x9FCC
4913                   registry "ucs\\.var001-0"))
4914   (make-charset '==ucs-var-001
4915                 "Abstract glyph-forms corresponding with uXXXX-var-001 of GlyphWiki"
4916                 '(long-name     "UCS-var-001"
4917                   chars         256
4918                   dimension     3
4919                   columns       2
4920                   graphic       2
4921                   direction     l2r
4922                   ;; =>iso-ir   177
4923                   mother        =ucs-var-001))
4924   (make-charset '==ucs-bmp-var-001
4925                 "uXXXX-var-001's abstract glyph-forms in BMP"
4926                 '(long-name     "UCS-BMP-var-001 glyph-forms"
4927                   chars         256
4928                   dimension     2
4929                   columns       2
4930                   graphic       2
4931                   direction     l2r
4932                   ;; =>iso-ir   177
4933                   mother        ==ucs-var-001
4934                   min-code #x2E00
4935                   max-code #x9FCC
4936                   registry "ucs\\.var001-0"))
4937   (make-charset '==ucs-sip-var-001
4938                 "uXXXX-var-001's abstract glyph-forms in SIP"
4939                 '(long-name     "UCS-SIP-var-001 glyph-forms"
4940                   chars         256
4941                   dimension     2
4942                   columns       2
4943                   graphic       2
4944                   direction     l2r
4945                   mother        ==ucs-var-001
4946                   min-code #x20000 max-code #x2FFFF
4947                   registry "ucs00\\.var001-2"))
4948
4949   (make-charset '=ucs-var-002
4950                 "uXXXX-var-002 glyph-images of GlyphWiki"
4951                 '(long-name     "UCS-var-002"
4952                   chars         256
4953                   dimension     3
4954                   columns       2
4955                   graphic       2
4956                   direction     l2r
4957                   ;; =>iso-ir   177
4958                   mother        =ucs))
4959   (make-charset '=ucs-bmp-var-002
4960                 "uXXXX-var-002 glyph-images in BMP"
4961                 '(long-name     "UCS-BMP-var-002"
4962                   chars         256
4963                   dimension     2
4964                   columns       2
4965                   graphic       2
4966                   direction     l2r
4967                   ;; =>iso-ir   177
4968                   mother        =ucs-var-002
4969                   min-code #x2E00
4970                   max-code #x9FCC
4971                   registry "ucs\\.var002-0"))
4972   (make-charset '=ucs-sip-var-002
4973                 "uXXXX-var-002 glyph-images in SIP"
4974                 '(long-name     "UCS-SIP-var-002"
4975                   chars         256
4976                   dimension     2
4977                   columns       2
4978                   graphic       2
4979                   direction     l2r
4980                   mother        =ucs-var-002
4981                   min-code #x20000 max-code #x2FFFF
4982                   registry "ucs00\\.var002-2"))
4983   (make-charset '=ucs-tip-var-002
4984                 "uXXXX-var-002 glyph-images in TIP"
4985                 '(long-name     "UCS-TIP-var-002"
4986                   chars         256
4987                   dimension     2
4988                   columns       2
4989                   graphic       2
4990                   direction     l2r
4991                   mother        =ucs-var-002
4992                   min-code #x30000 max-code #x3FFFF
4993                   registry "ucs00\\.var002-3"))
4994   (make-charset '==ucs-var-002
4995                 "Abstract glyph-forms corresponding with uXXXX-var-002 of GlyphWiki"
4996                 '(long-name     "UCS-var-002"
4997                   chars         256
4998                   dimension     3
4999                   columns       2
5000                   graphic       2
5001                   direction     l2r
5002                   ;; =>iso-ir   177
5003                   mother        =ucs-var-002))
5004   (make-charset '==ucs-bmp-var-002
5005                 "uXXXX-var-002's abstract glyph-forms in BMP"
5006                 '(long-name     "UCS-BMP-var-002 glyph-forms"
5007                   chars         256
5008                   dimension     2
5009                   columns       2
5010                   graphic       2
5011                   direction     l2r
5012                   ;; =>iso-ir   177
5013                   mother        ==ucs-var-002
5014                   min-code #x2E00
5015                   max-code #x9FCC
5016                   registry "ucs\\.var002-0"))
5017   (make-charset '==ucs-sip-var-002
5018                 "uXXXX-var-002's abstract glyph-forms in SIP"
5019                 '(long-name     "UCS-SIP-var-002 glyph-forms"
5020                   chars         256
5021                   dimension     2
5022                   columns       2
5023                   graphic       2
5024                   direction     l2r
5025                   mother        ==ucs-var-002
5026                   min-code #x20000 max-code #x2FFFF
5027                   registry "ucs00\\.var002-2"))
5028
5029   (make-charset '=ucs-var-003
5030                 "uXXXX-var-003 glyph-images of GlyphWiki"
5031                 '(long-name     "UCS-var-003"
5032                   chars         256
5033                   dimension     3
5034                   columns       2
5035                   graphic       2
5036                   direction     l2r
5037                   ;; =>iso-ir   177
5038                   mother        =ucs))
5039   (make-charset '=ucs-bmp-var-003
5040                 "uXXXX-var-003 glyph-images in BMP"
5041                 '(long-name     "UCS-BMP-var-003"
5042                   chars         256
5043                   dimension     2
5044                   columns       2
5045                   graphic       2
5046                   direction     l2r
5047                   ;; =>iso-ir   177
5048                   mother        =ucs-var-003
5049                   min-code #x2E00
5050                   max-code #x9FCC
5051                   registry "ucs\\.var003-0"))
5052   (make-charset '=ucs-sip-var-003
5053                 "uXXXX-var-003 glyph-images in SIP"
5054                 '(long-name     "UCS-SIP-var-003"
5055                   chars         256
5056                   dimension     2
5057                   columns       2
5058                   graphic       2
5059                   direction     l2r
5060                   mother        =ucs-var-003
5061                   min-code #x20000 max-code #x2FFFF
5062                   registry "ucs00\\.var003-2"))
5063   (make-charset '=ucs-tip-var-003
5064                 "uXXXX-var-003 glyph-images in TIP"
5065                 '(long-name     "UCS-TIP-var-003"
5066                   chars         256
5067                   dimension     2
5068                   columns       2
5069                   graphic       2
5070                   direction     l2r
5071                   mother        =ucs-var-003
5072                   min-code #x30000 max-code #x3FFFF
5073                   registry "ucs00\\.var003-3"))
5074   (make-charset '=+>ucs-var-003
5075                 "uXXXX-var-003's unified glyphs of GlyphWiki"
5076                 '(long-name     "UCS-var-003 unified glyphs"
5077                   chars         256
5078                   dimension     3
5079                   columns       2
5080                   graphic       2
5081                   direction     l2r
5082                   ;; =>iso-ir   177
5083                   mother        =ucs-var-003))
5084   (make-charset '=+>ucs-bmp-var-003
5085                 "uXXXX-var-003's unified glyphs in BMP"
5086                 '(long-name     "UCS-BMP-var-003 unified glyphs"
5087                   chars         256
5088                   dimension     2
5089                   columns       2
5090                   graphic       2
5091                   direction     l2r
5092                   ;; =>iso-ir   177
5093                   mother        =+>ucs-var-003
5094                   min-code #x2E00
5095                   max-code #x9FCC
5096                   registry "ucs\\.var003-0"))
5097   (make-charset '=+>ucs-tip-var-003
5098                 "uXXXX-var-003 unified glyphs in TIP"
5099                 '(long-name     "UCS-TIP-var-003 unified glyphs"
5100                   chars         256
5101                   dimension     2
5102                   columns       2
5103                   graphic       2
5104                   direction     l2r
5105                   mother        =+>ucs-var-003
5106                   min-code #x30000 max-code #x3FFFF
5107                   registry "ucs00\\.var003-3"))
5108   (make-charset '==ucs-var-003
5109                 "Abstract glyph-forms corresponding with uXXXX-var-003 of GlyphWiki"
5110                 '(long-name     "UCS-var-003"
5111                   chars         256
5112                   dimension     3
5113                   columns       2
5114                   graphic       2
5115                   direction     l2r
5116                   ;; =>iso-ir   177
5117                   mother        =ucs-var-003))
5118   (make-charset '==ucs-bmp-var-003
5119                 "uXXXX-var-003's abstract glyph-forms in BMP"
5120                 '(long-name     "UCS-BMP-var-003 glyph-forms"
5121                   chars         256
5122                   dimension     2
5123                   columns       2
5124                   graphic       2
5125                   direction     l2r
5126                   ;; =>iso-ir   177
5127                   mother        ==ucs-var-003
5128                   min-code #x2E00
5129                   max-code #x9FCC
5130                   registry "ucs\\.var003-0"))
5131
5132   (make-charset '=ucs-var-004
5133                 "uXXXX-var-004 glyph-images of GlyphWiki"
5134                 '(long-name     "UCS-var-004"
5135                   chars         256
5136                   dimension     3
5137                   columns       2
5138                   graphic       2
5139                   direction     l2r
5140                   ;; =>iso-ir   177
5141                   mother        =ucs))
5142   (make-charset '=ucs-bmp-var-004
5143                 "uXXXX-var-004 glyph-images in BMP"
5144                 '(long-name     "UCS-BMP-var-004"
5145                   chars         256
5146                   dimension     2
5147                   columns       2
5148                   graphic       2
5149                   direction     l2r
5150                   ;; =>iso-ir   177
5151                   mother        =ucs-var-004
5152                   min-code #x2E00
5153                   max-code #x9FCC
5154                   registry "ucs\\.var004-0"))
5155   (make-charset '=ucs-sip-var-004
5156                 "uXXXX-var-004 glyph-images in SIP"
5157                 '(long-name     "UCS-SIP-var-004"
5158                   chars         256
5159                   dimension     2
5160                   columns       2
5161                   graphic       2
5162                   direction     l2r
5163                   mother        =ucs-var-004
5164                   min-code #x20000 max-code #x2FFFF
5165                   registry "ucs00\\.var004-2"))
5166   (make-charset '=ucs-tip-var-004
5167                 "uXXXX-var-004 glyph-images in TIP"
5168                 '(long-name     "UCS-TIP-var-004"
5169                   chars         256
5170                   dimension     2
5171                   columns       2
5172                   graphic       2
5173                   direction     l2r
5174                   mother        =ucs-var-004
5175                   min-code #x30000 max-code #x3FFFF
5176                   registry "ucs00\\.var004-3"))
5177
5178   (make-charset '=ucs-var-005
5179                 "uXXXX-var-005 glyph-images of GlyphWiki"
5180                 '(long-name     "UCS-var-005"
5181                   chars         256
5182                   dimension     3
5183                   columns       2
5184                   graphic       2
5185                   direction     l2r
5186                   ;; =>iso-ir   177
5187                   mother        =ucs))
5188   (make-charset '=ucs-bmp-var-005
5189                 "uXXXX-var-005 glyph-images in BMP"
5190                 '(long-name     "UCS-BMP-var-005"
5191                   chars         256
5192                   dimension     2
5193                   columns       2
5194                   graphic       2
5195                   direction     l2r
5196                   ;; =>iso-ir   177
5197                   mother        =ucs-var-005
5198                   min-code #x2E00
5199                   max-code #x9FCC
5200                   registry "ucs\\.var005-0"))
5201   (make-charset '=ucs-sip-var-005
5202                 "uXXXX-var-005 glyph-images in SIP"
5203                 '(long-name     "UCS-SIP-var-005"
5204                   chars         256
5205                   dimension     2
5206                   columns       2
5207                   graphic       2
5208                   direction     l2r
5209                   mother        =ucs-var-005
5210                   min-code #x20000 max-code #x2FFFF
5211                   registry "ucs00\\.var005-2"))
5212
5213   (make-charset '=ucs-var-006
5214                 "uXXXX-var-006 glyph-images of GlyphWiki"
5215                 '(long-name     "UCS-var-006"
5216                   chars         256
5217                   dimension     3
5218                   columns       2
5219                   graphic       2
5220                   direction     l2r
5221                   ;; =>iso-ir   177
5222                   mother        =ucs))
5223   (make-charset '=ucs-bmp-var-006
5224                 "uXXXX-var-006 glyph-images in BMP"
5225                 '(long-name     "UCS-BMP-var-006"
5226                   chars         256
5227                   dimension     2
5228                   columns       2
5229                   graphic       2
5230                   direction     l2r
5231                   ;; =>iso-ir   177
5232                   mother        =ucs-var-006
5233                   min-code #x2E00
5234                   max-code #x9FCC
5235                   registry "ucs\\.var006-0"))
5236   (make-charset '=ucs-sip-var-006
5237                 "uXXXX-var-006 glyph-images in SIP"
5238                 '(long-name     "UCS-SIP-var-006"
5239                   chars         256
5240                   dimension     2
5241                   columns       2
5242                   graphic       2
5243                   direction     l2r
5244                   mother        =ucs-var-006
5245                   min-code #x20000 max-code #x2FFFF
5246                   registry "ucs00\\.var006-2"))
5247
5248   (make-charset '=ucs-var-007
5249                 "uXXXX-var-007 glyph-images of GlyphWiki"
5250                 '(long-name     "UCS-var-007"
5251                   chars         256
5252                   dimension     3
5253                   columns       2
5254                   graphic       2
5255                   direction     l2r
5256                   ;; =>iso-ir   177
5257                   mother        =ucs))
5258   (make-charset '=ucs-bmp-var-007
5259                 "uXXXX-var-007 glyph-images in BMP"
5260                 '(long-name     "UCS-BMP-var-007"
5261                   chars         256
5262                   dimension     2
5263                   columns       2
5264                   graphic       2
5265                   direction     l2r
5266                   ;; =>iso-ir   177
5267                   mother        =ucs-var-007
5268                   min-code #x2E00
5269                   max-code #x9FCC
5270                   registry "ucs\\.var007-0"))
5271   (make-charset '==ucs-var-007
5272                 "Abstract glyph-forms corresponding with uXXXX-var-007 of GlyphWiki"
5273                 '(long-name     "UCS-var-007"
5274                   chars         256
5275                   dimension     3
5276                   columns       2
5277                   graphic       2
5278                   direction     l2r
5279                   ;; =>iso-ir   177
5280                   mother        =ucs-var-007))
5281   (make-charset '==ucs-bmp-var-007
5282                 "uXXXX-var-007's abstract glyph-forms in BMP"
5283                 '(long-name     "UCS-BMP-var-007 glyph-forms"
5284                   chars         256
5285                   dimension     2
5286                   columns       2
5287                   graphic       2
5288                   direction     l2r
5289                   ;; =>iso-ir   177
5290                   mother        ==ucs-var-007
5291                   min-code #x2E00
5292                   max-code #x9FCC
5293                   registry "ucs\\.var007-0"))
5294
5295   (make-charset '=ucs-var-008
5296                 "uXXXX-var-008 glyph-images of GlyphWiki"
5297                 '(long-name     "UCS-var-008"
5298                   chars         256
5299                   dimension     3
5300                   columns       2
5301                   graphic       2
5302                   direction     l2r
5303                   ;; =>iso-ir   177
5304                   mother        =ucs))
5305   (make-charset '=ucs-bmp-var-008
5306                 "uXXXX-var-008 glyph-images in BMP"
5307                 '(long-name     "UCS-BMP-var-008"
5308                   chars         256
5309                   dimension     2
5310                   columns       2
5311                   graphic       2
5312                   direction     l2r
5313                   ;; =>iso-ir   177
5314                   mother        =ucs-var-008
5315                   min-code #x2E00
5316                   max-code #x9FCC
5317                   registry "ucs\\.var008-0"))
5318   (make-charset '=ucs-sip-var-008
5319                 "uXXXX-var-008 glyph-images in SIP"
5320                 '(long-name     "UCS-SIP-var-008"
5321                   chars         256
5322                   dimension     2
5323                   columns       2
5324                   graphic       2
5325                   direction     l2r
5326                   mother        =ucs-var-008
5327                   min-code #x20000 max-code #x2FFFF
5328                   registry "ucs00\\.var008-2"))
5329
5330   (make-charset '=ucs-var-010
5331                 "uXXXX-var-010 glyph-forms of GlyphWiki"
5332                 '(long-name     "UCS-var-010"
5333                   chars         256
5334                   dimension     3
5335                   columns       2
5336                   graphic       2
5337                   direction     l2r
5338                   ;; =>iso-ir   177
5339                   mother        =ucs))
5340   (make-charset '=ucs-bmp-var-010
5341                 "uXXXX-var-010 glyph-forms in BMP"
5342                 '(long-name     "UCS-BMP-var-010"
5343                   chars         256
5344                   dimension     2
5345                   columns       2
5346                   graphic       2
5347                   direction     l2r
5348                   ;; =>iso-ir   177
5349                   mother        =ucs-var-010
5350                   min-code #x2E00
5351                   max-code #x9FCC
5352                   registry "ucs\\.var010-0"))
5353   (make-charset '=ucs-sip-var-010
5354                 "uXXXX-var-010 glyph-images in SIP"
5355                 '(long-name     "UCS-SIP-var-010"
5356                   chars         256
5357                   dimension     2
5358                   columns       2
5359                   graphic       2
5360                   direction     l2r
5361                   mother        =ucs-var-010
5362                   min-code #x20000 max-code #x2FFFF
5363                   registry "ucs00\\.var010-2"))
5364
5365   (make-charset '=ucs-itaiji-001
5366                 "uXXXX-itaiji-001 glyphs of GlyphWiki"
5367                 '(long-name     "UCS-itaiji-001"
5368                   chars         256
5369                   dimension     3
5370                   columns       2
5371                   graphic       2
5372                   direction     l2r
5373                   ;; =>iso-ir   177
5374                   mother        =ucs))
5375   (make-charset '=ucs-itaiji-001-additional-idc
5376                 "uXXXX-itaiji-001 glyph-images for additional IDC"
5377                 '(long-name     "UCS-BMP-itaiji-001 additional IDC"
5378                   chars         256
5379                   dimension     2
5380                   columns       2
5381                   graphic       2
5382                   direction     l2r
5383                   ;; =>iso-ir   177
5384                   mother        =ucs-itaiji-001
5385                   min-code #x2FF1
5386                   max-code #x2FFB
5387                   registry "ucs\\.itaiji001-0"))
5388   (make-charset '=ucs-bmp-itaiji-001
5389                 "uXXXX-itaiji-001 glyph-images in BMP"
5390                 '(long-name     "UCS-BMP-itaiji-001"
5391                   chars         256
5392                   dimension     2
5393                   columns       2
5394                   graphic       2
5395                   direction     l2r
5396                   ;; =>iso-ir   177
5397                   mother        =ucs-itaiji-001
5398                   min-code #x2E00
5399                   max-code #x9FCC
5400                   registry "ucs\\.itaiji001-0"))
5401   (make-charset '=ucs-sip-itaiji-001
5402                 "uXXXX-itaiji-001 glyph-images in SIP"
5403                 '(long-name     "UCS-SIP-itaiji-001"
5404                   chars         256
5405                   dimension     2
5406                   columns       2
5407                   graphic       2
5408                   direction     l2r
5409                   mother        =ucs-itaiji-001
5410                   min-code #x20000 max-code #x2FFFF
5411                   registry "ucs00\\.itaiji001-2"))
5412   (make-charset '=ucs-tip-itaiji-001
5413                 "uXXXX-itaiji-001 glyph-images in TIP"
5414                 '(long-name     "UCS-TIP-itaiji-001"
5415                   chars         256
5416                   dimension     2
5417                   columns       2
5418                   graphic       2
5419                   direction     l2r
5420                   mother        =ucs-itaiji-001
5421                   min-code #x30000 max-code #x3FFFF
5422                   registry "ucs00\\.itaiji001-3"))
5423   (make-charset '=>ucs-itaiji-001
5424                 "Abstract characters corresponding with uXXXX-itaiji-001 of GlyphWiki"
5425                 '(long-name     "UCS-itaiji-001"
5426                   chars         256
5427                   dimension     3
5428                   columns       2
5429                   graphic       2
5430                   direction     l2r
5431                   ;; =>iso-ir   177
5432                   mother        =ucs))
5433   (make-charset '=>ucs-bmp-itaiji-001
5434                 "uXXXX-itaiji-001's abstract characters in BMP"
5435                 '(long-name     "UCS-BMP-itaiji-001 characters"
5436                   chars         256
5437                   dimension     2
5438                   columns       2
5439                   graphic       2
5440                   direction     l2r
5441                   ;; =>iso-ir   177
5442                   mother        =>ucs-itaiji-001
5443                   min-code #x2E00
5444                   max-code #x9FCC
5445                   registry "ucs\\.itaiji001-0"))
5446   (make-charset '=>ucs-sip-itaiji-001
5447                 "uXXXX-itaiji-001 characters in SIP"
5448                 '(long-name     "UCS-SIP-itaiji-001"
5449                   chars         256
5450                   dimension     2
5451                   columns       2
5452                   graphic       2
5453                   direction     l2r
5454                   mother        =>ucs-itaiji-001
5455                   min-code #x20000 max-code #x2FFFF
5456                   registry "ucs00\\.itaiji001-2"))
5457   (make-charset '=>ucs-tip-itaiji-001
5458                 "uXXXX-itaiji-001 characters in TIP"
5459                 '(long-name     "UCS-TIP-itaiji-001"
5460                   chars         256
5461                   dimension     2
5462                   columns       2
5463                   graphic       2
5464                   direction     l2r
5465                   mother        =>ucs-itaiji-001
5466                   min-code #x30000 max-code #x3FFFF
5467                   registry "ucs00\\.itaiji001-3"))
5468   (make-charset '==ucs-itaiji-001
5469                 "Abstract glyph-forms corresponding with uXXXX-itaiji-001 of GlyphWiki"
5470                 '(long-name     "UCS-itaiji-001"
5471                   chars         256
5472                   dimension     3
5473                   columns       2
5474                   graphic       2
5475                   direction     l2r
5476                   ;; =>iso-ir   177
5477                   mother        =ucs-itaiji-001))
5478   (make-charset '==ucs-bmp-itaiji-001
5479                 "uXXXX-itaiji-001's abstract glyph-forms in BMP"
5480                 '(long-name     "UCS-BMP-itaiji-001"
5481                   chars         256
5482                   dimension     2
5483                   columns       2
5484                   graphic       2
5485                   direction     l2r
5486                   ;; =>iso-ir   177
5487                   mother        ==ucs-itaiji-001
5488                   min-code #x2E00
5489                   max-code #x9FCC
5490                   registry "ucs\\.itaiji001-0"))
5491   (make-charset '==ucs-sip-itaiji-001
5492                 "uXXXX-itaiji-001's abstract glyph-forms in SIP"
5493                 '(long-name     "UCS-SIP-itaiji-001"
5494                   chars         256
5495                   dimension     2
5496                   columns       2
5497                   graphic       2
5498                   direction     l2r
5499                   mother        ==ucs-itaiji-001
5500                   min-code #x20000 max-code #x2FFFF
5501                   registry "ucs00\\.itaiji001-2"))
5502   (make-charset '=>ucs-itaiji-001@iwds-1
5503                 "uXXXX-itaiji-001's abstract characters based on IWDS-1"
5504                 '(long-name     "IWDS-1 abstract characters of UCS-itaiji-001"
5505                   chars         256
5506                   dimension     3
5507                   columns       2
5508                   graphic       2
5509                   direction     l2r
5510                   ;; =>iso-ir   177
5511                   mother        =>ucs-itaiji-001))
5512   (make-charset '=>ucs-bmp-itaiji-001@iwds-1
5513                 "IWDS-1 abstract characters of UCS-itaiji-001 in BMP"
5514                 '(long-name     "=>ucs-itaiji-001@iwds-1 in BMP"
5515                   chars         256
5516                   dimension     2
5517                   columns       2
5518                   graphic       2
5519                   direction     l2r
5520                   ;; =>iso-ir   177
5521                   mother        =>ucs-itaiji-001@iwds-1
5522                   min-code #x2E00
5523                   max-code #x9FCC
5524                   registry "ucs\\.itaiji001-0"))
5525   (make-charset '=>ucs-sip-itaiji-001@iwds-1
5526                 "IWDS-1 abstract characters of UCS-itaiji-001 in SIP"
5527                 '(long-name     "=>ucs-itaiji-001@iwds-1 in SIP"
5528                   chars         256
5529                   dimension     2
5530                   columns       2
5531                   graphic       2
5532                   direction     l2r
5533                   mother        =>ucs-itaiji-001@iwds-1
5534                   min-code #x20000 max-code #x2FFFF
5535                   registry "ucs00\\.itaiji001-2"))
5536
5537   (make-charset '=ucs-itaiji-002
5538                 "uXXXX-itaiji-002 glyphs of GlyphWiki"
5539                 '(long-name     "UCS-itaiji-002"
5540                   chars         256
5541                   dimension     3
5542                   columns       2
5543                   graphic       2
5544                   direction     l2r
5545                   ;; =>iso-ir   177
5546                   mother        =ucs))
5547   (make-charset '=ucs-bmp-itaiji-002
5548                 "uXXXX-itaiji-002 glyph-images in BMP"
5549                 '(long-name     "UCS-BMP-itaiji-002"
5550                   chars         256
5551                   dimension     2
5552                   columns       2
5553                   graphic       2
5554                   direction     l2r
5555                   ;; =>iso-ir   177
5556                   mother        =ucs-itaiji-002
5557                   min-code #x2E00
5558                   max-code #x9FCC
5559                   registry "ucs\\.itaiji002-0"))
5560   (make-charset '=ucs-sip-itaiji-002
5561                 "uXXXX-itaiji-002 glyph-images in SIP"
5562                 '(long-name     "UCS-SIP-itaiji-002"
5563                   chars         256
5564                   dimension     2
5565                   columns       2
5566                   graphic       2
5567                   direction     l2r
5568                   mother        =ucs-itaiji-002
5569                   min-code #x20000 max-code #x2FFFF
5570                   registry "ucs00\\.itaiji002-2"))
5571   (make-charset '=>ucs-itaiji-002
5572                 "Abstract characters corresponding with uXXXX-itaiji-002 of GlyphWiki"
5573                 '(long-name     "UCS-itaiji-002"
5574                   chars         256
5575                   dimension     3
5576                   columns       2
5577                   graphic       2
5578                   direction     l2r
5579                   ;; =>iso-ir   177
5580                   mother        =ucs-itaiji-002))
5581   (make-charset '=>ucs-bmp-itaiji-002
5582                 "uXXXX-itaiji-002's abstract characters in BMP"
5583                 '(long-name     "UCS-BMP-itaiji-002 characters"
5584                   chars         256
5585                   dimension     2
5586                   columns       2
5587                   graphic       2
5588                   direction     l2r
5589                   ;; =>iso-ir   177
5590                   mother        =>ucs-itaiji-002
5591                   min-code #x2E00
5592                   max-code #x9FCC
5593                   registry "ucs\\.itaiji002-0"))
5594   (make-charset '=>ucs-sip-itaiji-002
5595                 "uXXXX-itaiji-002 characters in SIP"
5596                 '(long-name     "UCS-SIP-itaiji-002"
5597                   chars         256
5598                   dimension     2
5599                   columns       2
5600                   graphic       2
5601                   direction     l2r
5602                   mother        =>ucs-itaiji-002
5603                   min-code #x20000 max-code #x2FFFF
5604                   registry "ucs00\\.itaiji002-2"))
5605   (make-charset '==ucs-itaiji-002
5606                 "Abstract glyph-forms corresponding with uXXXX-itaiji-002 of GlyphWiki"
5607                 '(long-name     "UCS-itaiji-002"
5608                   chars         256
5609                   dimension     3
5610                   columns       2
5611                   graphic       2
5612                   direction     l2r
5613                   ;; =>iso-ir   177
5614                   mother        =ucs-itaiji-002))
5615   (make-charset '==ucs-bmp-itaiji-002
5616                 "uXXXX-itaiji-002's abstract glyph-forms in BMP"
5617                 '(long-name     "UCS-BMP-itaiji-002 characters"
5618                   chars         256
5619                   dimension     2
5620                   columns       2
5621                   graphic       2
5622                   direction     l2r
5623                   ;; =>iso-ir   177
5624                   mother        ==ucs-itaiji-002
5625                   min-code #x2E00
5626                   max-code #x9FCC
5627                   registry "ucs\\.itaiji002-0"))
5628   (make-charset '==ucs-sip-itaiji-002
5629                 "uXXXX-itaiji-002's abstract glyph-forms in SIP"
5630                 '(long-name     "UCS-SIP-itaiji-002"
5631                   chars         256
5632                   dimension     2
5633                   columns       2
5634                   graphic       2
5635                   direction     l2r
5636                   mother        ==ucs-itaiji-002
5637                   min-code #x20000 max-code #x2FFFF
5638                   registry "ucs00\\.itaiji002-2"))
5639   (make-charset '=>ucs-itaiji-002@iwds-1
5640                 "uXXXX-itaiji-002's abstract characters based on IWDS-1"
5641                 '(long-name     "IWDS-1 abstract characters of UCS-itaiji-002"
5642                   chars         256
5643                   dimension     3
5644                   columns       2
5645                   graphic       2
5646                   direction     l2r
5647                   ;; =>iso-ir   177
5648                   mother        =>ucs-itaiji-002))
5649   (make-charset '=>ucs-bmp-itaiji-002@iwds-1
5650                 "IWDS-1 abstract characters of UCS-itaiji-002 in BMP"
5651                 '(long-name     "=>ucs-itaiji-002@iwds-1 in BMP"
5652                   chars         256
5653                   dimension     2
5654                   columns       2
5655                   graphic       2
5656                   direction     l2r
5657                   ;; =>iso-ir   177
5658                   mother        =>ucs-itaiji-002@iwds-1
5659                   min-code #x2E00
5660                   max-code #x9FCC
5661                   registry "ucs\\.itaiji002-0"))
5662   (make-charset '=>ucs-sip-itaiji-002@iwds-1
5663                 "IWDS-1 abstract characters of uXXXX-itaiji-002 in SIP"
5664                 '(long-name     "=>ucs-itaiji-002@iwds-1 in SIP"
5665                   chars         256
5666                   dimension     2
5667                   columns       2
5668                   graphic       2
5669                   direction     l2r
5670                   mother        =>ucs-itaiji-002@iwds-1
5671                   min-code #x20000 max-code #x2FFFF
5672                   registry "ucs00\\.itaiji002-2"))
5673
5674   (make-charset '=ucs-itaiji-003
5675                 "uXXXX-itaiji-003 glyphs of GlyphWiki"
5676                 '(long-name     "UCS-itaiji-003"
5677                   chars         256
5678                   dimension     3
5679                   columns       2
5680                   graphic       2
5681                   direction     l2r
5682                   ;; =>iso-ir   177
5683                   mother        =ucs))
5684   (make-charset '=ucs-bmp-itaiji-003
5685                 "uXXXX-itaiji-003 glyph-images in BMP"
5686                 '(long-name     "UCS-BMP-itaiji-003"
5687                   chars         256
5688                   dimension     2
5689                   columns       2
5690                   graphic       2
5691                   direction     l2r
5692                   ;; =>iso-ir   177
5693                   mother        =ucs-itaiji-003
5694                   min-code #x2E00
5695                   max-code #x9FCC
5696                   registry "ucs\\.itaiji003-0"))
5697   (make-charset '=ucs-sip-itaiji-003
5698                 "uXXXX-itaiji-003 glyphs in SIP"
5699                 '(long-name     "UCS-SIP-itaiji-003"
5700                   chars         256
5701                   dimension     2
5702                   columns       2
5703                   graphic       2
5704                   direction     l2r
5705                   mother        =ucs-itaiji-003
5706                   min-code #x20000 max-code #x2FFFF
5707                   registry "ucs00\\.itaiji003-2"))
5708   (make-charset '=>ucs-itaiji-003
5709                 "Abstract characters corresponding with uXXXX-itaiji-003 of GlyphWiki"
5710                 '(long-name     "UCS-itaiji-003"
5711                   chars         256
5712                   dimension     3
5713                   columns       2
5714                   graphic       2
5715                   direction     l2r
5716                   ;; =>iso-ir   177
5717                   mother        =ucs-itaiji-003))
5718   (make-charset '=>ucs-bmp-itaiji-003
5719                 "uXXXX-itaiji-003's abstract characters in BMP"
5720                 '(long-name     "UCS-BMP-itaiji-003 abstract characters"
5721                   chars         256
5722                   dimension     2
5723                   columns       2
5724                   graphic       2
5725                   direction     l2r
5726                   ;; =>iso-ir   177
5727                   mother        =>ucs-itaiji-003
5728                   min-code #x2E00
5729                   max-code #x9FCC
5730                   registry "ucs\\.itaiji003-0"))
5731   (make-charset '=>ucs-sip-itaiji-003
5732                 "uXXXX-itaiji-003's abstract characters in SIP"
5733                 '(long-name     "UCS-SIP-itaiji-003 abstract characters"
5734                   chars         256
5735                   dimension     2
5736                   columns       2
5737                   graphic       2
5738                   direction     l2r
5739                   mother        =>ucs-itaiji-003
5740                   min-code #x20000 max-code #x2FFFF
5741                   registry "ucs00\\.itaiji003-2"))
5742   (make-charset '==ucs-itaiji-003
5743                 "Abstract glyph-forms corresponding with uXXXX-itaiji-003 of GlyphWiki"
5744                 '(long-name     "UCS-itaiji-003"
5745                   chars         256
5746                   dimension     3
5747                   columns       2
5748                   graphic       2
5749                   direction     l2r
5750                   ;; =>iso-ir   177
5751                   mother        =ucs-itaiji-003))
5752   (make-charset '==ucs-bmp-itaiji-003
5753                 "uXXXX-itaiji-003's abstract glyph-forms in BMP"
5754                 '(long-name     "UCS-BMP-itaiji-003 glyph-forms"
5755                   chars         256
5756                   dimension     2
5757                   columns       2
5758                   graphic       2
5759                   direction     l2r
5760                   ;; =>iso-ir   177
5761                   mother        ==ucs-itaiji-003
5762                   min-code #x2E00
5763                   max-code #x9FCC
5764                   registry "ucs\\.itaiji003-0"))
5765   (make-charset '==ucs-sip-itaiji-003
5766                 "uXXXX-itaiji-003's abstract glyph-forms in SIP"
5767                 '(long-name     "UCS-SIP-itaiji-003"
5768                   chars         256
5769                   dimension     2
5770                   columns       2
5771                   graphic       2
5772                   direction     l2r
5773                   mother        ==ucs-itaiji-003
5774                   min-code #x20000 max-code #x2FFFF
5775                   registry "ucs00\\.itaiji003-2"))
5776   (make-charset '=>ucs-itaiji-003@iwds-1
5777                 "uXXXX-itaiji-003's abstract characters based on IWDS-1"
5778                 '(long-name     "IWDS-1 abstract characters of UCS-itaiji-003"
5779                   chars         256
5780                   dimension     3
5781                   columns       2
5782                   graphic       2
5783                   direction     l2r
5784                   ;; =>iso-ir   177
5785                   mother        =>ucs-itaiji-003))
5786   (make-charset '=>ucs-bmp-itaiji-003@iwds-1
5787                 "IWDS-1 abstract characters of UCS-itaiji-003 in BMP"
5788                 '(long-name     "=>ucs-itaiji-003@iwds-1 in BMP"
5789                   chars         256
5790                   dimension     2
5791                   columns       2
5792                   graphic       2
5793                   direction     l2r
5794                   ;; =>iso-ir   177
5795                   mother        =>ucs-itaiji-003@iwds-1
5796                   min-code #x2E00
5797                   max-code #x9FCC
5798                   registry "ucs\\.itaiji003-0"))
5799   (make-charset '=>ucs-sip-itaiji-003@iwds-1
5800                 "IWDS-1 abstract characters of UCS-itaiji-003 in SIP"
5801                 '(long-name     "=>ucs-itaiji-003@iwds-1 in SIP"
5802                   chars         256
5803                   dimension     2
5804                   columns       2
5805                   graphic       2
5806                   direction     l2r
5807                   mother        =>ucs-itaiji-003@iwds-1
5808                   min-code #x20000 max-code #x2FFFF
5809                   registry "ucs00\\.itaiji003-2"))
5810
5811   (make-charset '=ucs-itaiji-004
5812                 "uXXXX-itaiji-004 glyphs of GlyphWiki"
5813                 '(long-name     "UCS-itaiji-004"
5814                   chars         256
5815                   dimension     3
5816                   columns       2
5817                   graphic       2
5818                   direction     l2r
5819                   ;; =>iso-ir   177
5820                   mother        =ucs))
5821   (make-charset '=ucs-bmp-itaiji-004
5822                 "uXXXX-itaiji-004 glyph-images in BMP"
5823                 '(long-name     "UCS-BMP-itaiji-004"
5824                   chars         256
5825                   dimension     2
5826                   columns       2
5827                   graphic       2
5828                   direction     l2r
5829                   ;; =>iso-ir   177
5830                   mother        =ucs-itaiji-004
5831                   min-code #x2E00
5832                   max-code #x9FCC
5833                   registry "ucs\\.itaiji004-0"))
5834   (make-charset '=ucs-sip-itaiji-004
5835                 "uXXXX-itaiji-004 glyph-images in SIP"
5836                 '(long-name     "UCS-SIP-itaiji-004"
5837                   chars         256
5838                   dimension     2
5839                   columns       2
5840                   graphic       2
5841                   direction     l2r
5842                   mother        =ucs-itaiji-004
5843                   min-code #x20000 max-code #x2FFFF
5844                   registry "ucs00\\.itaiji004-2"))
5845   (make-charset '=>ucs-itaiji-004
5846                 "Abstract characters corresponding with uXXXX-itaiji-004 of GlyphWiki"
5847                 '(long-name     "UCS-itaiji-004"
5848                   chars         256
5849                   dimension     3
5850                   columns       2
5851                   graphic       2
5852                   direction     l2r
5853                   ;; =>iso-ir   177
5854                   mother        =ucs-itaiji-004))
5855   (make-charset '=>ucs-bmp-itaiji-004
5856                 "uXXXX-itaiji-004's abstract characters in BMP"
5857                 '(long-name     "UCS-BMP-itaiji-004 characters"
5858                   chars         256
5859                   dimension     2
5860                   columns       2
5861                   graphic       2
5862                   direction     l2r
5863                   ;; =>iso-ir   177
5864                   mother        =>ucs-itaiji-004
5865                   min-code #x2E00
5866                   max-code #x9FCC
5867                   registry "ucs\\.itaiji004-0"))
5868   (make-charset '=>ucs-sip-itaiji-004
5869                 "uXXXX-itaiji-004 glyph-images in SIP"
5870                 '(long-name     "UCS-SIP-itaiji-004"
5871                   chars         256
5872                   dimension     2
5873                   columns       2
5874                   graphic       2
5875                   direction     l2r
5876                   mother        =>ucs-itaiji-004
5877                   min-code #x20000 max-code #x2FFFF
5878                   registry "ucs00\\.itaiji004-2"))
5879   (make-charset '==ucs-itaiji-004
5880                 "Abstract glyph-forms corresponding with uXXXX-itaiji-004 of GlyphWiki"
5881                 '(long-name     "UCS-itaiji-004"
5882                   chars         256
5883                   dimension     3
5884                   columns       2
5885                   graphic       2
5886                   direction     l2r
5887                   ;; =>iso-ir   177
5888                   mother        =ucs-itaiji-004))
5889   (make-charset '==ucs-sip-itaiji-004
5890                 "uXXXX-itaiji-004's abstract glyph-forms in SIP"
5891                 '(long-name     "UCS-SIP-itaiji-004"
5892                   chars         256
5893                   dimension     2
5894                   columns       2
5895                   graphic       2
5896                   direction     l2r
5897                   mother        ==ucs-itaiji-004
5898                   min-code #x20000 max-code #x2FFFF
5899                   registry "ucs00\\.itaiji004-2"))
5900
5901   (make-charset '=ucs-itaiji-005
5902                 "uXXXX-itaiji-005 glyphs of GlyphWiki"
5903                 '(long-name     "UCS-itaiji-005"
5904                   chars         256
5905                   dimension     3
5906                   columns       2
5907                   graphic       2
5908                   direction     l2r
5909                   ;; =>iso-ir   177
5910                   mother        =ucs))
5911   (make-charset '=ucs-bmp-itaiji-005
5912                 "uXXXX-itaiji-005 glyph-images in BMP"
5913                 '(long-name     "UCS-BMP-itaiji-005"
5914                   chars         256
5915                   dimension     2
5916                   columns       2
5917                   graphic       2
5918                   direction     l2r
5919                   ;; =>iso-ir   177
5920                   mother        =ucs-itaiji-005
5921                   min-code #x2E00
5922                   max-code #x9FCC
5923                   registry "ucs\\.itaiji005-0"))
5924   (make-charset '=ucs-sip-itaiji-005
5925                 "uXXXX-itaiji-005 glyph-images in SIP"
5926                 '(long-name     "UCS-SIP-itaiji-005"
5927                   chars         256
5928                   dimension     2
5929                   columns       2
5930                   graphic       2
5931                   direction     l2r
5932                   mother        =ucs-itaiji-005
5933                   min-code #x20000 max-code #x2FFFF
5934                   registry "ucs00\\.itaiji005-2"))
5935   (make-charset '=>ucs-itaiji-005
5936                 "Abstract characters corresponding with uXXXX-itaiji-005 of GlyphWiki"
5937                 '(long-name     "UCS-itaiji-005"
5938                   chars         256
5939                   dimension     3
5940                   columns       2
5941                   graphic       2
5942                   direction     l2r
5943                   ;; =>iso-ir   177
5944                   mother        =ucs))
5945   (make-charset '=>ucs-bmp-itaiji-005
5946                 "uXXXX-itaiji-005's abstract characters in BMP"
5947                 '(long-name     "UCS-BMP-itaiji-005 characters"
5948                   chars         256
5949                   dimension     2
5950                   columns       2
5951                   graphic       2
5952                   direction     l2r
5953                   ;; =>iso-ir   177
5954                   mother        =>ucs-itaiji-005
5955                   min-code #x2E00
5956                   max-code #x9FCC
5957                   registry "ucs\\.itaiji005-0"))
5958   (make-charset '=>ucs-sip-itaiji-005
5959                 "uXXXX-itaiji-005's abstract characters in SIP"
5960                 '(long-name     "UCS-SIP-itaiji-005 characters"
5961                   chars         256
5962                   dimension     2
5963                   columns       2
5964                   graphic       2
5965                   direction     l2r
5966                   mother        =>ucs-itaiji-005
5967                   min-code #x20000 max-code #x2FFFF
5968                   registry "ucs00\\.itaiji005-2"))
5969   (make-charset '==ucs-itaiji-005
5970                 "Abstract glyph-forms corresponding with uXXXX-itaiji-005 of GlyphWiki"
5971                 '(long-name     "UCS-itaiji-005"
5972                   chars         256
5973                   dimension     3
5974                   columns       2
5975                   graphic       2
5976                   direction     l2r
5977                   ;; =>iso-ir   177
5978                   mother        =ucs-itaiji-005))
5979   (make-charset '==ucs-bmp-itaiji-005
5980                 "uXXXX-itaiji-005's abstract glyph-forms in BMP"
5981                 '(long-name     "UCS-BMP-itaiji-005 characters"
5982                   chars         256
5983                   dimension     2
5984                   columns       2
5985                   graphic       2
5986                   direction     l2r
5987                   ;; =>iso-ir   177
5988                   mother        ==ucs-itaiji-005
5989                   min-code #x2E00
5990                   max-code #x9FCC
5991                   registry "ucs\\.itaiji005-0"))
5992   (make-charset '==ucs-sip-itaiji-005
5993                 "uXXXX-itaiji-005's abstract glyph-forms in SIP"
5994                 '(long-name     "UCS-SIP-itaiji-005"
5995                   chars         256
5996                   dimension     2
5997                   columns       2
5998                   graphic       2
5999                   direction     l2r
6000                   mother        ==ucs-itaiji-005
6001                   min-code #x20000 max-code #x2FFFF
6002                   registry "ucs00\\.itaiji005-2"))
6003
6004   (make-charset '=ucs-itaiji-006
6005                 "uXXXX-itaiji-006 glyphs of GlyphWiki"
6006                 '(long-name     "UCS-itaiji-006"
6007                   chars         256
6008                   dimension     3
6009                   columns       2
6010                   graphic       2
6011                   direction     l2r
6012                   ;; =>iso-ir   177
6013                   mother        =ucs))
6014   (make-charset '=ucs-bmp-itaiji-006
6015                 "uXXXX-itaiji-006 glyphs in BMP"
6016                 '(long-name     "UCS-BMP-itaiji-006"
6017                   chars         256
6018                   dimension     2
6019                   columns       2
6020                   graphic       2
6021                   direction     l2r
6022                   ;; =>iso-ir   177
6023                   mother        =ucs-itaiji-006
6024                   min-code #x2E00
6025                   max-code #x9FCC
6026                   registry "ucs\\.itaiji006-0"))
6027   (make-charset '=ucs-sip-itaiji-006
6028                 "uXXXX-itaiji-006 glyphs in SIP"
6029                 '(long-name     "UCS-SIP-itaiji-006"
6030                   chars         256
6031                   dimension     2
6032                   columns       2
6033                   graphic       2
6034                   direction     l2r
6035                   mother        =ucs-itaiji-006
6036                   min-code #x20000 max-code #x2FFFF
6037                   registry "ucs00\\.itaiji006-2"))
6038   (make-charset '==ucs-itaiji-006
6039                 "Abstract glyph-forms corresponding with uXXXX-itaiji-006 of GlyphWiki"
6040                 '(long-name     "UCS-itaiji-006"
6041                   chars         256
6042                   dimension     3
6043                   columns       2
6044                   graphic       2
6045                   direction     l2r
6046                   ;; =>iso-ir   177
6047                   mother        =ucs-itaiji-006))
6048   (make-charset '==ucs-bmp-itaiji-006
6049                 "uXXXX-itaiji-006's abstract glyph-forms in BMP"
6050                 '(long-name     "UCS-BMP-itaiji-006 glyph-forms"
6051                   chars         256
6052                   dimension     2
6053                   columns       2
6054                   graphic       2
6055                   direction     l2r
6056                   ;; =>iso-ir   177
6057                   mother        ==ucs-itaiji-006
6058                   min-code #x2E00
6059                   max-code #x9FCC
6060                   registry "ucs\\.itaiji006-0"))
6061   (make-charset '=>ucs-itaiji-006
6062                 "Abstract characters corresponding with uXXXX-itaiji-006 of GlyphWiki"
6063                 '(long-name     "UCS-itaiji-006"
6064                   chars         256
6065                   dimension     3
6066                   columns       2
6067                   graphic       2
6068                   direction     l2r
6069                   ;; =>iso-ir   177
6070                   mother        =ucs-itaiji-006))
6071   (make-charset '=>ucs-bmp-itaiji-006
6072                 "uXXXX-itaiji-006's abstract characters in BMP"
6073                 '(long-name     "UCS-BMP-itaiji-006 characters"
6074                   chars         256
6075                   dimension     2
6076                   columns       2
6077                   graphic       2
6078                   direction     l2r
6079                   ;; =>iso-ir   177
6080                   mother        =>ucs-itaiji-006
6081                   min-code #x2E00
6082                   max-code #x9FCC
6083                   registry "ucs\\.itaiji006-0"))
6084   (make-charset '=>ucs-sip-itaiji-006
6085                 "uXXXX-itaiji-006's abstract characters in SIP"
6086                 '(long-name     "UCS-SIP-itaiji-006 characters"
6087                   chars         256
6088                   dimension     2
6089                   columns       2
6090                   graphic       2
6091                   direction     l2r
6092                   mother        =>ucs-itaiji-006
6093                   min-code #x20000 max-code #x2FFFF
6094                   registry "ucs00\\.itaiji006-2"))
6095   (make-charset '=>ucs-itaiji-006@iwds-1
6096                 "uXXXX-itaiji-006's abstract characters based on IWDS-1"
6097                 '(long-name     "IWDS-1 abstract characters of UCS-itaiji-006"
6098                   chars         256
6099                   dimension     3
6100                   columns       2
6101                   graphic       2
6102                   direction     l2r
6103                   ;; =>iso-ir   177
6104                   mother        =>ucs-itaiji-006))
6105   (make-charset '=>ucs-bmp-itaiji-006@iwds-1
6106                 "IWDS-1 abstract characters of UCS-itaiji-006 in BMP"
6107                 '(long-name     "=>ucs-itaiji-006@iwds-1 in BMP"
6108                   chars         256
6109                   dimension     2
6110                   columns       2
6111                   graphic       2
6112                   direction     l2r
6113                   ;; =>iso-ir   177
6114                   mother        =>ucs-itaiji-006@iwds-1
6115                   min-code #x2E00
6116                   max-code #x9FCC
6117                   registry "ucs\\.itaiji006-0"))
6118
6119   (make-charset '=ucs-itaiji-007
6120                 "uXXXX-itaiji-007 glyphs of GlyphWiki"
6121                 '(long-name     "UCS-itaiji-007"
6122                   chars         256
6123                   dimension     3
6124                   columns       2
6125                   graphic       2
6126                   direction     l2r
6127                   ;; =>iso-ir   177
6128                   mother        =ucs))
6129   (make-charset '=ucs-bmp-itaiji-007
6130                 "uXXXX-itaiji-007 glyph-images in BMP"
6131                 '(long-name     "UCS-BMP-itaiji-007"
6132                   chars         256
6133                   dimension     2
6134                   columns       2
6135                   graphic       2
6136                   direction     l2r
6137                   ;; =>iso-ir   177
6138                   mother        =ucs-itaiji-007
6139                   min-code #x2E00
6140                   max-code #x9FCC
6141                   registry "ucs\\.itaiji007-0"))
6142   (make-charset '=ucs-sip-itaiji-007
6143                 "uXXXX-itaiji-007 glyph-images in SIP"
6144                 '(long-name     "UCS-SIP-itaiji-007"
6145                   chars         256
6146                   dimension     2
6147                   columns       2
6148                   graphic       2
6149                   direction     l2r
6150                   mother        =ucs-itaiji-007
6151                   min-code #x20000 max-code #x2FFFF
6152                   registry "ucs00\\.itaiji007-2"))
6153   (make-charset '=>ucs-itaiji-007
6154                 "Abstract characters corresponding with uXXXX-itaiji-007 of GlyphWiki"
6155                 '(long-name     "UCS-itaiji-007"
6156                   chars         256
6157                   dimension     3
6158                   columns       2
6159                   graphic       2
6160                   direction     l2r
6161                   ;; =>iso-ir   177
6162                   mother        =ucs))
6163   (make-charset '=>ucs-bmp-itaiji-007
6164                 "uXXXX-itaiji-007's abstract characters in BMP"
6165                 '(long-name     "UCS-BMP-itaiji-007 characters"
6166                   chars         256
6167                   dimension     2
6168                   columns       2
6169                   graphic       2
6170                   direction     l2r
6171                   ;; =>iso-ir   177
6172                   mother        =>ucs-itaiji-007
6173                   min-code #x2E00
6174                   max-code #x9FCC
6175                   registry "ucs\\.itaiji007-0"))
6176   (make-charset '=>ucs-sip-itaiji-007
6177                 "uXXXX-itaiji-007 characters in SIP"
6178                 '(long-name     "UCS-SIP-itaiji-007"
6179                   chars         256
6180                   dimension     2
6181                   columns       2
6182                   graphic       2
6183                   direction     l2r
6184                   mother        =>ucs-itaiji-007
6185                   min-code #x20000 max-code #x2FFFF
6186                   registry "ucs00\\.itaiji007-2"))
6187
6188   (make-charset '=ucs-itaiji-008
6189                 "uXXXX-itaiji-008 glyphs of GlyphWiki"
6190                 '(long-name     "UCS-itaiji-008"
6191                   chars         256
6192                   dimension     3
6193                   columns       2
6194                   graphic       2
6195                   direction     l2r
6196                   ;; =>iso-ir   177
6197                   mother        =ucs))
6198   (make-charset '=ucs-bmp-itaiji-008
6199                 "uXXXX-itaiji-008 glyph-images in BMP"
6200                 '(long-name     "UCS-BMP-itaiji-008"
6201                   chars         256
6202                   dimension     2
6203                   columns       2
6204                   graphic       2
6205                   direction     l2r
6206                   ;; =>iso-ir   177
6207                   mother        =ucs-itaiji-008
6208                   min-code #x2E00
6209                   max-code #x9FCC
6210                   registry "ucs\\.itaiji008-0"))
6211   (make-charset '=ucs-sip-itaiji-008
6212                 "uXXXX-itaiji-008 abstract glyphs in SIP"
6213                 '(long-name     "UCS-SIP-itaiji-008"
6214                   chars         256
6215                   dimension     2
6216                   columns       2
6217                   graphic       2
6218                   direction     l2r
6219                   mother        =ucs-itaiji-008
6220                   min-code #x20000 max-code #x2FFFF
6221                   registry "ucs00\\.itaiji008-2"))
6222   (make-charset '=>ucs-itaiji-008
6223                 "Abstract characters corresponding with uXXXX-itaiji-008 of GlyphWiki"
6224                 '(long-name     "UCS-itaiji-008 characters"
6225                   chars         256
6226                   dimension     3
6227                   columns       2
6228                   graphic       2
6229                   direction     l2r
6230                   ;; =>iso-ir   177
6231                   mother        =ucs))
6232   (make-charset '=>ucs-bmp-itaiji-008
6233                 "uXXXX-itaiji-008's abstract characters in BMP"
6234                 '(long-name     "UCS-BMP-itaiji-008 characters"
6235                   chars         256
6236                   dimension     2
6237                   columns       2
6238                   graphic       2
6239                   direction     l2r
6240                   ;; =>iso-ir   177
6241                   mother        =>ucs-itaiji-008
6242                   min-code #x2E00
6243                   max-code #x9FCC
6244                   registry "ucs\\.itaiji008-0"))
6245   (make-charset '=>ucs-sip-itaiji-008
6246                 "uXXXX-itaiji-008's abstract characters in SIP"
6247                 '(long-name     "UCS-SIP-itaiji-008 characters"
6248                   chars         256
6249                   dimension     2
6250                   columns       2
6251                   graphic       2
6252                   direction     l2r
6253                   mother        =>ucs-itaiji-008
6254                   min-code #x20000 max-code #x2FFFF
6255                   registry "ucs00\\.itaiji008-2"))
6256
6257   (make-charset '=ucs-itaiji-009
6258                 "uXXXX-itaiji-009 glyphs of GlyphWiki"
6259                 '(long-name     "UCS-itaiji-009"
6260                   chars         256
6261                   dimension     3
6262                   columns       2
6263                   graphic       2
6264                   direction     l2r
6265                   ;; =>iso-ir   177
6266                   mother        =ucs))
6267   (make-charset '=ucs-bmp-itaiji-009
6268                 "uXXXX-itaiji-009 glyph-images in BMP"
6269                 '(long-name     "UCS-BMP-itaiji-009"
6270                   chars         256
6271                   dimension     2
6272                   columns       2
6273                   graphic       2
6274                   direction     l2r
6275                   ;; =>iso-ir   177
6276                   mother        =ucs-itaiji-009
6277                   min-code #x2E00
6278                   max-code #x9FCC
6279                   registry "ucs\\.itaiji009-0"))
6280   (make-charset '=ucs-sip-itaiji-009
6281                 "uXXXX-itaiji-009 abstract glyphs in SIP"
6282                 '(long-name     "UCS-SIP-itaiji-009"
6283                   chars         256
6284                   dimension     2
6285                   columns       2
6286                   graphic       2
6287                   direction     l2r
6288                   mother        =ucs-itaiji-009
6289                   min-code #x20000 max-code #x2FFFF
6290                   registry "ucs00\\.itaiji009-2"))
6291   (make-charset '=>ucs-itaiji-009
6292                 "Abstract characters corresponding with uXXXX-itaiji-009 of GlyphWiki"
6293                 '(long-name     "UCS-itaiji-009"
6294                   chars         256
6295                   dimension     3
6296                   columns       2
6297                   graphic       2
6298                   direction     l2r
6299                   ;; =>iso-ir   177
6300                   mother        =ucs))
6301   (make-charset '=>ucs-bmp-itaiji-009
6302                 "uXXXX-itaiji-009's abstract characters in BMP"
6303                 '(long-name     "UCS-BMP-itaiji-009 characters"
6304                   chars         256
6305                   dimension     2
6306                   columns       2
6307                   graphic       2
6308                   direction     l2r
6309                   ;; =>iso-ir   177
6310                   mother        =>ucs-itaiji-009
6311                   min-code #x2E00
6312                   max-code #x9FCC
6313                   registry "ucs\\.itaiji009-0"))
6314   (make-charset '=>ucs-sip-itaiji-009
6315                 "uXXXX-itaiji-009 abstract characters in SIP"
6316                 '(long-name     "UCS-SIP-itaiji-009"
6317                   chars         256
6318                   dimension     2
6319                   columns       2
6320                   graphic       2
6321                   direction     l2r
6322                   mother        =>ucs-itaiji-009
6323                   min-code #x20000 max-code #x2FFFF
6324                   registry "ucs00\\.itaiji009-2"))
6325
6326   (make-charset '=ucs-itaiji-010
6327                 "uXXXX-itaiji-010 glyphs of GlyphWiki"
6328                 '(long-name     "UCS-itaiji-010"
6329                   chars         256
6330                   dimension     3
6331                   columns       2
6332                   graphic       2
6333                   direction     l2r
6334                   ;; =>iso-ir   177
6335                   mother        =ucs))
6336   (make-charset '=ucs-bmp-itaiji-010
6337                 "uXXXX-itaiji-010 glyph-images in BMP"
6338                 '(long-name     "UCS-BMP-itaiji-010"
6339                   chars         256
6340                   dimension     2
6341                   columns       2
6342                   graphic       2
6343                   direction     l2r
6344                   ;; =>iso-ir   177
6345                   mother        =ucs-itaiji-010
6346                   min-code #x2E00
6347                   max-code #x9FCC
6348                   registry "ucs\\.itaiji010-0"))
6349   (make-charset '=ucs-sip-itaiji-010
6350                 "uXXXX-itaiji-010 glyphs in SIP"
6351                 '(long-name     "UCS-SIP-itaiji-010"
6352                   chars         256
6353                   dimension     2
6354                   columns       2
6355                   graphic       2
6356                   direction     l2r
6357                   mother        =ucs-itaiji-010
6358                   min-code #x20000 max-code #x2FFFF
6359                   registry "ucs00\\.itaiji010-2"))
6360   (make-charset '=>ucs-itaiji-010
6361                 "Abstract characters corresponding with uXXXX-itaiji-010 of GlyphWiki"
6362                 '(long-name     "UCS-itaiji-010"
6363                   chars         256
6364                   dimension     3
6365                   columns       2
6366                   graphic       2
6367                   direction     l2r
6368                   ;; =>iso-ir   177
6369                   mother        =ucs))
6370   (make-charset '=>ucs-bmp-itaiji-010
6371                 "uXXXX-itaiji-010's abstract characters in BMP"
6372                 '(long-name     "UCS-BMP-itaiji-010 characters"
6373                   chars         256
6374                   dimension     2
6375                   columns       2
6376                   graphic       2
6377                   direction     l2r
6378                   ;; =>iso-ir   177
6379                   mother        =>ucs-itaiji-010
6380                   min-code #x2E00
6381                   max-code #x9FCC
6382                   registry "ucs\\.itaiji010-0"))
6383
6384   (make-charset '=ucs-itaiji-011
6385                 "uXXXX-itaiji-011 glyphs of GlyphWiki"
6386                 '(long-name     "UCS-itaiji-011"
6387                   chars         256
6388                   dimension     3
6389                   columns       2
6390                   graphic       2
6391                   direction     l2r
6392                   ;; =>iso-ir   177
6393                   mother        =ucs))
6394   (make-charset '=ucs-bmp-itaiji-011
6395                 "uXXXX-itaiji-011 glyph-images in BMP"
6396                 '(long-name     "UCS-BMP-itaiji-011"
6397                   chars         256
6398                   dimension     2
6399                   columns       2
6400                   graphic       2
6401                   direction     l2r
6402                   ;; =>iso-ir   177
6403                   mother        =ucs-itaiji-011
6404                   min-code #x2E00
6405                   max-code #x9FCC
6406                   registry "ucs\\.itaiji011-0"))
6407   (make-charset '=ucs-sip-itaiji-011
6408                 "uXXXX-itaiji-011 glyphs in SIP"
6409                 '(long-name     "UCS-SIP-itaiji-011"
6410                   chars         256
6411                   dimension     2
6412                   columns       2
6413                   graphic       2
6414                   direction     l2r
6415                   mother        =ucs-itaiji-011
6416                   min-code #x20000 max-code #x2FFFF
6417                   registry "ucs00\\.itaiji011-2"))
6418   (make-charset '=>ucs-itaiji-011
6419                 "Abstract characters corresponding with uXXXX-itaiji-011 of GlyphWiki"
6420                 '(long-name     "UCS-itaiji-011"
6421                   chars         256
6422                   dimension     3
6423                   columns       2
6424                   graphic       2
6425                   direction     l2r
6426                   ;; =>iso-ir   177
6427                   mother        =ucs))
6428   (make-charset '=>ucs-bmp-itaiji-011
6429                 "uXXXX-itaiji-011's abstract characters in BMP"
6430                 '(long-name     "UCS-BMP-itaiji-011 characters"
6431                   chars         256
6432                   dimension     2
6433                   columns       2
6434                   graphic       2
6435                   direction     l2r
6436                   ;; =>iso-ir   177
6437                   mother        =>ucs-itaiji-011
6438                   min-code #x2E00
6439                   max-code #x9FCC
6440                   registry "ucs\\.itaiji011-0"))
6441
6442   (make-charset '=ucs-itaiji-012
6443                 "uXXXX-itaiji-012 glyphs of GlyphWiki"
6444                 '(long-name     "UCS-itaiji-012"
6445                   chars         256
6446                   dimension     3
6447                   columns       2
6448                   graphic       2
6449                   direction     l2r
6450                   ;; =>iso-ir   177
6451                   mother        =ucs))
6452   (make-charset '=ucs-bmp-itaiji-012
6453                 "uXXXX-itaiji-012 glyph-images in BMP"
6454                 '(long-name     "UCS-BMP-itaiji-012"
6455                   chars         256
6456                   dimension     2
6457                   columns       2
6458                   graphic       2
6459                   direction     l2r
6460                   ;; =>iso-ir   177
6461                   mother        =ucs-itaiji-012
6462                   min-code #x2E00
6463                   max-code #x9FCC
6464                   registry "ucs\\.itaiji012-0"))
6465   (make-charset '=ucs-sip-itaiji-012
6466                 "uXXXX-itaiji-012 glyphs in SIP"
6467                 '(long-name     "UCS-SIP-itaiji-012"
6468                   chars         256
6469                   dimension     2
6470                   columns       2
6471                   graphic       2
6472                   direction     l2r
6473                   mother        =ucs-itaiji-012
6474                   min-code #x20000 max-code #x2FFFF
6475                   registry "ucs00\\.itaiji012-2"))
6476   (make-charset '=>ucs-itaiji-012
6477                 "Abstract characters corresponding with uXXXX-itaiji-012 of GlyphWiki"
6478                 '(long-name     "UCS-itaiji-012"
6479                   chars         256
6480                   dimension     3
6481                   columns       2
6482                   graphic       2
6483                   direction     l2r
6484                   ;; =>iso-ir   177
6485                   mother        =ucs))
6486   (make-charset '=>ucs-bmp-itaiji-012
6487                 "uXXXX-itaiji-012's abstract characters in BMP"
6488                 '(long-name     "UCS-BMP-itaiji-012 characters"
6489                   chars         256
6490                   dimension     2
6491                   columns       2
6492                   graphic       2
6493                   direction     l2r
6494                   ;; =>iso-ir   177
6495                   mother        =>ucs-itaiji-012
6496                   min-code #x2E00
6497                   max-code #x9FCC
6498                   registry "ucs\\.itaiji012-0"))1
6499   (make-charset '=>ucs-sip-itaiji-012
6500                 "uXXXX-itaiji-012's abstract characters in SIP"
6501                 '(long-name     "UCS-SIP-itaiji-012 characters"
6502                   chars         256
6503                   dimension     2
6504                   columns       2
6505                   graphic       2
6506                   direction     l2r
6507                   mother        =>ucs-itaiji-012
6508                   min-code #x20000 max-code #x2FFFF
6509                   registry "ucs00\\.itaiji012-2"))
6510
6511   (make-charset '=ucs-itaiji-013
6512                 "uXXXX-itaiji-013 glyphs of GlyphWiki"
6513                 '(long-name     "UCS-itaiji-013"
6514                   chars         256
6515                   dimension     3
6516                   columns       2
6517                   graphic       2
6518                   direction     l2r
6519                   ;; =>iso-ir   177
6520                   mother        =ucs))
6521   (make-charset '=ucs-sip-itaiji-013
6522                 "uXXXX-itaiji-013 glyphs in SIP"
6523                 '(long-name     "UCS-SIP-itaiji-013"
6524                   chars         256
6525                   dimension     2
6526                   columns       2
6527                   graphic       2
6528                   direction     l2r
6529                   mother        =ucs-itaiji-013
6530                   min-code #x20000 max-code #x2FFFF
6531                   registry "ucs00\\.itaiji013-2"))
6532
6533   (make-charset '=ucs-itaiji-014
6534                 "uXXXX-itaiji-014 glyphs of GlyphWiki"
6535                 '(long-name     "UCS-itaiji-014"
6536                   chars         256
6537                   dimension     3
6538                   columns       2
6539                   graphic       2
6540                   direction     l2r
6541                   ;; =>iso-ir   177
6542                   mother        =ucs))
6543   (make-charset '=ucs-bmp-itaiji-014
6544                 "uXXXX-itaiji-014 glyph-images in BMP"
6545                 '(long-name     "UCS-BMP-itaiji-014"
6546                   chars         256
6547                   dimension     2
6548                   columns       2
6549                   graphic       2
6550                   direction     l2r
6551                   ;; =>iso-ir   177
6552                   mother        =ucs-itaiji-014
6553                   min-code #x2E00
6554                   max-code #x9FCC
6555                   registry "ucs\\.itaiji014-0"))
6556   (make-charset '=ucs-sip-itaiji-014
6557                 "uXXXX-itaiji-014 glyphs in SIP"
6558                 '(long-name     "UCS-SIP-itaiji-014"
6559                   chars         256
6560                   dimension     2
6561                   columns       2
6562                   graphic       2
6563                   direction     l2r
6564                   mother        =ucs-itaiji-014
6565                   min-code #x20000 max-code #x2FFFF
6566                   registry "ucs00\\.itaiji014-2"))
6567   (make-charset '=>ucs-itaiji-014
6568                 "Abstract characters corresponding with uXXXX-itaiji-014 of GlyphWiki"
6569                 '(long-name     "UCS-itaiji-014"
6570                   chars         256
6571                   dimension     3
6572                   columns       2
6573                   graphic       2
6574                   direction     l2r
6575                   ;; =>iso-ir   177
6576                   mother        =ucs))
6577   (make-charset '=>ucs-bmp-itaiji-014
6578                 "uXXXX-itaiji-014's abstract characters in BMP"
6579                 '(long-name     "UCS-BMP-itaiji-014 characters"
6580                   chars         256
6581                   dimension     2
6582                   columns       2
6583                   graphic       2
6584                   direction     l2r
6585                   ;; =>iso-ir   177
6586                   mother        =>ucs-itaiji-014
6587                   min-code #x2E00
6588                   max-code #x9FCC
6589                   registry "ucs\\.itaiji014-0"))
6590
6591   (make-charset '=ucs-itaiji-016
6592                 "uXXXX-itaiji-016 glyphs of GlyphWiki"
6593                 '(long-name     "UCS-itaiji-016"
6594                   chars         256
6595                   dimension     3
6596                   columns       2
6597                   graphic       2
6598                   direction     l2r
6599                   ;; =>iso-ir   177
6600                   mother        =ucs))
6601   (make-charset '=ucs-bmp-itaiji-016
6602                 "uXXXX-itaiji-016 glyph-images in BMP"
6603                 '(long-name     "UCS-BMP-itaiji-016"
6604                   chars         256
6605                   dimension     2
6606                   columns       2
6607                   graphic       2
6608                   direction     l2r
6609                   ;; =>iso-ir   177
6610                   mother        =ucs-itaiji-016
6611                   min-code #x2E00
6612                   max-code #x9FCC
6613                   registry "ucs\\.itaiji016-0"))
6614   (make-charset '=>ucs-itaiji-016
6615                 "Abstract characters corresponding with uXXXX-itaiji-016 of GlyphWiki"
6616                 '(long-name     "UCS-itaiji-016"
6617                   chars         256
6618                   dimension     3
6619                   columns       2
6620                   graphic       2
6621                   direction     l2r
6622                   ;; =>iso-ir   177
6623                   mother        =ucs))
6624   (make-charset '=>ucs-bmp-itaiji-016
6625                 "uXXXX-itaiji-016's abstract characters in BMP"
6626                 '(long-name     "UCS-BMP-itaiji-016 characters"
6627                   chars         256
6628                   dimension     2
6629                   columns       2
6630                   graphic       2
6631                   direction     l2r
6632                   ;; =>iso-ir   177
6633                   mother        =>ucs-itaiji-016
6634                   min-code #x2E00
6635                   max-code #x9FCC
6636                   registry "ucs\\.itaiji016-0"))
6637
6638   (make-charset '=ucs-itaiji-018
6639                 "uXXXX-itaiji-018 glyphs of GlyphWiki"
6640                 '(long-name     "UCS-itaiji-018"
6641                   chars         256
6642                   dimension     3
6643                   columns       2
6644                   graphic       2
6645                   direction     l2r
6646                   ;; =>iso-ir   177
6647                   mother        =ucs))
6648   (make-charset '=ucs-bmp-itaiji-018
6649                 "uXXXX-itaiji-018 glyph-images in BMP"
6650                 '(long-name     "UCS-BMP-itaiji-018"
6651                   chars         256
6652                   dimension     2
6653                   columns       2
6654                   graphic       2
6655                   direction     l2r
6656                   ;; =>iso-ir   177
6657                   mother        =ucs-itaiji-018
6658                   min-code #x2E00
6659                   max-code #x9FCC
6660                   registry "ucs\\.itaiji018-0"))
6661
6662   (make-charset '=ucs-itaiji-084
6663                 "uXXXX-itaiji-084 glyph-images of GlyphWiki"
6664                 '(long-name     "UCS-itaiji-084"
6665                   chars         256
6666                   dimension     3
6667                   columns       2
6668                   graphic       2
6669                   direction     l2r
6670                   ;; =>iso-ir   177
6671                   mother        =ucs))
6672   (make-charset '=ucs-bmp-itaiji-084
6673                 "uXXXX-itaiji-084 glyph-images in BMP"
6674                 '(long-name     "UCS-BMP-itaiji-084"
6675                   chars         256
6676                   dimension     2
6677                   columns       2
6678                   graphic       2
6679                   direction     l2r
6680                   ;; =>iso-ir   177
6681                   mother        =ucs-itaiji-084
6682                   min-code #x2E00
6683                   max-code #x9FCC
6684                   registry "ucs\\.itaiji084-0"))
6685
6686   (make-charset
6687    '=ucs-radicals
6688    "CJK Radicals of UCS"
6689    '(long-name "UCS-Radicals"
6690                chars 256
6691                dimension 2
6692                columns 2
6693                graphic 2
6694                direction l2r
6695                registry "-zhRadicals-.*-ucs-0"
6696                mother ucs-bmp
6697                min-code #x2E00 max-code #x2FFB))
6698   (make-charset
6699    '=ucs-radicals@unicode
6700    "CJK Radicals of UCS"
6701    '(long-name "UCS-Radicals"
6702                chars 256
6703                dimension 2
6704                columns 2
6705                graphic 2
6706                direction l2r
6707                registry "-zhRadicals-.*-ucs-0"
6708                mother =ucs@unicode
6709                min-code #x2E00 max-code #x2FFB))
6710   (make-charset
6711    '==ucs-radicals@unicode
6712    "CJK Radicals of UCS"
6713    '(long-name "UCS-Radicals"
6714                chars 256
6715                dimension 2
6716                columns 2
6717                graphic 2
6718                direction l2r
6719                registry "-zhRadicals-.*-ucs-0"
6720                mother ==ucs@unicode
6721                min-code #x2E00 max-code #x2FFF))
6722   (make-charset
6723    '=ucs-hangul
6724    "Hangul Syllables of UCS"
6725    '(long-name "UCS-Hangul-Syllables"
6726                chars 256
6727                dimension 2
6728                columns 2
6729                graphic 2
6730                direction l2r
6731                registry "-Hangul-.*-ucs-0"
6732                mother =ucs
6733                min-code #xAC00 max-code #xD7AF))
6734   (make-charset
6735    '=ucs-bmp-cjk
6736    "CJK Characters in BMP of UCS"
6737    '(long-name "UCS-BMP-CJK"
6738                chars 256
6739                dimension 2
6740                columns 2
6741                graphic 2
6742                direction l2r
6743                registry "-zh-.*-ucs-0"
6744                mother ucs-bmp
6745                min-code #x2E00
6746                max-code #x9FA5
6747                ;; max-code #x9FCC
6748                ;; max-code #xA4CF
6749                ))
6750   (make-charset
6751    '=ucs-bmp-cjk@gb
6752    "CJK Characters in BMP with GB representative glyph-images."
6753    '(long-name "CJK in BMP@GB"
6754                chars 256
6755                dimension 2
6756                columns 2
6757                graphic 2
6758                direction l2r
6759                registry "-zh-.*-ucs-0"
6760                mother =ucs@gb
6761                min-code #x2E00
6762                max-code #x9FA5
6763                ;; max-code #x9FCC
6764                ;; max-code #xA4CF
6765                ))
6766   (make-charset
6767    '==ucs-bmp-cjk@gb
6768    "CJK Characters in BMP with GB representative glyph-images."
6769    '(long-name "CJK in BMP@GB"
6770                chars 256
6771                dimension 2
6772                columns 2
6773                graphic 2
6774                direction l2r
6775                registry "-zh-.*-ucs-0"
6776                mother ==ucs@gb
6777                min-code #x2E00
6778                max-code #x9FA5
6779                ;; max-code #x9FCC
6780                ;; max-code #xA4CF
6781                ))
6782   (make-charset
6783    '===ucs-bmp-cjk@gb
6784    "CJK Characters in BMP with GB representative glyph-images."
6785    '(long-name "CJK in BMP@GB"
6786                chars 256
6787                dimension 2
6788                columns 2
6789                graphic 2
6790                direction l2r
6791                registry "-zh-.*-ucs-0"
6792                mother ===ucs@gb
6793                min-code #x2E00
6794                max-code #x9FA5
6795                ;; max-code #x9FCC
6796                ;; max-code #xA4CF
6797                ))
6798   (make-charset
6799    '=ucs-bmp-cjk@JP
6800    "CJK Characters in BMP with JIS representative glyphs"
6801    '(long-name "CJK in BMP@JP"
6802                chars 256
6803                dimension 2
6804                columns 2
6805                graphic 2
6806                direction l2r
6807                registry "-ja-.*-ucs-0"
6808                mother =ucs@JP
6809                min-code #x2E00
6810                max-code #x9FCC
6811                ;; max-code #xA4CF
6812                ))
6813   (make-charset
6814    '=ucs-bmp-cjk@JP/hanazono
6815    "CJK Characters in BMP with Hanazono font"
6816    '(long-name "CJK in BMP@JP/Hanazono"
6817                chars 256
6818                dimension 2
6819                columns 2
6820                graphic 2
6821                direction l2r
6822                registry "-ja-.*-ucs-0"
6823                mother =ucs@JP/hanazono
6824                min-code #x2E00
6825                max-code #x9FFC
6826                ;; max-code #xA4CF
6827                ))
6828   (make-charset
6829    '==ucs-bmp-cjk@JP/hanazono
6830    "CJK Characters in BMP with Hanazono font"
6831    '(long-name "CJK in BMP@JP/Hanazono"
6832                chars 256
6833                dimension 2
6834                columns 2
6835                graphic 2
6836                direction l2r
6837                registry "-ja-.*-ucs-0"
6838                mother ==ucs@JP/hanazono
6839                min-code #x2E00
6840                max-code #x9FCC
6841                ;; max-code #xA4CF
6842                ))
6843   (make-charset
6844    '=>>ucs-bmp-cjk@unicode
6845    "Unicode representative detailed-glyphs of CJK Unified Ideographs in BMP"
6846    '(long-name "Unicode-BMP-CJK detailed-glyphs"
6847                chars 256
6848                dimension 2
6849                columns 2
6850                graphic 2
6851                direction l2r
6852                registry "-zh-.*-ucs-0"
6853                mother =>>ucs@unicode
6854                min-code #x2E00
6855                max-code #x9FA5
6856                ;; max-code #x9FCC
6857                ;; max-code #xA4CF
6858                ))
6859   (make-charset
6860    '=+>ucs-bmp-cjk@unicode
6861    "Unicode representative characters of CJK Unified Ideographs in BMP"
6862    '(long-name "Unicode-BMP-CJK unified abstract glyphs"
6863                chars 256
6864                dimension 2
6865                columns 2
6866                graphic 2
6867                direction l2r
6868                registry "-zh-.*-ucs-0"
6869                mother =+>ucs@unicode
6870                min-code #x2E00
6871                max-code #x9FA5
6872                ;; max-code #x9FCC
6873                ;; max-code #xA4CF
6874                ))
6875   (make-charset
6876    '=>ucs-bmp-cjk@unicode
6877    "Unicode representative characters of CJK Unified Ideographs in BMP"
6878    '(long-name "Unicode-BMP-CJK"
6879                chars 256
6880                dimension 2
6881                columns 2
6882                graphic 2
6883                direction l2r
6884                registry "-zh-.*-ucs-0"
6885                mother =>ucs@unicode
6886                min-code #x2E00
6887                max-code #x9FA5
6888                ;; max-code #x9FCC
6889                ;; max-code #xA4CF
6890                ))
6891   (make-charset
6892    '=>ucs-bmp-cjk@cognate
6893    "CJK Characters in BMP for abstract characters based on cognate."
6894    '(long-name "CJK in BMP@cognate"
6895                chars 256
6896                dimension 2
6897                columns 2
6898                graphic 2
6899                direction l2r
6900                registry "-ja-.*-ucs-0"
6901                mother =>ucs@cognate
6902                min-code #x2E00
6903                max-code #x9FCC
6904                ;; max-code #xA4CF
6905                ))
6906   (make-charset
6907    '=>ucs-bmp-cjk@component
6908    "CJK Characters in BMP for IWDS-1 abstract components."
6909    '(long-name "CJK in BMP@component"
6910                chars 256
6911                dimension 2
6912                columns 2
6913                graphic 2
6914                direction l2r
6915                registry "-ja-.*-ucs-0"
6916                mother =>ucs@component
6917                min-code #x2E00
6918                max-code #x9FCC
6919                ;; max-code #xA4CF
6920                ))
6921   (make-charset
6922    '=>ucs-bmp-cjk@iwds-1
6923    "CJK Characters in BMP for IWDS-1 abstract characters."
6924    '(long-name "CJK in BMP@iwds-1"
6925                chars 256
6926                dimension 2
6927                columns 2
6928                graphic 2
6929                direction l2r
6930                registry "-ja-.*-ucs-0"
6931                mother =>ucs@iwds-1
6932                min-code #x2E00
6933                max-code #x9FCC
6934                ;; max-code #xA4CF
6935                ))
6936   (make-charset
6937    '=>ucs-bmp-cjk@iwds-1/normalized
6938    "CJK Characters in BMP for IWDS-1 abstract characters."
6939    '(long-name "CJK in BMP@iwds-1/normalized"
6940                chars 256
6941                dimension 2
6942                columns 2
6943                graphic 2
6944                direction l2r
6945                registry "-ja-.*-ucs-0"
6946                mother =>ucs@iwds-1/normalized
6947                min-code #x2E00
6948                max-code #x9FCC
6949                ;; max-code #xA4CF
6950                ))
6951   (make-charset
6952    '==>ucs-bmp-cjk@bucs
6953    "CJK Characters in BMP of BUCS"
6954    '(long-name "BUCS-BMP-CJK"
6955                chars 256
6956                dimension 2
6957                columns 2
6958                graphic 2
6959                direction l2r
6960                registry "-zh-.*-ucs-0"
6961                mother ==>ucs@bucs
6962                min-code #x2E00
6963                max-code #x9FA5
6964                ;; max-code #x9FCC
6965                ;; max-code #xA4CF
6966                ))
6967   (make-charset
6968    '=ucs-bmp-cjk-compat
6969    "CJK Compatibility Ideographs in BMP of UCS"
6970    '(long-name "CJK Compatibility Ideographs"
6971                chars 256
6972                dimension 2
6973                columns 2
6974                graphic 2
6975                direction l2r
6976                registry "-ja-.*-ucs-0"
6977                mother ucs-bmp
6978                min-code #xF900
6979                max-code #xFAFF
6980                ))
6981   (make-charset
6982    '=ucs-bmp-cjk-compat@unicode
6983    "CJK Compatibility Ideographs of Unicode representatives"
6984    '(long-name "CJK Compatibility Ideographs of Unicode"
6985                chars 256
6986                dimension 2
6987                columns 2
6988                graphic 2
6989                direction l2r
6990                registry "-ja-.*-ucs-0"
6991                mother =ucs@unicode
6992                min-code #xF900
6993                max-code #xFAFF
6994                ))
6995   (make-charset
6996    '==ucs-bmp-cjk-compat@gb
6997    "CJK Compatibility Ideographs of Unicode representatives"
6998    '(long-name "CJK Compatibility Ideographs of Unicode"
6999                chars 256
7000                dimension 2
7001                columns 2
7002                graphic 2
7003                direction l2r
7004                registry "-zh-.*-ucs-0"
7005                mother ==ucs@gb
7006                min-code #xF900
7007                max-code #xFAFF
7008                ))
7009   (make-charset
7010    '==ucs-bmp-cjk-compat@JP
7011    "CJK Compatibility Ideographs for common glyph-forms used in Japan."
7012    '(long-name "CJK Compatibility Ideographs for Japan"
7013                chars 256
7014                dimension 2
7015                columns 2
7016                graphic 2
7017                direction l2r
7018                registry "-ja-.*-ucs-0"
7019                mother ==ucs@JP
7020                min-code #xF900
7021                max-code #xFAFF
7022                ))
7023   (make-charset
7024    '===ucs-bmp-cjk-compat@unicode
7025    "CJK Compatibility Ideographs of Unicode representatives"
7026    '(long-name "CJK Compatibility Ideographs of Unicode"
7027                chars 256
7028                dimension 2
7029                columns 2
7030                graphic 2
7031                direction l2r
7032                registry "-ja-.*-ucs-0"
7033                mother ===ucs@unicode
7034                min-code #xF900
7035                max-code #xFAFF
7036                ))
7037   (make-charset
7038    '=+>ucs-bmp-cjk-compat@jis
7039    "CJK Compatibility Ideographs of JIS representatives unified glyphs"
7040    '(long-name "JIS unified glyphs for CJK Compat chars"
7041                chars 256
7042                dimension 2
7043                columns 2
7044                graphic 2
7045                direction l2r
7046                registry "-ja-.*-ucs-0"
7047                mother =+>ucs@jis
7048                min-code #xF900
7049                max-code #xFAFF
7050                ))
7051   (make-charset
7052    '=ucs-sip-ext-b
7053    "CJK Ideographs Extension B"
7054    '(long-name "UCS CJK Ext-B"
7055                chars 256
7056                dimension 2
7057                columns 2
7058                graphic 2
7059                direction l2r
7060                registry "\\(iso10646\\|ucs00\\)-2$"
7061                mother ucs
7062                min-code #x20000 max-code #x2A6D6
7063                code-offset #x20000))
7064   (make-charset
7065    '=ucs-sip@iso
7066    "UCS glyphs of UCS SIP"
7067    '(long-name "UCS SIP"
7068                chars 256
7069                dimension 2
7070                columns 2
7071                graphic 2
7072                direction l2r
7073                registry "ucs00-2$"
7074                mother =ucs@iso
7075                min-code #x20000 max-code #x2FFFF
7076                code-offset #x20000))
7077   (make-charset
7078    '=ucs-sip-ext-b@iso
7079    "CJK Ideographs Extension B (ISO/IEC 10646-2)"
7080    '(long-name "UCS CJK Ext-B"
7081                chars 256
7082                dimension 2
7083                columns 2
7084                graphic 2
7085                direction l2r
7086                registry "\\(iso10646\\|ucs00\\)-2$"
7087                mother =ucs@iso
7088                min-code #x20000 max-code #x2A6D6
7089                code-offset #x20000))
7090   (make-charset
7091    '=ucs-sip@JP/hanazono
7092    "Hanazono glyphs of UCS SIP"
7093    '(long-name "Hanazono SIP glyphs"
7094                chars 256
7095                dimension 2
7096                columns 2
7097                graphic 2
7098                direction l2r
7099                registry "ucs00-2$"
7100                mother =ucs@JP/hanazono
7101                min-code #x20000 max-code #x2FFFF
7102                code-offset #x20000))
7103   (make-charset
7104    '=ucs-sip@gb
7105    "UCS G-source glyphs of UCS SIP"
7106    '(long-name "u2XXXX-g glyphs of UCS"
7107                chars 256
7108                dimension 2
7109                columns 2
7110                graphic 2
7111                direction l2r
7112                registry "-ucs00\\.g-2$"
7113                mother =ucs@gb
7114                min-code #x20000 max-code #x2FFFF
7115                code-offset #x20000))
7116   (make-charset
7117    '=ucs-tip
7118    "Tertiary Ideographic Plane of UCS"
7119    '(long-name "UCS TUP"
7120                chars 256
7121                dimension 2
7122                columns 2
7123                graphic 2
7124                direction l2r
7125                registry "\\(iso10646\\|ucs00\\)-3$"
7126                mother ucs
7127                min-code #x30000 max-code #x323AF
7128                code-offset #x30000))
7129   (make-charset
7130    '=ucs-tip@JP/hanazono
7131    "Hanazono glyphs of UCS TIP"
7132    '(long-name "Hanazono TIP glyphs"
7133                chars 256
7134                dimension 2
7135                columns 2
7136                graphic 2
7137                direction l2r
7138                registry "ucs00-3$"
7139                mother =ucs@JP/hanazono
7140                min-code #x30000 max-code #x323AF
7141                code-offset #x30000))
7142   (make-charset
7143    '=>ucs-sip@iwds-1
7144    "CJK Characters in SIP based on IWDS-1."
7145    '(long-name "CJK in SIP@IWDS-1"
7146                chars 256
7147                dimension 2
7148                columns 2
7149                graphic 2
7150                direction l2r
7151                registry "ucs00-2$"
7152                mother =>ucs@iwds-1
7153                min-code #x20000 max-code #x2FFFF
7154                code-offset #x20000))
7155   (make-charset
7156    '=>ucs-tip@iwds-1
7157    "CJK Characters in TIP based on IWDS-1."
7158    '(long-name "CJK in TIP@IWDS-1"
7159                chars 256
7160                dimension 2
7161                columns 2
7162                graphic 2
7163                direction l2r
7164                registry "ucs00-3$"
7165                mother =>ucs@iwds-1
7166                min-code #x30000 max-code #x323AF
7167                code-offset #x30000))
7168   (make-charset
7169    '=>ucs-sip@cognate
7170    "CJK Characters in SIP for abstract characters based on cognate."
7171    '(long-name "CJK in SIP@cognate"
7172                chars 256
7173                dimension 2
7174                columns 2
7175                graphic 2
7176                direction l2r
7177                registry "ucs00-2$"
7178                mother =>ucs@cognate
7179                min-code #x20000 max-code #x2FFFF
7180                code-offset #x20000))
7181   (make-charset
7182    '=>ucs-tip@cognate
7183    "CJK Characters in TIP for abstract characters based on cognate."
7184    '(long-name "CJK in TIP@cognate"
7185                chars 256
7186                dimension 2
7187                columns 2
7188                graphic 2
7189                direction l2r
7190                registry "ucs00-3$"
7191                mother =>ucs@cognate
7192                min-code #x30000 max-code #x3FFFF
7193                code-offset #x30000))
7194   (make-charset
7195    '=>ucs-sip@component
7196    "CJK Characters in SIP for IWDS-1 abstract components."
7197    '(long-name "CJK in SIP@component"
7198                chars 256
7199                dimension 2
7200                columns 2
7201                graphic 2
7202                direction l2r
7203                registry "ucs00-2$"
7204                mother =>ucs@component
7205                min-code #x20000 max-code #x2FFFF
7206                code-offset #x20000))
7207   (make-charset
7208    '=>ucs-tip@component
7209    "CJK Characters in TIP for IWDS-1 abstract components."
7210    '(long-name "CJK in TIP@component"
7211                chars 256
7212                dimension 2
7213                columns 2
7214                graphic 2
7215                direction l2r
7216                registry "ucs00-3$"
7217                mother =>ucs@component
7218                min-code #x30000 max-code #x323AF
7219                code-offset #x30000))
7220   (make-charset
7221    '==>ucs-sip@esu
7222    "UCS glyphs in UCS SIP of ESU"
7223    '(long-name "ESU SIP"
7224                chars 256
7225                dimension 2
7226                columns 2
7227                graphic 2
7228                direction l2r
7229                registry "ucs00-2$"
7230                mother ==>ucs@esu
7231                min-code #x20000 max-code #x2FFFF
7232                code-offset #x20000))
7233   (make-charset
7234    '==ucs-sip@JP/hanazono
7235    "Hanazono glyphs-forms of UCS SIP"
7236    '(long-name "Hanazono SIP glyph-forms"
7237                chars 256
7238                dimension 2
7239                columns 2
7240                graphic 2
7241                direction l2r
7242                registry "ucs00-2$"
7243                mother ==ucs@JP/hanazono
7244                min-code #x20000 max-code #x2FFFF
7245                code-offset #x20000))
7246   (make-charset
7247    '==ucs-sip@iso
7248    "ISO representative abstract-glyph-images of ISO/IEC 10646 Plane 2"
7249    '(long-name "SIP abstract glyph-images"
7250                chars 256
7251                dimension 2
7252                columns 2
7253                graphic 2
7254                direction l2r
7255                registry "\\(ucs00\\)-2$"
7256                mother ==ucs@iso
7257                code-offset #x20000))
7258   (make-charset
7259    '==ucs-sip-ext-b@iso
7260    "CJK Ideographs Extension B (ISO/IEC 10646-2)"
7261    '(long-name "UCS CJK Ext-B"
7262                chars 256
7263                dimension 2
7264                columns 2
7265                graphic 2
7266                direction l2r
7267                registry "\\(iso10646\\|ucs00\\)-2$"
7268                mother ==ucs@iso
7269                min-code #x20000 max-code #x2A6D6
7270                code-offset #x20000))
7271   (make-charset
7272    '==ucs-tip@JP/hanazono
7273    "Hanazono glyphs-forms of UCS TIP"
7274    '(long-name "Hanazono TIP glyph-forms"
7275                chars 256
7276                dimension 2
7277                columns 2
7278                graphic 2
7279                direction l2r
7280                registry "ucs00-3$"
7281                mother ==ucs@JP/hanazono
7282                min-code #x30000 max-code #x323AF
7283                code-offset #x30000))
7284   (make-charset
7285    '===ucs-sip@iso
7286    "ISO representative glyph-images of ISO/IEC 10646 Plane 2"
7287    '(long-name "SIP rep-glyph-images"
7288                chars 256
7289                dimension 2
7290                columns 2
7291                graphic 2
7292                direction l2r
7293                registry "\\(ucs00\\)-2$"
7294                mother ===ucs@iso
7295                code-offset #x20000))
7296   (make-charset
7297    '===ucs-sip-ext-b@iso
7298    "CJK Ideographs Extension B (ISO/IEC 10646-2)"
7299    '(long-name "UCS CJK Ext-B"
7300                chars 256
7301                dimension 2
7302                columns 2
7303                graphic 2
7304                direction l2r
7305                registry "\\(iso10646\\|ucs00\\)-2$"
7306                mother ===ucs@iso
7307                min-code #x20000 max-code #x2A6D6
7308                code-offset #x20000))
7309   )
7310
7311 ;;; mule-conf.el ends here