Модул:ltc-pron/predict

Документацију овог модула можете да направите на страници Модул:ltc-pron/predict/док

local export = {}

local fully_voiced_initial = {
	[3] = true,
	[7] = true,
	[11] = true,
	[15] = true,
	[17] = true,
	[20] = true,
	[22] = true,
	[25] = true,
	[27] = true,
	[30] = true,
	[33] = true,
}

local partially_voiced_initial = {
	[4] = true,
	[8] = true,
	[12] = true,
	[31] = true,
	[35] = true,
	[36] = true,
	[37] = true,
	[38] = true,
}

local fricativisation_inducing = {
	[2] = true,
	[4] = true,
	[7] = true,
	[8] = true,
	[21] = true,
	[24] = true,
	[28] = true,
	[59] = true,
	[60] = true,
	[66] = true,
	[68] = true,
	[106] = true,
	[108] = true,
	[136] = true,
	[146] = true,
	[148] = true,
}

local m_lenition_inducing = {
	[21] = true,
	[24] = true,
	[59] = true,
	[60] = true,
	[66] = true,
	[68] = true,
	[106] = true,
	[146] = true,
}

local devoicing_outcomes = {
	["b"] = "p",
	["d"] = "t",
	["z"] = "c",
	["g"] = "k",
	["zh"] = "ch",
	["sh"] = "ch",
}

function has(str, index, ...)
	if index ~= 0 then
		str = mw.ustring.sub(str, index, index)
	end
	for i, v in ipairs{...} do
		if str == v then
			return true
		end
	end
	return false
end

local initial_outcomes_cmn = {
	[1] = "b", [2] = "p", [3] = "b", [4] = "m",
	[5] = "d", [6] = "t", [7] = "d", [8] = "n",
	[9] = "zh", [10] = "ch", [11] = "zh", [12] = "n",
	[13] = "z", [14] = "c", [15] = "z", [16] = "s", [17] = "s",
	[18] = "zh", [19] = "ch", [20] = "zh", [21] = "sh", [22] = "s",
	[23] = "zh", [24] = "ch", [25] = "sh", [26] = "sh", [27] = "sh",
	[28] = "g", [29] = "k", [30] = "g", [32] = "h", [33] = "h",
	[31] = "", [34] = "", [35] = "", [36] = "",
	[37] = "l", [38] = "r",
}

local devoicing_initial_cmn = {
	[3] = true,
	[7] = true,
	[11] = true,
	[15] = true,
	[20] = true,
	[25] = true,
	[30] = true,
}

local palatalisation_outcomes_cmn = {
	["g"] = "j",
	["k"] = "q",
	["h"] = "x",
	["z"] = "j",
	["c"] = "q",
	["s"] = "x",
}

local final_simplification_outcomes_cmn = {
	["iou"] = "iu",
	["uei"] = "ui",
	["uen"] = "un",
	["ueng"] = "ong",
}

