From 399f6ee32b442b7f31548143645f2a259d8f4baa Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 14 Sep 2005 10:09:38 +0000
Subject: [PATCH] (U-00020541): Use `<-formed' instead of
 `->ideographic-variants' for U+518A; add `<-same' for
 U+518A.

---
 lisp/utf-2000/Ideograph-R013-Down-Box.el |   20 +++++++++++++-------
 1 file changed, 13 insertions(+), 7 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R013-Down-Box.el b/lisp/utf-2000/Ideograph-R013-Down-Box.el
index 5c7bd82..8df4ec9 100644
--- a/lisp/utf-2000/Ideograph-R013-Down-Box.el
+++ b/lisp/utf-2000/Ideograph-R013-Down-Box.el
@@ -471,6 +471,19 @@
   '((ideographic-radical . 13)	; ⼌
     (ideographic-strokes . 3)
     (total-strokes	 . 5)
+    (<-formed
+     ((shinjigen-1	  . 508)
+      (=ucs		  . #x518A)	; 冊
+      (=jis-x0208	  . #x3A7D)	; &I-J90-3A7D; [26-93]
+      ))
+    (<-formed*sources
+     shinjigen-1)
+    (<-same
+     ((=ucs		  . #x518A)	; 冊
+      (=daikanwa	  . 01515)	; &I-M-01515;
+      ))
+    (<-same*sources
+     daikanwa)
     (hanyu-dazidian	1 99 4)
     (shinjigen-1	. 511)
     (=ucs		. #x20541)	; 𠕁
@@ -479,13 +492,6 @@
     (=gt		. 01990)	; &I-GT-01990;
     (=gt-pj-2		. #x3D33)	; &I-GT-01990; [29-19]
     (=daikanwa		. 48932)	; &I-M-48932;
-    (->ideographic-variants
-     ((shinjigen-1	  . 508)
-      (=ucs		  . #x518A)	; 冊
-      (=daikanwa	  . 01515)	; &I-M-01515;
-      ))
-    (->ideographic-variants*sources
-     shinjigen-1)
     ))
 (define-char
   '((<-denotational
-- 
1.7.10.4