Module:typing-aids/data/mwr

---

This module lacks a documentation subpage. Please create it.

Useful links: root page • root page’s subpages • links • transclusions • testcases • sandbox

local data = {}

local U = require("Module:string/char")

local nuktA = U(0x11173)
local consonants = "𑅕𑅖𑅗𑅘𑅙𑅚𑅛𑅜𑅝𑅞𑅟𑅠𑅡𑅢𑅣𑅤𑅥𑅦𑅧𑅨𑅩𑅪𑅫𑅬𑅭𑅮𑅯𑅰𑅱𑅲"
local consonant = "[" .. consonants .. "]" .. nuktA .. "?"

local acute = U(0x301)		-- combining acute

data["mwr"] = {
	-- Vowels and modifiers. Do the diphthongs and diaereses first.
	{"ai", "𑅑"},
	{"au", "𑅒"},
	{"ä", "𑅐"},
	{"ö", "𑅔"},
	{"ï", "𑅑"},
	{"ü", "𑅒"},
	{"a", "𑅐"},
	{"ā", "𑅐"},
	{"i", "𑅑"},
	{"ī", "𑅑"},
	{"u", "𑅒"},
	{"ū", "𑅒"},
	{"e", "𑅓"},
	{"o", "𑅔"},
	{"(𑅐)[%-/]([𑅑𑅒])", "%1%2"},		-- a-i, a-u for 𑅐𑅑, 𑅐𑅒; must follow rules for "ai", "au"

	-- Two-letter consonants must go before h.
	{"kh", "𑅖"},
	{"gh", "𑅘"},
	{"ch", "𑅚"},
	{"jh", "𑅜"},
	{"ṭh", "𑅟"},
	{"ḍh", "𑅡"},
	{"th", "𑅤"},
	{"dh", "𑅦"},
	{"ph", "𑅩"},
	{"bh", "𑅫"},
	{"h", "𑅱"},

	-- Other stops.
	{"k", "𑅕"},
	{"g", "𑅗"},
	{"c", "𑅙"},
	{"j", "𑅛"},
	{"ṭ", "𑅞"},
	{"ḍ", "𑅠"},
	{"ṛ", "𑅲"},
	{"t", "𑅣"},
	{"d", "𑅥"},
	{"p", "𑅨"},
	{"b", "𑅪"},

	-- Nasals.
	{"ñ", "𑅝"},
	{"ṇ", "𑅢"},
	{"n", "𑅧"},
	{"n", "𑅧"},
	{"m", "𑅬"},

	-- Remaining consonants.
	{"y", "𑅛"},
	{"r", "𑅭"},
	{"l", "𑅮"},
	{"v", "𑅯"},
	{"ś", "𑅰"},
	{"s", "𑅰"},
	{"ṣ", "𑅖"},
	{"ṃ", "𑅧"},

}

-- This must go last, after independent vowels are converted to diacritics, or "aï", "aü" won't work.
table.insert(data["mwr"], {"(" .. consonant .. ")𑅐", "%1"})

-- [[w:Harvard-Kyoto]] to [[w:International Alphabet of Sanskrit Transliteration]]
data["mwr-tr"] = {
	[1] = {
		["A"] = "ā",
		["I"] = "ī",
		["U"] = "ū",
		["J"] = "ñ",
		["T"] = "ṭ",
		["D"] = "ḍ",
		["N"] = "ṇ",
		["z"] = "ś",
		["S"] = "ṣ",
		["M"] = "ṃ",
		["/"] = acute,
	},
	[2] = {
		["R"] = "ṛ",
	},
}

return data