local rhyme_outcomes_cmn = {
	[1] = "ueng",
	[2] = { "ueng", 3, "iong" },
	[3] = "u",
	[4] = "u",
	[5] = "ueng",
	[6] = "u",
	[7] = { "ueng", 3, "iong" },
	[8] = "u",
	[9] = { "uang", 3, "iang" },
	[10] = { "uo", 3, "üe" },
	[11] = { "er", 3, "i" },
	[12] = { "uei", 2, "uai" },
	[13] = { "er", 3, "i" },
	[14] = { "uei", 2, "uai" },
	[15] = { "er", 3, "i" },
	[16] = { "uei", 2, "uai" },
	[17] = { "er", 3, "i" },
	[18] = { "uei", 2, "uai" },
	[19] = { "er", 3, "i" },
	[20] = { "er", 3, "i" },
	[21] = { "uei", 2, "uai" },
	[22] = "ü",
	[23] = "u",
	[24] = "ü",
	[25] = "ai",
	[26] = "uei",
	[27] = "i",
	[28] = "uei",
	[29] = { "ai", 3, "ie" },
	[30] = "uai",
	[31] = { "ai", 3, "ia" },
	[32] = { "uai", 3, "ua" },
	[33] = { "ai", 3, "ie" },
	[34] = "uai",
	[35] = "i",
	[36] = { "uei", 2, "uai" },
	[37] = "i",
	[38] = { "uei", 2, "uai" },
	[39] = "i",
	[40] = "uei",
	[41] = "ai",
	[42] = "uei",
	[43] = "in",
	[44] = "in",
	[45] = "ün",
	[46] = "en",
	[47] = "ün",
	[48] = "i",
	[49] = "i",
	[50] = { "ü", 2, "uai" },
	[51] = "e",
	[52] = { "ü", 2, "uai" },
	[53] = { "uen", 3, "en" },
	[54] = "e",
	[55] = "uen",
	[56] = { "u", 1, "o" },
	[57] = "in",
	[58] = "i",
	[59] = { "uen", 3, "ün" },
	[60] = "ü",
	[61] = "an",
	[62] = "uan",
	[63] = { "a", 3, "e" },
	[64] = "uo",
	[65] = "ian",
	[66] = "üan",
	[67] = "ie",
	[68] = { "a", 3, "üe" },
	[69] = { "an", 3, "ian" },
	[70] = "uan",
	[71] = { "a", 3, "ia" },
	[72] = "ua",
	[73] = { "an", 3, "ian" },
	[74] = "uan",
	[75] = { "a", 3, "ia" },
	[76] = "ua",
	[77] = "ian",
	[78] = "üan",
	[79] = "ian",
	[80] = "üan",
	[81] = "ie",
	[82] = "üe",
	[83] = "ie",
	[84] = "üe",
	[85] = "ian",
	[86] = "üan",
	[87] = "ie",
	[88] = "üe",
	[89] = "ao",
	[90] = { "ao", 3, "iao" },
	[91] = "iao",
	[92] = "iao",
	[93] = "iao",
	[94] = { "uo", 3, "e" },
	[95] = "uo",
	[96] = "ie",
	[97] = "üe",
	[98] = { "a", 3, "ia" },
	[99] = "ua",
	[100] = "ie",
	[101] = "ang",
	[102] = "uang",
	[103] = { "uo", 3, "e" },
	[104] = "uo",
	[105] = { "iang", 2, "uang" },
	[106] = "uang",
	[107] = { "üe", 1, "o" },
	[108] = { "üe", 1, "o" },
	[109] = "eng",
	[110] = "ueng",
	[111] = "ing",
	[112] = "iong",
	[113] = "e",
	[114] = "uo",
	[115] = "i",
	[116] = "ü",
	[117] = "eng",
	[118] = "ueng",
	[119] = "e",
	[120] = "uo",
	[121] = "ing",
	[122] = "iong",
	[123] = "i",
	[124] = "ü",
	[125] = "ing",
	[126] = "iong",
	[127] = "i",
	[128] = "ü",
	[129] = "eng",
	[130] = "ueng",
	[131] = "e",
	[132] = "uo",
	[133] = "ing",
	[134] = { "i", 2, "e" },
	[135] = "ü",
	[136] = { "iou", 1, "ou" },
	[137] = "ou",
	[138] = { "iou", 1, "iao" },
	[139] = "in",
	[140] = "in",
	[141] = { "i", 2, "e" },
	[142] = { "i", 2, "e" },
	[143] = "an",
	[144] = { "a", 3, "e" },
	[145] = { "an", 3, "ian" },
	[146] = "uan",
	[147] = "ie",
	[148] = { "a", 3, "ia" },
	[149] = { "an", 3, "ian" },
	[150] = { "a", 3, "ia" },
	[151] = { "an", 3, "ian" },
	[152] = { "a", 3, "ia" },
	[153] = "ian",
	[154] = "ian",
	[155] = "ie",
	[156] = "ie",
	[157] = "ian",
	[158] = "ie",
	[159] = "an",
	[160] = { "a", 3, "e" },
}

