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_trans.lua | 64 ++++++++++++++++++++++++++--------------------------
 1 file changed, 32 insertions(+), 32 deletions(-)

(limited to 'arabluatex_trans.lua')

diff --git a/arabluatex_trans.lua b/arabluatex_trans.lua
index 99d3712..b61c6db 100644
--- a/arabluatex_trans.lua
+++ b/arabluatex_trans.lua
@@ -122,6 +122,26 @@ hamzatrdmg = {
    {a="(i)(')([^uaiUAI])", b="%1ʾ%3"}
 }
 
+tanwintrdmg = {
+   {a="uNU", b="un"},
+   {a="aNU", b="an"},
+   {a="iNU", b="in"},
+   -- tanwīn preceding ʾalif conjunctionis
+   {a="(uN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="uni%2%3"},
+   {a="(aN)(_A)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ani%3%4"},
+   {a="(aN)(Y)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ani%3%4"},
+   {a="(T)(aN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="tani%3%4"},
+   {a="([^TA])(aN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1ani%3%4"},
+   {a="(iN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ini%2%3"},
+   --
+   {a="uN", b="un"},
+   {a="(aN)(_A)", b="an"},
+   {a="(aN)(Y)", b="an"},
+   {a="(T)(\"?aN)", b="tan"},
+   {a="([^TA])(\"?aN)", b="%1an"},
+   {a="iN", b="in"}
+}
+
 trigraphstrdmg = { -- trigraphs or more
    -- 'llatI / 'llad_I
    {a="^'ll(a)([%_]?[dt])", b="'ll%1%2"},
@@ -177,26 +197,6 @@ trigraphstrdmg = { -- trigraphs or more
    {a="(n)(%s)([rlmnwy])", b="%3%2%3"}
 }
 
-tanwintrdmg = {
-   {a="uNU", b="un"},
-   {a="aNU", b="an"},
-   {a="iNU", b="in"},
-   -- tanwīn preceding ʾalif conjunctionis
-   {a="(uN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="uni%2%3"},
-   {a="(aN)(_A)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ani%3%4"},
-   {a="(aN)(Y)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ani%3%4"},
-   {a="(T)(aN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="tani%3%4"},
-   {a="([^TA])(aN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1ani%3%4"},
-   {a="(iN)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ini%2%3"},
-   --
-   {a="uN", b="un"},
-   {a="(aN)(_A)", b="an"},
-   {a="(aN)(Y)", b="an"},
-   {a="(T)(\"?aN)", b="tan"},
-   {a="([^TA])(\"?aN)", b="%1an"},
-   {a="iN", b="in"}
-}
-
 digraphstrdmg = {
    {a="([uai]%-)(\"?[uai])", b="%1'"}, -- hyphen + initial alif without hamza
    {a="^(\"?[uai])", b="%1"},      -- initial alif without hamza
@@ -342,6 +342,18 @@ hamzatrloc = {
    {a="(i)(')([^uaiUAI])", b="%1ʾ%3"}
 }
 
+tanwintrloc = {
+   {a="uNU", b="un"},
+   {a="aNU", b="an"},
+   {a="iNU", b="in"},
+   {a="uN", b="un"},
+   {a="(aN)(_A)", b="an"},
+   {a="(aN)(Y)", b="an"},
+   {a="(T)(\"?aN)", b="tan"},
+   {a="([^TA])(\"?aN)", b="%1an"},
+   {a="iN", b="in"}
+}
+
 trigraphstrloc = { -- trigraphs or more
    -- 'llatI / 'llad_I
    {a="^'ll(a)([%_]?[dt])", b="all%1%2"},
@@ -392,18 +404,6 @@ trigraphstrloc = { -- trigraphs or more
    {a="(_a)I", b="A"}
 }
 
-tanwintrloc = {
-   {a="uNU", b="un"},
-   {a="aNU", b="an"},
-   {a="iNU", b="in"},
-   {a="uN", b="un"},
-   {a="(aN)(_A)", b="an"},
-   {a="(aN)(Y)", b="an"},
-   {a="(T)(\"?aN)", b="tan"},
-   {a="([^TA])(\"?aN)", b="%1an"},
-   {a="iN", b="in"}
-}
-
 digraphstrloc = {
    {a="(%-)([uai])", b="%1%2"}, -- hyphen + initial alif without hamza
    {a="^([uai])", b="%1"},      -- initial alif without hamza
-- 
cgit v1.2.3