(U+3AAF): Add `<-denotational@usage' for BUCS+64E7; apply new

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

diff --git a/lisp/utf-2000/ShuoWen-SR537.el b/lisp/utf-2000/ShuoWen-SR537.el
index 7d65d47..8ac3ea5 100644 (file)
--- a/lisp/utf-2000/ShuoWen-SR537.el
+++ b/lisp/utf-2000/ShuoWen-SR537.el
@@ -17,6 +17,11 @@
     (<-Small-Seal@shuowen
      ((=ucs              . #x4E23)     ; 丣
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge   . 51706)      ; &SW-JIGUGE-51706;
+      )
+     ((=ucs              . #x9149)     ; 酉
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 51707)     ; &SW-JIGUGE5-51707;
       )
@@ -385,10 +390,25 @@
     ))
 (define-char
   '((shuowen-radical   . 537)  ; 酉
+    (=>shuowen-jiguge  . 51824)        ; &A-SW-JIGUGE-51824;
+    (<-Small-Seal
+     ((=ucs              . #x256F2)    ; 𥛲
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>shuowen-jiguge          . 51824)      ; &A-SW-JIGUGE-51824;
+      ))
+    (shuowen-radical   . 537)  ; 酉
     (=shuowen-jiguge   . 51824)        ; &SW-JIGUGE-51824;
     (<-Small-Seal@shuowen
      ((=ucs              . #x256F2)    ; 𥛲
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge   . 51823)      ; &SW-JIGUGE-51823;
+      )
+     ((=ucs              . #x91AE)     ; 醮
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 51824)     ; &SW-JIGUGE5-51824;
       )
@@ -396,6 +416,14 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>shuowen-jiguge          . 51824)      ; &A-SW-JIGUGE-51824;
+      ))
+    (shuowen-radical   . 537)  ; 酉
+    (=hdic-ktb-seal-glyph-id . T1_020_B31)
+    (===chise-hdic-ktb-seal . #x035F)  ; &R-CHISE-HDIC-KTBS035F;
+    ))
+(define-char
   '((shuowen-radical   . 537)  ; 酉
     (=shuowen-jiguge   . 51825)        ; &SW-JIGUGE-51825;
     (<-Small-Seal@shuowen