aboutsummaryrefslogtreecommitdiff
path: root/arabluatex_fullvoc.lua
diff options
context:
space:
mode:
Diffstat (limited to 'arabluatex_fullvoc.lua')
-rw-r--r--arabluatex_fullvoc.lua24
1 files changed, 19 insertions, 5 deletions
diff --git a/arabluatex_fullvoc.lua b/arabluatex_fullvoc.lua
index 23f640b..a56a33f 100644
--- a/arabluatex_fullvoc.lua
+++ b/arabluatex_fullvoc.lua
@@ -24,6 +24,13 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
24 24
25-- this is new 25-- this is new
26hamzafv = { 26hamzafv = {
27 -- hard coded hamza
28 {a="|\"'", b="ء"},
29 {a="A\"'", b="آ"},
30 {a="[au]\"'", b="أ"},
31 {a="w\"'", b="ؤ"},
32 {a="i\"'", b="إ"},
33 {a="y\"'", b="ئ"},
27 -- initial long u 34 -- initial long u
28 {a="%'%_U", b="أU"}, 35 {a="%'%_U", b="أU"},
29 -- madda (historic writing below) 36 -- madda (historic writing below)
@@ -38,12 +45,19 @@ hamzafv = {
38 {a="(%W)(')([ua])", b="%1أ%3"}, 45 {a="(%W)(')([ua])", b="%1أ%3"},
39 {a="(%W)(')(i)", b="%1إ%3"}, 46 {a="(%W)(')(i)", b="%1إ%3"},
40 -- final 47 -- final
41 {a="([Iy])(')(aN)$", b="%1ئ%3"}, 48-- {a="([Iy])(')(aN)$", b="%1ئ%3"},
42 {a="([Iy])(')(aN)(%W)", b="%1ئ%3%4"}, 49-- {a="([Iy])(')(aN)(%W)", b="%1ئ%3%4"},
50-- {a="([^uai])(')([uai]N?)$", b="%1ء%3"},
51-- {a="([^uai])(')([uai]N?)(%W)", b="%1ء%3%4"},
52-- {a="([UI])(')([uai])$", b="%1ء%3"},
53-- {a="([UI])(')([uai])(%W)", b="%1ء%3%4"},
54-- {a="([UI])(')([uai]N?)$", b="%1ء%3"},
55-- {a="([UI])(')([uai]N?)(%W)", b="%1ء%3%4"},
56 -- ^say'aN and .zim'aN are special orthographies
57 {a="(%^say)(%')(aN)", b="%1ئ%3"},
58 {a="(.zim)(%')(aN)", b="%1ئ%3"},
43 {a="([^uai])(')([uai]N?)$", b="%1ء%3"}, 59 {a="([^uai])(')([uai]N?)$", b="%1ء%3"},
44 {a="([^uai])(')([uai]N?)(%W)", b="%1ء%3%4"}, 60 {a="([^uai])(')([uai]N?)(%W)", b="%1ء%3%4"},
45 {a="([UI])(')([uai])$", b="%1ء%3"},
46 {a="([UI])(')([uai])(%W)", b="%1ء%3%4"},
47 -- middle 61 -- middle
48 {a="(U)(')", b="%1ء"}, 62 {a="(U)(')", b="%1ء"},
49 {a="([Iy])(')", b="%1ئ"}, 63 {a="([Iy])(')", b="%1ئ"},