From bbe826bcb24be0095442b941c4651c0121522f66 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 7 Dec 2016 14:28:21 +0900
Subject: [PATCH] (HNG-KAR0470-0): New character; use `<-denotational' for
 U+9F9C. (BC-88CB-itaiji-003): New character; use
 `<-denotational' for A-BC-88CB. (A-BC-88CB): New abstract
 character. (BC-88CB-itaiji-002): New character; use
 `<-denotational' for A-BC-88CB-itaiji-001.
 (A-BC-88CB-itaiji-001): New abstract character.
 (BC-88CB-itaiji-001): New character; use `<-denotational'
 for A-BC-88CB-itaiji-001. (BC-88CB-var-003): Add
 `<-subsumptive' for BC-88CB-itaiji-001. (BC-88CB-var-005):
 Add `<-denotational' for A-BC-88CB. (BC-88CB): New
 character; use `<-denotational' for A-BC-88CB.

---
 lisp/utf-2000/Ideograph-R213-Turtle.el |   92 +++++++++++++++++++++++++++++++-
 1 file changed, 90 insertions(+), 2 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R213-Turtle.el b/lisp/utf-2000/Ideograph-R213-Turtle.el
index d819661..6b95861 100644
--- a/lisp/utf-2000/Ideograph-R213-Turtle.el
+++ b/lisp/utf-2000/Ideograph-R213-Turtle.el
@@ -222,6 +222,23 @@
       ))
     (ideographic-radical . 213)	; ⿔
     (ideographic-strokes . 0)
+    (total-strokes	 . 16)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LEFT")
+      (=ucs		  . #x2FF7)	; â¿·
+      )
+     ((=big5-cdp-itaiji-003 . #x88CB)	; &CDP-i003-88CB;
+      )
+     ((=ucs-itaiji-001	  . #x4E11)	; &U-i001+4E11;
+      ))
+    (===hng-kar		. 04700)	; &HNG018-04700;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x9F9C)	; 龜
+      ))
+    (ideographic-radical . 213)	; ⿔
+    (ideographic-strokes . 0)
     (total-strokes	 . 15)
     (=ucs@unicode	. #x9F9C)	; &UU+9F9C;
     (=ucs@JP/hanazono	. nil)
@@ -366,10 +383,44 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>big5-cdp	  . #x88CB)	; &A-CDP-88CB;
+      ))
+    (ideographic-radical . 213)	; ⿔
+    (ideographic-strokes . 0)
+    (total-strokes	 . 12)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs		  . #x2FF9)	; ⿹
+      )
+     ((=big5-cdp-itaiji-002 . #x88CB)	; &CDP-i002-88CB;
+      )
+     ((=ucs@iso		  . #x22451)	; &C6-246C;
+      (=cns11643-6	  . #x246C)	; &C6-246C; [04-76]
+      ))
+    (=big5-cdp-itaiji-003 . #x88CB)	; &CDP-i003-88CB;
+    ))
+(define-char
   '((ideographic-radical . 213)	; ⿔
     (ideographic-strokes . 0)
-    (total-strokes	 . 7)
-    (=big5-cdp-var-003	. #x88CB)	; &CDP-v003-88CB;
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs		  . #x2FF9)	; ⿹
+      )
+     ((=>big5-cdp-itaiji-001 . #x88CB)	; &A-CDP-i001-88CB;
+      )
+     ((=ucs		  . #x22451)	; 𢑑
+      ))
+    (=>big5-cdp		. #x88CB)	; &A-CDP-88CB;
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp-itaiji-001 . #x88CB)	; &A-CDP-i001-88CB;
+      ))
+    (ideographic-radical . 213)	; ⿔
+    (ideographic-strokes . 0)
+    (total-strokes	 . 6)
+    (=big5-cdp-itaiji-002 . #x88CB)	; &CDP-i002-88CB;
     (<-unknown
      ((=big5-cdp	  . #x88CB)	; &CDP-88CB;
       ))
@@ -377,6 +428,31 @@
 (define-char
   '((ideographic-radical . 213)	; ⿔
     (ideographic-strokes . 0)
+    (=>big5-cdp-itaiji-001 . #x88CB)	; &A-CDP-i001-88CB;
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp-itaiji-001 . #x88CB)	; &A-CDP-i001-88CB;
+      ))
+    (ideographic-radical . 213)	; ⿔
+    (ideographic-strokes . 0)
+    (total-strokes	 . 7)
+    (=big5-cdp-itaiji-001 . #x88CB)	; &CDP-i001-88CB;
+    (<-unknown
+     ((=big5-cdp	  . #x88CB)	; &CDP-88CB;
+      ))
+    (->subsumptive
+     ((==big5-cdp-itaiji-001 . #x88CB)	; &g2-CDP-i001-88CB;
+      )
+     ((=big5-cdp-var-003  . #x88CB)	; &CDP-v003-88CB;
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp	  . #x88CB)	; &A-CDP-88CB;
+      ))
+    (ideographic-radical . 213)	; ⿔
+    (ideographic-strokes . 0)
     (total-strokes	 . 13)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
@@ -423,6 +499,18 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>big5-cdp	  . #x88CB)	; &A-CDP-88CB;
+      ))
+    (ideographic-radical . 213)	; ⿔
+    (ideographic-strokes . 0)
+    (total-strokes	 . 12)
+    (=big5-cdp		. #x88CB)	; &CDP-88CB;
+    (->subsumptive
+     ((==big5-cdp	  . #x88CB)	; &g2-CDP-88CB;
+      ))
+    ))
+(define-char
   '((ideographic-radical . 213)	; ⿔
     (ideographic-strokes . 3)
     (total-strokes	 . 19)
-- 
1.7.10.4