X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FShuoWen-SR002.el;h=ef44e59ab48f1ae2200737ffe7da548b46bc69cb;hb=5b67a6f50a06f576feea1bb71eff82d16d640d6c;hp=2637b3267d342c339f9b8249074c2eb9b9f3826a;hpb=ccaf5f46b6e29a5d905b7a6ba820052e5efa1ed0;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/ShuoWen-SR002.el b/lisp/utf-2000/ShuoWen-SR002.el
index 2637b32..ef44e59 100644
--- a/lisp/utf-2000/ShuoWen-SR002.el
+++ b/lisp/utf-2000/ShuoWen-SR002.el
@@ -6,49 +6,125 @@
      ((=ucs		  . #x4E04)	; 丄
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00205)	; &SW-JIGUGE30-00205;
+      )
      ((===shuowen-jiguge5 . 00205)	; &SW-JIGUGE5-00205;
       )
      ((===shuowen-jiguge4 . 00205)	; &SW-JIGUGE4-00205;
+      )
+     ((===chise-hdic-ktb-seal . #x0200)	; &R-CHISE-HDIC-KTBS0200;
       ))
     ))
 (define-char
   '((shuowen-radical	. 2)	; 上
+    (=>shuowen-jiguge	. 00206)	; &A-SW-JIGUGE-00206;
+    (<-Small-Seal
+     ((=ucs		  . #x4E0A)	; 上
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00206)	; &A-SW-JIGUGE-00206;
+      ))
+    (shuowen-radical	. 2)	; 上
     (=shuowen-jiguge	. 00206)	; &SW-JIGUGE-00206;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x4E0A)	; 上
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00206)	; &SW-JIGUGE30-00206;
+      )
      ((===shuowen-jiguge5 . 00206)	; &SW-JIGUGE5-00206;
       )
      ((===shuowen-jiguge4 . 00206)	; &SW-JIGUGE4-00206;
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00206)	; &A-SW-JIGUGE-00206;
+      ))
+    (shuowen-radical	. 2)	; 上
+    (=hdic-ktb-seal-glyph-id . T1_016_B31_2)
+    (===chise-hdic-ktb-seal . #x0201)	; &R-CHISE-HDIC-KTBS0201;
+    ))
+(define-char
   '((shuowen-radical	. 2)	; 上
+    (=>shuowen-jiguge	. 00207)	; &A-SW-JIGUGE-00207;
+    (<-Small-Seal
+     ((=ucs		  . #x5E1D)	; 帝
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00207)	; &A-SW-JIGUGE-00207;
+      ))
+    (shuowen-radical	. 2)	; 上
     (=shuowen-jiguge	. 00207)	; &SW-JIGUGE-00207;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x5E1D)	; 帝
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00207)	; &SW-JIGUGE30-00207;
+      )
      ((===shuowen-jiguge5 . 00207)	; &SW-JIGUGE5-00207;
       )
      ((===shuowen-jiguge4 . 00207)	; &SW-JIGUGE4-00207;
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00207)	; &A-SW-JIGUGE-00207;
+      ))
+    (shuowen-radical	. 2)	; 上
+    (=hdic-ktb-seal-glyph-id . T1_016_B33)
+    (===chise-hdic-ktb-seal . #x0202)	; &R-CHISE-HDIC-KTBS0202;
+    ))
+(define-char
   '((shuowen-radical	. 2)	; 上
+    (=>shuowen-jiguge	. 00208)	; &A-SW-JIGUGE-00208;
+    (<-Small-Seal
+     ((=ucs		  . #x22087)	; 𢂇
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00208)	; &A-SW-JIGUGE-00208;
+      ))
+    (shuowen-radical	. 2)	; 上
     (=shuowen-jiguge	. 00208)	; &SW-JIGUGE-00208;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x22087)	; 𢂇
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00208)	; &SW-JIGUGE30-00208;
+      )
      ((===shuowen-jiguge5 . 00208)	; &SW-JIGUGE5-00208;
       )
      ((===shuowen-jiguge4 . 00208)	; &SW-JIGUGE4-00208;
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00208)	; &A-SW-JIGUGE-00208;
+      ))
+    (shuowen-radical	. 2)	; 上
+    (=hdic-ktb-seal-glyph-id . T1_016_B33_2)
+    (===chise-hdic-ktb-seal . #x0203)	; &R-CHISE-HDIC-KTBS0203;
+    ))
+(define-char
   '((shuowen-radical	. 2)	; 上
+    (=>shuowen-jiguge	. 00209)	; &A-SW-JIGUGE-00209;
+    (<-Small-Seal
+     ((=ucs		  . #x3AC4)	; 㫄
+      )
+     ((=ucs		  . #x65C1)	; 旁
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00209)	; &A-SW-JIGUGE-00209;
+      ))
+    (shuowen-radical	. 2)	; 上
     (=shuowen-jiguge	. 00209)	; &SW-JIGUGE-00209;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x3AC4)	; 㫄
@@ -56,13 +132,30 @@
      ((=ucs		  . #x65C1)	; 旁
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00209)	; &SW-JIGUGE30-00209;
+      )
      ((===shuowen-jiguge5 . 00209)	; &SW-JIGUGE5-00209;
       )
      ((===shuowen-jiguge4 . 00209)	; &SW-JIGUGE4-00209;
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00209)	; &A-SW-JIGUGE-00209;
+      ))
+    (shuowen-radical	. 2)	; 上
+    (=hdic-ktb-seal-glyph-id . T1_016_B41)
+    (===chise-hdic-ktb-seal . #x0204)	; &R-CHISE-HDIC-KTBS0204;
+    ))
+(define-char
   '((shuowen-radical	. 2)	; 上
+    (=>shuowen-jiguge	. 00210)	; &A-SW-JIGUGE-00210;
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00210)	; &A-SW-JIGUGE-00210;
+      ))
+    (shuowen-radical	. 2)	; 上
     (=shuowen-jiguge	. 00210)	; &SW-JIGUGE-00210;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x230DF)	; 𣃟
