(IU+20343): Use `->subsumptive' to add abstract glyph-form node.
authorMORIOKA Tomohiko <tomo.git@chise.org>
Thu, 5 Feb 2015 10:55:06 +0000 (19:55 +0900)
committerMORIOKA Tomohiko <tomo.git@chise.org>
Thu, 5 Feb 2015 10:55:06 +0000 (19:55 +0900)
lisp/utf-2000/Ideograph-R009-Man.el

index 30d349a..bf6b414 100644 (file)
       )
      ((=ucs@unicode      . #x98E2)     ; &GT-59033;
       (=jis-x0208        . #x3532)     ; &GT-59033; [21-18]
       )
      ((=ucs@unicode      . #x98E2)     ; &GT-59033;
       (=jis-x0208        . #x3532)     ; &GT-59033; [21-18]
+      (=cns11643-1       . #x586A)     ; &I-C1-586A; [56-74]
       (=jis-x0213-1      . #x3532)     ; &I-JX1-3532; [21-18]
       ))
     (=ucs@iso          . #x20343)      ; &U-00020343;
       (=jis-x0213-1      . #x3532)     ; &I-JX1-3532; [21-18]
       ))
     (=ucs@iso          . #x20343)      ; &U-00020343;
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((name              . "CJK RADICAL PERSON")
+       (=ucs               . #x2E85)   ; ⺅
+       )
+       ((==ucs@unicode     . #x98E2)   ; &g2-GT-59033;
+       (==jis-x0208        . #x3532)   ; &g2-GT-59033; [21-18]
+       ))
+      (==ucs@iso         . #x20343)    ; &g2-IU-00020343;
+      ))
     ))
 (define-char
   '((ideographic-radical . 9)  ; ⼈
     ))
 (define-char
   '((ideographic-radical . 9)  ; ⼈