bugfix in fullvoc tables (tanwīn + connective ʾalif); still documenting...

1 files changed, 25 insertions, 0 deletions

diff --git a/arabluatex_fullvoc.lua b/arabluatex_fullvoc.lua
index e6cdb42..8f6ce66 100644
--- a/arabluatex_fullvoc.lua
+++ b/arabluatex_fullvoc.lua
@@ -173,6 +173,31 @@ trigraphsfv = { -- trigraphs or more
    {a="(n)(%s)([rlmnwy])", b="%1%2%3%3"}
 }
 
+tanwinfv = {
+   {a="uNU", b="ٌو"},
+   {a="aNU", b="ًوا"},
+   {a="iNU", b="ٍو"},
+   {a="([uai]N)(%s)([uai])", b="%1%2ٱ"},
+   {a="(aN[%_]?[AY])(%s)([uai])", b="%1%2ٱ"},
+   -- assimilations (begin)
+   {a="(uN)(%s)([rlmnwy])", b="ٌ%2%3%3"},
+   {a="(aN)(_A)(%s)([rlmnwy])", b="ًى%3%4%4"},
+   {a="(aN)(Y)(%s)([rlmnwy])", b="ًى%3%4%4"},
+   {a="(T)(aN)(%s)([rlmnwy])", b="%1ً%3%4%4"},
+   {a="(ء)(aN)(%s)([rlmnwy])", b="%1ً%3%4%4"},
+   {a="([^TA])(aN)(%s)([rlmnwy])", b="%1ًا%3%4%4"},
+   {a="(iN)(%s)([rlmnwy])", b="ٍ%2%3%3"},
+   -- assimilations (end)
+   {a="(uN)", b="ٌ"},
+   {a="(B)(aN)", b="%1ً"},
+   {a="(aN)(_A)", b="ًى"},
+   {a="(aN)(Y)", b="ًى"},
+   {a="(T)(aN)", b="%1ً"},
+   {a="(ء)(aN)", b="%1ً"},
+   {a="([^TA])(aN)", b="%1ًا"},
+   {a="(iN)", b="ٍ"}
+}
+
 -- this is new
 digraphsfv = {
    -- diphthongs to be resolved before ʾalif conjunctionis