(SW-JIGUGE-17912): Modify order of corresponding modern characters.
[chise/xemacs-chise.git] / lisp / utf-2000 / ShuoWen-SR024.el
1 ;; -*- coding: utf-8-mcs-er -*-
2 (define-char
3   '((shuowen-radical    . 24)   ; 吅
4     (=shuowen-jiguge    . 04402)        ; &SW-JIGUGE-04402;
5     (<-Small-Seal@shuowen
6      ((=ucs               . #x5405)     ; 吅
7       )
8      ((=>ucs@iwds-1       . #x5405)     ; &A-IWDSU+5405;
9       (=>iwds-1           .  0398)      ; &A-IWDSU+5405;
10       ))
11     (->subsumptive
12      ((===shuowen-jiguge-A30 . 04402)   ; &SW-JIGUGE30-04402;
13       )
14      ((===shuowen-jiguge5 . 04402)      ; &SW-JIGUGE5-04402;
15       )
16      ((===shuowen-jiguge4 . 04402)      ; &SW-JIGUGE4-04402;
17       ))
18     ))
19 (define-char
20   '((shuowen-radical    . 24)   ; 吅
21     (=shuowen-jiguge    . 04403)        ; &SW-JIGUGE-04403;
22     (<-Small-Seal@shuowen
23      ((=ucs               . #x24566)    ; 𤕦
24       ))
25     (->subsumptive
26      ((===shuowen-jiguge-A30 . 04403)   ; &SW-JIGUGE30-04403;
27       )
28      ((===shuowen-jiguge5 . 04403)      ; &SW-JIGUGE5-04403;
29       )
30      ((===shuowen-jiguge4 . 04403)      ; &SW-JIGUGE4-04403;
31       ))
32     ))
33 (define-char
34   '((shuowen-radical    . 24)   ; 吅
35     (=shuowen-jiguge    . 04404)        ; &SW-JIGUGE-04404;
36     (<-Small-Seal@shuowen
37      ((=ucs               . #x24567)    ; 𤕧
38       ))
39     (->subsumptive
40      ((===shuowen-jiguge-A30 . 04404)   ; &SW-JIGUGE30-04404;
41       )
42      ((===shuowen-jiguge5 . 04404)      ; &SW-JIGUGE5-04404;
43       )
44      ((===shuowen-jiguge4 . 04404)      ; &SW-JIGUGE4-04404;
45       ))
46     ))
47 (define-char
48   '((shuowen-radical    . 24)   ; 吅
49     (=shuowen-jiguge    . 04405)        ; &SW-JIGUGE-04405;
50     (<-Small-Seal@shuowen
51      ((=ucs               . #x56B4)     ; 嚴
52       )
53      ((=ucs               . #x53B3)     ; 厳
54       ))
55     (->subsumptive
56      ((===shuowen-jiguge-A30 . 04405)   ; &SW-JIGUGE30-04405;
57       )
58      ((===shuowen-jiguge5 . 04405)      ; &SW-JIGUGE5-04405;
59       )
60      ((===shuowen-jiguge4 . 04405)      ; &SW-JIGUGE4-04405;
61       ))
62     ))
63 (define-char
64   '((shuowen-radical    . 24)   ; 吅
65     (=shuowen-jiguge    . 04406)        ; &SW-JIGUGE-04406;
66     (<-Small-Seal@shuowen
67      ((=ucs               . #x2116E)    ; 𡅮
68       ))
69     (<-ancient@shuowen
70      ((=shuowen-jiguge    . 04405)      ; &SW-JIGUGE-04405;
71       )
72      ((=ucs               . #x56B4)     ; 嚴
73       )
74      ((=ucs               . #x53B3)     ; 厳
75       ))
76     (->subsumptive
77      ((===shuowen-jiguge-A30 . 04406)   ; &SW-JIGUGE30-04406;
78       )
79      ((===shuowen-jiguge5 . 04406)      ; &SW-JIGUGE5-04406;
80       )
81      ((===shuowen-jiguge4 . 04406)      ; &SW-JIGUGE4-04406;
82       ))
83     ))
84 (define-char
85   '((shuowen-radical    . 24)   ; 吅
86     (=shuowen-jiguge    . 04407)        ; &SW-JIGUGE-04407;
87     (<-Small-Seal@shuowen
88      ((=ucs               . #x35BE)     ; 㖾
89       )
90      ((=ucs               . #x54A2)     ; 咢
91       ))
92     (->subsumptive
93      ((===shuowen-jiguge-A30 . 04407)   ; &SW-JIGUGE30-04407;
94       )
95      ((===shuowen-jiguge5 . 04407)      ; &SW-JIGUGE5-04407;
96       )
97      ((===shuowen-jiguge4 . 04407)      ; &SW-JIGUGE4-04407;
98       ))
99     ))
100 (define-char
101   '((shuowen-radical    . 24)   ; 吅
102     (=shuowen-jiguge    . 04408)        ; &SW-JIGUGE-04408;
103     (<-Small-Seal@shuowen
104      ((=ucs               . #x55AE)     ; 單
105       )
106      ((=>ucs@iwds-1       . #x55AE)     ; &A-IWDSU+55AE;
107       )
108      ((=ucs               . #x5358)     ; 単
109       ))
110     (->subsumptive
111      ((===shuowen-jiguge-A30 . 04408)   ; &SW-JIGUGE30-04408;
112       )
113      ((===shuowen-jiguge5 . 04408)      ; &SW-JIGUGE5-04408;
114       )
115      ((===shuowen-jiguge4 . 04408)      ; &SW-JIGUGE4-04408;
116       ))
117     ))
118 (define-char
119   '((shuowen-radical    . 24)   ; 吅
120     (=shuowen-jiguge    . 04409)        ; &SW-JIGUGE-04409;
121     (<-Small-Seal@shuowen
122      ((=ucs               . #x558C)     ; 喌
123       ))
124     (->subsumptive
125      ((===shuowen-jiguge-A30 . 04409)   ; &SW-JIGUGE30-04409;
126       )
127      ((===shuowen-jiguge5 . 04409)      ; &SW-JIGUGE5-04409;
128       )
129      ((===shuowen-jiguge4 . 04409)      ; &SW-JIGUGE4-04409;
130       ))
131     ))