From aa77502f233279912aedd1cec332ff0581763edc Mon Sep 17 00:00:00 2001 From: Robert Alessi Date: Thu, 3 Mar 2016 12:28:29 +0100 Subject: corrected final hamza; added quoting before hamza --- arabluatex_voc.lua | 25 ++++++++++++++++++++----- 1 file changed, 20 insertions(+), 5 deletions(-) (limited to 'arabluatex_voc.lua') diff --git a/arabluatex_voc.lua b/arabluatex_voc.lua index face931..1dc7a0c 100644 --- a/arabluatex_voc.lua +++ b/arabluatex_voc.lua @@ -65,6 +65,13 @@ raw = { } hamza = { + -- hard coded hamza + {a="|\"'", b="ء"}, + {a="A\"'", b="آ"}, + {a="[au]\"'", b="أ"}, + {a="w\"'", b="ؤ"}, + {a="i\"'", b="إ"}, + {a="y\"'", b="ئ"}, -- initial long u {a="%'%_U", b="أU"}, -- madda (historic writing below) @@ -79,12 +86,19 @@ hamza = { {a="(%W)(')([ua])", b="%1أ%3"}, {a="(%W)(')(i)", b="%1إ%3"}, -- final - {a="([Iy])(')(aN)$", b="%1ئ%3"}, - {a="([Iy])(')(aN)(%W)", b="%1ئ%3%4"}, +-- {a="([Iy])(')(aN)$", b="%1ئ%3"}, +-- {a="([Iy])(')(aN)(%W)", b="%1ئ%3%4"}, +-- {a="([^uai])(')([uai]N?)$", b="%1ء%3"}, +-- {a="([^uai])(')([uai]N?)(%W)", b="%1ء%3%4"}, +-- {a="([UI])(')([uai])$", b="%1ء%3"}, +-- {a="([UI])(')([uai])(%W)", b="%1ء%3%4"}, +-- {a="([UI])(')([uai]N?)$", b="%1ء%3"}, +-- {a="([UI])(')([uai]N?)(%W)", b="%1ء%3%4"}, + -- ^say'aN and .zim'aN are special orthographies + {a="(%^say)(%')(aN)", b="%1ئ%3"}, + {a="(.zi?m)(%')(aN)", b="%1ئ%3"}, {a="([^uai])(')([uai]N?)$", b="%1ء%3"}, - {a="([^uai])(')([uai]N?)(%W)", b="%1ء%3%4"}, - {a="([UI])(')([uai])$", b="%1ء%3"}, - {a="([UI])(')([uai])(%W)", b="%1ء%3%4"}, + {a="([^uai])(')([uai]N?)(%W)", b="%1ء%3%4"}, -- middle {a="(U)(')", b="%1ء"}, {a="([Iy])(')", b="%1ئ"}, @@ -149,6 +163,7 @@ tanwin = { {a="(aN)(_A)", b="ًى"}, {a="(aN)(Y)", b="ًى"}, {a="(T)(aN)", b="%1ً"}, + {a="(ء)(aN)", b="%1ً"}, {a="([^TA])(aN)", b="%1ًا"}, {a="iN", b="ٍ"} } -- cgit v1.2.3