| (defun kanjip (sym) |
(defun kanjip (sym) |
| (cond ((= 2 (string-length (pname sym)))) |
(cond ((= 2 (string-length (pname sym)))) |
| (t nil))) |
(t nil))) |
| (exfile "../primdata/prim-pack.l") |
;(exfile "../primdata/prim-pack.l") |
| |
(exfile "../primdata/prim-all.l") |
| (exfile "../jointdata/alljoint.l") |
(exfile "../jointdata/alljoint.l") |
| (exfile "../jointdata/jis3-0.l") |
(exfile "../jointdata/jis3-0.l") |
| (exfile "../jointdata/jis3-1.l") |
(exfile "../jointdata/jis3-1.l") |
| (exfile "../jointdata/joint-patch-jis3.l") |
(exfile "../jointdata/joint-patch-jis3.l") |
| (exfile "../primdata/prim-jis2.l") |
(exfile "../primdata/prim-jis2.l") |
| (exfile "../primdata/prim-jis3.l") |
(exfile "../primdata/prim-jis3.l") |
| (setq 繭の下 '(kamae2 まきがまえぼう 糸 虫)) |
;(setq 繭の下 '(kamae2 まきがまえぼう 糸 虫)) |
| (setq 幽 '(kamae2 やまがまえ いとがしら いとがしら)) |
;(setq 幽 '(kamae2 やまがまえ いとがしら いとがしら)) |
| |
|
| (setq jis30 '(亜 唖 娃 阿 哀 愛 挨 姶 逢 葵 茜 穐 悪 握 渥 旭 葦 芦 鯵 梓 圧 |
(setq jis30 '(亜 唖 娃 阿 哀 愛 挨 姶 逢 葵 茜 穐 悪 握 渥 旭 葦 芦 鯵 梓 圧 |
| 斡 扱 宛 姐 虻 飴 絢 綾 鮎 或 粟 袷 安 庵 按 暗 案 闇 鞍 杏 以 |
斡 扱 宛 姐 虻 飴 絢 綾 鮎 或 粟 袷 安 庵 按 暗 案 闇 鞍 杏 以 |
Diff of /lisp/all.l
Parent Directory
| 
Revision Log