function export.predict_cmn(initial, final, tone)
	initial_result = initial_outcomes_cmn[initial]

	if fricativisation_inducing[final] and initial <= 3 then
		initial_result = "f"

	elseif m_lenition_inducing[final] and initial == 4 then
		initial_result = "w"

	elseif tone == 1 and devoicing_initial_cmn[initial] then
		initial_result = devoicing_outcomes[initial_result]
	end

	final_result = rhyme_outcomes_cmn[final]

	if type(final_result) == "table" then
		if final_result[2] == 1 and initial <= 4
		or final_result[2] == 2 and initial >= 18 and initial <= 22
		or final_result[2] == 3 and initial >= 28 and initial <= 36 then
			final_result = final_result[3]
		else
			final_result = final_result[1]
		end
	end

	if has(final_result, 1, "i", "ü") then
		initial_result = palatalisation_outcomes_cmn[initial_result] or initial_result
	end

	if final_result == "er" then
		if initial_result == "r" then
			initial_result = ""
		else
			final_result = "i"
		end
	end

	if has(initial_result, 0, "n", "l") and has(final_result, 0, "ua", "uai", "uang", "uei") then
		final_result = mw.ustring.gsub(final_result, "^u", "")
	end
	if has(final_result, 1, "ü") and
		not (has(initial_result, 0, "n", "l") and has(final_result, 0, "ü", "üe")) then
		if initial_result == "" then
			initial_result = "y"
		end
		final_result = mw.ustring.gsub(final_result, "^ü", "u")
	end

	if has(initial_result, 0, "zh", "ch", "sh", "r") then
		final_result = mw.ustring.gsub(final_result, "^in", "en")
		final_result = mw.ustring.gsub(final_result, "^i(.)", "%1")
		final_result = mw.ustring.gsub(final_result, "^ue$", "uo")
	end

	if initial <= 4 then
		final_result = mw.ustring.gsub(final_result, "^u(.)", "%1")
	end
	if has(initial_result, 0, "f", "w") and has(final_result, 1, "i") then
		final_result = mw.ustring.gsub(final_result, "^i(.)", "%1")
		final_result = mw.ustring.gsub(final_result, "^i$", "ei")
	end

	if initial_result == "" then
		if has(final_result, 1, "i") then
			initial_result = "y"
		end
		if has(final_result, 1, "u") then
			initial_result = "w"
		end
		if initial_result ~= "" then
			final_result = mw.ustring.gsub(final_result, "^.([^n])", "%1")
		end
	end

	final_result = final_simplification_outcomes_cmn[final_result] or final_result

	if tone == 1 then
		if fully_voiced_initial[initial] or partially_voiced_initial[initial] then
			tone_result = 2
		else
			tone_result = 1
		end
	elseif tone == 2 then
		if fully_voiced_initial[initial] then
			tone_result = 4
		else
			tone_result = 3
		end
	elseif tone == 3 then
		tone_result = 4
	else
		if fully_voiced_initial[initial] then
			tone_result = 2
		elseif partially_voiced_initial[initial] then
			tone_result = 4
		else
			tone_result = ""
		end
	end

	return initial_result .. final_result .. tone_result
end

local initial_outcomes_yue = {
	[1] = "b", [2] = "p", [3] = "b", [4] = "m",
	[5] = "d", [6] = "t", [7] = "d", [8] = "n",
	[9] = "z", [10] = "c", [11] = "z", [12] = "n",
	[13] = "z", [14] = "c", [15] = "z", [16] = "s", [17] = "z",
	[18] = "z", [19] = "c", [20] = "z", [21] = "s", [22] = "z",
	[23] = "z", [24] = "c", [25] = "s", [26] = "s", [27] = "s",
	[28] = "g", [29] = "k", [30] = "g", [31] = "ng", [32] = "h",
	[33] = "h", [34] = "", [35] = "", [36] = "",
	[37] = "l", [38] = "j",
}

