diff options
author | Robert Alessi <alessi@robertalessi.net> | 2022-06-16 01:17:15 +0200 |
---|---|---|
committer | Robert Alessi <alessi@robertalessi.net> | 2022-06-16 11:10:48 +0200 |
commit | 4588ab71394187a697d9218251e6ed886f429aaf (patch) | |
tree | 6a74701f809caaa26592a4e0adfa3bfdcc1cf632 /arabluatex_trans.lua | |
parent | 8c4cfb2b61dde8b30b33bbc4dba5a3267edd36b5 (diff) | |
download | arabluatex-4588ab71394187a697d9218251e6ed886f429aaf.tar.gz |
use H to encode the tāʾ marbūtah devoid of diacritical points
Diffstat (limited to 'arabluatex_trans.lua')
-rw-r--r-- | arabluatex_trans.lua | 89 |
1 files changed, 47 insertions, 42 deletions
diff --git a/arabluatex_trans.lua b/arabluatex_trans.lua index c5c0b05..8791b62 100644 --- a/arabluatex_trans.lua +++ b/arabluatex_trans.lua | |||
@@ -301,41 +301,41 @@ tanwintrdmg = { | |||
301 | {a="%-?(uN)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="\\arbup{uni}"}, | 301 | {a="%-?(uN)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="\\arbup{uni}"}, |
302 | {a="%-?(aN)(_A)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="ạ\\arbup{ni}"}, | 302 | {a="%-?(aN)(_A)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="ạ\\arbup{ni}"}, |
303 | {a="%-?(aN)(Y)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="ạ\\arbup{ni}"}, | 303 | {a="%-?(aN)(Y)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="ạ\\arbup{ni}"}, |
304 | {a="(T)%-?(aN)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="t\\arbup{ani}"}, | 304 | {a="([TH])%-?(aN)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="t\\arbup{ani}"}, |
305 | {a="([^TA])%-?(aN)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="%1\\arbup{ani}"}, | 305 | {a="([^TAH])%-?(aN)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="%1\\arbup{ani}"}, |
306 | {a="%-?(iN)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="\\arbup{ini}"}, | 306 | {a="%-?(iN)(O)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-O)", b="\\arbup{ini}"}, |
307 | {a="%-?(uN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="\\arbup{uni}%2%3"}, | 307 | {a="%-?(uN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="\\arbup{uni}%2%3"}, |
308 | {a="%-?(aN)(_A)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ạ\\arbup{ni}%3%4"}, | 308 | {a="%-?(aN)(_A)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ạ\\arbup{ni}%3%4"}, |
309 | {a="%-?(aN)(Y)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ạ\\arbup{ni}%3%4"}, | 309 | {a="%-?(aN)(Y)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ạ\\arbup{ni}%3%4"}, |
310 | {a="(T)%-?(aN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="t\\arbup{ani}%3%4"}, | 310 | {a="([TH])%-?(aN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="t\\arbup{ani}%3%4"}, |
311 | {a="([^TA])%-?(aN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1\\arbup{ani}%3%4"}, | 311 | {a="([^TAH])%-?(aN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1\\arbup{ani}%3%4"}, |
312 | {a="%-?(iN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="\\arbup{ini}%2%3"}, | 312 | {a="%-?(iN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="\\arbup{ini}%2%3"}, |
313 | -- tanwīn preceding 'lla_dI/'llatI | 313 | -- tanwīn preceding 'lla_dI/'llatI |
314 | {a="%-?(uN)(O)('lla[%_]?[dt])([%S]-O)", b="\\arbup{uni}"}, | 314 | {a="%-?(uN)(O)('lla[%_]?[dt])([%S]-O)", b="\\arbup{uni}"}, |
315 | {a="%-?(aN)(_A)(O)('lla[%_]?[dt])([%S]-O)", b="ạ\\arbup{ni}"}, | 315 | {a="%-?(aN)(_A)(O)('lla[%_]?[dt])([%S]-O)", b="ạ\\arbup{ni}"}, |
316 | {a="%-?(aN)(Y)(O)('lla[%_]?[dt])([%S]-O)", b="ạ\\arbup{ni}"}, | 316 | {a="%-?(aN)(Y)(O)('lla[%_]?[dt])([%S]-O)", b="ạ\\arbup{ni}"}, |
317 | {a="(T)%-?(aN)(O)('lla[%_]?[dt])([%S]-O)", b="t\\arbup{ani}"}, | 317 | {a="([TH])%-?(aN)(O)('lla[%_]?[dt])([%S]-O)", b="t\\arbup{ani}"}, |
318 | {a="([^TA])%-?(aN)(O)('lla[%_]?[dt])([%S]-O)", b="%1\\arbup{ani}"}, | 318 | {a="([^TAH])%-?(aN)(O)('lla[%_]?[dt])([%S]-O)", b="%1\\arbup{ani}"}, |
319 | {a="%-?(iN)(O)('lla[%_]?[dt])([%S]-O)", b="\\arbup{ini}"}, | 319 | {a="%-?(iN)(O)('lla[%_]?[dt])([%S]-O)", b="\\arbup{ini}"}, |
320 | {a="%-?(uN)(%s)('lla[%_]?[dt])", b="\\arbup{uni}%2%3"}, | 320 | {a="%-?(uN)(%s)('lla[%_]?[dt])", b="\\arbup{uni}%2%3"}, |
321 | {a="%-?(aN)(_A)(%s)('lla[%_]?[dt])", b="ạ\\arbup{ni}%3%4"}, | 321 | {a="%-?(aN)(_A)(%s)('lla[%_]?[dt])", b="ạ\\arbup{ni}%3%4"}, |
322 | {a="%-?(aN)(Y)(%s)('lla[%_]?[dt])", b="ạ\\arbup{ni}%3%4"}, | 322 | {a="%-?(aN)(Y)(%s)('lla[%_]?[dt])", b="ạ\\arbup{ni}%3%4"}, |
323 | {a="(T)%-?(aN)(%s)('lla[%_]?[dt])", b="t\\arbup{ani}%3%4"}, | 323 | {a="([TH])%-?(aN)(%s)('lla[%_]?[dt])", b="t\\arbup{ani}%3%4"}, |
324 | {a="([^TA])%-?(aN)(%s)('lla[%_]?[dt])", b="%1\\arbup{ani}%3%4"}, | 324 | {a="([^TAH])%-?(aN)(%s)('lla[%_]?[dt])", b="%1\\arbup{ani}%3%4"}, |
325 | {a="%-?(iN)(%s)('lla[%_]?[dt])", b="\\arbup{ini}%2%3"}, | 325 | {a="%-?(iN)(%s)('lla[%_]?[dt])", b="\\arbup{ini}%2%3"}, |
326 | -- tanwīn + alif without hamza and kasra (ibn) or dhamma (uhrub) | 326 | -- tanwīn + alif without hamza and kasra (ibn) or dhamma (uhrub) |
327 | {a="%-?(uN)(O)([ui])([%S]-O)", b="\\arbup{un%3}"}, | 327 | {a="%-?(uN)(O)([ui])([%S]-O)", b="\\arbup{un%3}"}, |
328 | {a="%-?(aN)(_A)(O)([ui])([%S]-O)", b="ạ\\arbup{n%4}"}, | 328 | {a="%-?(aN)(_A)(O)([ui])([%S]-O)", b="ạ\\arbup{n%4}"}, |
329 | {a="%-?(aN)(Y)(O)([ui])([%S]-O)", b="ạ\\arbup{n%4}"}, | 329 | {a="%-?(aN)(Y)(O)([ui])([%S]-O)", b="ạ\\arbup{n%4}"}, |
330 | {a="(T)%-?(aN)(O)([ui])([%S]-O)", b="t\\arbup{an%4}"}, | 330 | {a="([TH])%-?(aN)(O)([ui])([%S]-O)", b="t\\arbup{an%4}"}, |
331 | {a="([^TA])%-?(aN)(O)([ui])([%S]-O)", b="%1\\arbup{an%4}"}, | 331 | {a="([^TAH])%-?(aN)(O)([ui])([%S]-O)", b="%1\\arbup{an%4}"}, |
332 | {a="%-?(iN)(O)([ui])([%S]-O)", b="\\arbup{in%3}"}, | 332 | {a="%-?(iN)(O)([ui])([%S]-O)", b="\\arbup{in%3}"}, |
333 | {a="(O[%S]-)([uai]N)(O)(\"?[ui])", b="'"}, | 333 | {a="(O[%S]-)([uai]N)(O)(\"?[ui])", b="'"}, |
334 | {a="%-?(uN)(%s)([ui])", b="\\arbup{un%3}%2'"}, | 334 | {a="%-?(uN)(%s)([ui])", b="\\arbup{un%3}%2'"}, |
335 | {a="%-?(aN)(_A)(%s)([ui])", b="ạ\\arbup{n%4}%3'"}, | 335 | {a="%-?(aN)(_A)(%s)([ui])", b="ạ\\arbup{n%4}%3'"}, |
336 | {a="%-?(aN)(Y)(%s)([ui])", b="ạ\\arbup{n%4}%3'"}, | 336 | {a="%-?(aN)(Y)(%s)([ui])", b="ạ\\arbup{n%4}%3'"}, |
337 | {a="(T)%-?(aN)(%s)([ui])", b="t\\arbup{an%4}%3'"}, | 337 | {a="([TH])%-?(aN)(%s)([ui])", b="t\\arbup{an%4}%3'"}, |
338 | {a="([^TA])%-?(aN)(%s)([ui])", b="%1\\arbup{an%4}%3'"}, | 338 | {a="([^TAH])%-?(aN)(%s)([ui])", b="%1\\arbup{an%4}%3'"}, |
339 | {a="%-?(iN)(%s)([ui])", b="\\arbup{in%3}%2'"}, | 339 | {a="%-?(iN)(%s)([ui])", b="\\arbup{in%3}%2'"}, |
340 | -- | 340 | -- |
341 | -- {a="uN", b="\\arbup{un}"}, (now included in the last line of this table) | 341 | -- {a="uN", b="\\arbup{un}"}, (now included in the last line of this table) |
@@ -343,13 +343,13 @@ tanwintrdmg = { | |||
343 | -- needed by \arbcolor: | 343 | -- needed by \arbcolor: |
344 | {a="%-?(aN)(O[%S]-%_AO)", b="ạ\\arbup{n}"}, | 344 | {a="%-?(aN)(O[%S]-%_AO)", b="ạ\\arbup{n}"}, |
345 | {a="%-?(aN)(O[%S]-YO)", b="ạ\\arbup{n}"}, | 345 | {a="%-?(aN)(O[%S]-YO)", b="ạ\\arbup{n}"}, |
346 | {a="(O[%S]-TO)%-?(\"?aN)", b="\\arbup{an}"}, | 346 | {a="(O[%S]-[TH]O)%-?(\"?aN)", b="\\arbup{an}"}, |
347 | {a="(O[%S]-[^TA]O)%-?(\"?aN)", b="\\arbup{an}"}, | 347 | {a="(O[%S]-[^TAH]O)%-?(\"?aN)", b="\\arbup{an}"}, |
348 | -- | 348 | -- |
349 | {a="%-?(aN)(_A)", b="ạ\\arbup{n}"}, | 349 | {a="%-?(aN)(_A)", b="ạ\\arbup{n}"}, |
350 | {a="%-?(aN)(Y)", b="ạ\\arbup{n}"}, | 350 | {a="%-?(aN)(Y)", b="ạ\\arbup{n}"}, |
351 | {a="(T)%-?(\"?aN)", b="t\\arbup{an}"}, | 351 | {a="([TH])%-?(\"?aN)", b="t\\arbup{an}"}, |
352 | {a="([^TA])%-?(\"?aN)", b="%1\\arbup{an}"}, | 352 | {a="([^TAH])%-?(\"?aN)", b="%1\\arbup{an}"}, |
353 | {a="%-?([ui])N", b="\\arbup{%1n}"} | 353 | {a="%-?([ui])N", b="\\arbup{%1n}"} |
354 | } | 354 | } |
355 | 355 | ||
@@ -499,18 +499,20 @@ digraphstrdmg = { | |||
499 | {a="([%_]?[Uu])(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])", b="u%2%3"}, | 499 | {a="([%_]?[Uu])(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])", b="u%2%3"}, |
500 | {a="([%_]?[Ii])(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])", b="i%2%3"}, | 500 | {a="([%_]?[Ii])(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])", b="i%2%3"}, |
501 | {a="%-%-", b=""}, | 501 | {a="%-%-", b=""}, |
502 | {a="iyyaT(%p*)$", b="īyaT%1"}, | 502 | -- {a="iyyaT(%p*)$", b="īyaT%1"}, -- previously. is now: |
503 | {a="iyyaT(%p*%s)", b="īyaT%1"}, | 503 | {a="iyya([TH])(%p*)$", b="īya%1%2"}, |
504 | -- {a="iyyaT(%p*%s)", b="īyaT%1"}, -- previously. is now: | ||
505 | {a="iyya([TH])(%p*%s)", b="īya%1%2"}, | ||
504 | {a="iyy(%p*)$", b="ī%1"}, | 506 | {a="iyy(%p*)$", b="ī%1"}, |
505 | {a="iyy(%p*%s)", b="ī%1"}, | 507 | {a="iyy(%p*%s)", b="ī%1"}, |
506 | -- {a="T([^uai])", b="%1"}, | 508 | -- {a="[TH]([^uai])", b="%1"}, |
507 | {a="T(\\arbup)", b="t%1"}, | 509 | {a="[TH](\\arbup)", b="t%1"}, |
508 | {a="([a%'][%_%^%.]?[tdrzsln]%-)(%S-)T([%(%[%|%<%s])(a[%_%^%.]?[tdrzsln]%-)", b="%1%2h%3%4"}, --p | 510 | {a="([a%'][%_%^%.]?[tdrzsln]%-)(%S-)[TH]([%(%[%|%<%s])(a[%_%^%.]?[tdrzsln]%-)", b="%1%2h%3%4"}, --p |
509 | {a="T([%(%[%|%<%s])(a[%_%^%.]?[tdrzsln]%-)", b="t%1%2"}, --p | 511 | {a="[TH]([%(%[%|%<%s])(a[%_%^%.]?[tdrzsln]%-)", b="t%1%2"}, --p |
510 | {a="T([%|\"])", b="t%1"}, | 512 | {a="[TH]([%|\"])", b="t%1"}, |
511 | {a="T(%p*%s)", b="h%1"}, | 513 | {a="[TH](%p*%s)", b="h%1"}, |
512 | {a="T(%p*)$", b="h%1"}, | 514 | {a="[TH](%p*)$", b="h%1"}, |
513 | {a="T(%p*)(%W)", b="h%1%2"}, | 515 | {a="[TH](%p*)(%W)", b="h%1%2"}, |
514 | {a="_t", b="ṯ"}, | 516 | {a="_t", b="ṯ"}, |
515 | {a="%^g", b="ǧ"}, | 517 | {a="%^g", b="ǧ"}, |
516 | {a="%.h", b="ḥ"}, | 518 | {a="%.h", b="ḥ"}, |
@@ -565,6 +567,7 @@ singletrdmg = { | |||
565 | {a="y", b="y"}, | 567 | {a="y", b="y"}, |
566 | {a="T", b="t"}, | 568 | {a="T", b="t"}, |
567 | -- additional characters (begin) | 569 | -- additional characters (begin) |
570 | {a="H", b="t"}, | ||
568 | {a="p", b="p"}, | 571 | {a="p", b="p"}, |
569 | {a="v", b="v"}, | 572 | {a="v", b="v"}, |
570 | {a="g", b="g"}, | 573 | {a="g", b="g"}, |
@@ -680,13 +683,13 @@ tanwintrloc = { | |||
680 | -- needed by \arbcolor: | 683 | -- needed by \arbcolor: |
681 | {a="%-?(aN)(O[%S]-%_AO)", b="an"}, | 684 | {a="%-?(aN)(O[%S]-%_AO)", b="an"}, |
682 | {a="%-?(aN)(O[%S]-YO)", b="an"}, | 685 | {a="%-?(aN)(O[%S]-YO)", b="an"}, |
683 | {a="(O[%S]-TO)%-?(\"?aN)", b="an"}, | 686 | {a="(O[%S]-[TH]O)%-?(\"?aN)", b="an"}, |
684 | {a="(O[%S]-[^TA]O)%-?(\"?aN)", b="an"}, | 687 | {a="(O[%S]-[^TAH]O)%-?(\"?aN)", b="an"}, |
685 | -- | 688 | -- |
686 | {a="%-?(aN)(_A)", b="an"}, | 689 | {a="%-?(aN)(_A)", b="an"}, |
687 | {a="%-?(aN)(Y)", b="an"}, | 690 | {a="%-?(aN)(Y)", b="an"}, |
688 | {a="(T)%-?(\"?aN)", b="tan"}, | 691 | {a="([TH])%-?(\"?aN)", b="tan"}, |
689 | {a="([^TA])%-?(\"?aN)", b="%1an"} | 692 | {a="([^TAH])%-?(\"?aN)", b="%1an"} |
690 | } | 693 | } |
691 | 694 | ||
692 | trigraphstrloc = { -- trigraphs or more | 695 | trigraphstrloc = { -- trigraphs or more |
@@ -773,12 +776,12 @@ digraphstrloc = { | |||
773 | {a="iyy(%p*%s)", b="ī%1"}, | 776 | {a="iyy(%p*%s)", b="ī%1"}, |
774 | {a="iyy", b="īy"}, | 777 | {a="iyy", b="īy"}, |
775 | {a="([tkdsg])(h)", b="%1'%2"}, | 778 | {a="([tkdsg])(h)", b="%1'%2"}, |
776 | -- {a="T([^uai])", b="h%1"}, | 779 | -- {a="[TH]([^uai])", b="h%1"}, |
777 | {a="([a%']l%-)(%S-)T([%(%[%|%<%s])(al%-)", b="%1%2h%3%4"}, --p | 780 | {a="([a%']l%-)(%S-)[TH]([%(%[%|%<%s])(al%-)", b="%1%2h%3%4"}, --p |
778 | {a="T([%(%[%|%<%s])(al%-)", b="t%1%2"}, --p | 781 | {a="[TH]([%(%[%|%<%s])(al%-)", b="t%1%2"}, --p |
779 | {a="T([%|\"])", b="t%1"}, | 782 | {a="[TH]([%|\"])", b="t%1"}, |
780 | {a="T(%p*)$", b="h%1"}, | 783 | {a="[TH](%p*)$", b="h%1"}, |
781 | {a="T(%p*%s)", b="h%1"}, | 784 | {a="[TH](%p*%s)", b="h%1"}, |
782 | {a="_t", b="th"}, | 785 | {a="_t", b="th"}, |
783 | {a="%^g", b="j"}, | 786 | {a="%^g", b="j"}, |
784 | {a="%.h", b="ḥ"}, | 787 | {a="%.h", b="ḥ"}, |
@@ -832,6 +835,7 @@ singletrloc = { | |||
832 | {a="y", b="y"}, | 835 | {a="y", b="y"}, |
833 | {a="T", b="t"}, | 836 | {a="T", b="t"}, |
834 | -- additional characters (begin) | 837 | -- additional characters (begin) |
838 | {a="H", b="t"}, | ||
835 | {a="p", b="p"}, | 839 | {a="p", b="p"}, |
836 | {a="v", b="v"}, | 840 | {a="v", b="v"}, |
837 | {a="g", b="g"}, | 841 | {a="g", b="g"}, |
@@ -1027,12 +1031,12 @@ digraphstrarabica = { | |||
1027 | {a="%-%-", b=""}, | 1031 | {a="%-%-", b=""}, |
1028 | {a="iyy(%p*)$", b="ī%1"}, | 1032 | {a="iyy(%p*)$", b="ī%1"}, |
1029 | {a="iyy(%p*%s)", b="ī%1"}, | 1033 | {a="iyy(%p*%s)", b="ī%1"}, |
1030 | -- {a="T([^uai])", b="h%1"}, | 1034 | -- {a="[TH]([^uai])", b="h%1"}, |
1031 | {a="([a%']l%-)(%S-)aT([%(%[%|%<%s])(al%-)", b="%1%2a%3%4"}, --p | 1035 | {a="([a%']l%-)(%S-)a[TH]([%(%[%|%<%s])(al%-)", b="%1%2a%3%4"}, --p |
1032 | {a="aT([%(%[%|%<%s])(al%-)", b="at%1%2"}, --p | 1036 | {a="a[TH]([%(%[%|%<%s])(al%-)", b="at%1%2"}, --p |
1033 | {a="T([%|\"])", b="t%1"}, | 1037 | {a="[TH]([%|\"])", b="t%1"}, |
1034 | {a="aT(%p*)$", b="a%1"}, | 1038 | {a="a[TH](%p*)$", b="a%1"}, |
1035 | {a="aT(%p*%s)", b="a%1"}, | 1039 | {a="a[TH](%p*%s)", b="a%1"}, |
1036 | {a="_t", b="ṯ"}, | 1040 | {a="_t", b="ṯ"}, |
1037 | {a="%^g", b="ǧ"}, | 1041 | {a="%^g", b="ǧ"}, |
1038 | {a="%.h", b="ḥ"}, | 1042 | {a="%.h", b="ḥ"}, |
@@ -1086,6 +1090,7 @@ singletrarabica = { | |||
1086 | {a="y", b="y"}, | 1090 | {a="y", b="y"}, |
1087 | {a="T", b="t"}, | 1091 | {a="T", b="t"}, |
1088 | -- additional characters (begin) | 1092 | -- additional characters (begin) |
1093 | {a="H", b="t"}, | ||
1089 | {a="p", b="p"}, | 1094 | {a="p", b="p"}, |
1090 | {a="v", b="v"}, | 1095 | {a="v", b="v"}, |
1091 | {a="g", b="g"}, | 1096 | {a="g", b="g"}, |