From e4e6c64cf8bd214709a02a1da2cbf0d0445d6cf5 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 23 Jun 2004 04:55:04 +0000
Subject: [PATCH] (U+6C37): Add `<-vulgar' for U+51B0.

---
 lisp/utf-2000/Ideograph-R085-Water.el |    3 +++
 1 file changed, 3 insertions(+)

diff --git a/lisp/utf-2000/Ideograph-R085-Water.el b/lisp/utf-2000/Ideograph-R085-Water.el
index 3e193a9..d2b51c8 100644
--- a/lisp/utf-2000/Ideograph-R085-Water.el
+++ b/lisp/utf-2000/Ideograph-R085-Water.el
@@ -49,6 +49,9 @@
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 1)
     (total-strokes	 . 5)
+    (<-vulgar
+     ((=ucs		  . #x51B0)	; 冰
+      ))
     (shinjigen-1	. 4051)
     (shinjigen-2	. 4051)
     (=ucs		. #x6C37)	; æ°·
-- 
1.7.10.4