aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--arabluatex_fullvoc.lua7
-rw-r--r--arabluatex_trans.lua14
2 files changed, 15 insertions, 6 deletions
diff --git a/arabluatex_fullvoc.lua b/arabluatex_fullvoc.lua
index b0e00d4..1129911 100644
--- a/arabluatex_fullvoc.lua
+++ b/arabluatex_fullvoc.lua
@@ -171,9 +171,10 @@ trigraphsfv = { -- trigraphs or more
171 171
172-- this is new 172-- this is new
173digraphsfv = { 173digraphsfv = {
174 {a="(%-)([uai])", b="%1ٱ"}, -- hyphen + initial alif without hamza 174 {a="([uai]%-)([uai])", b="%1ٱ"}, -- hyphen + initial alif without hamza
175 {a="^([uai])", b="ٱ"}, -- initial alif without hamza 175 {a="([%_]?[uaiUAIY])(%s)([uai])", b="%1%2ٱ"}, -- initial alif without hamza
176 {a="(%s)([uai])", b="%1ٱ"}, -- initial alif without hamza 176 {a="^([uai])", b="ا%1"}, -- initial alif without hamza
177 {a="(%s)([uai])", b="%1ا%2"}, -- initial alif without hamza
177 {a="%-%-", b="ـ"}, 178 {a="%-%-", b="ـ"},
178 {a="ؤؤ", b="ؤّ"}, 179 {a="ؤؤ", b="ؤّ"},
179 {a="أأ", b="أّ"}, 180 {a="أأ", b="أّ"},
diff --git a/arabluatex_trans.lua b/arabluatex_trans.lua
index 1e2d89a..f7274c1 100644
--- a/arabluatex_trans.lua
+++ b/arabluatex_trans.lua
@@ -153,9 +153,17 @@ tanwintrdmg = {
153} 153}
154 154
155digraphstrdmg = { 155digraphstrdmg = {
156 {a="(%-)([uai])", b="%1'"}, -- hyphen + initial alif without hamza 156 {a="([uai]%-)([uai])", b="%1'"}, -- hyphen + initial alif without hamza
157 {a="^([uai])", b="%1"}, -- initial alif without hamza 157 {a="^([uai])", b="%1"}, -- initial alif without hamza
158 {a="(%s)([uai])", b="%1'"}, -- initial alif without hamza 158-- {a="([%_]?[uaiUAIY])(%s)([uai])", b="%1%2'"}, -- initial alif without hamza
159 {a="([^%_][uai])(%s)([uai])", b="%1%2'"},
160 {a="([%_]?[AYa])(%s)([uai])", b="a%2'"},
161 {a="([%_]?[Uu])(%s)([uai])", b="u%2'"},
162 {a="([%_]?[Ii])(%s)([uai])", b="i%2'"},
163 -- shorten long vowels preceding ʾalif conjunctionis
164 {a="([%_]?[AYa])(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="a%2%3"},
165 {a="([%_]?[Uu])(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="u%2%3"},
166 {a="([%_]?[Ii])(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="i%2%3"},
159 {a="%-%-", b=""}, 167 {a="%-%-", b=""},
160 {a="T([^uai])", b="%1"}, 168 {a="T([^uai])", b="%1"},
161 {a="T(%s)", b="%1"}, 169 {a="T(%s)", b="%1"},
@@ -208,7 +216,7 @@ longvtrdmg = {
208 {a="A", b="ā"}, 216 {a="A", b="ā"},
209 {a="U", b="ū"}, 217 {a="U", b="ū"},
210 {a="I", b="ī"}, 218 {a="I", b="ī"},
211 {a="Y", b="ā"}, 219 {a="Y", b="ā"}
212} 220}
213 221
214shortvtrdmg = { 222shortvtrdmg = {