aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRobert Alessi <alessi@robertalessi.net>2018-06-24 14:28:17 +0200
committerRobert Alessi <alessi@robertalessi.net>2018-06-24 14:28:17 +0200
commit0b00f31b9fa532d59570d8b102dac98ef1ce4338 (patch)
tree8beca5a9a2d349fb9c157e3c6c975d2893cba657
parentd22e1775cf9b7613141aedd9b6f9d717fe593c98 (diff)
downloadarabluatex-0b00f31b9fa532d59570d8b102dac98ef1ce4338.tar.gz
additional rules for putting back on ʾalif al-waṣl with \arbnull{}
-rw-r--r--arabluatex_fullvoc.lua4
-rw-r--r--arabluatex_novoc.lua2
-rw-r--r--arabluatex_trans.lua1
-rw-r--r--arabluatex_voc.lua6
4 files changed, 13 insertions, 0 deletions
diff --git a/arabluatex_fullvoc.lua b/arabluatex_fullvoc.lua
index fb823fa..30c5bf7 100644
--- a/arabluatex_fullvoc.lua
+++ b/arabluatex_fullvoc.lua
@@ -399,6 +399,8 @@ tanwinfveasy = { -- no assimilations (see below)
399} 399}
400 400
401trigraphsfv = { -- trigraphs or more 401trigraphsfv = { -- trigraphs or more
402 -- ʾalif al-waṣl: put it back on with \arbnull
403 {a="(O[%S]-)([%'a]l%-)(O)(\"?[uai])", b="ٱ"},
402 -- 'llatI / 'llad_I 404 -- 'llatI / 'llad_I
403 {a="^'ll(a)([%_]?[dt])", b="ٱلّ%1%2"}, 405 {a="^'ll(a)([%_]?[dt])", b="ٱلّ%1%2"},
404 {a="([%(%[%|%<%s%-])'ll(a)([%_]?[dt])", b="%1ٱلّ%2%3"}, --p 406 {a="([%(%[%|%<%s%-])'ll(a)([%_]?[dt])", b="%1ٱلّ%2%3"}, --p
@@ -480,6 +482,8 @@ trigraphsfv = { -- trigraphs or more
480-- file. 482-- file.
481 483
482trigraphsfveasy = { -- trigraphs or more (see 'easy' tag below for the diffs) 484trigraphsfveasy = { -- trigraphs or more (see 'easy' tag below for the diffs)
485 -- ʾalif al-waṣl: put it back on with \arbnull
486 {a="(O[%S]-)([%'a]l%-)(O)(\"?[uai])", b="ٱ"},
483 -- 'llatI / 'llad_I 487 -- 'llatI / 'llad_I
484 {a="^'ll(a)([%_]?[dt])", b="ٱلّ%1%2"}, 488 {a="^'ll(a)([%_]?[dt])", b="ٱلّ%1%2"},
485 {a="([%(%[%|%<%s%-])'ll(a)([%_]?[dt])", b="%1ٱلّ%2%3"}, --p 489 {a="([%(%[%|%<%s%-])'ll(a)([%_]?[dt])", b="%1ٱلّ%2%3"}, --p
diff --git a/arabluatex_novoc.lua b/arabluatex_novoc.lua
index cc29371..95a19ef 100644
--- a/arabluatex_novoc.lua
+++ b/arabluatex_novoc.lua
@@ -66,6 +66,8 @@ tanwinnv = {
66 {a="([اآ])(ء)%-?(aN)", b="%1%2"}, --new 66 {a="([اآ])(ء)%-?(aN)", b="%1%2"}, --new
67 {a="([^TA])%-?(aN)", b="%1ا"}, 67 {a="([^TA])%-?(aN)", b="%1ا"},
68 {a="%-?(iNI?)", b=""}, 68 {a="%-?(iNI?)", b=""},
69 -- ʾalif al-waṣl: put it back on with \arbnull
70 {a="(O[%S]-)([%'a]l%-)(O)(\"?[uai])", b="%4"},
69 -- initial straight double quote gives a connective ʾalif. This has 71 -- initial straight double quote gives a connective ʾalif. This has
70 -- nothing to do with the tanwīn, but I put it here for time being. 72 -- nothing to do with the tanwīn, but I put it here for time being.
71 {a="^\"", b="ٱ"}, 73 {a="^\"", b="ٱ"},
diff --git a/arabluatex_trans.lua b/arabluatex_trans.lua
index 87f0c47..d532021 100644
--- a/arabluatex_trans.lua
+++ b/arabluatex_trans.lua
@@ -373,6 +373,7 @@ digraphstrdmg = {
373 {a="(A)(O)(\"?[uai])([%S]-O)", b="a"}, 373 {a="(A)(O)(\"?[uai])([%S]-O)", b="a"},
374 {a="([%_]?[Uu])(O)(\"?[uai])([%S]-O)", b="u"}, 374 {a="([%_]?[Uu])(O)(\"?[uai])([%S]-O)", b="u"},
375 {a="([%_]?[Ii])(O)(\"?[uai])([%S]-O)", b="i"}, 375 {a="([%_]?[Ii])(O)(\"?[uai])([%S]-O)", b="i"},
376 {a="(O[%S]-)([%'a]l%-)(O)(\"?[uai])", b="'"},
376 {a="(O[%S]-)([UAIYWuaiyw])(O)(\"?[uai])", b="'"}, 377 {a="(O[%S]-)([UAIYWuaiyw])(O)(\"?[uai])", b="'"},
377 {a="(aW)(%s)([%(%[%|%<]?)(\"?[uai])", b="awu%2%3%4"}, --p 378 {a="(aW)(%s)([%(%[%|%<]?)(\"?[uai])", b="awu%2%3%4"}, --p
378 {a="(UA)(%s)([%(%[%|%<]?)(\"?[uai])", b="u%2%3'"}, --p 379 {a="(UA)(%s)([%(%[%|%<]?)(\"?[uai])", b="u%2%3'"}, --p
diff --git a/arabluatex_voc.lua b/arabluatex_voc.lua
index 16ddd55..412255c 100644
--- a/arabluatex_voc.lua
+++ b/arabluatex_voc.lua
@@ -523,6 +523,9 @@ tanwineasy = { -- 'easy' requires some lines to be taken out:
523} 523}
524 524
525trigraphs = { -- trigraphs or more 525trigraphs = { -- trigraphs or more
526 -- ʾalif al-waṣl: put it back on with \arbnull
527 {a="(O[%S]-)([%'a]l%-)(O)(\"[uai])", b="ٱ"},
528 {a="(O[%S]-)([%'a]l%-)(O)([uai])", b="ا"},
526 -- 'llatI / 'llad_I 529 -- 'llatI / 'llad_I
527 {a="^'ll(a)([%_]?[dt])", b="الّ%1%2"}, 530 {a="^'ll(a)([%_]?[dt])", b="الّ%1%2"},
528 {a="([%(%[%|%<%s%-])'ll(a)([%_]?[dt])", b="%1الّ%2%3"}, --p 531 {a="([%(%[%|%<%s%-])'ll(a)([%_]?[dt])", b="%1الّ%2%3"}, --p
@@ -611,6 +614,9 @@ idgham = {
611} 614}
612 615
613trigraphseasy = { -- differences marked below with 'easy' 616trigraphseasy = { -- differences marked below with 'easy'
617 -- ʾalif al-waṣl: put it back on with \arbnull
618 {a="(O[%S]-)([%'a]l%-)(O)(\"[uai])", b="ٱ"},
619 {a="(O[%S]-)([%'a]l%-)(O)([uai])", b="ا"},
614 -- Allah (easy) 620 -- Allah (easy)
615 {a="l%-l_ah", b="l-ll_ah"}, 621 {a="l%-l_ah", b="l-ll_ah"},
616 -- 'llatI / 'llad_I 622 -- 'llatI / 'llad_I