From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 6 Jan 2022 00:13:13 +0000 (+0900)
Subject: (U+3C7D): Apply new conventions for glyph granularity.
X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git;a=commitdiff_plain;h=8692b6e52ebcc3274c31b3fc56eb0ce704c41462

(U+3C7D): Apply new conventions for glyph granularity.
---

diff --git a/lisp/utf-2000/Ideograph-R079-Weapon.el b/lisp/utf-2000/Ideograph-R079-Weapon.el
index f38baf0..33613c7 100644
--- a/lisp/utf-2000/Ideograph-R079-Weapon.el
+++ b/lisp/utf-2000/Ideograph-R079-Weapon.el
@@ -177,12 +177,47 @@
   '((ideographic-radical . 79)	; ⽎
     (ideographic-strokes . 4)
     (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5198)	; 冘
+      )
+     ((=>ucs@iwds-1	  . #x6BB3)	; &A-IWDSU+6BB3;
+      (=>iwds-1		  .  22001)	; &A-IWDSU+6BB3;
+      ))
     (=ucs		. #x3C7D)	; ã±½
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x3C7D)	; ã±½
+      ))
+    (ideographic-radical . 79)	; ⽎
+    (ideographic-strokes . 4)
+    (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5198)	; 冘
+      )
+     ((=ucs@unicode	  . #x6BB3)	; &MJ014908;
+      (=mj		  . 014908)	; &MJ014908;
+      ))
+    (=ucs@unicode	. #x3C7D)	; &C4-2678;
+    (=cns11643-4	. #x2678)	; &C4-2678; [06-88]
+    (=daikanwa		. 16615)	; &I-M-16615;
     (->subsumptive
-     ((=daikanwa	  . 16615)	; &M-16615;
+     ((==daikanwa	  . 16615)	; &g2-M-16615;
       )
-     ((=ucs@unicode	  . #x3C7D)	; &C4-2678;
-      (=cns11643-4	  . #x2678)	; &C4-2678; [06-88]
+     ((==ucs@unicode	  . #x3C7D)	; &g2-UU+3C7D;
+      (==ucs@JP/hanazono  . nil)
+      (==cns11643-4	  . #x2678)	; &g2-UU+3C7D; [06-88]
+      (->subsumptive
+       ((===cns11643-4	    . #x2678)	; &R-C4-2678; [06-88]
+	)
+       ((===ucs@unicode	    . #x3C7D)	; &R-UU+3C7D;
+	))
       ))
     ))
 (define-char
@@ -1189,7 +1224,8 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°
       )
-     ((=ucs		  . #x6C42)	; 求
+     ((=ucs@unicode	  . #x6C42)	; &MJ015049;
+      (=mj		  . 015049)	; &MJ015049;
       )
      ((=ucs@unicode	  . #x6BB3)	; &MJ014908;
       (=mj		  . 014908)	; &MJ014908;