("([CR]n?H)([NJ])"): Fix for the case of this pattern.
[m17n/m17n-db.git] / ARABIC.flt
1 ;; ARABIC.flt -- Font Layout Table for Arabic font (Unicode encoding)
2 ;; Copyright (C) 2003, 2004
3 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
4 ;;   Registration Number H15PRO112
5
6 ;; This file is part of the m17n database; a sub-part of the m17n
7 ;; library.
8
9 ;; The m17n library is free software; you can redistribute it and/or
10 ;; modify it under the terms of the GNU Lesser General Public License
11 ;; as published by the Free Software Foundation; either version 2.1 of
12 ;; the License, or (at your option) any later version.
13
14 ;; The m17n library is distributed in the hope that it will be useful,
15 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
16 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17 ;; Lesser General Public License for more details.
18
19 ;; You should have received a copy of the GNU Lesser General Public
20 ;; License along with the m17n library; if not, write to the Free
21 ;; Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
22 ;; 02111-1307, USA.
23
24 ;;; <li> ARABIC.flt
25 ;;;
26 ;;; For Arabic fonts of Unicode encoding to draw Arabic script.
27
28 ;; phase 1: Kazakh high hamza
29 (category
30  (0x0600 0x06FF         ?x)
31  (0x0675 0x0678         ?p)
32  (0x0643                ?n)
33  (0x06AF                ?n)
34  (0x06D5                ?n)
35  (0x200C                ?x)
36  (0x200D                ?x)
37  )
38
39 (generator
40  (0
41   (cond
42    (".*p.*"
43     (cond
44      (".*n.*"
45       rmhamza *)
46      ("(.)(.*)"
47       (1 < 0x0674 rmhamza >)
48       (2 rmhamza *))))
49    (0 = *)))
50
51  (rmhamza
52   (cond
53    ((0x0675)    0x0627)
54    ((0x0676)    0x0648)
55    ((0x0677)    0x06C7)
56    ((0x0678)    0x0649)
57    ("."         =))))
58
59 ;; phase 2: ligatures
60 (category
61  (0x0600 0x06FF         ?x)             ; general
62  (0x0622                ?a)             ; alef madda
63  (0x0623                ?b)             ; alef hamza above
64  (0x0625                ?c)             ; alef hamza below
65  (0x0627                ?d)             ; alef
66  (0x0644                ?l)             ; lam
67  (0x064B 0x0655         ?t)             ; combinings
68  (0x0670                ?t)             ; combining
69  (0x06D6 0x06ED         ?t)             ; combinings
70  (0x06E5                ?x)
71  (0x06E6                ?x)
72  (0x06E9                ?x)
73  (0x200C                ?x)
74  (0x200D                ?x)
75  )
76
77 (generator
78  (0
79   (cond
80    ("l(t*)a(t*)"
81     0xFEF5
82     (1 = *)
83     (2 = *))
84    ("l(t*)b(t*)"
85     0xFEF7
86     (1 = *)
87     (2 = *))
88    ("l(t*)c(t*)"
89     0xFEF9
90     (1 = *)
91     (2 = *))
92    ("l(t*)d(t*)"
93     0xFEFB
94     (1 = *)
95     (2 = *))
96    ("."
97     =))
98   *))
99
100 ;; phase 3: joining
101 (category
102  ;; D: Dual-joining (beh, teh, etc. & zwj)
103  ;; R: Right-joining (alef, dal, thal, reh, zain)
104  ;; U: Non-joining (Hamza, etc. & zwnj)
105  ;; T: Transparent (combining marks)
106  (0x060C 0x060F         ?U)
107  (0x0610 0x0615         ?T)
108  (0x061B                ?U)
109  (0x061F                ?U)
110  (0x0621                ?U)
111  (0x0622 0x0623         ?R)
112  (0x0624                ?R)
113  (0x0625                ?R)
114  (0x0626                ?D)
115  (0x0627                ?R)
116  (0x0628                ?D)
117  (0x0629                ?R)
118  (0x062A 0x062E         ?D)
119  (0x062F 0x0632         ?R)
120  (0x0633 0x0647         ?D)
121  (0x0648                ?R)
122  (0x0649 0x064A         ?D)
123  (0x064B 0x0658         ?T)
124  (0x0660 0x066D         ?U)
125  (0x066E 0x066F         ?D)
126  (0x0670                ?T)
127  (0x0671 0x0673         ?R)
128  (0x0674 0x0678         ?U)
129  (0x0679 0x0687         ?D)
130  (0x0688 0x0699         ?R)
131  (0x069A 0x06C3         ?D)
132  (0x06C4 0x06CB         ?R)
133  (0x06CC 0x06CE         ?D)
134  (0x06CF                ?R)
135  (0x06D0 0x06D3         ?D)
136  (0x06D4                ?U)
137  (0x06D5                ?R)
138  (0x06D6 0x06E4         ?T)
139  (0x06E5 0x06E6         ?U)
140  (0x06E7 0x06E8         ?T)
141  (0x06E9                ?U)
142  (0x06EA 0x06ED         ?T)
143  (0x06EE 0x06EF         ?R)
144  (0x06F0 0x06F9         ?U)
145  (0x06FA 0x06FC         ?D)
146  (0x06FD 0x06FE         ?U)
147  (0x06FF                ?D)
148  (0xFEF5                ?R)
149  (0xFEF7                ?R)
150  (0xFEF9                ?R)
151  (0xFEFB                ?R)
152  (0x200C                ?U)
153  (0x200D                ?D)
154  )
155
156 (generator
157  (0
158   (cond
159    ("D.*"
160     (cond
161      ("(.)(T*)([DR].*)"
162       (1 initial)
163       (2 combining *)
164       (3 join))
165      ("(.)(T*)(.*)"                     ; == (D)(T*)(U.*)
166       (1 isolated)
167       (2 combining *)
168       (3 disjoin))))
169
170    ("([RU])(T*)(.*)"
171     (1 isolated)
172     (2 combining *)
173     (3 disjoin))
174
175    ("(T+)(.*)"
176     (1 = *)
177     (2 disjoin))))
178
179  (join
180   (cond
181    ("D.*"
182     (cond
183      ("(.)(T*)([DR].*)"
184       (1 medial)
185       (2 combining *)
186       (3 join))
187      ("(.)(T*)(.*)"                     ; == (D)(T*)(U.*)
188       (1 final)
189       (2 combining *)
190       (3 disjoin))))
191
192    ("(.)(T*)(.*)"                       ; == (R)(T*)(.*)
193     (1 final)
194     (2 combining *)
195     (3 disjoin))))
196
197  (disjoin
198   (cond
199    ("D.*"
200     (cond
201      ("(.)(T*)([DR].*)"
202       (1 initial)
203       (2 combining)
204       (3 join))
205      ("(.)(T*)(.*)"                     ; == (D)(T*)(U.*)
206       (1 isolated)
207       (2 combining)
208       (3 disjoin))))
209
210    ("(.)(T*)(.*)"                       ; == ([RU])(T*)(.*)
211     (1 isolated)
212     (2 combining)
213     (3 disjoin))))
214
215  (isolated
216   (cond
217    ((range 0x060C 0x060F)       =)
218    ((0x061B)    =)
219    ((0x061F)    =)
220    ((0x0621)    0xFE80)
221    ((0x0622)    0xFE81)
222    ((0x0623)    0xFE83)
223    ((0x0624)    0xFE85)
224    ((0x0625)    0xFE87)
225    ((0x0626)    0xFE89)
226    ((0x0627)    0xFE8D)
227    ((0x0628)    0xFE8F)
228    ((0x0629)    0xFE93)
229    ((0x062A)    0xFE95)
230    ((0x062B)    0xFE99)
231    ((0x062C)    0xFE9D)
232    ((0x062D)    0xFEA1)
233    ((0x062E)    0xFEA5)
234    ((0x062F)    0xFEA9)
235    ((0x0630)    0xFEAB)
236    ((0x0631)    0xFEAD)
237    ((0x0632)    0xFEAF)
238    ((0x0633)    0xFEB1)
239    ((0x0634)    0xFEB5)
240    ((0x0635)    0xFEB9)
241    ((0x0636)    0xFEBD)
242    ((0x0637)    0xFEC1)
243    ((0x0638)    0xFEC5)
244    ((0x0639)    0xFEC9)
245    ((0x0640)    0x0640)
246    ((0x063A)    0xFECD)
247    ((0x0641)    0xFED1)
248    ((0x0642)    0xFED5)
249    ((0x0643)    0xFED9)
250    ((0x0644)    0xFEDD)
251    ((0x0645)    0xFEE1)
252    ((0x0646)    0xFEE5)
253    ((0x0647)    0xFEE9)
254    ((0x0648)    0xFEED)
255    ((0x0649)    0xFEEF)
256    ((0x064A)    0xFEF1)
257    ((range 0x0660 0x066D)       =)
258    ((0x0671)    0xFB50)
259    ((0x0674)    =)
260    ((0x0677)    0xFBDD)
261    ((0x0679)    0xFB66)
262    ((0x067A)    0xFB5E)
263    ((0x067B)    0xFB52)
264    ((0x067E)    0xFB56)
265    ((0x067F)    0xFB62)
266    ((0x0680)    0xFB5A)
267    ((0x0683)    0xFB76)
268    ((0x0684)    0xFB72)
269    ((0x0686)    0xFB7A)
270    ((0x0687)    0xFB7E)
271    ((0x0688)    0xFB88)
272    ((0x068C)    0xFB84)
273    ((0x068D)    0xFB82)
274    ((0x068E)    0xFB86)
275    ((0x0691)    0xFB8C)
276    ((0x0698)    0xFB8A)
277    ((0x06A4)    0xFB6A)
278    ((0x06A6)    0xFB6E)
279    ((0x06A9)    0xFB8E)
280    ((0x06AD)    0xFBD3)
281    ((0x06AF)    0xFB92)
282    ((0x06B1)    0xFB9A)
283    ((0x06B3)    0xFB96)
284    ((0x06BA)    0xFB9E)
285    ((0x06BB)    0xFBA0)
286    ((0x06BE)    0xFBAA)
287    ((0x06C0)    0xFBA4)
288    ((0x06C1)    0xFBA6)
289    ((0x06C5)    0xFBE0)
290    ((0x06C6)    0xFBD9)
291    ((0x06C7)    0xFBD7)
292    ((0x06C8)    0xFBDB)
293    ((0x06C9)    0xFBE2)
294    ((0x06CB)    0xFBDE)
295    ((0x06CC)    0xFBFC)
296    ((0x06D0)    0xFBE4)
297    ((0x06D2)    0xFBAE)
298    ((0x06D3)    0xFBB0)
299    ((0x06D4)    =)
300    ((0x06D5)    0xFEE9)
301    ((0x06E5)    =)
302    ((0x06E6)    =)
303    ((0x06E9)    =)
304    ((range 0x06F0 0x06F9)       =)
305    ((0x06FD)    =)
306    ((0x06FE)    =)
307    ((0xFEF5)    =)
308    ((0xFEF7)    =)
309    ((0xFEF9)    =)
310    ((0xFEFB)    =)
311    ((0x200C)    =)
312    ((0x200D)    =)
313    ))
314
315  (final
316   (cond
317    ((0x0622)    0xFE82)
318    ((0x0623)    0xFE84)
319    ((0x0624)    0xFE86)
320    ((0x0625)    0xFE88)
321    ((0x0626)    0xFE8A)
322    ((0x0627)    0xFE8E)
323    ((0x0628)    0xFE90)
324    ((0x0629)    0xFE94)
325    ((0x062A)    0xFE96)
326    ((0x062B)    0xFE9A)
327    ((0x062C)    0xFE9E)
328    ((0x062D)    0xFEA2)
329    ((0x062E)    0xFEA6)
330    ((0x062F)    0xFEAA)
331    ((0x0630)    0xFEAC)
332    ((0x0631)    0xFEAE)
333    ((0x0632)    0xFEB0)
334    ((0x0633)    0xFEB2)
335    ((0x0634)    0xFEB6)
336    ((0x0635)    0xFEBA)
337    ((0x0636)    0xFEBE)
338    ((0x0637)    0xFEC2)
339    ((0x0638)    0xFEC6)
340    ((0x0639)    0xFECA)
341    ((0x0640)    0x0640)
342    ((0x063A)    0xFECE)
343    ((0x0641)    0xFED2)
344    ((0x0642)    0xFED6)
345    ((0x0643)    0xFEDA)
346    ((0x0644)    0xFEDE)
347    ((0x0645)    0xFEE2)
348    ((0x0646)    0xFEE6)
349    ((0x0647)    0xFEEA)
350    ((0x0648)    0xFEEE)
351    ((0x0649)    0xFEF0)
352    ((0x064A)    0xFEF2)
353    ((0x0671)    0xFB51)
354    ((0x0679)    0xFB67)
355    ((0x067A)    0xFB5F)
356    ((0x067B)    0xFB52)
357    ((0x067E)    0xFB57)
358    ((0x067F)    0xFB63)
359    ((0x0680)    0xFB5B)
360    ((0x0683)    0xFB77)
361    ((0x0684)    0xFB73)
362    ((0x0686)    0xFB7B)
363    ((0x0687)    0xFB7F)
364    ((0x0688)    0xFB89)
365    ((0x068C)    0xFB85)
366    ((0x068D)    0xFB83)
367    ((0x068E)    0xFB87)
368    ((0x0691)    0xFB8D)
369    ((0x0698)    0xFB8B)
370    ((0x06A4)    0xFB6B)
371    ((0x06A6)    0xFB6F)
372    ((0x06A9)    0xFB8F)
373    ((0x06AD)    0xFBD4)
374    ((0x06AF)    0xFB93)
375    ((0x06B1)    0xFB9B)
376    ((0x06B3)    0xFB97)
377    ((0x06BA)    0xFB9F)
378    ((0x06BB)    0xFBA1)
379    ((0x06BE)    0xFBAB)
380    ((0x06C0)    0xFBA5)
381    ((0x06C1)    0xFBA7)
382    ((0x06C5)    0xFBE1)
383    ((0x06C6)    0xFBDA)
384    ((0x06C7)    0xFBD8)
385    ((0x06C8)    0xFBDC)
386    ((0x06C9)    0xFBE3)
387    ((0x06CB)    0xFBDF)
388    ((0x06CC)    0xFBFD)
389    ((0x06D0)    0xFBE5)
390    ((0x06D2)    0xFBAF)
391    ((0x06D3)    0xFBB1)
392    ((0x06D5)    0xFEEA)
393    ((0xFEF5)    0xFEF6)
394    ((0xFEF7)    0xFEF8)
395    ((0xFEF9)    0xFEFA)
396    ((0xFEFB)    0xFEFC)
397    ((0x200C)    =)
398    ((0x200D)    =)
399    ))
400
401  (initial
402   (cond
403    ((0x0626)    0xFE8B)
404    ((0x0628)    0xFE91)
405    ((0x062A)    0xFE97)
406    ((0x062B)    0xFE9B)
407    ((0x062C)    0xFE9F)
408    ((0x062D)    0xFEA3)
409    ((0x062E)    0xFEA7)
410    ((0x0633)    0xFEB3)
411    ((0x0634)    0xFEB7)
412    ((0x0635)    0xFEBB)
413    ((0x0636)    0xFEBF)
414    ((0x0637)    0xFEC3)
415    ((0x0638)    0xFEC7)
416    ((0x0639)    0xFECB)
417    ((0x0640)    0x0640)
418    ((0x063A)    0xFECF)
419    ((0x0641)    0xFED3)
420    ((0x0642)    0xFED7)
421    ((0x0643)    0xFEDB)
422    ((0x0644)    0xFEDF)
423    ((0x0645)    0xFEE3)
424    ((0x0646)    0xFEE7)
425    ((0x0647)    0xFEEB)
426    ((0x0649)    0xFBE8)
427    ((0x064A)    0xFEF3)
428    ((0x0679)    0xFB68)
429    ((0x067A)    0xFB60)
430    ((0x067B)    0xFB54)
431    ((0x067E)    0xFB58)
432    ((0x067F)    0xFB64)
433    ((0x0680)    0xFB5C)
434    ((0x0683)    0xFB78)
435    ((0x0684)    0xFB74)
436    ((0x0686)    0xFB7C)
437    ((0x0687)    0xFB80)
438    ((0x06A4)    0xFB6C)
439    ((0x06A6)    0xFB70)
440    ((0x06A9)    0xFB90)
441    ((0x06AD)    0xFBD5)
442    ((0x06AF)    0xFB94)
443    ((0x06B1)    0xFB9C)
444    ((0x06B3)    0xFB98)
445    ((0x06BA)    0xFEE7)
446    ((0x06BB)    0xFBA2)
447    ((0x06BE)    0xFBAC)
448    ((0x06C1)    0xFBA8)
449    ((0x06CC)    0xFBFE)
450    ((0x06D0)    0xFBE6)
451    ((0x200C)    =)
452    ((0x200D)    =)
453    ))
454
455  (medial
456   (cond
457    ((0x0626)    0xFE8C)
458    ((0x0628)    0xFE92)
459    ((0x062A)    0xFE98)
460    ((0x062B)    0xFE9C)
461    ((0x062C)    0xFEA0)
462    ((0x062D)    0xFEA4)
463    ((0x062E)    0xFEA8)
464    ((0x0633)    0xFEB4)
465    ((0x0634)    0xFEB8)
466    ((0x0635)    0xFEBC)
467    ((0x0636)    0xFEC0)
468    ((0x0637)    0xFEC4)
469    ((0x0638)    0xFEC8)
470    ((0x0639)    0xFECC)
471    ((0x0640)    0x0640)
472    ((0x063A)    0xFED0)
473    ((0x0641)    0xFED4)
474    ((0x0642)    0xFED8)
475    ((0x0643)    0xFEDC)
476    ((0x0644)    0xFEE0)
477    ((0x0645)    0xFEE4)
478    ((0x0646)    0xFEE8)
479    ((0x0647)    0xFEEC)
480    ((0x0649)    0xFBE9)
481    ((0x064A)    0xFEF4)
482    ((0x0679)    0xFB69)
483    ((0x067A)    0xFB61)
484    ((0x067B)    0xFB55)
485    ((0x067E)    0xFB59)
486    ((0x067F)    0xFB65)
487    ((0x0680)    0xFB5D)
488    ((0x0683)    0xFB79)
489    ((0x0684)    0xFB75)
490    ((0x0686)    0xFB7D)
491    ((0x0687)    0xFB81)
492    ((0x06A4)    0xFB6D)
493    ((0x06A6)    0xFB71)
494    ((0x06A9)    0xFB91)
495    ((0x06AD)    0xFBD6)
496    ((0x06AF)    0xFB95)
497    ((0x06B1)    0xFB9D)
498    ((0x06B3)    0xFB99)
499    ((0x06BA)    0xFEE8)
500    ((0x06BB)    0xFBA3)
501    ((0x06BE)    0xFBAD)
502    ((0x06C1)    0xFBA9)
503    ((0x06CC)    0xFBFF)
504    ((0x06D0)    0xFBE7)
505    ((0x200C)    =)
506    ((0x200D)    =)
507    ))
508
509  (combining
510   (cond
511    ((range 0x0610 0x0615) tc+bc =)
512    ((0x064B) tc+bc =)
513    ((0x064C) tc+bc =)
514    ((0x064D) bc-15tc =)
515    ((0x064E) tc+bc =)
516    ((0x064F) tc+bc =)
517    ((0x0650) bc-15tc =)
518    ((0x0651) tc+bc =)
519    ((0x0652) tc+bc =)
520    ((0x0653) tc+bc =)
521    ((0x0654) tc+bc =)
522    ((0x0655) bc-15tc =)
523    ((0x0656) bc-15tc =)
524    ((0x0657) tc+bc =)
525    ((0x0658) tc+bc =)
526    ((0x0670) tc+bc =)
527    ((range 0x06D6 0x06DC) tc+bc =)
528    ((range 0x06DF 0x06E2) tc+bc =)
529    ((0x06E3) bc-15tc =)
530    ((0x06E4) tc+bc =)
531    ((0x06E7) tc+bc =)
532    ((0x06E8) tc+bc =)
533    ((0x06EA) bc-15tc =)
534    ((0x06EB) tc+bc =)
535    ((0x06EC) tc+bc =)
536    ((0x06ED) bc-15tc =)
537    ((0x200C)    =)
538    ((0x200D)    =)
539    ))
540  )
541
542 ;; Local Variables:
543 ;; mode: lisp
544 ;; End: