Add `===shuowen-jiguge-A30' characters.

[chise/xemacs-chise.git] / lisp / utf-2000 / ShuoWen-SR001.el

diff --git a/lisp/utf-2000/ShuoWen-SR001.el b/lisp/utf-2000/ShuoWen-SR001.el
index d074546..0c50e24 100644 (file)
--- a/lisp/utf-2000/ShuoWen-SR001.el
+++ b/lisp/utf-2000/ShuoWen-SR001.el
@@ -6,6 +6,8 @@
      ((=ucs              . #x4E00)     ; 一
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00100)  ; &SW-JIGUGE30-00100;
+      )
      ((===shuowen-jiguge5 . 00100)     ; &SW-JIGUGE5-00100;
       )
      ((===shuowen-jiguge4 . 00100)     ; &SW-JIGUGE4-00100;
@@ -13,6 +15,16 @@
     ))
 (define-char
   '((shuowen-radical   . 1)    ; 一
+    (=>shuowen-jiguge  . 00200)        ; &A-SW-JIGUGE-00200;
+    (<-Small-Seal
+     ((=ucs              . #x5F0C)     ; 弌
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge          . 00200)      ; &A-SW-JIGUGE-00200;
+      ))
+    (shuowen-radical   . 1)    ; 一
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
       (=ucs              . #x2FF9)     ; ⿹
@@ -26,13 +38,33 @@
      ((=ucs              . #x5F0C)     ; 弌
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00200)  ; &SW-JIGUGE30-00200;
+      )
      ((===shuowen-jiguge5 . 00200)     ; &SW-JIGUGE5-00200;
       )
      ((===shuowen-jiguge4 . 00200)     ; &SW-JIGUGE4-00200;
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>shuowen-jiguge          . 00200)      ; &A-SW-JIGUGE-00200;
+      ))
+    (shuowen-radical   . 1)    ; 一
+    (=hdic-ktb-seal-glyph-id . T1_016_A51)
+    (===chise-hdic-ktb-seal . #x0100)  ; &R-CHISE-HDIC-KTBS0100;
+    ))
+(define-char
   '((shuowen-radical   . 1)    ; 一
+    (=>shuowen-jiguge  . 00201)        ; &A-SW-JIGUGE-00201;
+    (<-Small-Seal
+     ((=ucs              . #x5143)     ; 元
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge          . 00201)      ; &A-SW-JIGUGE-00201;
+      ))
+    (shuowen-radical   . 1)    ; 一
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
@@ -46,13 +78,41 @@
      ((=ucs              . #x5143)     ; 元
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00201)  ; &SW-JIGUGE30-00201;
+      )
      ((===shuowen-jiguge5 . 00201)     ; &SW-JIGUGE5-00201;
       )
      ((===shuowen-jiguge4 . 00201)     ; &SW-JIGUGE4-00201;
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>shuowen-jiguge          . 00201)      ; &A-SW-JIGUGE-00201;
+      ))
+    (shuowen-radical   . 1)    ; 一
+    (=hdic-ktb-seal-glyph-id . T1_016_A61)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=shuowen-jiguge   . 00100)      ; &SW-JIGUGE-00100;
+      )
+     ((=shuowen-jiguge   . 28901)      ; &SW-JIGUGE-28901;
+      ))
+    (===chise-hdic-ktb-seal . #x0102)  ; &R-CHISE-HDIC-KTBS0102;
+    ))
+(define-char
   '((shuowen-radical   . 1)    ; 一
+    (=>shuowen-jiguge  . 00202)        ; &A-SW-JIGUGE-00202;
+    (<-Small-Seal
+     ((=ucs              . #x5929)     ; 天
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge          . 00202)      ; &A-SW-JIGUGE-00202;
+      ))
+    (shuowen-radical   . 1)    ; 一
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
@@ -66,12 +126,25 @@
      ((=ucs              . #x5929)     ; 天
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00202)  ; &SW-JIGUGE30-00202;
+      )
      ((===shuowen-jiguge5 . 00202)     ; &SW-JIGUGE5-00202;
       )
      ((===shuowen-jiguge4 . 00202)     ; &SW-JIGUGE4-00202;
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>shuowen-jiguge          . 00202)      ; &A-SW-JIGUGE-00202;
+      ))
+    (shuowen-radical   . 1)    ; 一
+    (=hdic-ktb-seal-glyph-id . T1_016_A53)
+    (===chise-hdic-ktb-seal . #x0101)  ; &R-CHISE-HDIC-KTBS0101;
+    (<-Small-Seal@tenrei-bansho-meigi/chise
+     ((=ucs              . #x2CEC3)    ; 𬻃
+      ))
+    ))
+(define-char
   '((shuowen-radical   . 1)    ; 一
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
@@ -86,13 +159,30 @@
      ((=ucs              . #x4E15)     ; 丕
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00203)  ; &SW-JIGUGE30-00203;
+      )
      ((===shuowen-jiguge5 . 00203)     ; &SW-JIGUGE5-00203;
       )
      ((===shuowen-jiguge4 . 00203)     ; &SW-JIGUGE4-00203;
+      )
+     ((=hdic-ktb-seal-glyph-id . T1_016_A62)
+      (===chise-hdic-ktb-seal . #x0103)        ; &R-CHISE-HDIC-KTBS0103;
       ))
     ))
 (define-char
   '((shuowen-radical   . 1)    ; 一
+    (=>shuowen-jiguge  . 00204)        ; &A-SW-JIGUGE-00204;
+    (<-Small-Seal
+     ((=ucs              . #x53D3)     ; 叓
+      )
+     ((=ucs              . #x540F)     ; 吏
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge          . 00204)      ; &A-SW-JIGUGE-00204;
+      ))
+    (shuowen-radical   . 1)    ; 一
     (ideographic-structure
      ((name              . "IDEOGRAPHIC DESCRIPTION CHARACTER OVERLAID")
       (=ucs              . #x2FFB)     ; ⿻
@@ -108,8 +198,18 @@
      ((=ucs              . #x540F)     ; 吏
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 00204)  ; &SW-JIGUGE30-00204;
+      )
      ((===shuowen-jiguge5 . 00204)     ; &SW-JIGUGE5-00204;
       )
      ((===shuowen-jiguge4 . 00204)     ; &SW-JIGUGE4-00204;
       ))
     ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge          . 00204)      ; &A-SW-JIGUGE-00204;
+      ))
+    (shuowen-radical   . 1)    ; 一
+    (=hdic-ktb-seal-glyph-id . T1_016_B11)
+    (===chise-hdic-ktb-seal . #x0104)  ; &R-CHISE-HDIC-KTBS0104;
+    ))