lisp/utf-2000/ShuoWen-SR005.el

   1 ;; -*- coding: utf-8-mcs-er -*-
   2 (define-char
   3   '((shuowen-radical    . 5)    ; 王
   4     (=shuowen-jiguge    . 00601)        ; &SW-JIGUGE-00601;
   5     (<-Small-Seal@shuowen
   6      ((=ucs               . #x738B)     ; 王
   7       ))
   8     (->subsumptive
   9      ((===shuowen-jiguge5 . 00601)      ; &SW-JIGUGE5-00601;
  10       )
  11      ((===shuowen-jiguge4 . 00601)      ; &SW-JIGUGE4-00601;
  12       ))
  13     ))
  14 (define-char
  15   '((shuowen-radical    . 5)    ; 王
  16     (=shuowen-jiguge    . 00602)        ; &SW-JIGUGE-00602;
  17     (<-Small-Seal@shuowen
  18      ((=ucs               . #x2067B)    ; 𠙻
  19       ))
  20     (<-ancient@shuowen
  21      ((=shuowen-jiguge    . 00601)      ; &SW-JIGUGE-00601;
  22       )
  23      ((=ucs               . #x738B)     ; 王
  24       ))
  25     (->subsumptive
  26      ((===shuowen-jiguge5 . 00602)      ; &SW-JIGUGE5-00602;
  27       )
  28      ((===shuowen-jiguge4 . 00602)      ; &SW-JIGUGE4-00602;
  29       ))
  30     ))
  31 (define-char
  32   '((shuowen-radical    . 5)    ; 王
  33     (ideographic-structure
  34      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
  35       (=ucs               . #x2FF5)     ; ⿵
  36       )
  37      ((=shuowen-jiguge    . 41313)      ; &SW-JIGUGE-41313;
  38       )
  39      ((=shuowen-jiguge    . 00601)      ; &SW-JIGUGE-00601;
  40       ))
  41     (=shuowen-jiguge    . 00603)        ; &SW-JIGUGE-00603;
  42     (<-Small-Seal@shuowen
  43      ((=ucs               . #x958F)     ; 閏
  44       ))
  45     (->subsumptive
  46      ((===shuowen-jiguge5 . 00603)      ; &SW-JIGUGE5-00603;
  47       )
  48      ((===shuowen-jiguge4 . 00603)      ; &SW-JIGUGE4-00603;
  49       ))
  50     ))
  51 (define-char
  52   '((shuowen-radical    . 5)    ; 王
  53     (ideographic-structure
  54      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
  55       (=ucs               . #x2FF1)     ; ⿱
  56       )
  57      ((=shuowen-jiguge    . 11305)      ; &SW-JIGUGE-11305;
  58       )
  59      ((=shuowen-jiguge    . 00601)      ; &SW-JIGUGE-00601;
  60       ))
  61     (=shuowen-jiguge    . 00604)        ; &SW-JIGUGE-00604;
  62     (<-Small-Seal@shuowen
  63      ((=ucs               . #x26903)    ; 𦤃
  64       )
  65      ((=ucs               . #x7687)     ; 皇
  66       ))
  67     (->subsumptive
  68      ((===shuowen-jiguge5 . 00604)      ; &SW-JIGUGE5-00604;
  69       )
  70      ((===shuowen-jiguge4 . 00604)      ; &SW-JIGUGE4-00604;
  71       ))
  72     ))