Reformatted.

[chise/xemacs-chise.git-] / lisp / utf-2000 / Ideograph-R008-Lid.el

diff --git a/lisp/utf-2000/Ideograph-R008-Lid.el b/lisp/utf-2000/Ideograph-R008-Lid.el
index 4c1c2a4..4ab364a 100644 (file)
--- a/lisp/utf-2000/Ideograph-R008-Lid.el
+++ b/lisp/utf-2000/Ideograph-R008-Lid.el
@@ -842,7 +842,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 8)  ; ⼇
+  '((<-denotational
+     ((==>ucs@bucs       . #x7522)     ; &BUCS+7522;
+      ))
+    (ideographic-radical . 8)  ; ⼇
     (ideographic-strokes . 4)
     (total-strokes      . 6)
     (hanyu-dazidian    1 283 3)
@@ -864,6 +867,10 @@
     (=ucs              . #x4EA7)       ; 产
     (=gb2312           . #x327A)       ; &I-G0-327A; [18-90]
     (=hanziku-1                . #xE06E)       ; &I-HZK01-E06E;
+    (<-simplified@CN
+     ((=ucs              . #x7523)     ; 産
+      (=gb12345                  . #x327A)     ; 産 [18-90]
+      ))
     ))
 (define-char
   '((=>ucs             . #x4EA7)       ; 产
@@ -1024,6 +1031,13 @@
       (=>iwds-1                  .  0345)      ; &IWDS1-345;
       ))
     (ideographic-radical . 8)  ; ⼇
+    (=ucs              . #x342C)       ; 㐬
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x342C)     ; 㐬
+      ))
+    (ideographic-radical . 8)  ; ⼇
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
@@ -1032,7 +1046,8 @@
       )
      ((=ucs              . #x2BDA7)    ; 𫶧
       ))
-    (=ucs              . #x342C)       ; 㐬
+    (=>ucs@iwds-1      . #x342C)       ; &A-IWDSU+342C;
+    (=>ucs@unicode     . #x342C)       ; &A-IWDSU+342C;
     (->subsumptive
      ((ideographic-strokes . 5)
       (total-strokes      . 7)