X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R004-Slash.el;h=14c19fc24819cbd8e991bbfbb9ae13158686141e;hb=341b931fa7ec4177794ad4ee2089fde2c5ec3c36;hp=b049bbe63f1c5bcfd02449e9fc57dd0c50f9f94b;hpb=2a4452d66099cc8753f491a5304568443a7ee652;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/Ideograph-R004-Slash.el b/lisp/utf-2000/Ideograph-R004-Slash.el
index b049bbe..14c19fc 100644
--- a/lisp/utf-2000/Ideograph-R004-Slash.el
+++ b/lisp/utf-2000/Ideograph-R004-Slash.el
@@ -759,8 +759,8 @@
     ))
 (define-char
   '((<-denotational
-     ((==>ucs@bucs	  . #x5E7A)	; &BUCS+5E7A;
-      (=>ucs@component	  . #x5E7A)	; &BUCS+5E7A;
+     ((=>ucs@iwds-1	  . #x5E7A)	; &A-IWDSU+5E7A;
+      (=>iwds-1		  .  0129)	; &A-IWDSU+5E7A;
       ))
     (ideographic-radical . 4)	; ⼃
     (ideographic-strokes . 2)
@@ -3024,7 +3024,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@component	  . #x200A1)	; &A-compU+200A1;
+     ((=>big5-cdp	  . #x85E4)	; &A-CDP-85E4;
       ))
     (ideographic-radical . 4)	; ⼃
     (ideographic-strokes . 6)
@@ -3047,6 +3047,15 @@
     (ideographic-radical . 4)	; ⼃
     (ideographic-strokes . 6)
     (total-strokes	 . 7)
+    (=>big5-cdp		. #x85E4)	; &A-CDP-85E4;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@component	  . #x200A1)	; &A-compU+200A1;
+      ))
+    (ideographic-radical . 4)	; ⼃
+    (ideographic-strokes . 6)
+    (total-strokes	 . 7)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO MIDDLE AND RIGHT")
       (=ucs		  . #x2FF2)	; ⿲
@@ -3061,6 +3070,27 @@
     (=big5-cdp-var-001	. #x85F3)	; &CDP-v001-85F3;
     ))
 (define-char
+  '((<-denotational
+     ((=>big5-cdp	  . #x85E4)	; &A-CDP-85E4;
+      ))
+    (ideographic-radical . 4)	; ⼃
+    (ideographic-strokes . 6)
+    (total-strokes	 . 7)
+    (=>ucs-itaiji-001	. #x200A1)	; &A-U-i001+200A1;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-itaiji-001	  . #x200A1)	; &A-U-i001+200A1;
+      ))
+    (ideographic-radical . 4)	; ⼃
+    (ideographic-strokes . 6)
+    (total-strokes	 . 7)
+    (=ucs-itaiji-001	. #x200A1)	; &U-i001+200A1;
+    (->subsumptive
+     ((==ucs-itaiji-001	  . #x200A1)	; &g2-U-i001+200A1;
+      ))
+    ))
+(define-char
   '((ideographic-radical . 4)	; ⼃
     (ideographic-strokes . 6)
     (total-strokes	 . 7)
@@ -3069,7 +3099,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@component	  . #x200A1)	; &A-compU+200A1;
+     ((=>ucs-itaiji-001	  . #x200A1)	; &A-U-i001+200A1;
       ))
     (ideographic-radical . 4)	; ⼃
     (ideographic-strokes . 6)