local devoicing_initial_yue = {
	[3] = true,
	[7] = true,
	[11] = true,
	[15] = true,
	[17] = true,
	[20] = true,
	[22] = true,
	[30] = true,
}

local initial_class_yue = {
	[1] = 1,
	[2] = 1,
	[3] = 1,
	[4] = 1,
	[5] = 2,
	[6] = 2,
	[7] = 2,
	[8] = 2,
	[9] = 3,
	[10] = 3,
	[11] = 3,
	[12] = 2,
	[13] = 4,
	[14] = 4,
	[15] = 4,
	[16] = 4,
	[17] = 4,
	[18] = 5,
	[19] = 5,
	[20] = 5,
	[21] = 5,
	[22] = 5,
	[23] = 6,
	[24] = 6,
	[25] = 6,
	[26] = 6,
	[27] = 6,
	[28] = 7,
	[29] = 7,
	[30] = 7,
	[31] = 8,
	[32] = 7,
	[33] = 7,
	[34] = 8,
	[35] = 8,
	[36] = 8,
	[37] = 2,
	[38] = 6,
}

local final_class_yue = {
	[1] = 20,
	[2] = 20,
	[3] = 20,
	[4] = 20,
	[5] = 20,
	[6] = 20,
	[7] = 20,
	[8] = 20,
	[9] = 34,
	[10] = 34,
	[11] = 35,
	[12] = 21,
	[13] = 35,
	[14] = 21,
	[15] = 35,
	[16] = 21,
	[17] = 35,
	[18] = 21,
	[19] = 35,
	[20] = 35,
	[21] = 21,
	[22] = 36,
	[23] = 24,
	[24] = 36,
	[25] = 39,
	[26] = 28,
	[27] = 6,
	[28] = 6,
	[29] = 2,
	[30] = 33,
	[31] = 2,
	[32] = 33,
	[33] = 2,
	[34] = 33,
	[35] = 6,
	[36] = 21,
	[37] = 6,
	[38] = 21,
	[39] = 6,
	[40] = 6,
	[41] = 17,
	[42] = 25,
	[43] = 8,
	[44] = 8,
	[45] = 22,
	[46] = 8,
	[47] = 22,
	[48] = 8,
	[49] = 8,
	[50] = 22,
	[51] = 8,
	[52] = 22,
	[53] = 8,
	[54] = 8,
	[55] = 38,
	[56] = 38,
	[57] = 8,
	[58] = 8,
	[59] = 8,
	[60] = 8,
	[61] = 31,
	[62] = 32,
	[63] = 31,
	[64] = 32,
	[65] = 26,
	[66] = 27,
	[67] = 26,
	[68] = 27,
	[69] = 4,
	[70] = 4,
	[71] = 4,
	[72] = 4,
	[73] = 4,
	[74] = 4,
	[75] = 4,
	[76] = 4,
	[77] = 13,
	[78] = 30,
	[79] = 13,
	[80] = 30,
	[81] = 13,
	[82] = 30,
	[83] = 13,
	[84] = 30,
	[85] = 13,
	[86] = 30,
	[87] = 13,
	[88] = 30,
	[89] = 19,
	[90] = 5,
	[91] = 15,
	[92] = 15,
	[93] = 15,
	[94] = 16,
	[95] = 16,
	[96] = 11,
	[97] = 29,
	[98] = 1,
	[99] = 1,
	[100] = 11,
	[101] = 18,
	[102] = 18,
	[103] = 18,
	[104] = 18,
	[105] = 37,
	[106] = 18,
	[107] = 37,
	[108] = 18,
	[109] = 9,
	[110] = 9,
	[111] = 40,
	[112] = 40,
	[113] = 9,
	[114] = 9,
	[115] = 14,
	[116] = 14,
	[117] = 9,
	[118] = 9,
	[119] = 9,
	[120] = 9,
	[121] = 14,
	[122] = 14,
	[123] = 14,
	[124] = 14,
	[125] = 14,
	[126] = 14,
	[127] = 14,
	[128] = 14,
	[129] = 9,
	[130] = 9,
	[131] = 9,
	[132] = 9,
	[133] = 14,
	[134] = 14,
	[135] = 14,
	[136] = 10,
	[137] = 10,
	[138] = 10,
	[139] = 7,
	[140] = 7,
	[141] = 7,
	[142] = 7,
	[143] = 23,
	[144] = 23,
	[145] = 12,
	[146] = 3,
	[147] = 12,
	[148] = 3,
	[149] = 3,
	[150] = 3,
	[151] = 3,
	[152] = 3,
	[153] = 12,
	[154] = 12,
	[155] = 12,
	[156] = 12,
	[157] = 12,
	[158] = 12,
	[159] = 23,
	[160] = 23,
}

