alif maq.sūra is to be small letter a with dot below and macron in dmg

1 files changed, 6 insertions, 6 deletions

diff --git a/arabluatex_trans.lua b/arabluatex_trans.lua
index e8f8825..11d1ac1 100644
--- a/arabluatex_trans.lua
+++ b/arabluatex_trans.lua
@@ -132,15 +132,15 @@ tanwintrdmg = {
    {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="(aN)(_A)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ạni%3%4"},
+   {a="(aN)(Y)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ạni%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="(aN)(_A)", b="ạn"},
+   {a="(aN)(Y)", b="ạn"},
    {a="(T)(\"?aN)", b="tan"},
    {a="([^TA])(\"?aN)", b="%1an"},
    {a="iN", b="in"}
@@ -235,7 +235,7 @@ digraphstrdmg = {
 --   {a="(U)(A)", b="ū"},
    {a="WA", b="w"},
    {a="(a)W", b="%1w"},
-   {a="_A", b="ā"},
+   {a="_A", b="ạ̄"},
    {a="_u", b="ū"},
    {a="_a", b="ā"},
    {a="_i", b="ī"},
@@ -275,7 +275,7 @@ longvtrdmg = {
    {a="A", b="ā"},
    {a="U", b="ū"},
    {a="I", b="ī"},
-   {a="Y", b="ā"}
+   {a="Y", b="ạ̄"}
 }
 
 shortvtrdmg = {