aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--arabluatex.dtx26
-rw-r--r--arabluatex_fullvoc.lua24
-rw-r--r--arabluatex_novoc.lua14
-rw-r--r--arabluatex_voc.lua28
4 files changed, 57 insertions, 35 deletions
diff --git a/arabluatex.dtx b/arabluatex.dtx
index 5788d62..c13d563 100644
--- a/arabluatex.dtx
+++ b/arabluatex.dtx
@@ -1514,8 +1514,8 @@ vowels (see §~3).
1514% \begin{quote} 1514% \begin{quote}
1515% |wa-"ust"u`mila| \arb[novoc]{wa-"ust"u`mila} 1515% |wa-"ust"u`mila| \arb[novoc]{wa-"ust"u`mila}
1516% \arb[trans]{wa-"ust"u`mila}, |huwa| |"inhazama| \arb[novoc]{huwa 1516% \arb[trans]{wa-"ust"u`mila}, |huwa| |"inhazama| \arb[novoc]{huwa
1517% "inhazama} \arb[trans]{huwa "inhazama}, |al-"intiqA.du| 1517% "inhazama} \arb[trans]{huwa "inhazama}, |al-"intiqA.d-u|
1518% \arb[novoc]{al-"intiqA.du} \arb[trans]{al-"intiqA.du}. 1518% \arb[novoc]{al-"intiqA.d-u} \arb[trans]{al-"intiqA.d-u}.
1519% \end{quote} 1519% \end{quote}
1520% \end{compactenum} 1520% \end{compactenum}
1521% 1521%
@@ -2698,6 +2698,7 @@ wa-ya.sIru ta.hta 'l-jild-i
2698\RequirePackage{luacode} 2698\RequirePackage{luacode}
2699\RequirePackage{xparse} 2699\RequirePackage{xparse}
2700\RequirePackage{environ} 2700\RequirePackage{environ}
2701\RequirePackage{xkeyval}
2701% \end{macrocode} 2702% \end{macrocode}
2702% The following boolean will be set to |true| in |RL| mode: 2703% The following boolean will be set to |true| in |RL| mode:
2703% \begin{macrocode} 2704% \begin{macrocode}
@@ -2964,6 +2965,27 @@ wa-ya.sIru ta.hta 'l-jild-i
2964 \else \fi\fi\fi\fi}[\par] 2965 \else \fi\fi\fi\fi}[\par]
2965% \end{macrocode} 2966% \end{macrocode}
2966% \end{environment} 2967% \end{environment}
2968% \begin{environment}{arbverse}
2969% \changes{v1.6}{2016/11/30}{New environment \texttt{arbverse} for
2970% typesetting Arabic poetry} The environment |arbverse| shall
2971% receive different options. Let us define them first.
2972% \begin{macrocode}
2973\newlength{\al@bayt@width}
2974\setlength{\al@bayt@width}{.3\textwidth}
2975\define@key[al]{verse}{width}{\setlength{\al@bayt@width}{#1}}
2976\define@key[al]{verse}{metre}{#1}
2977\define@boolkey[al]{verse}{utf}[true]{}
2978\define@choicekey[al]{verse}{mode}{fullvoc, voc, novoc,
2979 trans}{\def\al@mode{#1}}
2980\presetkeys[al]{verse}{utf=false}{}
2981\NewDocumentEnvironment{arbverse}{O{} O{}}%
2982{\par\bgroup\setkeys[al]{verse}[metre]{#1}%
2983 \ifx\al@mode\al@mode@trans%
2984 \ifal@verse@utf\setRL\else\setLR\fi%
2985 \else\setRL\fi%
2986}{\\\setkeys[al]{verse}[width,utf,mode]{#1}\egroup\par}
2987% \end{macrocode}
2988% \end{environment}
2967% \begin{macro}{\abjad} \cs{abjad}\marg{number} expresses its argument 2989% \begin{macro}{\abjad} \cs{abjad}\marg{number} expresses its argument
2968% in Arabic letters in accordance with the \arb[trans]{'abjad} 2990% in Arabic letters in accordance with the \arb[trans]{'abjad}
2969% arrangement of the alphabet. \meta{number} must be between 1 and 2991% arrangement of the alphabet. \meta{number} must be between 1 and
diff --git a/arabluatex_fullvoc.lua b/arabluatex_fullvoc.lua
index 898aecd..22c3ac4 100644
--- a/arabluatex_fullvoc.lua
+++ b/arabluatex_fullvoc.lua
@@ -293,24 +293,24 @@ tanwinfveasy = { -- no assimilations (see below)
293trigraphsfv = { -- trigraphs or more 293trigraphsfv = { -- trigraphs or more
294 -- 'llatI / 'llad_I 294 -- 'llatI / 'llad_I
295 {a="^'ll(a)([%_]?[dt])", b="ٱلّ%1%2"}, 295 {a="^'ll(a)([%_]?[dt])", b="ٱلّ%1%2"},
296 {a="([%s%-])'ll(a)([%_]?[dt])", b="%1ٱلّ%2%3"}, 296 {a="([%p%s%-])'ll(a)([%_]?[dt])", b="%1ٱلّ%2%3"}, --p
297 -- al- + lām 297 -- al- + lām
298 {a="^(a)l%-(l)", b="ا%1ل%2%2"}, 298 {a="^(a)l%-(l)", b="ا%1ل%2%2"},
299 {a="([%s%-])(a)l%-(l)", b="%1ا%2ل%3%3"}, 299 {a="([%p%s%-])(a)l%-(l)", b="%1ا%2ل%3%3"}, --p
300 -- al- + solar consonant 300 -- al- + solar consonant
301 {a="^(a)l%-([%_%^%.]?[tdrzsn])", b="ا%1ل%2%2"}, 301 {a="^(a)l%-([%_%^%.]?[tdrzsn])", b="ا%1ل%2%2"},
302 {a="([%s%-])(a)l%-([%_%^%.]?[tdrzsn])", b="%1ا%2ل%3%3"}, 302 {a="([%p%s%-])(a)l%-([%_%^%.]?[tdrzsn])", b="%1ا%2ل%3%3"}, --p
303 -- assim. art. + solar consonant 303 -- assim. art. + solar consonant
304 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل%2"}, 304 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل%2"},
305 {a="([%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل%3"}, 305 {a="([%p%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل%3"}, --p
306 -- al- + initial unstable hamza 306 -- al- + initial unstable hamza
307 {a="^(a)l%-(\"?[uai])", b="ا%1ل%2ٱ"}, 307 {a="^(a)l%-(\"?[uai])", b="ا%1ل%2ٱ"},
308 {a="([%s%-])(a)l%-(\"?[uai])", b="%1ا%2ل%3ٱ"}, 308 {a="([%p%s%-])(a)l%-(\"?[uai])", b="%1ا%2ل%3ٱ"}, --p
309 -- li-/la + art. + initial unstable hamza is a special orthography 309 -- li-/la + art. + initial unstable hamza is a special orthography
310 {a="l([ai])%-l%-(\"?[uai])", b="ل%1ل%2ٱ"}, 310 {a="l([ai])%-l%-(\"?[uai])", b="ل%1ل%2ٱ"},
311 -- al- + lunar consonant (i.e. what remains) 311 -- al- + lunar consonant (i.e. what remains)
312 {a="^(a)l%-", b="ا%1لْ"}, 312 {a="^(a)l%-", b="ا%1لْ"},
313 {a="([%s%-])(a)l%-", b="%1ا%2لْ"}, 313 {a="([%p%s%-])(a)l%-", b="%1ا%2لْ"}, --p
314 -- diphthongs to be resolved before ʾalif conjunctionis 314 -- diphthongs to be resolved before ʾalif conjunctionis
315 {a="(aW)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="awuا%2%3"}, 315 {a="(aW)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="awuا%2%3"},
316 {a="(aw)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1u%2%3"}, 316 {a="(aw)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1u%2%3"},
@@ -350,24 +350,24 @@ trigraphsfv = { -- trigraphs or more
350trigraphsfveasy = { -- trigraphs or more (see 'easy' tag below for the diffs) 350trigraphsfveasy = { -- trigraphs or more (see 'easy' tag below for the diffs)
351 -- 'llatI / 'llad_I 351 -- 'llatI / 'llad_I
352 {a="^'ll(a)([%_]?[dt])", b="ٱلّ%1%2"}, 352 {a="^'ll(a)([%_]?[dt])", b="ٱلّ%1%2"},
353 {a="([%s%-])'ll(a)([%_]?[dt])", b="%1ٱلّ%2%3"}, 353 {a="([%p%s%-])'ll(a)([%_]?[dt])", b="%1ٱلّ%2%3"}, --p
354 -- al- + lām 354 -- al- + lām
355 {a="^(a)l%-(l)", b="ا%1ل%2%2"}, 355 {a="^(a)l%-(l)", b="ا%1ل%2%2"},
356 {a="([%s%-])(a)l%-(l)", b="%1ا%2ل%3%3"}, 356 {a="([%p%s%-])(a)l%-(l)", b="%1ا%2ل%3%3"}, --p
357 -- al- + solar consonant 357 -- al- + solar consonant
358 {a="^(a)l%-([%_%^%.]?[tdrzsn])", b="ا%1ل%2%2"}, 358 {a="^(a)l%-([%_%^%.]?[tdrzsn])", b="ا%1ل%2%2"},
359 {a="([%s%-])(a)l%-([%_%^%.]?[tdrzsn])", b="%1ا%2ل%3%3"}, 359 {a="([%p%s%-])(a)l%-([%_%^%.]?[tdrzsn])", b="%1ا%2ل%3%3"}, --p
360 -- assim. art. + solar consonant 360 -- assim. art. + solar consonant
361 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل%2"}, 361 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل%2"},
362 {a="([%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل%3"}, 362 {a="([%p%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل%3"}, --p
363 -- al- + initial unstable hamza 363 -- al- + initial unstable hamza
364 {a="^(a)l%-(\"?[uai])", b="ا%1ل%2ٱ"}, 364 {a="^(a)l%-(\"?[uai])", b="ا%1ل%2ٱ"},
365 {a="([%s%-])(a)l%-(\"?[uai])", b="%1ا%2ل%3ٱ"}, 365 {a="([%p%s%-])(a)l%-(\"?[uai])", b="%1ا%2ل%3ٱ"}, --p
366 -- li-/la + art. + initial unstable hamza is a special orthography 366 -- li-/la + art. + initial unstable hamza is a special orthography
367 {a="l([ai])%-l%-(\"?[uai])", b="ل%1ل%2ٱ"}, 367 {a="l([ai])%-l%-(\"?[uai])", b="ل%1ل%2ٱ"},
368 -- al- + lunar consonant (i.e. what remains) 368 -- al- + lunar consonant (i.e. what remains)
369 {a="^(a)l%-", b="ا%1لْ"}, 369 {a="^(a)l%-", b="ا%1لْ"},
370 {a="([%s%-])(a)l%-", b="%1ا%2لْ"}, 370 {a="([%p%s%-])(a)l%-", b="%1ا%2لْ"}, --p
371 -- diphthongs to be resolved before ʾalif conjunctionis 371 -- diphthongs to be resolved before ʾalif conjunctionis
372 {a="(aW)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="awuا%2%3"}, 372 {a="(aW)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="awuا%2%3"},
373 {a="(aw)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1u%2%3"}, 373 {a="(aw)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1u%2%3"},
diff --git a/arabluatex_novoc.lua b/arabluatex_novoc.lua
index f069f5a..b88eaf2 100644
--- a/arabluatex_novoc.lua
+++ b/arabluatex_novoc.lua
@@ -64,27 +64,27 @@ trigraphsnv = { -- trigraphs or more
64 {a="l%-l_ah", b="l-ll_ah"}, 64 {a="l%-l_ah", b="l-ll_ah"},
65 -- 'llatI / 'llad_I 65 -- 'llatI / 'llad_I
66 {a="^'ll(a)([%_]?[dt])", b="ال%1%2"}, 66 {a="^'ll(a)([%_]?[dt])", b="ال%1%2"},
67 {a="([%s%-])'ll(a)([%_]?[dt])", b="%1ال%2%3"}, 67 {a="([%p%s%-])'ll(a)([%_]?[dt])", b="%1ال%2%3"}, --p
68 -- al- + lām 68 -- al- + lām
69 {a="^(a)l%-(l)", b="ا%1ل%2"}, 69 {a="^(a)l%-(l)", b="ا%1ل%2"},
70 {a="([%s%-])(a)l%-(l)", b="%1ا%2ل%3"}, 70 {a="([%p%s%-])(a)l%-(l)", b="%1ا%2ل%3"}, --p
71 -- al- + solar consonant 71 -- al- + solar consonant
72 {a="^(a)l%-([%_%^%.]?[tdrzsn])", b="ا%1ل%2"}, 72 {a="^(a)l%-([%_%^%.]?[tdrzsn])", b="ا%1ل%2"},
73 {a="([%s%-])(a)l%-([%_%^%.]?[tdrzsn])", b="%1ا%2ل%3"}, 73 {a="([%p%s%-])(a)l%-([%_%^%.]?[tdrzsn])", b="%1ا%2ل%3"}, --p
74 -- assim. art. + solar consonant 74 -- assim. art. + solar consonant
75 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل"}, 75 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل"},
76 {a="([%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل"}, 76 {a="([%p%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل"}, --p
77 -- al- + initial unstable hamza 77 -- al- + initial unstable hamza
78 {a="^(a)l%-(\")([uai])", b="ا%1لٱ%3"}, 78 {a="^(a)l%-(\")([uai])", b="ا%1لٱ%3"},
79 {a="([%s%-])(a)l%-(\")([uai])", b="%1ا%2لٱ%4"}, 79 {a="([%p%s%-])(a)l%-(\")([uai])", b="%1ا%2لٱ%4"}, --p
80 {a="^(a)l%-([uai])", b="ا%1لا%2"}, 80 {a="^(a)l%-([uai])", b="ا%1لا%2"},
81 {a="([%s%-])(a)l%-([uai])", b="%1ا%2لا%3"}, 81 {a="([%p%s%-])(a)l%-([uai])", b="%1ا%2لا%3"}, --p
82 -- li-/la- + art. + initial unstable hamza is a special orthography 82 -- li-/la- + art. + initial unstable hamza is a special orthography
83 {a="l([ai])%-l%-(\")([uai])", b="ل%1لٱ%3"}, 83 {a="l([ai])%-l%-(\")([uai])", b="ل%1لٱ%3"},
84 {a="l([ai])%-l%-([uai])", b="ل%1لا%2"}, 84 {a="l([ai])%-l%-([uai])", b="ل%1لا%2"},
85 -- al- + lunar consonant (i.e. what remains) 85 -- al- + lunar consonant (i.e. what remains)
86 {a="^(a)l%-", b="ا%1ل"}, 86 {a="^(a)l%-", b="ا%1ل"},
87 {a="([%s%-])(a)l%-", b="%1ا%2ل"}, 87 {a="([%p%s%-])(a)l%-", b="%1ا%2ل"}, --p
88 -- art. with waṣla + lām 88 -- art. with waṣla + lām
89 {a="'l%-(l)", b="ال%1"}, 89 {a="'l%-(l)", b="ال%1"},
90 -- art. with waṣla + solar consonant 90 -- art. with waṣla + solar consonant
diff --git a/arabluatex_voc.lua b/arabluatex_voc.lua
index ddd8fda..fb704ea 100644
--- a/arabluatex_voc.lua
+++ b/arabluatex_voc.lua
@@ -415,27 +415,27 @@ tanwineasy = { -- 'easy' requires some lines to be taken out:
415trigraphs = { -- trigraphs or more 415trigraphs = { -- trigraphs or more
416 -- 'llatI / 'llad_I 416 -- 'llatI / 'llad_I
417 {a="^'ll(a)([%_]?[dt])", b="الّ%1%2"}, 417 {a="^'ll(a)([%_]?[dt])", b="الّ%1%2"},
418 {a="([%s%-])'ll(a)([%_]?[dt])", b="%1الّ%2%3"}, 418 {a="([%p%s%-])'ll(a)([%_]?[dt])", b="%1الّ%2%3"}, --p
419 -- al- + lām 419 -- al- + lām
420 {a="^(a)l%-(l)", b="ا%1ل%2%2"}, 420 {a="^(a)l%-(l)", b="ا%1ل%2%2"},
421 {a="([%s%-])(a)l%-(l)", b="%1ا%2ل%3%3"}, 421 {a="([%p%s%-])(a)l%-(l)", b="%1ا%2ل%3%3"}, --p
422 -- al- + solar consonant 422 -- al- + solar consonant
423 {a="^(a)l%-([%_%^%.]?[tdrzsn])", b="ا%1ل%2%2"}, 423 {a="^(a)l%-([%_%^%.]?[tdrzsn])", b="ا%1ل%2%2"},
424 {a="([%s%-])(a)l%-([%_%^%.]?[tdrzsn])", b="%1ا%2ل%3%3"}, 424 {a="([%p%s%-])(a)l%-([%_%^%.]?[tdrzsn])", b="%1ا%2ل%3%3"}, --p
425 -- assim. art. + solar consonant 425 -- assim. art. + solar consonant
426 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل%2"}, 426 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل%2"},
427 {a="([%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل%3"}, 427 {a="([%p%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل%3"}, --p
428 -- al- + initial unstable hamza 428 -- al- + initial unstable hamza
429 {a="^(a)l%-(\")([uai])", b="ا%1ل%3ٱ"}, 429 {a="^(a)l%-(\")([uai])", b="ا%1ل%3ٱ"},
430 {a="([%s%-])(a)l%-(\")([uai])", b="%1ا%2ل%4ٱ"}, 430 {a="([%p%s%-])(a)l%-(\")([uai])", b="%1ا%2ل%4ٱ"}, --p
431 {a="^(a)l%-([uai])", b="ا%1ل%2ا"}, 431 {a="^(a)l%-([uai])", b="ا%1ل%2ا"},
432 {a="([%s%-])(a)l%-([uai])", b="%1ا%2ل%3ا"}, 432 {a="([%p%s%-])(a)l%-([uai])", b="%1ا%2ل%3ا"}, --p
433 -- li-/la- + art. + initial unstable hamza is a special orthography 433 -- li-/la- + art. + initial unstable hamza is a special orthography
434 {a="l([ai])%-l%-(\")([uai])", b="ل%1ل%3ٱ"}, 434 {a="l([ai])%-l%-(\")([uai])", b="ل%1ل%3ٱ"},
435 {a="l([ai])%-l%-([uai])", b="ل%1ل%2ا"}, 435 {a="l([ai])%-l%-([uai])", b="ل%1ل%2ا"},
436 -- al- + lunar consonant (i.e. what remains) 436 -- al- + lunar consonant (i.e. what remains)
437 {a="^(a)l%-", b="ا%1ل"}, 437 {a="^(a)l%-", b="ا%1ل"},
438 {a="([%s%-])(a)l%-", b="%1ا%2ل"}, 438 {a="([%p%s%-])(a)l%-", b="%1ا%2ل"}, --p
439 -- diphthongs to be resolved before ʾalif conjunctionis 439 -- diphthongs to be resolved before ʾalif conjunctionis
440 {a="(aW)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="awuا%2%3"}, 440 {a="(aW)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="awuا%2%3"},
441 {a="(aw)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1u%2%3"}, 441 {a="(aw)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1u%2%3"},
@@ -480,27 +480,27 @@ trigraphseasy = { -- differences marked below with 'easy'
480 {a="l%-l_ah", b="l-ll_ah"}, 480 {a="l%-l_ah", b="l-ll_ah"},
481 -- 'llatI / 'llad_I 481 -- 'llatI / 'llad_I
482 {a="^'ll(a)([%_]?[dt])", b="الّ%1%2"}, 482 {a="^'ll(a)([%_]?[dt])", b="الّ%1%2"},
483 {a="([%s%-])'ll(a)([%_]?[dt])", b="%1الّ%2%3"}, 483 {a="([%p%s%-])'ll(a)([%_]?[dt])", b="%1الّ%2%3"}, --p
484 -- al- + lām (easy) 484 -- al- + lām (easy)
485 {a="^(a)l%-(l)", b="ا%1ل%2"}, 485 {a="^(a)l%-(l)", b="ا%1ل%2"},
486 {a="([%s%-])(a)l%-(l)", b="%1ا%2ل%3"}, 486 {a="([%p%s%-])(a)l%-(l)", b="%1ا%2ل%3"}, --p
487 -- al- + solar consonant (easy) 487 -- al- + solar consonant (easy)
488 {a="^(a)l%-([%_%^%.]?[tdrzsn])", b="ا%1ل%2"}, 488 {a="^(a)l%-([%_%^%.]?[tdrzsn])", b="ا%1ل%2"},
489 {a="([%s%-])(a)l%-([%_%^%.]?[tdrzsn])", b="%1ا%2ل%3"}, 489 {a="([%p%s%-])(a)l%-([%_%^%.]?[tdrzsn])", b="%1ا%2ل%3"}, --p
490 -- assim. art. + solar consonant (easy) 490 -- assim. art. + solar consonant (easy)
491 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل"}, 491 {a="^(a)([%_%^%.]?[tdrzsn])%-", b="ا%1ل"},
492 {a="([%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل"}, 492 {a="([%p%s%-])(a)([%_%^%.]?[tdrzsn])%-", b="%1ا%2ل"}, --p
493 -- al- + initial unstable hamza 493 -- al- + initial unstable hamza
494 {a="^(a)l%-(\")([uai])", b="ا%1ل%3ٱ"}, 494 {a="^(a)l%-(\")([uai])", b="ا%1ل%3ٱ"},
495 {a="([%s%-])(a)l%-(\")([uai])", b="%1ا%2ل%4ٱ"}, 495 {a="([%p%s%-])(a)l%-(\")([uai])", b="%1ا%2ل%4ٱ"}, --p
496 {a="^(a)l%-([uai])", b="ا%1ل%2ا"}, 496 {a="^(a)l%-([uai])", b="ا%1ل%2ا"},
497 {a="([%s%-])(a)l%-([uai])", b="%1ا%2ل%3ا"}, 497 {a="([%p%s%-])(a)l%-([uai])", b="%1ا%2ل%3ا"}, --p
498 -- li-/la- + art. + initial unstable hamza is a special orthography 498 -- li-/la- + art. + initial unstable hamza is a special orthography
499 {a="l([ai])%-l%-(\")([uai])", b="ل%1ل%3ٱ"}, 499 {a="l([ai])%-l%-(\")([uai])", b="ل%1ل%3ٱ"},
500 {a="l([ai])%-l%-([uai])", b="ل%1ل%2ا"}, 500 {a="l([ai])%-l%-([uai])", b="ل%1ل%2ا"},
501 -- al- + lunar consonant (i.e. what remains) 501 -- al- + lunar consonant (i.e. what remains)
502 {a="^(a)l%-", b="ا%1ل"}, 502 {a="^(a)l%-", b="ا%1ل"},
503 {a="([%s%-])(a)l%-", b="%1ا%2ل"}, 503 {a="([%p%s%-])(a)l%-", b="%1ا%2ل"}, --p
504 -- diphthongs to be resolved before ʾalif conjunctionis 504 -- diphthongs to be resolved before ʾalif conjunctionis
505 {a="(aW)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="awuا%2%3"}, 505 {a="(aW)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="awuا%2%3"},
506 {a="(aw)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1u%2%3"}, 506 {a="(aw)(%s)(['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="%1u%2%3"},