From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sat, 1 Jul 2023 23:49:07 +0000 (+0900)
Subject: (BC-8C47-itaiji-001): New character; use `<-subsumptive' for
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=52ccc8e24390fa9ad14ce61a684fcebc30e694b1;p=chise%2Fxemacs-chise.git

(BC-8C47-itaiji-001): New character; use `<-subsumptive' for
U+23362-var-002.
---

diff --git a/lisp/utf-2000/Ideograph-R074-Moon.el b/lisp/utf-2000/Ideograph-R074-Moon.el
index 66080c5..d0622d0 100644
--- a/lisp/utf-2000/Ideograph-R074-Moon.el
+++ b/lisp/utf-2000/Ideograph-R074-Moon.el
@@ -895,6 +895,19 @@
       ))
     (=ucs-var-002	. #x23362)	; &U-v002+23362;
     (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((=mj		    . 006462)	; &MJ006462;
+	)
+       ((=mj		    . 013519)	; &MJ013519;
+	))
+      (=big5-cdp-itaiji-001 . #x8C47)	; &CDP-i001-8C47;
+      (->subsumptive
+       ((==big5-cdp-itaiji-001 . #x8C47)	; &g2-CDP-i001-8C47;
+	))
+      )
      ((==ucs-var-002	  . #x23362)	; &g2-U-v002+23362;
       ))
     ))