local export = {}
local pron_utilities_module = "Module:pron utilities"
local lang = require("Module:languages").getByCode("gu")
local sc = require("Module:scripts").getByCode("Gujr")
local u = require("Module:string/char")
local ufind = mw.ustring.find
local ugmatch = mw.ustring.gmatch
local ugsub = mw.ustring.gsub
local correspondences = {
= "ŋ", = "ɡ",
= "t͡ʃ", = "d͡ʒ", = "ɲ",
= "ʈ", = "ɖ", = "ɳ",
= "t̪", = "d̪",
= "j", = "ɾ", = "ʋ", = "l̪",
= "ʃ", = "ʂ", = "ɦ",
= "ɭ", = "f", = "ɣ", = "ð", = "β",
= "ɽ",
= "ə", = "ɑ", = "i",
= "i", = "o", = "eː", = "ɾu", = "ɾuː",
= "u", = "u", = "ɔ", = "ɔ", = "ɛ", = "ɛ", = "æ",
= "ə̤", = "a̤", = "i̤", = "ṳ", = "ɛ̤", = "ɔ̤",
= "om", = "ʰ",
= "‿ˈ", -- get rid of spaces
}
local vowels = "aāiīuūoɔɛeæãā̃ẽĩī̃õũū̃ː"
local weak_h = "()h"
local aspirate = "()"
local syllabify_pattern = "()(+)()"
local function find_consonants(text)
local current = ""
local cons = {}
for cc in mw.ustring.gcodepoint(text .. " ") do
local ch = u(cc)
if ufind(current .. ch, "^$") or ufind(current .. ch, "^h$") then
current = current .. ch
else
table.insert(cons, current)
current = ch
end
end
return cons
end
local function syllabify(text)
for count = 1, 2 do
text = ugsub(text, syllabify_pattern, function(a, b, c)
b_set = find_consonants(b)
table.insert(b_set, #b_set > 1 and 2 or 1, ".")
return a .. table.concat(b_set) .. c end)
end
return text
end
local identical = "knlsfzθ"
for character in ugmatch(identical, ".") do
correspondences = character
end
local function transliterate(text)
return (lang:transliterate(text))
end
function export.link(term)
return require("Module:links").full_link{ term = term, lang = lang, sc = sc }
end
function export.toIPA(text)
local result = {}
local translit = text
if lang:findBestScript(text):isTransliterated() then
translit = transliterate(text)
end
if not translit then
error('The term "' .. text .. '" could not be transliterated.')
end
local translit = ugsub(translit, "͠", "̃")
local translit = ugsub(translit, "%-", ".")
local translit = ugsub(translit, "ṣ()", "ś%1")
local translit = syllabify(translit)
local translit = ugsub(translit, 'jñ', 'gy')
local translit = ugsub(translit, aspirate .. "h", '%1ʰ')
local translit = ugsub(translit, weak_h, '%1ʱ')
local translit = ugsub(translit, "%.ː", "ː.")
for character in ugmatch(translit, ".") do
table.insert(result, correspondences or character)
end
result = table.concat(result)
local TILDE = u(0x0303) -- tilde = ̃
local result = ugsub(result, "ː" .. TILDE, TILDE .. "ː")
result = ugsub(result, "%.‿", "‿")
return "ˈ" .. result
end
local function respelling_to_IPA(data)
return "/" .. export.toIPA(data.respelling) .. "/"
end
function export.make(frame)
local parent_args = frame:getParent().args
return require(pron_utilities_module).format_prons {
lang = lang,
respelling_to_IPA = respelling_to_IPA,
raw_args = parent_args,
track_module = "gu-IPA",
}
end
return export