[wadalabfont-kit] / lisp / samples / comp-other.l  

Annotation of /lisp/samples/comp-other.l

Parent Directory | Revision Log

Revision: 1.1 - (view) (download)

1 : ktanaka 1.1 ;(¾² ¾²)
2 :     (setq ¾²prim '(((216 9)
3 :     (216 61)
4 :     (248 159)
5 :     (277 275)
6 :     (375 325)
7 :     (202 160)
8 :     (160 293)
9 :     (57 339)
10 :     (218 89)
11 :     (218 392)
12 :     (69 63)
13 :     (69 243)
14 :     (8 373)
15 :     (73 161)
16 :     (377 161)
17 :     (388 63))
18 :     ((tate (0 1))
19 :     (migi (2 3 4))
20 :     (hidari (5 6 7))
21 :     (tate (8 9))
22 :     (hidari (10 11 12))
23 :     (yoko (13 14) (link 5 2))
24 :     (yoko (10 15) (link 1)))))
25 :     ;(¶© ¶©)
26 :     (setq ¶©prim '(((54 47)
27 :     (54 391)
28 :     (56 355)
29 :     (215 112)
30 :     (215 289)
31 :     (392 355)
32 :     (88 290)
33 :     (358 290)
34 :     (119 193)
35 :     (325 193)
36 :     (105 112)
37 :     (342 112)
38 :     (375 47))
39 :     ((tate (0 1) (link 2))
40 :     (tate (3 4))
41 :     (yoko (2 5))
42 :     (yoko (6 7) (link 4))
43 :     (yoko (8 9))
44 :     (yoko (10 11) (link 3))
45 :     (yoko (0 12)))))
46 :     ;(½č ½č)
47 :     (setq ½čprim '(((67 165)
48 :     (155 377)
49 :     (376 377)
50 :     (313 47)
51 :     (313 281)
52 :     (374 281)
53 :     (374 198)
54 :     (233 47)
55 :     (233 240)
56 :     (170 306)
57 :     (154 78)
58 :     (151 274)
59 :     (8 388)
60 :     (74 24)
61 :     (74 142)
62 :     (7 231)
63 :     (77 78))
64 :     ((migi (0 1 2))
65 :     (kokoro (3 4 5 6))
66 :     (hidari (7 8 9))
67 :     (hidari (10 11 12))
68 :     (hidari (13 14 15) (link 16 0))
69 :     (yoko (16 10))
70 :     (yoko (7 3)))))
71 :     (setq testdat '(¾²prim ¶©prim ½čprim))
72 :    
73 :    
74 :    

ktanaka

Powered by ViewCVS 1.0-dev

ViewCVS and CVS Help