the new rules of taḫfīf al-hamzah have been added in the transliteration modes

1 files changed, 18 insertions, 0 deletions

diff --git a/arabluatex_trans.lua b/arabluatex_trans.lua
index 21fbe96..1a277a2 100644
--- a/arabluatex_trans.lua
+++ b/arabluatex_trans.lua
@@ -100,6 +100,12 @@ hamzatrdmg = {
    -- taḫfīfu 'l-hamza
    {a="'u'([^uaiUAI])", b="ʾU%1"},
    {a="'i'([^uaiUAI])", b="ʾI%1"},
+   --new (begin)
+   {a="^u'([^uaiUAI])", b="U%1"},
+   {a="([^uaiUAIYN][%s%(%[%<])u'([^uaiUAI])", b="%1U%2"},
+   {a="^i'([^uaiUAI])", b="I%1"},
+   {a="([^uaiUAIYN][%s%(%[%<])i'([^uaiUAI])", b="%1I%2"},
+   --new (end)
    -- madda (historic writing below)
    {a="'a'([^uaiUAI])", b="ʾA%1"},
    {a="'a?A", b="ʾA"},
@@ -471,6 +477,12 @@ hamzatrloc = {
    {a="([%s%(%[%<%-])'u'([^uaiUAI])", b="%1U%2"},
    {a="^'i'([^uaiUAI])", b="I%1"},
    {a="([%s%(%[%<%-])'i'([^uaiUAI])", b="%1I%2"},
+   --new (begin)
+   {a="^u'([^uaiUAI])", b="U%1"},
+   {a="([^uaiUAIYN][%s%(%[%<])u'([^uaiUAI])", b="%1U%2"},
+   {a="^i'([^uaiUAI])", b="I%1"},
+   {a="([^uaiUAIYN][%s%(%[%<])i'([^uaiUAI])", b="%1I%2"},
+   --new (end)
    -- madda (historic writing below)
    {a="^(')(A)", b="%2"},
    {a="(%W)(')(A)", b="%1%3"},   
@@ -726,6 +738,12 @@ hamzatrarabica = { -- ≠ from hamzatrloc: initial hamza has to be held
    {a="([%s%(%[%<%-])'u'([^uaiUAI])", b="%1U%2"},
    {a="^'i'([^uaiUAI])", b="I%1"},
    {a="([%s%(%[%<%-])'i'([^uaiUAI])", b="%1I%2"},
+   --new (begin)
+   {a="^u'([^uaiUAI])", b="U%1"},
+   {a="([^uaiUAIYN][%s%(%[%<])u'([^uaiUAI])", b="%1U%2"},
+   {a="^i'([^uaiUAI])", b="I%1"},
+   {a="([^uaiUAIYN][%s%(%[%<])i'([^uaiUAI])", b="%1I%2"},
+   --new (end)
    -- madda (historic writing below)
    {a="^(')(A)", b="%2"},
    {a="(%W)(')(A)", b="%1%3"},