From 5342fc5ed8da1e3a3b63fe9b27d8091a7d6538ca Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 17 Feb 2019 21:29:55 +0900
Subject: [PATCH] (U-00026007): Use `->denotational' and `->subsumptive'; add
 `<-denotational' for BUCS+7D93. (HNG-KHI0639-1): Use
 U-00026007 instead of BUCS+7D93 as its mother; add
 `<-HNG@chise' for U-00026007 and U-00026030. (U-00026030):
 Add `<-denotational' for BUCS+7D93.

---
 lisp/utf-2000/Ideograph-R120-Silk.el |  148 ++++++++++++++++++++++------------
 1 file changed, 98 insertions(+), 50 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R120-Silk.el b/lisp/utf-2000/Ideograph-R120-Silk.el
index 0707a17..a8df1af 100644
--- a/lisp/utf-2000/Ideograph-R120-Silk.el
+++ b/lisp/utf-2000/Ideograph-R120-Silk.el
@@ -5460,14 +5460,112 @@
       )
      ((=ucs		  . #x7CF8)	; 糸
       )
+     ((=ucs		  . #x2124A)	; 𡉊
+      ))
+    (=ucs		. #x26007)	; 𦀇
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x26007)	; 𦀇
+      ))
+    (ideographic-radical . 120)	; â½·
+    (ideographic-strokes . 6)
+    (total-strokes	 . 12)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x7CF8)	; 糸
+      )
      ((=big5-cdp	  . #x8767)	; &CDP-8767;
       ))
     (===hng-khi		. 06391)	; &HNG010-06391;
+    (<-HNG@chise
+     ((=ucs		  . #x26007)	; 𦀇
+      )
+     ((=ucs		  . #x26030)	; 𦀰
+      ))
     (<-formed
      ((=ucs		  . #x7D93)	; 經
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=ucs		  . #x26007)	; 𦀇
+      ))
+    (ideographic-radical . 120)	; â½·
+    (ideographic-strokes . 6)
+    (total-strokes	 . 12)
+    (hanyu-dazidian	5 3392 4)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x7CF8)	; 糸
+      )
+     ((=ucs@iso		  . #x2124A)	; &C6-2435;
+      (=cns11643-6	  . #x2435)	; &C6-2435; [04-21]
+      (=daikanwa	  . 04893)	; &I-M-04893;
+      ))
+    (=ucs@iso		. #x26007)	; &C6-4C6B;
+    (=cns11643-6	. #x4C6B)	; &C6-4C6B; [44-75]
+    (->subsumptive
+     ((=hanziku-9	  . #xBE69)	; &HZK09-BE69;
+      )
+     ((==ucs@iso	  . #x26007)	; &g2-IU-00026007;
+      (==cns11643-6	  . #x4C6B)	; &g2-IU-00026007; [44-75]
+      (->subsumptive
+       ((===cns11643-6	    . #x4C6B)	; &R-C6-4C6B; [44-75]
+	)
+       ((===ucs@iso	    . #x26007)	; &R-U-00026007;
+	))
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((==>ucs@bucs	  . #x7D93)	; &BUCS+7D93;
+      ))
+    (ideographic-radical . 120)	; â½·
+    (ideographic-strokes . 7)
+    (total-strokes	 . 13)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x7CF8)	; 糸
+      )
+     ((=ucs		  . #x21264)	; 𡉤
+      ))
+    (=ucs		. #x26030)	; 𦀰
+    (<-formed
+     ((=ucs		  . #x7D93)	; 經
+      ))
+    (<-formed*sources
+     hng)
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((name		    . "CJK RADICAL SILK")
+	(=ucs		    . #x2EAF)	; ⺯
+	)
+       ((=ucs		    . #x21264)	; 𡉤
+	))
+      (==ucs@iso	  . #x26030)	; &g2-IU-00026030;
+      )
+     ((===hng-khm	  . 04820)	; &HNG011-04820;
+      (<-HNG@chise
+       ((=ucs		    . #x26030)	; 𦀰
+	))
+      )
+     ((===hng-khi	  . 06392)	; &HNG010-06392;
+      (<-HNG@chise
+       ((=ucs		    . #x26030)	; 𦀰
+	))
+      ))
+    ))
+(define-char
   '((ideographic-radical . 120)	; â½·
     (ideographic-strokes . 5)
     (total-strokes	 . 11)
@@ -7993,21 +8091,6 @@
   '((ideographic-radical . 120)	; â½·
     (ideographic-strokes . 6)
     (total-strokes	 . 12)
-    (=ucs		. #x26007)	; 𦀇
-    (=cns11643-6	. #x4C6B)	; &I-C6-4C6B; [44-75]
-    ))
-(define-char
-  '((=>ucs		. #x26007)	; 𦀇
-    (ideographic-radical . 120)	; â½·
-    (ideographic-strokes . 6)
-    (total-strokes	 . 12)
-    (hanyu-dazidian	5 3392 4)
-    (=hanziku-9		. #xBE69)	; &HZK09-BE69;
-    ))
-(define-char
-  '((ideographic-radical . 120)	; â½·
-    (ideographic-strokes . 6)
-    (total-strokes	 . 12)
     (=ucs		. #x26008)	; 𦀈
     (->subsumptive
      ((hanyu-dazidian	  5 3393 6)
@@ -10216,41 +10299,6 @@
   '((ideographic-radical . 120)	; â½·
     (ideographic-strokes . 7)
     (total-strokes	 . 13)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs		  . #x2FF0)	; â¿°
-      )
-     ((=ucs		  . #x7CF8)	; 糸
-      )
-     ((=ucs		  . #x21264)	; 𡉤
-      ))
-    (=ucs		. #x26030)	; 𦀰
-    (<-formed
-     ((=ucs		  . #x7D93)	; 經
-      ))
-    (<-formed*sources
-     hng)
-    (->subsumptive
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	(=ucs		    . #x2FF0)	; â¿°
-	)
-       ((name		    . "CJK RADICAL SILK")
-	(=ucs		    . #x2EAF)	; ⺯
-	)
-       ((=ucs		    . #x21264)	; 𡉤
-	))
-      (==ucs@iso	  . #x26030)	; &g2-IU-00026030;
-      )
-     ((===hng-khm	  . 04820)	; &HNG011-04820;
-      )
-     ((===hng-khi	  . 06392)	; &HNG010-06392;
-      ))
-    ))
-(define-char
-  '((ideographic-radical . 120)	; â½·
-    (ideographic-strokes . 7)
-    (total-strokes	 . 13)
     (=ucs		. #x26038)	; 𦀸
     (->subsumptive
      ((hanyu-dazidian	  5 3405 9)
-- 
1.7.10.4