@@ -73,13 +166,39 @@
      ((=ucs		  . #x65C1)	; 旁
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00210)	; &SW-JIGUGE30-00210;
+      )
      ((===shuowen-jiguge5 . 00210)	; &SW-JIGUGE5-00210;
       )
      ((===shuowen-jiguge4 . 00210)	; &SW-JIGUGE4-00210;
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00210)	; &A-SW-JIGUGE-00210;
+      ))
+    (shuowen-radical	. 2)	; 上
+    (=hdic-ktb-seal-glyph-id . T1_016_B41_2)
+    (===chise-hdic-ktb-seal . #x0205)	; &R-CHISE-HDIC-KTBS0205;
+    (<-Small-Seal@tenrei-bansho-meigi/chise
+     ((=ucs		  . #x3751)	; 㝑
+      ))
+    ))
+(define-char
   '((shuowen-radical	. 2)	; 上
+    (=>shuowen-jiguge	. 00211)	; &A-SW-JIGUGE-00211;
+    (<-Small-Seal
+     ((=ucs		  . #x230D9)	; 𣃙
+      ))
+    (<-ancient
+     ((=ucs		  . #x65C1)	; 旁
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00211)	; &A-SW-JIGUGE-00211;
+      ))
+    (shuowen-radical	. 2)	; 上
     (=shuowen-jiguge	. 00211)	; &SW-JIGUGE-00211;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x230D9)	; 𣃙
@@ -90,13 +209,36 @@
      ((=ucs		  . #x65C1)	; 旁
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00211)	; &SW-JIGUGE30-00211;
+      )
      ((===shuowen-jiguge5 . 00211)	; &SW-JIGUGE5-00211;
       )
      ((===shuowen-jiguge4 . 00211)	; &SW-JIGUGE4-00211;
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00211)	; &A-SW-JIGUGE-00211;
+      ))
+    (shuowen-radical	. 2)	; 上
+    (=hdic-ktb-seal-glyph-id . T1_016_B41_3)
+    (===chise-hdic-ktb-seal . #x0206)	; &R-CHISE-HDIC-KTBS0206;
+    (<-Small-Seal@tenrei-bansho-meigi/chise
+     ((=ucs		  . #x230D9)	; 𣃙
+      ))
+    ))
+(define-char
   '((shuowen-radical	. 2)	; 上
+    (=>shuowen-jiguge	. 00212)	; &A-SW-JIGUGE-00212;
+    (<-Small-Seal
+     ((=ucs		  . #x96F1)	; 雱
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00212)	; &A-SW-JIGUGE-00212;
+      ))
+    (shuowen-radical	. 2)	; 上
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
       (=ucs		  . #x2FF5)	; ⿵
@@ -115,32 +257,70 @@
      ((=ucs		  . #x65C1)	; 旁
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00212)	; &SW-JIGUGE30-00212;
+      )
      ((===shuowen-jiguge5 . 00212)	; &SW-JIGUGE5-00212;
       )
      ((===shuowen-jiguge4 . 00212)	; &SW-JIGUGE4-00212;
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00212)	; &A-SW-JIGUGE-00212;
+      ))
+    (shuowen-radical	. 2)	; 上
+    (=hdic-ktb-seal-glyph-id . T1_016_B41_4)
+    (===chise-hdic-ktb-seal . #x0207)	; &R-CHISE-HDIC-KTBS0207;
+    (<-Small-Seal@tenrei-bansho-meigi/chise
+     ((=ucs		  . #x96F1)	; 雱
+      ))
+    ))
+(define-char
   '((shuowen-radical	. 2)	; 上
     (=shuowen-jiguge	. 00213)	; &SW-JIGUGE-00213;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x4E05)	; 丅
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00213)	; &SW-JIGUGE30-00213;
+      )
      ((===shuowen-jiguge5 . 00213)	; &SW-JIGUGE5-00213;
       )
      ((===shuowen-jiguge4 . 00213)	; &SW-JIGUGE4-00213;
+      )
+     ((=hdic-ktb-seal-glyph-id . T1_016_B51)
+      (===chise-hdic-ktb-seal . #x0208)	; &R-CHISE-HDIC-KTBS0208;
       ))
     ))
 (define-char
   '((shuowen-radical	. 2)	; 上
+    (=>shuowen-jiguge	. 00214)	; &A-SW-JIGUGE-00214;
+    (<-Small-Seal
+     ((=ucs		  . #x4E0B)	; 下
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00214)	; &A-SW-JIGUGE-00214;
+      ))
+    (shuowen-radical	. 2)	; 上
     (=shuowen-jiguge	. 00214)	; &SW-JIGUGE-00214;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x4E0B)	; 下
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00214)	; &SW-JIGUGE30-00214;
+      )
      ((===shuowen-jiguge5 . 00214)	; &SW-JIGUGE5-00214;
       )
      ((===shuowen-jiguge4 . 00214)	; &SW-JIGUGE4-00214;
       ))
     ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge	  . 00214)	; &A-SW-JIGUGE-00214;
+      ))
+    (shuowen-radical	. 2)	; 上
+    (=hdic-ktb-seal-glyph-id . T1_016_B51_2)
+    (===chise-hdic-ktb-seal . #x0209)	; &R-CHISE-HDIC-KTBS0209;
+    ))