From cfedf093bf7cd428652b44de2f96cefa0a43ebf7 Mon Sep 17 00:00:00 2001
From: Robert Alessi <alessi@robertalessi.net>
Date: Wed, 30 Mar 2016 19:39:43 +0200
Subject: tanwin and trigraphs were inverted in all of the tables

---
 arabluatex_novoc.lua | 74 ++++++++++++++++++++++++++--------------------------
 1 file changed, 37 insertions(+), 37 deletions(-)

(limited to 'arabluatex_novoc.lua')

diff --git a/arabluatex_novoc.lua b/arabluatex_novoc.lua
index d8e1248..deb5d3e 100644
--- a/arabluatex_novoc.lua
+++ b/arabluatex_novoc.lua
@@ -22,6 +22,43 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
 02111-1307, USA.
 --]]
 
+tanwinnv = {
+   {a="uNU", b="و"},
+   {a="aNU", b="وا"},
+   {a="iNU", b="و"},
+   -- assimilations (begin). These are good but may not apply here.
+--   {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)
+   -- "quoted" tanwīn (begin)
+   {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="ٍ"},
+   -- "quoted" tanwīn (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=""},
+   -- initial straight double quote gives a connective ʾalif. This has
+   -- nothing to do with the tanwīn, but I put it here for time being.
+   {a="^\"", b="ٱ"},
+   {a="([%s%-])\"", b="%1ٱ"}
+}
+
 trigraphsnv = { -- trigraphs or more
    -- Allah
    {a="l%-l_ah", b="l-ll_ah"},
@@ -78,43 +115,6 @@ trigraphsnv = { -- trigraphs or more
    {a="(_a)I", b="%1ي"}
 }
 
-tanwinnv = {
-   {a="uNU", b="و"},
-   {a="aNU", b="وا"},
-   {a="iNU", b="و"},
-   -- assimilations (begin). These are good but may not apply here.
---   {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)
-   -- "quoted" tanwīn (begin)
-   {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="ٍ"},
-   -- "quoted" tanwīn (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=""},
-   -- initial straight double quote gives a connective ʾalif. This has
-   -- nothing to do with the tanwīn, but I put it here for time being.
-   {a="^\"", b="ٱ"},
-   {a="([%s%-])\"", b="%1ٱ"}
-}
-
 longvnv = {
    {a="\"A", b="َا"},
    {a="\"U", b="ُو"},
-- 
cgit v1.2.3