local rhyme_outcomes_yue = {
	[1] = "A",
	[2] = "Ai",
	[3] = "Am",
	[4] = "An",
	[5] = "Au",
	[6] = "ai",
	[7] = "am",
	[8] = "an",
	[9] = "aN",
	[10] = "au",
	[11] = "e",
	[12] = "im",
	[13] = "in",
	[14] = "IN",
	[15] = "iu",
	[16] = "o",
	[17] = "oi",
	[18] = "oN",
	[19] = "ou",
	[20] = "UN",
	[21] = { "ei", "Ei", "ai" },
	[22] = { "En", "En", "an" },
	[23] = { "Am", "Am", "om" },
	[24] = { "ou", "ou", "u" },
	[25] = { "ui", "Ei", "ui" },
	[26] = { "An", "in", "in" },
	[27] = { "An", "Yn", "Yn" },
	[28] = { "ai", "Ei", "ui" },
	[29] = { "e", "O", "O" },
	[30] = { "in", "Yn", "Yn" },
	[31] = { "un", "An", "on" },
	[32] = { "un", "Yn", "un" },
	[33] = { "Ai", "Ei", "Ai" },
	[34] = { "oN", "ON", "oN" },
	[35] = { "ei", "ei", "i", "i", "i", "i", "ei", "i" },
	[36] = { "u", "Ei", "Y", "Ei", "o", "Y", "Ei", "Y" },
	[37] = { "oN", "ON", "ON", "ON", "oN", "ON", "ON", "ON" },
	[38] = { "un", "En", "En", "Yn", "Yn", "Yn", "an", "an" },
	[39] = { "ui", "Ai", "Ai", "oi", "Ai", "Ai", "oi", "oi" },
	[40] = { "IN", "IN", "IN", "IN", "aN", "IN", "IN", "IN" },
}

local palatalisation_inducing_yue = {
	[2] = true,
	[4] = true,
	[7] = true,
	[8] = true,
	[11] = true,
	[12] = true,
	[13] = true,
	[14] = true,
	[15] = true,
	[16] = true,
	[17] = true,
	[18] = true,
	[19] = true,
	[20] = true,
	[21] = true,
	[22] = true,
	[24] = true,
	[27] = true,
	[28] = true,
	[35] = true,
	[36] = true,
	[37] = true,
	[38] = true,
	[39] = true,
	[40] = true,
	[43] = true,
	[44] = true,
	[45] = true,
	[46] = true,
	[47] = true,
	[48] = true,
	[49] = true,
	[50] = true,
	[51] = true,
	[52] = true,
	[57] = true,
	[58] = true,
	[59] = true,
	[60] = true,
	[65] = true,
	[66] = true,
	[67] = true,
	[68] = true,
	[77] = true,
	[78] = true,
	[79] = true,
	[80] = true,
	[81] = true,
	[82] = true,
	[83] = true,
	[84] = true,
	[85] = true,
	[86] = true,
	[87] = true,
	[88] = true,
	[91] = true,
	[92] = true,
	[93] = true,
	[96] = true,
	[97] = true,
	[100] = true,
	[105] = true,
	[106] = true,
	[107] = true,
	[108] = true,
	[111] = true,
	[112] = true,
	[115] = true,
	[116] = true,
	[121] = true,
	[122] = true,
	[123] = true,
	[124] = true,
	[125] = true,
	[126] = true,
	[127] = true,
	[128] = true,
	[133] = true,
	[134] = true,
	[135] = true,
	[136] = true,
	[138] = true,
	[139] = true,
	[140] = true,
	[141] = true,
	[142] = true,
	[145] = true,
	[146] = true,
	[147] = true,
	[148] = true,
	[153] = true,
	[154] = true,
	[155] = true,
	[156] = true,
	[157] = true,
	[158] = true,
}

