X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R148-Horn.el;h=c3aca3b9653eebd2607176a76f4e14c5e2d20077;hb=3a1820ff5bbb255f96b0d6d85d9d9af42486a562;hp=5158899a664c793365743b5d36f57b732b9a366d;hpb=9ad193e4cfab4245f47a0eb7ae0aa9af8ab8f709;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/Ideograph-R148-Horn.el b/lisp/utf-2000/Ideograph-R148-Horn.el
index 5158899..c3aca3b 100644
--- a/lisp/utf-2000/Ideograph-R148-Horn.el
+++ b/lisp/utf-2000/Ideograph-R148-Horn.el
@@ -4,23 +4,49 @@
     (ideographic-strokes . 0)
     (total-strokes	 . 7)
     (=ucs		. #x89D2)	; 角
-    (->subsumptive
-     ((shinjigen-2	  . 7510)
-      (=jis-x0208	  . #x3351)	; &GT-47107; [19-49]
-      (=ks-x1001	  . #x4A47)	; &I-K0-4A47; [42-39]
-      (=cns11643-1	  . #x4B45)	; &I-C1-4B45; [43-37]
-      (=big5		  . #xA8A4)	; &I-B-A8A4;
-      (=gt		  . 47107)	; &I-GT-47107;
-      (=gt-k		  . 02511)	; &I-GT-K02511;
-      (=gt-pj-1		  . #x3351)	; &I-GT-47107; [19-49]
-      (=daikanwa	  . 35003)	; &I-M-35003;
-      (=ucs@jis		  . #x89D2)	; &GT-47107;
-      )
-     ((=gb2312		  . #x3D47)	; &G0-3D47; [29-39]
-      (=ucs@unicode	  . #x89D2)	; &G0-3D47;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x89D2)	; 角
+      ))
+    (ideographic-radical . 148)	; ⾓
+    (ideographic-strokes . 0)
+    (total-strokes	 . 7)
+    (shinjigen-2	. 7510)
+    (=jis-x0208		. #x3351)	; &GT-47107; [19-49]
+    (=ks-x1001		. #x4A47)	; &I-K0-4A47; [42-39]
+    (=cns11643-1	. #x4B45)	; &I-C1-4B45; [43-37]
+    (=big5		. #xA8A4)	; &I-B-A8A4;
+    (=gt		. 47107)	; &I-GT-47107;
+    (=gt-k		. 02511)	; &I-GT-K02511;
+    (=gt-pj-1		. #x3351)	; &I-GT-47107; [19-49]
+    (=daikanwa		. 35003)	; &I-M-35003;
+    (=ucs@jis		. #x89D2)	; &GT-47107;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x89D2)	; 角
+      ))
+    (name		. "CJK RADICAL SIMPLIFIED HORN")
+    (general-category	symbol other) ; Informative Category
+    (bidi-category	. "ON")
+    (mirrored		. nil)
+    (=ucs		. #x2EC6)	; ⻆
+    (<-identical@component
+     ((=ucs		  . #x89D2)	; 角
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=ucs		  . #x89D2)	; 角
+      ))
+    (ideographic-radical . 148)	; ⾓
+    (ideographic-strokes . 0)
+    (total-strokes	 . 7)
+    (=gb2312		. #x3D47)	; &G0-3D47; [29-39]
+    (=ucs@unicode	. #x89D2)	; &G0-3D47;
+    ))
+(define-char
   '((ideographic-radical . 148)	; ⾓
     (ideographic-strokes . 1)
     (total-strokes	 . 8)
@@ -35,10 +61,29 @@
     (ideographic-strokes . 1)
     (total-strokes	 . 8)
     (=ucs		. #x278B2)	; 𧢲
-    (=cns11643-6	. #x2E2E)	; &I-C6-2E2E; [14-14]
-    (=gt		. 47108)	; &I-GT-47108;
-    (=gt-pj-7		. #x3057)	; &I-GT-47108; [16-55]
-    (=daikanwa		. 35005)	; &I-M-35005;
+    (->subsumptive
+     ((=gt		  . 47108)	; &GT-47108;
+      (=gt-pj-7		  . #x3057)	; &GT-47108; [16-55]
+      (=daikanwa	  . 35005)	; &I-M-35005;
+      )
+     ((=ucs@iso		  . #x278B2)	; &U-000278B2;
+      )
+     ((=cns11643-6	  . #x2E2E)	; &C6-2E2E; [14-14]
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x278B2)	; 𧢲
+      ))
+    (name		. "CJK RADICAL HORN")
+    (general-category	symbol other) ; Informative Category
+    (bidi-category	. "ON")
+    (mirrored		. nil)
+    (=ucs		. #x2EC7)	; ⻇
+    (<-identical@component
+     ((=gt		  . 47108)	; &GT-47108;
+      (=daikanwa	  . 35005)	; &I-M-35005;
+      ))
     ))
 (define-char
   '((ideographic-radical . 148)	; ⾓
@@ -1106,12 +1151,6 @@
     (ideographic-radical . 148)	; ⾓
     (ideographic-strokes . 6)
     (total-strokes	 . 13)
-    (<-simplified@JP/Jouyou
-     ((=jis-x0208	  . #x6B3D)	; &GT-47320; [75-29]
-      (=ks-x1001	  . #x753A)	; &I-K0-753A; [85-26]
-      (=cns11643-1	  . #x7A3D)	; &I-C1-7A3D; [90-29]
-      (=daikanwa	  . 35181)	; &I-M-35181;
-      ))
     (shinjigen-2	. 7519)
     (=jis-x0208		. #x3F28)	; &GT-47183; [31-08]
     (=cns11643-2	. #x474A)	; &I-C2-474A; [39-42]
@@ -1120,6 +1159,12 @@
     (=gt-pj-1		. #x3F28)	; &I-GT-47183; [31-08]
     (=daikanwa		. 35070)	; &I-M-35070;
     (=ucs@jis		. #x89E6)	; &GT-47183;
+    (<-simplified@JP/Jouyou
+     ((=jis-x0208	  . #x6B3D)	; &GT-47320; [75-29]
+      (=ks-x1001	  . #x753A)	; &I-K0-753A; [85-26]
+      (=cns11643-1	  . #x7A3D)	; &I-C1-7A3D; [90-29]
+      (=daikanwa	  . 35181)	; &I-M-35181;
+      ))
     ))
 (define-char
   '((<-denotational