From 0fb163bf001e785e98af07ec00de5a76fdc54c1d Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 17 May 2012 00:48:25 +0900
Subject: [PATCH] - Use `=daikanwa/+p' instead of `morohashi-daikanwa' for
 M-ddddd'. - Use `=daikanwa/ho' instead of
 `morohashi-daikanwa' for M-Hdddd.

---
 lisp/utf-2000/Ideograph-R038-Woman.el |  134 +++++++++++++++++----------------
 1 file changed, 70 insertions(+), 64 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R038-Woman.el b/lisp/utf-2000/Ideograph-R038-Woman.el
index 4dc9caf..eb40b1d 100644
--- a/lisp/utf-2000/Ideograph-R038-Woman.el
+++ b/lisp/utf-2000/Ideograph-R038-Woman.el
@@ -654,8 +654,8 @@
     (total-strokes	 . 6)
     (=ucs		. #x36A8)	; 㚨
     (->subsumptive
-     ((morohashi-daikanwa	ho 117)
-      (=ucs@unicode	  . #x36A8)	; &UU+36A8;
+     ((=ucs@unicode	  . #x36A8)	; &UU+36A8;
+      (=daikanwa/ho	  .  0117)	; &UU+36A8;
       )
      ((=cns11643-3	  . #x2349)	; &C3-2349; [03-41]
       ))
@@ -3419,11 +3419,11 @@
     (=cns11643-3	. #x2839)	; &C3-2839; [08-25]
     ))
 (define-char
-  '((morohashi-daikanwa	ho 118)
-    (ideographic-radical . 38)	; â¼¥
+  '((ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
     (=ucs		. #x216F8)	; 𡛸
+    (=daikanwa/ho	.  0118)	; 𡛸
     ))
 (define-char
   '((ideographic-radical . 38)	; â¼¥
@@ -5746,14 +5746,18 @@
     (ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 7)
     (total-strokes	 . 10)
-    (=>>ucs@unicode	. #x5A2F)	; &G-UU+5A2F;
+    (=>>ucs@unicode	. #x5A2F)	; &G-GT-07919;
+    (=>>jis-x0208	. #x3864)	; &G-GT-07919; [24-68]
+    (=>>jis-x0213-1	. #x3864)	; &G-GT-07919; [24-68]
+    (=>>gt		. 07919)	; &G-GT-07919;
+    (=>>daikanwa/+p	. 06307)	; &G-GT-07919;
     (->subsumptive
-     ((morohashi-daikanwa	6307 1)
-      (=ucs@unicode	  . #x5A2F)	; &GT-07919;
+     ((=ucs@unicode	  . #x5A2F)	; &GT-07919;
       (=jis-x0208	  . #x3864)	; &GT-07919; [24-68]
       (=jis-x0213-1	  . #x3864)	; &I-JX1-3864; [24-68]
       (=gt		  . 07919)	; &I-GT-07919;
       (=gt-pj-1		  . #x3864)	; &I-GT-07919; [24-68]
+      (=daikanwa/+p	  . 06307)	; &GT-07919;
       ))
     ))
 (define-char
@@ -6740,11 +6744,11 @@
     (=cns11643-6	. #x3651)	; &I-C6-3651; [22-49]
     ))
 (define-char
-  '((morohashi-daikanwa	ho 119)
-    (ideographic-radical . 38)	; â¼¥
+  '((ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 7)
     (total-strokes	 . 10)
     (=ucs		. #x21757)	; 𡝗
+    (=daikanwa/ho	.  0119)	; 𡝗
     ))
 (define-char
   '((ideographic-radical . 38)	; â¼¥
@@ -8167,9 +8171,10 @@
     (=>>jis-x0213-1	. #x4958)	; &G-GT-08090; [41-56]
     (=>>gt		. 08090)	; &G-GT-08090;
     (=>>gt-k		. 07866)	; &G-GT-08090;
+    (=>>daikanwa/+p	. 06432)	; &G-GT-08090;
+    (=>>hanyo-denshi/ja . #x4958)	; &G-GT-08090; [41-56]
     (->subsumptive
-     ((morohashi-daikanwa	6432 1)
-      (=decomposition@hanyo-denshi
+     ((=decomposition@hanyo-denshi
        ((=ucs		    . #x5A66)	; 婦
 	)
        ((=ucs		    . #xE0102)	; 󠄂
@@ -8181,6 +8186,7 @@
       (=gt		  . 08090)	; &I-GT-08090;
       (=gt-k		  . 07866)	; &I-GT-K07866;
       (=gt-pj-1		  . #x4958)	; &I-GT-08090; [41-56]
+      (=daikanwa/+p	  . 06432)	; 婦󠄂
       (=hanyo-denshi/ja	  . #x4958)	; &I-HD-JA-4958; [41-56]
       )
      ((=>ucs*		  . #x5A66)	; 婦
@@ -8622,12 +8628,12 @@
     (=ucs		. #x5A72)	; 婲
     ))
 (define-char
-  '((morohashi-daikanwa	ho 120)
-    (ideographic-radical . 38)	; â¼¥
+  '((ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 8)
     (total-strokes	 . 11)
     (=gt		. 08008)	; &GT-08008;
     (=gt-pj-9		. #x4136)	; &GT-08008; [33-22]
+    (=daikanwa/ho	.  0120)	; &GT-08008;
     ))
 (define-char
   '((ideographic-radical . 38)	; â¼¥
@@ -10760,21 +10766,18 @@
     (=cns11643-3	. #x3A79)	; &C3-3A79; [26-89]
     ))
 (define-char
-  '((=>ucs		. #x217D5)	; 𡟕
-    (morohashi-daikanwa	ho 121)
-    (ideographic-radical . 38)	; â¼¥
-    (ideographic-strokes . 9)
-    (total-strokes	 . 12)
-    (=gt		. 08157)	; &GT-08157;
-    (=gt-pj-11		. #x4453)	; &GT-08157; [36-51]
-    ))
-(define-char
-  '((morohashi-daikanwa	ho 121 0)
-    (ideographic-radical . 38)	; â¼¥
+  '((ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
     (=ucs		. #x217D5)	; 𡟕
-    (=cns11643-5	. #x3758)	; &I-C5-3758; [23-56]
+    (->subsumptive
+     ((=gt		  . 08157)	; &GT-08157;
+      (=gt-pj-11	  . #x4453)	; &GT-08157; [36-51]
+      (=daikanwa/ho	  .  0121)	; &GT-08157;
+      )
+     ((=ucs@iso		  . #x217D5)	; &C5-3758;
+      (=cns11643-5	  . #x3758)	; &C5-3758; [23-56]
+      ))
     ))
 (define-char
   '((ideographic-radical . 38)	; â¼¥
@@ -12363,11 +12366,11 @@
     (=cns11643-5	. #x3E5B)	; &I-C5-3E5B; [30-59]
     ))
 (define-char
-  '((morohashi-daikanwa	ho 122)
-    (ideographic-radical . 38)	; â¼¥
+  '((ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 10)
     (total-strokes	 . 13)
     (=ucs		. #x21809)	; 𡠉
+    (=daikanwa/ho	.  0122)	; 𡠉
     ))
 (define-char
   '((ideographic-radical . 38)	; â¼¥
@@ -13590,36 +13593,45 @@
     (=cns11643-4	. #x4272)	; &C4-4272; [34-82]
     ))
 (define-char
-  '((morohashi-daikanwa	ho 123)
-    (ideographic-radical . 38)	; â¼¥
+  '((ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 11)
     (total-strokes	 . 14)
     (=gt		. 08383)	; &GT-08383;
     (=gt-pj-11		. #x4551)	; &GT-08383; [37-49]
+    (=daikanwa/ho	.  0123)	; &GT-08383;
     ))
 (define-char
-  '((=>ucs		. #x3715)	; 㜕
-    (morohashi-daikanwa	ho 124)
+  '((ideographic-radical . 38)	; â¼¥
+    (=ucs		. #x3715)	; 㜕
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x3715)	; 㜕
+      ))
     (ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 11)
     (total-strokes	 . 14)
     (=gt		. 08414)	; &GT-08414;
     (=gt-pj-11		. #x4552)	; &GT-08414; [37-50]
+    (=daikanwa/ho	.  0124)	; &GT-08414;
     ))
 (define-char
-  '((=>ucs		. #x3715)	; 㜕
-    (morohashi-daikanwa	ho 124 2)
+  '((<-denotational
+     ((=ucs		  . #x3715)	; 㜕
+      ))
     (ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 11)
     (total-strokes	 . 14)
     (=cns11643-3	. #x464B)	; &C3-464B; [38-43]
     ))
 (define-char
-  '((morohashi-daikanwa	ho 124 3)
+  '((<-denotational
+     ((=ucs		  . #x3715)	; 㜕
+      ))
     (ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 10)
     (total-strokes	 . 13)
-    (=ucs		. #x3715)	; 㜕
+    (=ucs@unicode	. #x3715)	; &UU+3715;
     ))
 (define-char
   '((=>ucs		. #x5626)	; 嘦
@@ -14816,20 +14828,20 @@
     (=cns11643-7	. #x2228)	; &C7-2228; [02-08]
     ))
 (define-char
-  '((morohashi-daikanwa	ho 125)
-    (ideographic-radical . 38)	; â¼¥
+  '((ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 12)
     (total-strokes	 . 15)
     (=gt		. 08433)	; &GT-08433;
     (=gt-pj-11		. #x4579)	; &GT-08433; [37-89]
+    (=daikanwa/ho	.  0125)	; &GT-08433;
     ))
 (define-char
-  '((morohashi-daikanwa	ho 126)
-    (ideographic-radical . 38)	; â¼¥
+  '((ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 12)
     (total-strokes	 . 15)
     (=gt		. 08440)	; &GT-08440;
     (=gt-pj-11		. #x457A)	; &GT-08440; [37-90]
+    (=daikanwa/ho	.  0126)	; &GT-08440;
     ))
 (define-char
   '((ideographic-radical . 38)	; â¼¥
@@ -15699,12 +15711,12 @@
     (total-strokes	 . 16)
     (=ucs		. #x5B22)	; 嬢
     (->subsumptive
-     ((morohashi-daikanwa	6807 1)
-      (=ucs@jis		  . #x5B22)	; &GT-08529;
+     ((=ucs@jis		  . #x5B22)	; &GT-08529;
       (=jis-x0208	  . #x3E6E)	; &GT-08529; [30-78]
       (=jis-x0213-1	  . #x3E6E)	; &I-JX1-3E6E; [30-78]
       (=gt		  . 08529)	; &I-GT-08529;
       (=gt-pj-1		  . #x3E6E)	; &I-GT-08529; [30-78]
+      (=daikanwa/+p	  . 06807)	; &GT-08529;
       (<-simplified@JP/Jouyou
        ((=ucs@jis	    . #x5B43)	; &GT-08671;
 	(=ucs@ks	    . #x5B43)	; &GT-08671;
@@ -15757,19 +15769,16 @@
     (=cns11643-7	. #x2D27)	; &C7-2D27; [13-07]
     ))
 (define-char
-  '((morohashi-daikanwa	ho 127)
-    (ideographic-radical . 38)	; â¼¥
+  '((ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 13)
     (total-strokes	 . 16)
     (=ucs		. #x218B1)	; ð¡¢±
-    ))
-(define-char
-  '((=>ucs		. #x218B1)	; ð¡¢±
-    (morohashi-daikanwa	ho 127 1)
-    (ideographic-radical . 38)	; â¼¥
-    (ideographic-strokes . 13)
-    (total-strokes	 . 16)
-    (=cns11643-5	. #x537E)	; &C5-537E; [51-94]
+    (->subsumptive
+     ((=ucs@iso		  . #x218B1)	; &U-000218B1;
+      (=daikanwa/ho	  .  0127)	; &U-000218B1;
+      )
+     ((=cns11643-5	  . #x537E)	; &C5-537E; [51-94]
+      ))
     ))
 (define-char
   '((ideographic-radical . 38)	; â¼¥
@@ -16897,11 +16906,11 @@
     (=cns11643-7	. #x3F41)	; &C7-3F41; [31-33]
     ))
 (define-char
-  '((morohashi-daikanwa	ho 128)
-    (ideographic-radical . 38)	; â¼¥
+  '((ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 15)
     (total-strokes	 . 18)
     (=ucs		. #x218F6)	; 𡣶
+    (=daikanwa/ho	.  0128)	; 𡣶
     ))
 (define-char
   '((ideographic-radical . 38)	; â¼¥
@@ -17454,20 +17463,17 @@
     (=cns11643-5	. #x6760)	; &C5-6760; [71-64]
     ))
 (define-char
-  '((=>ucs		. #x21909)	; 𡤉
-    (morohashi-daikanwa	ho 129)
-    (ideographic-radical . 38)	; â¼¥
-    (ideographic-strokes . 16)
-    (total-strokes	 . 19)
-    (=gt		. 08656)	; &GT-08656;
-    (=gt-pj-11		. #x4756)	; &GT-08656; [39-54]
-    ))
-(define-char
-  '((morohashi-daikanwa	ho 129 0)
-    (ideographic-radical . 38)	; â¼¥
+  '((ideographic-radical . 38)	; â¼¥
     (ideographic-strokes . 16)
     (total-strokes	 . 19)
     (=ucs		. #x21909)	; 𡤉
+    (->subsumptive
+     ((=gt		  . 08656)	; &GT-08656;
+      (=gt-pj-11	  . #x4756)	; &GT-08656; [39-54]
+      (=daikanwa/ho	  .  0129)	; &GT-08656;
+      )
+     ((=ucs@iso		  . #x21909)	; &U-00021909;
+      ))
     ))
 (define-char
   '((ideographic-radical . 38)	; â¼¥
-- 
1.7.10.4