From 1dd72477c879f2b928e40681355d205c32d558a0 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Fri, 2 Jan 2004 12:56:14 +0000
Subject: [PATCH] Add some `total-strokes' features.

---
 lisp/utf-2000/Ideograph-R085-Water.el |  182 +++++++++++++++++++++++++--------
 1 file changed, 138 insertions(+), 44 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R085-Water.el b/lisp/utf-2000/Ideograph-R085-Water.el
index 01dc4db..96edc03 100644
--- a/lisp/utf-2000/Ideograph-R085-Water.el
+++ b/lisp/utf-2000/Ideograph-R085-Water.el
@@ -150,8 +150,7 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 2)
-    (kangxi-radical	 . 9)	; ⼈
-    (kangxi-strokes	 . 4)
+    (total-strokes	 . 6)
     (=ucs		. #x6C3D)	; æ°½
     (=gb2312		. #x595B)	; ø»…™Ž
     (=daikanwa		. 17100)	; ø¸„‹Œ
@@ -316,17 +315,20 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 2)
+    (total-strokes	 . 5)
     (=ucs		. #x6C47)	; 汇
     (=gb2312		. #x3B63)	; ø»„­’
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 2)
+    (total-strokes	 . 5)
     (=ucs		. #x6C48)	; 汈
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 2)
+    (total-strokes	 . 5)
     (=ucs		. #x6C49)	; 汉
     (=gb2312		. #x3A3A)	; ø»„«‹
     ))
@@ -1940,48 +1942,56 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 4)
+    (total-strokes	 . 7)
     (=ucs		. #x6CA3)	; æ²£
     (=gb2312		. #x6363)	; ø»…¨‚
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 4)
+    (total-strokes	 . 7)
     (=ucs		. #x6CA4)	; 沤
     (=gb2312		. #x453D)	; ø»„»˜
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 4)
+    (total-strokes	 . 7)
     (=ucs		. #x6CA5)	; æ²¥
     (=gb2312		. #x4124)	; ø»„µ‡
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 4)
+    (total-strokes	 . 7)
     (=ucs		. #x6CA6)	; 沦
     (=gb2312		. #x4259)	; ø»„·š
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 4)
+    (total-strokes	 . 7)
     (=ucs		. #x6CA7)	; 沧
     (=gb2312		. #x3257)	; ø»„Ÿ¸
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 4)
+    (total-strokes	 . 7)
     (=ucs		. #x6CA8)	; 沨
     (=iso-ir165		. #x7C70)	; ø»Žµ
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 4)
+    (total-strokes	 . 7)
     (=ucs		. #x6CA9)	; 沩
     (=gb2312		. #x636D)	; ø»…¨Œ
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 4)
+    (total-strokes	 . 7)
     (=ucs		. #x6CAA)	; 沪
     (=gb2312		. #x3B26)	; ø»„¬•
     ))
@@ -3479,18 +3489,21 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 5)
+    (total-strokes	 . 9)
     (=ucs		. #x6CF6)	; 泶
     (=gb2312		. #x6D34)	; ø»…µ¿
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 5)
+    (total-strokes	 . 8)
     (=ucs		. #x6CF7)	; æ³·
     (=gb2312		. #x6371)	; ø»…¨
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 5)
+    (total-strokes	 . 8)
     (=ucs		. #x6CF8)	; 泸
     (=gb2312		. #x6372)	; ø»…¨‘
     ))
@@ -4955,24 +4968,35 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 6)
+    (total-strokes	 . 10)
     (=ucs		. #x6D46)	; 浆
     (=gb2312		. #x3D2C)	; ø»„¯—
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 6)
+    (total-strokes	 . 9)
     (=ucs		. #x6D47)	; 浇
     (=gb2312		. #x3D3D)	; ø»„¯¨
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 6)
+    (total-strokes	 . 9)
     (=ucs		. #x6D48)	; 浈
     (=gb2312		. #x6425)	; ø»…¨¢
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 6)
+    (total-strokes	 . 9)
+    (=ucs		. #x6D49)	; 浉
+    (=iso-ir165		. #x7C73)	; ø»Žµ
+    ))
+(define-char
+  '((ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 6)
+    (total-strokes	 . 9)
     (=ucs		. #x6D4A)	; 浊
     (=gb2312		. #x5747)	; ø»…•¾
     (=jef-china3	. #x55F2)	; øº…—²
@@ -5001,6 +5025,7 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 6)
+    (total-strokes	 . 9)
     (=ucs		. #x6D4E)	; 济
     (=gb2312		. #x3C43)	; ø»„®
     (=jef-china3	. #x81BF)	; øºˆ†¿
@@ -5008,30 +5033,42 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 6)
+    (total-strokes	 . 9)
     (=ucs		. #x6D4F)	; 浏
     (=gb2312		. #x642F)	; ø»…¨¬
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 6)
+    (total-strokes	 . 9)
+    (=ucs		. #x6D50)	; 浐
+    (=iso-ir165		. #x7C78)	; ø»Žµ•
+    ))
+(define-char
+  '((ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 6)
+    (total-strokes	 . 9)
     (=ucs		. #x6D51)	; 浑
     (=gb2312		. #x3B6B)	; ø»„­š
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 6)
+    (total-strokes	 . 9)
     (=ucs		. #x6D52)	; 浒
     (=gb2312		. #x6430)	; ø»…¨­
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 6)
+    (total-strokes	 . 9)
     (=ucs		. #x6D53)	; 浓
     (=gb2312		. #x4528)	; ø»„»ƒ
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 6)
+    (total-strokes	 . 9)
     (=ucs		. #x6D54)	; 浔
     (=gb2312		. #x6431)	; ø»…¨®
     ))
@@ -5039,6 +5076,13 @@
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 6)
     (total-strokes	 . 9)
+    (=ucs		. #x6D55)	; 浕
+    (=iso-ir165		. #x7C7A)	; ø»Žµ—
+    ))
+(define-char
+  '((ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 6)
+    (total-strokes	 . 9)
     (=ucs		. #x23CE5)	; 𣳥
     (=cns11643-6	. #x3236)	; ø»œŽƒ
     ))
@@ -6616,42 +6660,56 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 7)
+    (total-strokes	 . 10)
     (=ucs		. #x6D9D)	; 涝
     (=gb2312		. #x4054)	; ø»„´™
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 7)
+    (total-strokes	 . 10)
     (=ucs		. #x6D9E)	; 涞
     (=gb2312		. #x6435)	; ø»…¨²
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 7)
+    (total-strokes	 . 10)
     (=ucs		. #x6D9F)	; 涟
     (=gb2312		. #x4130)	; ø»„µ“
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 7)
+    (total-strokes	 . 10)
     (=ucs		. #x6DA0)	; 涠
     (=gb2312		. #x6436)	; ø»…¨³
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 7)
+    (total-strokes	 . 10)
     (=ucs		. #x6DA1)	; 涡
     (=gb2312		. #x4E50)	; ø»…ˆ¹
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 7)
+    (total-strokes	 . 10)
+    (=ucs		. #x6DA2)	; 涢
+    (=iso-ir165		. #x7C7C)	; ø»Žµ™
+    ))
+(define-char
+  '((ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 7)
+    (total-strokes	 . 10)
     (=ucs		. #x6DA3)	; 涣
     (=gb2312		. #x3B41)	; ø»„¬°
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 7)
+    (total-strokes	 . 10)
     (=ucs		. #x6DA4)	; 涤
     (=gb2312		. #x3553)	; ø»„¤Ž
     ))
@@ -6664,24 +6722,28 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 7)
+    (total-strokes	 . 10)
     (=ucs		. #x6DA6)	; 润
     (=gb2312		. #x4873)	; ø»…€¨
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 7)
+    (total-strokes	 . 10)
     (=ucs		. #x6DA7)	; 涧
     (=gb2312		. #x3D27)	; ø»„¯’
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 7)
+    (total-strokes	 . 10)
     (=ucs		. #x6DA8)	; 涨
     (=gb2312		. #x5547)	; ø»…“‚
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 7)
+    (total-strokes	 . 10)
     (=ucs		. #x6DA9)	; 涩
     (=gb2312		. #x492C)	; ø»…€¿
     ))
@@ -8512,6 +8574,28 @@
     (=big5		. #xD643)	; ý¢€™ƒ
     ))
 (define-char
+  '((=>ucs		. #x3D00)	; 㴀
+    (ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 8)
+    (total-strokes	 . 11)
+    (=daikanwa		. 17703)	; ø¸„”§
+    ))
+(define-char
+  '((=>ucs		. #x3D00)	; 㴀
+    (morohashi-daikanwa	17703 0 0)
+    (ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 9)
+    (total-strokes	 . 12)
+    (=cns11643-5	. #x395E)	; ø»šŽ¹
+    ))
+(define-char
+  '((morohashi-daikanwa	17703 0 1)
+    (ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 8)
+    (total-strokes	 . 11)
+    (=ucs		. #x3D00)	; 㴀
+    ))
+(define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 8)
     (total-strokes	 . 12)
@@ -11801,8 +11885,8 @@
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
-    (=ucs		. #x3D00)	; 㴀
-    (=cns11643-5	. #x395E)	; ø»šŽ¹
+    (=ucs		. #x6E81)	; 溁
+    (=iso-ir165		. #x2E5D)	; ø»‚–
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
@@ -11816,17 +11900,20 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 9)
+    (total-strokes	 . 12)
     (=ucs		. #x6E83)	; 溃
     (=gb2312		. #x4023)	; ø»„³¨
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 9)
+    (total-strokes	 . 12)
     (=ucs		. #x6E84)	; 溄
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 9)
+    (total-strokes	 . 12)
     (=ucs		. #x6E85)	; 溅
     (=gb2312		. #x3D26)	; ø»„¯‘
     ))
@@ -11842,6 +11929,13 @@
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
+    (=ucs		. #x6E87)	; 溇
+    (=iso-ir165		. #x7D27)	; ø»Žµ¢
+    ))
+(define-char
+  '((ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 9)
+    (total-strokes	 . 12)
     (=ucs		. #x6E88)	; 溈
     (=cns11643-2	. #x3D31)	; ø»“µ¸
     ))
@@ -11857,11 +11951,13 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 9)
+    (total-strokes	 . 12)
     (=ucs		. #x6E8A)	; 溊
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 9)
+    (total-strokes	 . 12)
     (=ucs		. #x6E8B)	; 溋
     ))
 (define-char
@@ -14017,54 +14113,49 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 10)
-    (=ucs		. #x6D49)	; 浉
-    (=iso-ir165		. #x7C73)	; ø»Žµ
-    ))
-(define-char
-  '((ideographic-radical . 85)	; ⽔
-    (ideographic-strokes . 10)
-    (=ucs		. #x6DA2)	; 涢
-    (=iso-ir165		. #x7C7C)	; ø»Žµ™
-    ))
-(define-char
-  '((ideographic-radical . 85)	; ⽔
-    (ideographic-strokes . 10)
+    (total-strokes	 . 13)
     (=ucs		. #x6EDF)	; 滟
     (=gb2312		. #x6459)	; ø»…©–
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 10)
+    (total-strokes	 . 13)
     (=ucs		. #x6EE0)	; æ» 
     (=gb2312		. #x645C)	; ø»…©™
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 10)
+    (total-strokes	 . 13)
     (=ucs		. #x6EE1)	; 满
     (=gb2312		. #x427A)	; ø»„·»
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 10)
+    (total-strokes	 . 13)
     (=ucs		. #x6EE2)	; 滢
     (=gb2312		. #x645E)	; ø»…©›
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 10)
+    (total-strokes	 . 13)
     (=ucs		. #x6EE4)	; 滤
     (=gb2312		. #x424B)	; ø»„·Œ
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 10)
+    (total-strokes	 . 13)
     (=ucs		. #x6EE5)	; 滥
     (=gb2312		. #x4044)	; ø»„´‰
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 10)
+    (total-strokes	 . 13)
     (=ucs		. #x6EE6)	; 滦
     (=gb2312		. #x4250)	; ø»„·‘
     ))
@@ -14078,6 +14169,7 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 10)
+    (total-strokes	 . 13)
     (=ucs		. #x6EE7)	; 滧
     (=iso-ir165		. #x2F6C)	; ø»„ƒ
     ))
@@ -14101,6 +14193,13 @@
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 10)
     (total-strokes	 . 13)
+    (=ucs		. #x6EEA)	; 滪
+    (=iso-ir165		. #x7D2D)	; ø»Žµ¨
+    ))
+(define-char
+  '((ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 10)
+    (total-strokes	 . 13)
     (=ucs		. #x23E06)	; 𣸆
     (=cns11643-6	. #x5448)	; ø»€‘
     ))
@@ -16272,35 +16371,32 @@
     (ideographic-strokes . 11)
     (total-strokes	 . 14)
     (=ucs		. #x3D45)	; 㵅
-    (=cns11643-4	. #x444A)	; ø»˜”«
-    ))
-(define-char
-  '((ideographic-radical . 85)	; ⽔
-    (ideographic-strokes . 11)
-    (=ucs		. #x6D50)	; 浐
-    (=iso-ir165		. #x7C78)	; ø»Žµ•
     ))
 (define-char
-  '((ideographic-radical . 85)	; ⽔
+  '((=>ucs		. #x3D45)	; 㵅
+    (ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 11)
-    (=ucs		. #x6E87)	; 溇
-    (=iso-ir165		. #x7D27)	; ø»Žµ¢
+    (total-strokes	 . 14)
+    (=cns11643-4	. #x444A)	; ø»˜”«
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 11)
+    (total-strokes	 . 14)
     (=ucs		. #x6F46)	; 潆
     (=gb2312		. #x646B)	; ø»…©¨
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 11)
+    (total-strokes	 . 14)
     (=ucs		. #x6F47)	; 潇
     (=gb2312		. #x646C)	; ø»…©©
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 11)
+    (total-strokes	 . 14)
     (=ucs		. #x6F49)	; 潉
     ))
 (define-char
@@ -16313,12 +16409,14 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 11)
+    (total-strokes	 . 14)
     (=ucs		. #x6F4B)	; 潋
     (=gb2312		. #x6472)	; ø»…©¯
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 11)
+    (total-strokes	 . 14)
     (=ucs		. #x6F4D)	; 潍
     (=gb2312		. #x4E2B)	; ø»…ˆ”
     ))
@@ -18229,12 +18327,14 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 12)
+    (total-strokes	 . 15)
     (=ucs		. #x6F9C)	; 澜
     (=gb2312		. #x403D)	; ø»„´‚
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 12)
+    (total-strokes	 . 15)
     (=ucs		. #x6F9D)	; 澝
     ))
 (define-char
@@ -19721,23 +19821,20 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 13)
-    (=ucs		. #x6EEA)	; 滪
-    (=iso-ir165		. #x7D2D)	; ø»Žµ¨
-    ))
-(define-char
-  '((ideographic-radical . 85)	; ⽔
-    (ideographic-strokes . 13)
+    (total-strokes	 . 16)
     (=ucs		. #x6F99)	; 澙
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 13)
+    (total-strokes	 . 16)
     (=ucs		. #x6FD1)	; 濑
     (=gb2312		. #x647E)	; ø»…©»
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 13)
+    (total-strokes	 . 16)
     (=ucs		. #x6FD2)	; 濒
     (=gb2312		. #x3174)	; ø»„ž·
     ))
@@ -20898,18 +20995,7 @@
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 14)
-    (=ucs		. #x6D55)	; 浕
-    (=iso-ir165		. #x7C7A)	; ø»Žµ—
-    ))
-(define-char
-  '((ideographic-radical . 85)	; ⽔
-    (ideographic-strokes . 14)
-    (=ucs		. #x6E81)	; 溁
-    (=iso-ir165		. #x2E5D)	; ø»‚–
-    ))
-(define-char
-  '((ideographic-radical . 85)	; ⽔
-    (ideographic-strokes . 14)
+    (total-strokes	 . 17)
     (=ucs		. #x6FF8)	; 濸
     ))
 (define-char
@@ -22480,16 +22566,24 @@
     (ideographic-strokes . 16)
     (total-strokes	 . 19)
     (=ucs		. #x3D88)	; 㶈
+    ))
+(define-char
+  '((=>ucs		. #x3D88)	; 㶈
+    (ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 16)
+    (total-strokes	 . 19)
     (=cns11643-3	. #x5A51)	; ø»–«‚
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 16)
+    (total-strokes	 . 19)
     (=ucs		. #x702D)	; 瀭
     ))
 (define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 16)
+    (total-strokes	 . 19)
     (=ucs		. #x702E)	; 瀮
     ))
 (define-char
-- 
1.7.10.4