Split ShuoWen.el into ShuoWen-SR{001-540}.el.

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

diff --git a/lisp/utf-2000/ShuoWen-SR046.el b/lisp/utf-2000/ShuoWen-SR046.el
new file mode 100644 (file)
index 0000000..1e67f2b
--- /dev/null
+++ b/lisp/utf-2000/ShuoWen-SR046.el
@@ -0,0 +1,49 @@
+;; -*- coding: utf-8-mcs-er -*-
+(define-char
+  '((shuowen-radical   . 46)   ; 舌
+    (=shuowen-jiguge   . 06707)        ; &SW-JIGUGE-06707;
+    (<-Small-Seal@shuowen
+     ((=ucs              . #x820C)     ; 舌
+      ))
+    (->subsumptive
+     ((===shuowen-jiguge5 . 06707)     ; &SW-JIGUGE5-06707;
+      )
+     ((===shuowen-jiguge4 . 06607)     ; &SW-JIGUGE4-06607;
+      ))
+    ))
+(define-char
+  '((shuowen-radical   . 46)   ; 舌
+    (=shuowen-jiguge   . 06708)        ; &SW-JIGUGE-06708;
+    (<-Small-Seal@shuowen
+     ((=ucs              . #x269E5)    ; 𦧥
+      ))
+    (->subsumptive
+     ((===shuowen-jiguge5 . 06708)     ; &SW-JIGUGE5-06708;
+      )
+     ((===shuowen-jiguge4 . 06608)     ; &SW-JIGUGE4-06608;
+      ))
+    ))
+(define-char
+  '((shuowen-radical   . 46)   ; 舌
+    (=shuowen-jiguge   . 06709)        ; &SW-JIGUGE-06709;
+    (<-Small-Seal@shuowen
+     ((=ucs              . #x8213)     ; 舓
+      ))
+    (->subsumptive
+     ((===shuowen-jiguge5 . 06709)     ; &SW-JIGUGE5-06709;
+      )
+     ((===shuowen-jiguge4 . 06609)     ; &SW-JIGUGE4-06609;
+      ))
+    ))
+(define-char
+  '((shuowen-radical   . 46)   ; 舌
+    (=shuowen-jiguge   . 06710)        ; &SW-JIGUGE-06710;
+    (<-Small-Seal@shuowen
+     ((=ucs              . #x269C7)    ; 𦧇
+      ))
+    (->subsumptive
+     ((===shuowen-jiguge5 . 06710)     ; &SW-JIGUGE5-06710;
+      )
+     ((===shuowen-jiguge4 . 06610)     ; &SW-JIGUGE4-06610;
+      ))
+    ))