1 files changed, 13 insertions, 0 deletions

diff --git a/arabluatex_trans.lua b/arabluatex_trans.lua
index 0adb69e..87f0c47 100644
--- a/arabluatex_trans.lua
+++ b/arabluatex_trans.lua
@@ -31,6 +31,7 @@ punctuationtr = {
 
 nulltr = {
    {a="%|", b=""},
+   {a="o", b=""},
    {a="O[%S]-O", b=""},
    {a="[%^%_](.)", b="<??>%1"}
 }
@@ -254,6 +255,12 @@ tanwintrdmg = {
    --
 -- {a="uN", b="\\arbup{un}"}, (now included in the last line of this table)
    {a="%-?(\"?At)%-?([ui])N", b="\\arbup{%1%2n}"},
+   -- ***
+   {a="%-?(aN)(O[%S]-%_AO)", b="ạ\\arbup{n}"},
+   {a="%-?(aN)(O[%S]-YO)", b="ạ\\arbup{n}"},
+   {a="(O[%S]-TO)%-?(\"?aN)", b="\\arbup{an}"},
+   {a="(O[%S]-[^TA]O)%-?(\"?aN)", b="\\arbup{an}"},
+   --
    {a="%-?(aN)(_A)", b="ạ\\arbup{n}"},
    {a="%-?(aN)(Y)", b="ạ\\arbup{n}"},
    {a="(T)%-?(\"?aN)", b="t\\arbup{an}"},
@@ -584,6 +591,12 @@ tanwintrloc = {
    {a="%-?iNI", b="in"},
    {a="%-?(\"?At)%-?([ui])N", b="%1%2n"},
    {a="%-?([ui])N", b="%1n"},
+   -- ***
+   {a="%-?(aN)(O[%S]-%_AO)", b="an"},
+   {a="%-?(aN)(O[%S]-YO)", b="an"},
+   {a="(O[%S]-TO)%-?(\"?aN)", b="an"},
+   {a="(O[%S]-[^TA]O)%-?(\"?aN)", b="an"},
+   --
    {a="%-?(aN)(_A)", b="an"},
    {a="%-?(aN)(Y)", b="an"},
    {a="(T)%-?(\"?aN)", b="tan"},