(SW-JIGUGE-17912): Modify order of corresponding modern characters.
[chise/xemacs-chise.git] / lisp / utf-2000 / ShuoWen-SR078.el
1 ;; -*- coding: utf-8-mcs-er -*-
2 (define-char
3   '((shuowen-radical    . 78)   ; 史
4     (=shuowen-jiguge    . 09201)        ; &SW-JIGUGE-09201;
5     (<-Small-Seal@shuowen
6      ((=ucs               . #x355C)     ; 㕜
7       )
8      ((=ucs               . #x53F2)     ; 史
9       ))
10     (->subsumptive
11      ((===shuowen-jiguge-A30 . 09701)   ; &SW-JIGUGE30-09701;
12       )
13      ((===shuowen-jiguge5 . 09201)      ; &SW-JIGUGE5-09201;
14       )
15      ((===shuowen-jiguge4 . 09101)      ; &SW-JIGUGE4-09101;
16       ))
17     ))
18 (define-char
19   '((shuowen-radical    . 78)   ; 史
20     (=shuowen-jiguge    . 09202)        ; &SW-JIGUGE-09202;
21     (<-Small-Seal@shuowen
22      ((=ucs               . #x4E8B)     ; 事
23       )
24      ((=ucs               . #x4E8A)     ; 亊
25       ))
26     (->subsumptive
27      ((===shuowen-jiguge-A30 . 09702)   ; &SW-JIGUGE30-09702;
28       )
29      ((===shuowen-jiguge5 . 09202)      ; &SW-JIGUGE5-09202;
30       )
31      ((===shuowen-jiguge4 . 09102)      ; &SW-JIGUGE4-09102;
32       ))
33     ))
34 (define-char
35   '((shuowen-radical    . 78)   ; 史
36     (=shuowen-jiguge    . 09203)        ; &SW-JIGUGE-09203;
37     (<-Small-Seal@shuowen
38      ((=ucs               . #x20B46)    ; 𠭆
39       )
40      ((=ucs               . #x20B4F)    ; 𠭏
41       )
42      ((=ucs               . #x355D)     ; 㕝
43       ))
44     (<-ancient@shuowen
45      ((=shuowen-jiguge    . 09202)      ; &SW-JIGUGE-09202;
46       )
47      ((=ucs               . #x4E8B)     ; 事
48       ))
49     (->subsumptive
50      ((===shuowen-jiguge-A30 . 09703)   ; &SW-JIGUGE30-09703;
51       )
52      ((===shuowen-jiguge5 . 09203)      ; &SW-JIGUGE5-09203;
53       )
54      ((===shuowen-jiguge4 . 09103)      ; &SW-JIGUGE4-09103;
55       ))
56     ))