Add Hanyo-Denshi/JB code points.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R181-Leaf.el

diff --git a/lisp/utf-2000/Ideograph-R181-Leaf.el b/lisp/utf-2000/Ideograph-R181-Leaf.el
index 8440fa3..da64dae 100644 (file)
--- a/lisp/utf-2000/Ideograph-R181-Leaf.el
+++ b/lisp/utf-2000/Ideograph-R181-Leaf.el
@@ -2397,19 +2397,20 @@
 (define-char
   '((ideographic-radical . 181)        ; ⾴
     (=ucs              . #x983B)       ; 頻
+    (=>jis-x0208@1997  . #x4951)       ; 頻 [41-49]
     ))
 (define-char
   '((<-denotational
      ((=ucs              . #x983B)     ; 頻
       ))
-    (=>ucs@jis         . #xFA6A)       ; 頻
     (ideographic-radical . 181)        ; ⾴
     (ideographic-strokes . 7)
     (total-strokes      . 16)
+    (=>>ucs@unicode    . #x983B)       ; &G-JX1-7D7B;
+    (=>>ucs@jis                . #xFA6A)       ; &G-JX1-7D7B;
+    (=>>jis-x0213-1    . #x7D7B)       ; &G-JX1-7D7B; [93-91]
     (->subsumptive
      ((=>ucs*            . #x983B)     ; 頻
-      (=>ucs@gb                  . #x983B)     ; &C1-7322;
-      (=>ucs@cns         . #x983B)     ; &C1-7322;
       (=ucs              . #xFA6A)     ; 頻
       (=ucs@ks           . #x983B)     ; 頻
       (=jis-x0208@1978   . #x4951)     ; &I-J78-4951; [41-49]
@@ -4139,6 +4140,32 @@
     ))
 (define-char
   '((ideographic-radical . 181)        ; ⾴
+    (ideographic-strokes . 10)
+    (total-strokes      . 19)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=>>ruimoku-v6     . #xE013)     ; &G-RUI6-E013;
+      )
+     ((=ucs              . #x9801)     ; 頁
+      ))
+    (=>>ruimoku-v6     . #xE014)       ; &G-RUI6-E014;
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((=ruimoku-v6       . #xE013)   ; &RUI6-E013;
+       )
+       ((=ucs              . #x9801)   ; 頁
+       ))
+      (sources           ruimoku=A021610-00006)
+      (=ruimoku-v6       . #xE014)     ; &RUI6-E014;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 181)        ; ⾴
     (ideographic-strokes . 11)
     (total-strokes      . 20)
     (=ucs              . #x29533)      ; 𩔳