(J90-3752): Unify JC3-5FDF.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R138-Stopping.el

diff --git a/lisp/utf-2000/Ideograph-R138-Stopping.el b/lisp/utf-2000/Ideograph-R138-Stopping.el
index ae1ed5b..48e57b7 100644 (file)
--- a/lisp/utf-2000/Ideograph-R138-Stopping.el
+++ b/lisp/utf-2000/Ideograph-R138-Stopping.el
@@ -17,6 +17,15 @@
     ))
 (define-char
   '((ideographic-radical . 138)        ; ⾉
+    (ideographic-strokes . 0)
+    (total-strokes      . 5)
+    (=big5-cdp         . #x8B7C)       ; &CDP-8B7C;
+    (<-simplified@component
+     ((=ucs              . #x826E)     ; 艮
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 138)        ; ⾉
     (ideographic-strokes . 1)
     (total-strokes      . 7)
     (=ucs              . #x826F)       ; 良
@@ -40,17 +49,12 @@
   '((ideographic-radical . 138)        ; ⾉
     (ideographic-strokes . 1)
     (total-strokes      . 6)
-    (<-ideographic-component-forms
-     ((=jis-x0208        . #x4E49)     ; &GT-39586; [46-41]
-      (=ks-x1001         . #x555E)     ; &I-K0-555E; [53-62]
-      (=daikanwa         . 30597)      ; &I-M-30597;
-      ))
-    (<-simplified
+    (=big5-cdp         . #x8C42)       ; &CDP-8C42;
+    (<-simplified@component
      ((=jis-x0208        . #x4E49)     ; &GT-39586; [46-41]
       (=ks-x1001         . #x555E)     ; &I-K0-555E; [53-62]
       (=daikanwa         . 30597)      ; &I-M-30597;
       ))
-    (=big5-cdp         . #x8C42)       ; &CDP-8C42;
     ))
 (define-char
   '((ideographic-radical . 138)        ; ⾉