local labialisation_inducing_yue = {
	[12] = true,
	[14] = true,
	[16] = true,
	[18] = true,
	[21] = true,
	[23] = true,
	[24] = true,
	[26] = true,
	[28] = true,
	[30] = true,
	[32] = true,
	[34] = true,
	[36] = true,
	[38] = true,
	[40] = true,
	[42] = true,
	[45] = true,
	[47] = true,
	[50] = true,
	[52] = true,
	[55] = true,
	[56] = true,
	[59] = true,
	[60] = true,
	[62] = true,
	[64] = true,
	[66] = true,
	[68] = true,
	[70] = true,
	[72] = true,
	[74] = true,
	[76] = true,
	[78] = true,
	[80] = true,
	[82] = true,
	[84] = true,
	[86] = true,
	[88] = true,
	[95] = true,
	[97] = true,
	[99] = true,
	[102] = true,
	[104] = true,
	[106] = true,
	[108] = true,
	[110] = true,
	[112] = true,
	[114] = true,
	[116] = true,
	[118] = true,
	[120] = true,
	[122] = true,
	[124] = true,
	[126] = true,
	[128] = true,
	[130] = true,
	[132] = true,
	[135] = true,
	[146] = true,
	[148] = true,
}

local glide_inducing_yue = {
	[40] = true,
	[85] = true,
	[86] = true,
	[87] = true,
	[88] = true,
	[93] = true,
	[125] = true,
	[126] = true,
	[127] = true,
	[128] = true,
	[157] = true,
	[158] = true,
}

local debuccalisation_inducing_yue = {
	[1] = true,
	[2] = true,
	[3] = true,
	[4] = true,
	[5] = true,
	[6] = true,
	[7] = true,
	[8] = true,
	[9] = true,
	[10] = true,
	[15] = true,
	[17] = true,
	[19] = true,
	[20] = true,
	[22] = true,
	[23] = true,
	[25] = true,
	[26] = true,
	[27] = true,
	[29] = true,
	[30] = true,
	[31] = true,
	[35] = true,
	[37] = true,
	[41] = true,
	[42] = true,
	[43] = true,
	[44] = true,
	[46] = true,
	[48] = true,
	[49] = true,
	[51] = true,
	[53] = true,
	[54] = true,
	[56] = true,
	[57] = true,
	[58] = true,
	[61] = true,
	[62] = true,
	[63] = true,
	[64] = true,
	[65] = true,
	[66] = true,
	[67] = true,
	[69] = true,
	[71] = true,
	[73] = true,
	[75] = true,
	[77] = true,
	[79] = true,
	[81] = true,
	[83] = true,
	[85] = true,
	[86] = true,
	[87] = true,
	[89] = true,
	[90] = true,
	[91] = true,
	[92] = true,
	[93] = true,
	[94] = true,
	[95] = true,
	[96] = true,
	[98] = true,
	[100] = true,
	[103] = true,
	[104] = true,
	[107] = true,
	[109] = true,
	[111] = true,
	[113] = true,
	[115] = true,
	[117] = true,
	[119] = true,
	[121] = true,
	[123] = true,
	[125] = true,
	[127] = true,
	[129] = true,
	[130] = true,
	[131] = true,
	[132] = true,
	[133] = true,
	[134] = true,
	[137] = true,
	[138] = true,
	[143] = true,
	[144] = true,
	[145] = true,
	[147] = true,
	[149] = true,
	[150] = true,
	[151] = true,
	[152] = true,
	[153] = true,
	[154] = true,
	[155] = true,
	[156] = true,
	[157] = true,
	[158] = true,
	[159] = true,
	[160] = true,
}

