Add some `total-strokes' features.
authortomo <tomo>
Sun, 4 Jan 2004 17:06:47 +0000 (17:06 +0000)
committertomo <tomo>
Sun, 4 Jan 2004 17:06:47 +0000 (17:06 +0000)
(U+8D51): Fix strokes.

lisp/utf-2000/Ideograph-R154-Shell.el

index d32ab70..7f2970c 100644 (file)
 (define-char
   '((ideographic-radical . 154)        ; ⾙
     (ideographic-strokes . 2)
+    (total-strokes      . 6)
     (=ucs              . #x8D20)       ; 贠
     (=iso-ir165                . #x2E2C)       ; 
     ))
 (define-char
   '((ideographic-radical . 154)        ; ⾙
     (ideographic-strokes . 6)
+    (total-strokes      . 10)
     (=ucs              . #x8D40)       ; 赀
     (=gb2312           . #x6A5F)       ; 
     ))
   '((ideographic-radical . 154)        ; ⾙
     (ideographic-strokes . 8)
     (total-strokes      . 12)
+    (=ucs              . #x8D51)       ; 赑
+    (=iso-ir165                . #x7C42)       ; 
+    ))
+(define-char
+  '((ideographic-radical . 154)        ; ⾙
+    (ideographic-strokes . 8)
+    (total-strokes      . 12)
     (hanyu-dazidian    6 3650 4)
     (=ucs              . #x8D52)       ; 赒
     (=iso-ir165                . #x2E4E)       ; 
 (define-char
   '((ideographic-radical . 154)        ; ⾙
     (ideographic-strokes . 12)
+    (total-strokes      . 16)
     (=ucs              . #x8D5F)       ; 赟
     (=iso-ir165                . #x2C55)       ; 
     ))
     (=cns11643-7       . #x553A)       ; 
     ))
 (define-char
-  '((ideographic-radical . 154)        ; ⾙
-    (ideographic-strokes . 14)
-    (=ucs              . #x8D51)       ; 赑
-    (=iso-ir165                . #x7C42)       ; 
-    ))
-(define-char
   '((=>ucs             . #x8D15)       ; 贕
     (ideographic-radical . 154)        ; ⾙
     (ideographic-strokes . 15)