X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=lisp%2Futf-2000%2FIdeograph-R025-Divination.el;h=86e34bd53fc47b63b0994a6b9f8f42f4b28c5bdb;hb=a2d5e715cb949a9225dedcaec749cd3ec9a41b7b;hp=cc33415a612ffc6db47403c640cbe8449915e0a7;hpb=133759893ed4162f06bc9a59ea7e2e84beb58b00;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/Ideograph-R025-Divination.el b/lisp/utf-2000/Ideograph-R025-Divination.el
index cc33415..86e34bd 100644
--- a/lisp/utf-2000/Ideograph-R025-Divination.el
+++ b/lisp/utf-2000/Ideograph-R025-Divination.el
@@ -956,6 +956,28 @@
   '((ideographic-radical . 25)	; ⼘
     (ideographic-strokes . 6)
     (total-strokes	 . 8)
+    (=>ucs@component	. #x209E2)	; &A-compU+209E2;
+    ))
+(define-char
+  '((<-denotational@component
+     ((=>ucs@component	  . #x209E2)	; &A-compU+209E2;
+      ))
+    (ideographic-radical . 25)	; ⼘
+    (ideographic-strokes . 6)
+    (total-strokes	 . 8)
+    (=>ucs@cognate	. #x209E2)	; &A-cgnU+209E2;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x209E2)	; &A-cgnU+209E2;
+      ))
+    (<-denotational@component
+     ((=>ucs@iwds-1	  . #x209E2)	; &A-IWDSU+209E2;
+      (=>iwds-1		  .  0356)	; &A-IWDSU+209E2;
+      ))
+    (ideographic-radical . 25)	; ⼘
+    (ideographic-strokes . 6)
+    (total-strokes	 . 8)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs		  . #x2FF1)	; ⿱
@@ -989,6 +1011,26 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x209E2)	; &A-cgnU+209E2;
+      ))
+    (ideographic-radical . 25)	; ⼘
+    (ideographic-strokes . 6)
+    (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs-itaiji-002	  . #x5364)	; &U-i002+5364;
+      )
+     ((=ucs		  . #x531A)	; 匚
+      ))
+    (=ucs-itaiji-001	. #x209E2)	; &U-i001+209E2;
+    (->subsumptive
+     ((==ucs-itaiji-001	  . #x209E2)	; &g2-U-i001+209E2;
+      ))
+    ))
+(define-char
   '((ideographic-radical . 25)	; ⼘
     (ideographic-strokes . 6)
     (total-strokes	 . 8)
@@ -1976,3 +2018,11 @@
      ((==ucs@iso	  . #x20A0C)	; &g2-IU-00020A0C;
       ))
     ))
+(define-char
+  '((<-denotational@component
+     ((=>ucs@component	  . #x209E2)	; &A-compU+209E2;
+      ))
+    (ideographic-radical . 25)	; ⼘
+    (=>ucs@iwds-1	. #x209E2)	; &A-IWDSU+209E2;
+    (=>iwds-1		.  0356)	; &A-IWDSU+209E2;
+    ))