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_fullvoc.lua | 24 +++++++++++++++++++----- 1 file changed, 19 insertions(+), 5 deletions(-) (limited to 'arabluatex_fullvoc.lua') 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 -- this is new hamzafv = { + -- 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) @@ -38,12 +45,19 @@ hamzafv = { {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="(.zim)(%')(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ئ"}, -- cgit v1.2.3