Use `=>shuowen-jiguge' instead of `=shuowen-jiguge' as the CCS-feature
authorMORIOKA Tomohiko <tomo.git@chise.org>
Mon, 20 Jun 2022 11:05:27 +0000 (20:05 +0900)
committerMORIOKA Tomohiko <tomo.git@chise.org>
Wed, 22 Jun 2022 01:41:16 +0000 (10:41 +0900)
of abstract character of Shuowen-Jiguge which has `->denotational' to
combine some Small-Seal glyphs.
(SW-JIGUGE-42226): Add U-00022C95 as a corresponding modern character.

lisp/utf-2000/ShuoWen-SR441.el

index ffd5be2..aaef45d 100644 (file)
     ))
 (define-char
   '((shuowen-radical   . 441)  ; 手
-    (=shuowen-jiguge   . 41813)        ; &SW-JIGUGE-41813;
+    (=>shuowen-jiguge  . 41813)        ; &A-SW-JIGUGE-41813;
+    (<-Small-Seal
+     ((=ucs              . #x62DC)     ; 拜
+      ))
     ))
 (define-char
   '((<-denotational
-     ((=shuowen-jiguge   . 41813)      ; &SW-JIGUGE-41813;
+     ((=>shuowen-jiguge          . 41813)      ; &A-SW-JIGUGE-41813;
       ))
     (shuowen-radical   . 441)  ; 手
     (===shuowen-jiguge5 . 41813)       ; &SW-JIGUGE5-41813;
     ))
 (define-char
   '((<-denotational
-     ((=shuowen-jiguge   . 41813)      ; &SW-JIGUGE-41813;
+     ((=>shuowen-jiguge          . 41813)      ; &A-SW-JIGUGE-41813;
       ))
     (shuowen-radical   . 441)  ; 手
     (===shuowen-jiguge4 . 40513)       ; &SW-JIGUGE4-40513;
   '((shuowen-radical   . 441)  ; 手
     (=shuowen-jiguge   . 42226)        ; &SW-JIGUGE-42226;
     (<-Small-Seal@shuowen
+     ((=ucs              . #x22C95)    ; 𢲕
+      )
      ((=ucs              . #x63C6)     ; 揆
       ))
     (->subsumptive