(SW-JIGUGE-18006): Add `<-ancient@shuowen' for SW-JIGUGE-18005.

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

diff --git a/lisp/utf-2000/ShuoWen-SR200.el b/lisp/utf-2000/ShuoWen-SR200.el
index a78ce85..b2ce6c2 100644 (file)
--- a/lisp/utf-2000/ShuoWen-SR200.el
+++ b/lisp/utf-2000/ShuoWen-SR200.el
@@ -8,6 +8,8 @@
      ((=ucs              . #x821C)     ; 舜
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 18505)  ; &SW-JIGUGE30-18505;
+      )
      ((===shuowen-jiguge5 . 18005)     ; &SW-JIGUGE5-18005;
       )
      ((===shuowen-jiguge4 . 17705)     ; &SW-JIGUGE4-17705;
@@ -19,7 +21,16 @@
     (<-Small-Seal@shuowen
      ((=ucs              . #x21429)    ; 𡐩
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge   . 18005)      ; &SW-JIGUGE-18005;
+      )
+     ((=ucs              . #x445E)     ; 䑞
+      )
+     ((=ucs              . #x821C)     ; 舜
+      ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 18506)  ; &SW-JIGUGE30-18506;
+      )
      ((===shuowen-jiguge5 . 18006)     ; &SW-JIGUGE5-18006;
       )
      ((===shuowen-jiguge4 . 17706)     ; &SW-JIGUGE4-17706;
@@ -29,9 +40,17 @@
   '((shuowen-radical   . 200)  ; 䑞
     (=shuowen-jiguge   . 18007)        ; &SW-JIGUGE-18007;
     (<-Small-Seal@shuowen
+     ((=ucs              . #x24C00)    ; 𤰀
+      )
      ((=ucs              . #x26A03)    ; 𦨃
+      )
+     ((=ucs              . #x26A04)    ; 𦨄
+      )
+     ((=ucs              . #x24BF7)    ; 𤯷
       ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 18507)  ; &SW-JIGUGE30-18507;
+      )
      ((===shuowen-jiguge5 . 18007)     ; &SW-JIGUGE5-18007;
       )
      ((===shuowen-jiguge4 . 17707)     ; &SW-JIGUGE4-17707;
@@ -43,7 +62,18 @@
     (<-Small-Seal@shuowen
      ((=ucs              . #x845F)     ; 葟
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge   . 18007)      ; &SW-JIGUGE-18007;
+      )
+     ((=ucs              . #x24C00)    ; 𤰀
+      )
+     ((=ucs              . #x26A03)    ; 𦨃
+      )
+     ((=ucs              . #x24BF7)    ; 𤯷
+      ))
     (->subsumptive
+     ((===shuowen-jiguge-A30 . 18508)  ; &SW-JIGUGE30-18508;
+      )
      ((===shuowen-jiguge5 . 18008)     ; &SW-JIGUGE5-18008;
       )
      ((===shuowen-jiguge4 . 17708)     ; &SW-JIGUGE4-17708;