Add some `total-strokes' features.
authortomo <tomo>
Thu, 1 Jan 2004 20:00:48 +0000 (20:00 +0000)
committertomo <tomo>
Thu, 1 Jan 2004 20:00:48 +0000 (20:00 +0000)
(U+7800): Fix strokes.

lisp/utf-2000/Ideograph-R112-Stone.el

index 3a077bc..376f62e 100644 (file)
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 2)
+    (total-strokes      . 7)
     (=ucs              . #x77F6)       ; 矶
     (=gb2312           . #x6D36)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 3)
+    (total-strokes      . 8)
     (=ucs              . #x77FE)       ; 矾
     (=gb2312           . #x372F)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 3)
+    (total-strokes      . 8)
     (=ucs              . #x77FF)       ; 矿
     (=gb2312           . #x3F73)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 3)
+    (total-strokes      . 8)
+    (=ucs              . #x7800)       ; 砀
+    (=gb2312           . #x6D38)       ; 
+    ))
+(define-char
+  '((ideographic-radical . 112)        ; ⽯
+    (ideographic-strokes . 3)
+    (total-strokes      . 8)
     (=ucs              . #x7801)       ; 码
     (=gb2312           . #x426B)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 4)
-    (=ucs              . #x7800)       ; 砀
-    (=gb2312           . #x6D38)       ; 
-    ))
-(define-char
-  '((ideographic-radical . 112)        ; ⽯
-    (ideographic-strokes . 4)
+    (total-strokes      . 9)
     (=ucs              . #x7816)       ; 砖
     (=gb2312           . #x5729)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 4)
+    (total-strokes      . 9)
     (=ucs              . #x7817)       ; 砗
     (=gb2312           . #x6D3A)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 4)
+    (total-strokes      . 9)
     (=ucs              . #x7818)       ; 砘
     (=gb2312           . #x6D3B)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 4)
-    (japanese-strokes   . 5)
+    (total-strokes      . 9)
     (=ucs              . #x7819)       ; 砙
     (=jis-x0213-2-2000 . #x7242)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 4)
+    (total-strokes      . 9)
     (=ucs              . #x781A)       ; 砚
     (=gb2312           . #x5162)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 4)
+    (total-strokes      . 9)
     (=ucs              . #x781B)       ; 砛
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 4)
+    (total-strokes      . 9)
     (=ucs              . #x781C)       ; 砜
     (=gb2312           . #x6D3F)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 5)
+    (total-strokes      . 10)
     (=ucs              . #x781E)       ; 砞
     (=daikanwa         . 24082)        ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 5)
+    (total-strokes      . 10)
     (=ucs              . #x7839)       ; 砹
     (=gb2312           . #x6D41)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 5)
+    (total-strokes      . 10)
     (=ucs              . #x783C)       ; 砼
     (=gb2312           . #x6D45)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 5)
+    (total-strokes      . 10)
     (=ucs              . #x783D)       ; 砽
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 5)
+    (total-strokes      . 10)
     (=ucs              . #x783E)       ; 砾
     (=gb2312           . #x4079)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 5)
+    (total-strokes      . 10)
     (=ucs              . #x7840)       ; 础
     (=gb2312           . #x3421)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 5)
+    (total-strokes      . 10)
     (=ucs              . #x7841)       ; 硁
     (=iso-ir165                . #x7D43)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 6)
+    (total-strokes      . 11)
     (=ucs              . #x7853)       ; 硓
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 6)
+    (total-strokes      . 11)
     (=ucs              . #x7854)       ; 硔
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 6)
+    (total-strokes      . 11)
     (=ucs              . #x7855)       ; 硕
     (=gb2312           . #x4B36)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 6)
+    (total-strokes      . 11)
     (=ucs              . #x7856)       ; 硖
     (=gb2312           . #x6D4C)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 6)
+    (total-strokes      . 11)
     (=ucs              . #x7857)       ; 硗
     (=gb2312           . #x6D4D)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 6)
+    (total-strokes      . 11)
     (=ucs              . #x7858)       ; 硘
     (=jef-china3       . #x8FC3)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 6)
+    (total-strokes      . 11)
     (=ucs              . #x7859)       ; 硙
     (=iso-ir165                . #x2E64)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 8)
+    (total-strokes      . 13)
     (=ucs              . #x789B)       ; 碛
     (=gb2312           . #x6D53)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 8)
+    (total-strokes      . 13)
     (=ucs              . #x789C)       ; 碜
     (=gb2312           . #x6D57)       ; 
     ))
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 11)
+    (total-strokes      . 16)
     (=ucs              . #x78DC)       ; 磜
     (=iso-ir165                . #x2E66)       ; 
     (=daikanwa         . 24424)        ; 
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 11)
+    (total-strokes      . 16)
     (=ucs              . #x78EE)       ; 磮
     ))
 (define-char
 (define-char
   '((ideographic-radical . 112)        ; ⽯
     (ideographic-strokes . 15)
+    (total-strokes      . 20)
     (=ucs              . #x7922)       ; 礢
     ))
 (define-char