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