Module:anui-pron

The following documentation is located at Module:anui-pron/doc.^[edit]

Useful links: subpage list • links • transclusions • testcases • sandbox

---

local sub = mw.ustring.sub
local find = mw.ustring.find
local gmatch = mw.ustring.gmatch
local gsub = mw.ustring.gsub
local u = mw.ustring.char
local split = mw.text.split
local gsplit = mw.text.gsplit

-- To avoid weird annoying cursor behavior
local TILDE, NASAL = u(0x0303), u(0x0303) -- COMBINING TILDE ̃◌
local TILDEBELOW, CREAKY = u(0x0330), u(0x0330) -- COMBINING TILDE BELOW ̰◌
local GRAVE = u(0x0300) -- COMBINING GRAVE ACCENT ̀◌
local HIGHFALL = "˥˦"
local SYLLABIC = u(0x0329) -- COMBINING VERTICAL LINE BELOW ̩◌
local SYLLABICA = u(0x030D) -- COMBINING VERTICAL LINE ABOVE ̍◌
local INTERDENTAL = u(0x032A) .. u(0x0346) -- COMBINING BRIDGE BELOW AND ABOVE ̪͆◌
local VOICELESS = u(0x0325) -- COMBINING RING BELOW ̥◌

local back_vowel = "uɯɔɑ"
local front_vowel = "iea"
local vowel = "[" .. back_vowel .. front_vowel .. "]"
local nasal_vowel = {["a"] = "ã", ["i"] = "ĩ", ["o"] = "õ", ["u"] = "ᴍ"}

local function oral_to_nasal(s)
	local switcheroo = {["a"] = "ã", ["i"] = "ĩ", ["o"] = "õ", ["u"] = "ᴍ"}
	return switcheroo[s]
end

local export = {}

local rules = {
	{"ʇ", "ǀ"}, {"o", "ɔ"}, {"ṭ", "ʈ"}, {"j", "ɟ"}, {"ñ", "ɲ"},
	{"([ḛḭṵ])", {["ḛ"] = "è", ["ḭ"] = "ì", ["ṵ"] = "ù"}}, {"([ao])" .. TILDEBELOW, mw.ustring.toNFC("%1" .. GRAVE)},
	{"([uùm]ʼ?)m", "%1ᴍ"}, {"m(ʼᴍ)", "ᴍ%1"}, -- tell apart between regular and syllabic <m>
	{vowel .. vowel, {["aa"] = "aː˧", ["ee"] = "eː˧", ["ii"] = "iː˧", ["ɔɔ"] = "ɔː˧", ["uu"] = "uː˧",}},
	{"(" .. vowel .. ")" .. oral_to_nasal("%1"), "%1ː" .. HIGHFALL},
	
}

function export.crux(term)
	term=mw.ustring.lower(term)
	
	for _, rule in ipairs(rules) do
		term = gsub(term, rule[1], rule[2])
	end
	
	return term
end

return export