aboutsummaryrefslogtreecommitdiff
path: root/arabluatex_novoc.lua
diff options
context:
space:
mode:
Diffstat (limited to 'arabluatex_novoc.lua')
-rw-r--r--arabluatex_novoc.lua26
1 files changed, 24 insertions, 2 deletions
diff --git a/arabluatex_novoc.lua b/arabluatex_novoc.lua
index 9aa141e..8a5a7ed 100644
--- a/arabluatex_novoc.lua
+++ b/arabluatex_novoc.lua
@@ -38,9 +38,12 @@ trigraphsnv = { -- trigraphs or more
38 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل"}, 38 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل"},
39 {a="([%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل"}, 39 {a="([%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل"},
40 -- al- + initial unstable hamza 40 -- al- + initial unstable hamza
41 {a="^(a)l%-(\")([uai])", b="ا%1لٱ%3"},
42 {a="([%s%-])(a)l%-(\")([uai])", b="%1ا%2لٱ%4"},
41 {a="^(a)l%-([uai])", b="ا%1لا%2"}, 43 {a="^(a)l%-([uai])", b="ا%1لا%2"},
42 {a="([%s%-])(a)l%-([uai])", b="%1ا%2لا%3"}, 44 {a="([%s%-])(a)l%-([uai])", b="%1ا%2لا%3"},
43 -- li-/la- + art. + initial unstable hamza is a special orthography 45 -- li-/la- + art. + initial unstable hamza is a special orthography
46 {a="l([ai])%-l%-(\")([uai])", b="ل%1لٱ%3"},
44 {a="l([ai])%-l%-([uai])", b="ل%1لا%2"}, 47 {a="l([ai])%-l%-([uai])", b="ل%1لا%2"},
45 -- al- + lunar consonant (i.e. what remains) 48 -- al- + lunar consonant (i.e. what remains)
46 {a="^(a)l%-", b="ا%1ل"}, 49 {a="^(a)l%-", b="ا%1ل"},
@@ -58,6 +61,7 @@ trigraphsnv = { -- trigraphs or more
58 -- li-/la + assim. art. + solar consonant is a special orthography 61 -- li-/la + assim. art. + solar consonant is a special orthography
59 {a="l([ai])%-([%_%^%.]?[tdrzsn])%-([%_%^%.]?[tdrzsn])", b="ل%1ل%3"}, 62 {a="l([ai])%-([%_%^%.]?[tdrzsn])%-([%_%^%.]?[tdrzsn])", b="ل%1ل%3"},
60 -- art. with waṣla + initial unstable hamza 63 -- art. with waṣla + initial unstable hamza
64 {a="'l%-(\")([uai])", b="الٱ%2"},
61 {a="'l%-([uai])", b="الا%1"}, 65 {a="'l%-([uai])", b="الا%1"},
62 -- art. with waṣla + lunar consonant (i.e. what remains) 66 -- art. with waṣla + lunar consonant (i.e. what remains)
63 {a="'l%-", b="ال"}, 67 {a="'l%-", b="ال"},
@@ -86,7 +90,17 @@ tanwinnv = {
86-- {a="(ء)(aN)(%s)([rlmnwy])", b="%1%3%4%4"}, 90-- {a="(ء)(aN)(%s)([rlmnwy])", b="%1%3%4%4"},
87-- {a="([^TA])(aN)(%s)([rlmnwy])", b="%1ا%3%4%4"}, 91-- {a="([^TA])(aN)(%s)([rlmnwy])", b="%1ا%3%4%4"},
88-- {a="(iN)(%s)([rlmnwy])", b="|%2%3%3"}, 92-- {a="(iN)(%s)([rlmnwy])", b="|%2%3%3"},
89 --assimilations (end) 93 -- assimilations (end)
94 -- "quoted" tanwīn (begin)
95 {a="(\"uN)", b="ٌ"},
96 {a="(B)(\"aN)", b="%1ً"},
97 {a="(\"aN)(_A)", b="ًى"},
98 {a="(\"aN)(Y)", b="ًى"},
99 {a="(T)(\"aN)", b="%1ً"},
100 {a="(ء)(\"aN)", b="%1ً"},
101 {a="([^TA])(\"aN)", b="%1ًا"},
102 {a="(\"iN)", b="ٍ"},
103 -- "quoted" tanwīn (end)
90 {a="(uN)", b=""}, 104 {a="(uN)", b=""},
91 {a="(B)(aN)", b="%1"}, 105 {a="(B)(aN)", b="%1"},
92 {a="(aN)(_A)", b="ى"}, 106 {a="(aN)(_A)", b="ى"},
@@ -94,10 +108,18 @@ tanwinnv = {
94 {a="(T)(aN)", b="%1"}, 108 {a="(T)(aN)", b="%1"},
95 {a="(ء)(aN)", b="%1"}, 109 {a="(ء)(aN)", b="%1"},
96 {a="([^TA])(aN)", b="%1ا"}, 110 {a="([^TA])(aN)", b="%1ا"},
97 {a="(iN)", b=""} 111 {a="(iN)", b=""},
112 -- initial straight double quote gives a connective ʾalif. This has
113 -- nothing to do with the tanwīn, but I put it here for time being.
114 {a="^\"", b="ٱ"},
115 {a="([%s%-])\"", b="%1ٱ"}
98} 116}
99 117
100longvnv = { 118longvnv = {
119 {a="\"A", b="َا"},
120 {a="\"U", b="ُو"},
121 {a="\"I", b="ِي"},
122 {a="\"Y", b="aى"},
101 {a="A", b="ا"}, 123 {a="A", b="ا"},
102 {a="U", b="و"}, 124 {a="U", b="و"},
103 {a="I", b="ي"}, 125 {a="I", b="ي"},