function export.predict_yue(initial, final, tone)
	initial_result = initial_outcomes_yue[initial]

	if fricativisation_inducing[final] and initial <= 3 then
		initial_result = "f"

	elseif tone == 1 and devoicing_initial_yue[initial] then
		initial_result = devoicing_outcomes[initial_result]

	elseif initial == 17 and labialisation_inducing_yue[final] then
		initial_result = "s"
	end

	if initial == 29 and debuccalisation_inducing_yue[final] then
		initial_result = "h"

	elseif initial == 29 and (final == 136 or final >= 139 and final <= 142)
		or initial == 32 and (final == 136 or final == 57) and tone == 1
		or initial == 33 and (labialisation_inducing_yue[final] or glide_inducing_yue[final])
		or initial_result == "" and palatalisation_inducing_yue[final] then
		initial_result = "j"
	end

	if (final == 36 or final == 38) and initial == 36 then
		final_result = "Ei"

	elseif (final == 26 or final == 42) and initial == 31 then
		final_result = "oi"

	elseif final == 23 and initial == 31 then
		final_result = ""

	elseif (final == 22 or final == 24) and initial == 4 then
		final_result = "ou"

	else
		final_class = final_class_yue[final]
		final_result = rhyme_outcomes_yue[final_class]
		if final_class >= 35 then
			final_result = final_result[initial_class_yue[initial]]
		elseif final_class >= 21 then
			final_result = final_result[math.floor((initial_class_yue[initial] + 8) / 5)]
		end
	end

	if initial == 31 and mw.ustring.find(final_result, "^[iuIUOEY]") ~= nil then
		initial_result = "j"
	end

	if labialisation_inducing_yue[final] and mw.ustring.find(final_result, "^[OEY]") == nil then
		if initial_result == "h" and mw.ustring.find(final_result, "^[iI]") == nil then
			initial_result = "f"
		elseif initial_result == "j" or initial_result == "" then
			initial_result = "w"
		elseif initial_result == "g" and mw.ustring.find(final_result, "^[uU]") == nil then
			initial_result = "gw"
		elseif initial_result == "k" and mw.ustring.find(final_result, "^[iuIU]") == nil then
			initial_result = "kw"
		end
	end

	if tone == 4 then
		if fully_voiced_initial[initial] or partially_voiced_initial[initial] then
			tone_result = 6
		elseif mw.ustring.find(final_result, "^[AiouOY]") ~= nil then
			tone_result = 3
		else
			tone_result = 1
		end
	elseif tone == 2 and fully_voiced_initial[initial] then
		tone_result = 6
	elseif fully_voiced_initial[initial] or partially_voiced_initial[initial] then
		tone_result = 3 + tone
	else
		tone_result = tone
	end

	final_result = mw.ustring.gsub(final_result, "om", "am")

	if initial <= 4 then
		final_result = mw.ustring.gsub(final_result, "m$", "n")
	end

	if tone == 4 then
		final_result = mw.ustring.gsub(final_result, "m$", "p")
		final_result = mw.ustring.gsub(final_result, "n$", "t")
		final_result = mw.ustring.gsub(final_result, "N$", "k")
	end

	final_result = mw.ustring.gsub(final_result, "A", "aa")
	final_result = mw.ustring.gsub(final_result, "I", "i")
	final_result = mw.ustring.gsub(final_result, "U", "u")
	final_result = mw.ustring.gsub(final_result, "O", "oe")
	final_result = mw.ustring.gsub(final_result, "E", "eo")
	final_result = mw.ustring.gsub(final_result, "Y", "yu")

	final_result = mw.ustring.gsub(final_result, "N", "ng")

	return initial_result .. final_result .. "<sup>" .. tone_result .. "</sup>"
end

return export