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

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

diff --git a/lisp/utf-2000/ShuoWen-SR061.el b/lisp/utf-2000/ShuoWen-SR061.el
new file mode 100644 (file)
index 0000000..e6af62f
--- /dev/null
+++ b/lisp/utf-2000/ShuoWen-SR061.el
@@ -0,0 +1,49 @@
+;; -*- coding: utf-8-mcs-er -*-
+(define-char
+  '((shuowen-radical   . 61)   ; 菐
+    (=shuowen-jiguge   . 08012)        ; &SW-JIGUGE-08012;
+    (<-Small-Seal@shuowen
+     ((=ucs              . #x83D0)     ; 菐
+      ))
+    (->subsumptive
+     ((===shuowen-jiguge5 . 08012)     ; &SW-JIGUGE5-08012;
+      )
+     ((===shuowen-jiguge4 . 07912)     ; &SW-JIGUGE4-07912;
+      ))
+    ))
+(define-char
+  '((shuowen-radical   . 61)   ; 菐
+    (=shuowen-jiguge   . 08100)        ; &SW-JIGUGE-08100;
+    (<-Small-Seal@shuowen
+     ((=ucs              . #x50D5)     ; 僕
+      ))
+    (->subsumptive
+     ((===shuowen-jiguge5 . 08100)     ; &SW-JIGUGE5-08100;
+      )
+     ((===shuowen-jiguge4 . 08000)     ; &SW-JIGUGE4-08000;
+      ))
+    ))
+(define-char
+  '((shuowen-radical   . 61)   ; 菐
+    (=shuowen-jiguge   . 08101)        ; &SW-JIGUGE-08101;
+    (<-Small-Seal@shuowen
+     ((=ucs              . #x4451)     ; 䑑
+      ))
+    (->subsumptive
+     ((===shuowen-jiguge5 . 08101)     ; &SW-JIGUGE5-08101;
+      )
+     ((===shuowen-jiguge4 . 08001)     ; &SW-JIGUGE4-08001;
+      ))
+    ))
+(define-char
+  '((shuowen-radical   . 61)   ; 菐
+    (=shuowen-jiguge   . 08102)        ; &SW-JIGUGE-08102;
+    (<-Small-Seal@shuowen
+     ((=ucs              . #x2052F)    ; 𠔯
+      ))
+    (->subsumptive
+     ((===shuowen-jiguge5 . 08102)     ; &SW-JIGUGE5-08102;
+      )
+     ((===shuowen-jiguge4 . 08002)     ; &SW-JIGUGE4-08002;
+      ))
+    ))