From 85c1035a0eb330c51b767fab4d665584b1c73108 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 14 Apr 2017 13:22:06 +0900
Subject: [PATCH] (U-00020181): Apply new conventions for glyph granularity.
 (o-IU+20181): Add `=>ucs@iwds-1'.

---
 lisp/utf-2000/Ideograph-R008-Lid.el |   84 ++++++++++++++++++++---------------
 1 file changed, 48 insertions(+), 36 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R008-Lid.el b/lisp/utf-2000/Ideograph-R008-Lid.el
index 98c770d..71167e7 100644
--- a/lisp/utf-2000/Ideograph-R008-Lid.el
+++ b/lisp/utf-2000/Ideograph-R008-Lid.el
@@ -3754,51 +3754,63 @@
     (ideographic-strokes . 13)
     (total-strokes	 . 15)
     (=ucs		. #x20181)	; 𠆁
-    (->subsumptive
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
-	(=ucs		    . #x2FF3)	; ⿳
-	)
-       ((=big5-cdp	    . #x8DCA)	; &CDP-8DCA;
-	)
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	  (=ucs		      . #x2FF0)	; â¿°
-	  )
-	 ((=ucs		      . #x74DC)	; 瓜
-	  )
-	 ((=ucs		      . #x74DC)	; 瓜
-	  ))
-	))
-      (=daikanwa	  . 00330)	; &M-00330;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x20181)	; 𠆁
+      ))
+    (ideographic-radical . 8)	; ⼇
+    (ideographic-strokes . 13)
+    (total-strokes	 . 15)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
       )
+     ((=ucs		  . #x4EA9)	; 亩
+      )
+     ((=>ucs-itaiji-001	  . #x3F0C)	; &A-U-i001+3F0C;
+      ))
+    (=>ucs@iwds-1	. #x20181)	; &A-IWDSU+20181;
+    (=+>ucs@iso		. #x20181)	; &A-IWDSU+20181;
+    (->subsumptive
      ((hanyu-dazidian	  1 292 4)
       (ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
-	(=ucs		    . #x2FF3)	; ⿳
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
 	)
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	  (=ucs		      . #x2FF1)	; ⿱
-	  )
-	 ((=ucs		      . #x4EA0)	; 亠
-	  )
-	 ((=ucs		      . #x7530)	; 田
-	  ))
+       ((=big5-cdp	    . #x8DCA)	; &CDP-8DCA;
 	)
-       ((ideographic-structure
-	 ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	  (=ucs		      . #x2FF0)	; â¿°
-	  )
-	 ((=ucs		      . #x74DC)	; 瓜
-	  )
-	 ((=ucs		      . #x74DC)	; 瓜
-	  ))
+       ((=ucs-itaiji-001    . #x3F0C)	; &U-i001+3F0C;
 	))
       (=ucs@iso		  . #x20181)	; &C5-4B71;
       (=cns11643-5	  . #x4B71)	; &C5-4B71; [43-81]
-      (=hanziku-1	  . #xE255)	; &I-HZK01-E255;
+      (=daikanwa	  . 00330)	; &I-M-00330;
+      (->subsumptive
+       ((==daikanwa	    . 00330)	; &g2-M-00330;
+	)
+       ((==ucs@cns	    . #x20181)	; &g2-CU+20181;
+	(==cns11643-5	    . #x4B71)	; &g2-CU+20181; [43-81]
+	)
+       ((==ucs@iso	    . #x20181)	; &g2-IU-00020181;
+	))
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x20181)	; 𠆁
+      ))
+    (ideographic-radical . 8)	; ⼇
+    (ideographic-strokes . 13)
+    (total-strokes	 . 15)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x4EA9)	; 亩
+      )
+     ((=ucs		  . #x3F0C)	; 㼌
       ))
+    (=hanziku-1		. #xE255)	; &HZK01-E255;
     ))
 (define-char
   '((ideographic-radical . 8)	; ⼇
-- 
1.7.10.4