Modül:tr-ad/istisnalar

local p = {}

function Set (list)
  local set = {}
  for _, l in ipairs(list) do set = true end
  return set
end

-- NOT: Listeler alfabetik sıraya göre sıralanmıştır.

--Son harfi "k, t, ç, p" ile biten sözcükler genellikle "ğ, d, c, b" harflerine yumuşar. Bu kurala uymayan istisnalar buradadır.
p.istisnaYumusama = Set {
	"abalet",
	"abdest",
	"abıhayat",
	"abstre sanat",
	"adabımuaşeret",
	"adalât",
	"adamet",
	"adavet",
	"ademimerkeziyet",
	"ademiyet",
	"afak",
	"afet",
	"ahavat",
	"ahavât",
	"ahiret",
	"ahlat",
	"ahlak",
	"ahlakiyat",
	"ahlât",
	"ahret",
	"ahtapot",
	"aidat",
	"aidiyet",
	"ailat",
	"akamet",
	"akaret",
	"akliyat",
	"alamet",
	"alat",
	"alat edevat",
	"aleniyet",
	"alet",
	"alet edevat",
	"alâmet",
	"alt",
	"ameliyat",
	"ananet",
	"anzarot",
	"ariyet",
	"arziyat",
	"asabiyet",
	"asalet",
	"asrısaadet",
	"aşk",
	"at",
	"atalet",
	"atıfet",
	"avdet",
	"avret",
	"ayet",
	"ayniyat",
	"ayniyet",
	"ayyuk",
	"azamet",
	"azimet",
	"azimut",
	"aşerat",
	"âdemiyet",
	"âdet",
	"âdâb-ı muaşeret",
	"âheng-i asvât",
	"âheng-i hurûf u harekât",
	"âtıfet",
	"baharat",
	"bahr-i muhit",
	"bank",
	"bark",
	"basiret",
	"basübadelmevt",
	"başkent",
	"bedahet",
	"bediiyat",
	"bekâret",
	"belahet",
	"belâgat",
	"belâhat",
	"beraat",
	"berat",
	"bereket",
	"besalet",
	"beyanat",
	"beşaret",
	"beşeriyet",
	"biat",
	"bidayet",
	"binâ-ı mutâvaat",
	"binâ-ı müşâreket",
	"bit",
	"bok",
	"boykot",
	"bölüt",
	"bulut",
	"bürudet",
	"cahiliyet",
	"cehalet",
	"celadet",
	"celâdet",
	"cemaat",
	"cemadat",
	"cemiyet",
	"ceninisakıt",
	"cennet",
	"cerahat",
	"cesamet",
	"cesaret",
	"cesâret",
	"cevvaliyet",
	"cibilliyet",
	"ciddiyet",
	"cihet",
	"cinayet",
	"cinnet",
	"cinsiyet",
	"cumhuriyet",
	"cumhûriyet",
	"cüret",
	"çek",
	"çöp",
	"dalalet",
	"dalâlet",
	"davet",
	"debagat",
	"defihacet",
	"dehalet",
	"delalet",
	"delâlet",
	"delk",
	"denaet",
	"derece-i müsâvât",
	"derk",
	"devlet",
	"devrisaadet",
	"divit",
	"diyanet",
	"diyarıgurbet",
	"diyet",
	"ebat",
	"ebediyet",
	"edat",
	"edebiyat",
	"edât-ı rabt",
	"eflak",
	"ehemmiyet",
	"ehlibeyt",
	"ehliyet",
	"ehlizevk",
	"ehveniyet",
	"ek",
	"ekalliyet",
	"ekseriyet",
	"elastikiyet",
	"elâstikiyet",
	"emaret",
	"emlak",
	"emniyet",
	"emrihak",
	"enaniyet",
	"esaret",
	"eskort",
	"et",
	"evleviyet",
	"evrak",
	"eyalet",
	"eziyet",
	"faaliyet",
	"faikiyet",
	"fak",
	"fark",
	"fazilet",
	"fehamet",
	"fek",
	"felaket",
	"felekiyat",
	"feminist",
	"feraset",
	"fetret",
	"fetânet",
	"fevk",
	"fevt",
	"fezahat",
	"fi'l-i mutâvaat",
	"fi'l-i muâvenet",
	"fi'l-i müsbet",
	"fi'l-i müşâreket",
	"fiiliyat",
	"fikrisabit",
	"fikriyat",
	"firak",
	"firkat",
	"fit",
	"fiyat",
	"fâikıyat",
	"fırsat",
	"fıtrat",
	"gabavet",
	"gaflet",
	"galibiyet",
	"ganimet",
	"garabet",
	"gark",
	"gaybubet",
	"gazeliyat",
	"gelgit",
	"grosmarket",
	"habaset",
	"hacamat",
	"hacet",
	"hafriyat",
	"hak",
	"hakaret",
	"hakikat",
	"hakkaniyet",
	"halavet",
	"halk",
	"halkiyat",
	"halt",
	"halâvet",
	"hamakat",
	"hamaset",
	"hamilikart",
	"hamiyet",
	"harabat",
	"hararet",
	"hareket",
	"harekât",
	"hasiyet",
	"haslet",
	"hasret",
	"hassasiyet",
	"hasılat",
	"hattat",
	"hayalat",
	"hayalet",
	"hayat",
	"hayatiyet",
	"haysiyet",
	"hayvanat",
	"hayvaniyet",
	"hazakat",
	"hazret",
	"haşmet",
	"haşviyat",
	"haşyet",
	"hâdisat",
	"hâkimiyet",
	"hâlet",
	"hâsılat",
	"helak",
	"hermafrodit",
	"heyet",
	"hezimet",
	"hezliyat",
	"hılt",
	"hicret",
	"hidayet",
	"hiddet",
	"hikmet",
	"hilafıhakikat",
	"hilkat",
	"hilâfet",
	"himmet",
	"hisset",
	"hitabet",
	"hizmet",
	"hububat",
	"hulk",
	"hukuk",
	"hulliyat",
	"hurufat",
	"husumet",
	"hususiyet",
	"hutut",
	"huşunet",
	"hat",
	"humk",
	"hükûmet",
	"hürmet",
	"hürriyet",
	"hüsnühat",
	"hüsnüniyet",
	"hüviyet",
	"hırdavat",
	"hıyanet",
	"ırkiyat",
	"ıskat",
	"ıtlak",
	"ıtriyat",
	"iadeiziyaret",
	"ibadet",
	"ibret",
	"icazet",
	"icâzet",
	"iddet",
	"idrak",
	"iffet",
	"İffet",
	"ifrat",
	"ifrat tefrit",
	"ifşaat",
	"ihanet",
	"ihracat",
	"ihtilat",
	"ihtimaliyet",
	"ikamet",
	"iktisadiyat",
	"ilahiyat",
	"ilhak",
	"ilk",
	"illet",
	"illiyet",
	"ilmiahlak",
	"iltifat",
	"iltihak",
	"iltisak",
	"ilanıaşk",
	"imalat",
	"imamet",
	"imaret",
	"infak",
	"infilak",
	"infirak",
	"inhitat",
	"insaniyet",
	"insiyak",
	"intak",
	"internet",
	"intibak",
	"intihabat",
	"inzibat",
	"inşaat",
	"inşat",
	"irsiyet",
	"irtibat",
	"irtifak",
	"ip",
	"ismet",
	"ispat",
	"isrâiliyyât",
	"istikamet",
	"istintak",
	"istiğrak",
	"istirahat",
	"iştiyak",
	"it",
	"itaat",
	"ithalat",
	"ittifak",
	"izafet",
	"izahat",
	"izzet",
	"içtimaiyat",
	"işaret",
	"işret",
	"jet",
	"kabahat",
	"kabiliyet",
	"kâinat",
	"kamet",
	"kanaat",
	"kant",
	"karabet",
	"kart",
	"kasıt",
	"kasvet",
	"kat",
	"katiyet",
	"kavmiyat",
	"kavmiyet",
	"kaydıhayat",
	"kaydıihtiyat",
	"kefaret",
	"kehanet",
	"kemaliafiyet",
	"kemiyet",
	"kerahet",
	"keramet",
	"kerrat",
	"kesafet",
	"ketumiyet",
	"keyfiyet",
	"kibrit",
	"kifayet",
	"kitabet",
	"kiyaset",
	"koç",
	"komut",
	"köşk", 
	"kutsiyet",
	"kuvvet",
	"kuyudat",
	"külfet",
	"külliyat",
	"külliyet",
	"küsurat",
	"kıraat",
	"kırat",
	"kısmet",
	"kıtaat",
	"kıyafet",
	"kıyamet",
	"kıymet",
	"kist",
	"lahut",
	"lanet",
	"letafet",
	"levazımat",
	"lezzet",
	"linet",
	"link",
	"lisaniyat",
	"liyakat",
	"lobut",
	"lügat",
	"lüknet",
	"lüzucet",
	"maddiyet",
	"madelet",
	"maharet",
	"mahcubiyet",
	"mahluk",
	"mahlukat",
	"mahremiyet",
	"mahrukat",
	"mahrumiyet",
	"mahrut",
	"mahviyet",
	"maiyet",
	"maişet",
	"makulât",
	"malik",
	"malikiyet",
	"maliyet",
	"maluliyet",
	"malumat",
	"malûliyet",
	"malûmat",
	"mamulât",
	"marabut",
	"marifet",
	"market",
	"marufiyet",
	"maruzat",
	"maslahat",
	"masumiyet",
	"masuniyet",
	"maşrık",
	"matbuat",
	"mazarrat",
	"mazhariyet",
	"mağduriyet",
	"mağfiret",
	"mağlubiyet",
	"mağlûbiyet",
	"ma’dûmât",
	"mebzuliyet",
	"mecburiyet",
	"medeniyet",
	"meftuniyet",
	"melahat",
	"melamet",
	"melekût",
	"melik",
	"memat",
	"memleket",
	"memnuiyet",
	"memnuniyet",
	"memuriyet",
	"menfaat",
	"menfaatperest",
	"menhiyat",
	"mensucat",
	"merak",
	"merbutiyet",
	"merhamet",
	"meriyet",
	"merkeziyet",
	"meserret",
	"mesihiyyet",
	"meskenet",
	"meskûkât",
	"mest",
	"mesuliyet",
	"metrukat",
	"metrukiyet",
	"metrûkât",
	"mevcudat",
	"mevcudiyet",
	"mevkufiyet",
	"mevt",
	"mevzuat",
	"meyusiyet",
	"meyyit",
	"mezellet",
	"mezuniyet",
	"meçhulat",
	"meşakkat",
	"meşekkat",
	"meşihat",
	"meşk",
	"meşrubat",
	"meşruhat",
	"meşruiyet",
	"meşrutiyet",
	"meşveret",
	"mihnet",
	"mihrak",
	"millet",
	"mirat",
	"misk",
	"mişkat",
	"muadelet",
	"muamelât",
	"muavenet",
	"muaşeret",
	"mugayeret",
	"muhabbet",
	"muhaberat",
	"muhaceret",
	"muhalefet",
	"muhasamat",
	"muhassasat",
	"muhassenat",
	"muhit",
	"mukadderat",
	"mukaddesat",
	"mukarenet",
	"mukavemet",
	"murabut",
	"murabıt",
	"musibet",
	"mutavassıt",
	"mutlakiyet",
	"muvaffakiyet",
	"muvakkit",
	"muvasalat",
	"muvazat",
	"muzaheret",
	"mübayenet",
	"mücazat",
	"mücevherat",
	"müddet",
	"müdüriyet",
	"müellefat",
	"müessiriyet",
	"müfredat",
	"mühimmat",
	"mühlet",
	"mükellefiyet",
	"mükemmeliyet",
	"mükevvenat",
	"mükeyyifat",
	"müktesebat",
	"mükâfat",
	"mülakat",
	"mülayemet",
	"mülhakat",
	"mülk",
	"mülkiyet",
	"mülâhazat",
	"mülâyemet",
	"mümanaat",
	"münacat",
	"münaferet",
	"münakalat",
	"münasebet",
	"münhatt",
	"müntahabat",
	"münşeat",
	"müphemiyet",
	"müracaat",
	"mürettebat",
	"mürüvvet",
	"müsakkafat",
	"müsaraat",
	"müsavat",
	"müsellesat",
	"müsevvit",
	"müstaceliyet",
	"müstahak",
	"müstahzarat",
	"mütekabiliyet",
	"mütâbeat",
	"müzaheret",
	"müzahrefat",
	"müzakerat",
	"müşareket",
	"müşkülat",
	"müşkülât",
	"müştemilat",
	"müştemilât",
	"mıknatısiyet",
	"naat",
	"nadirat",
	"nailiyet",
	"nakarat",
	"nakliyat",
	"nalbant",
	"nasfet",
	"nasihat",
	"nazarıdikkat",
	"nazret",
	"nebat",
	"nebatat",
	"necabet",
	"necaset",
	"necat",
	"nedamet",
	"nedret",
	"nefaset",
	"nefret",
	"nefsaniyet",
	"nekbet",
	"nevbet",
	"nezafet",
	"nezahet",
	"nezaket",
	"nezaret",
	"neşet",
	"neşriyat",
	"nihayet",
	"nikbet",
	"nimet",
	"nispet",
	"nisviyet",
	"niyabet",
	"niyet",
	"nuhuset",
	"nukut",
	"nukât",
	"nusret",
	"nöbet",
	"nübüvvet",
	"nükhet",
	"ok",
	"ön ek",
	"ömrühayat",
	"pasaport",
	"payitaht",
	"pâyitaht",
	"piç",
	"post it",
	"put",
	"rabt",
	"rabıt",
	"rahat",
	"rahmaniyet",
	"rahmet",
	"rağbet",
	"refik",
	"rehavet",
	"rekaket",
	"rekât",
	"resmiyet",
	"riayet",
	"ricat",
	"rikkat",
	"rivayet",
	"riyaset",
	"riyazet",
	"riyaziyat",
	"ruhiyat",
	"ruhsat",
	"rutubet",
	"rüsumat",
	"rüyet",
	"rıvayet",
	"saadet",
	"saat",
	"saç",
	"sadaret",
	"sadet",
	"safahat",
	"saffet",
	"safiyet",
	"sahabet",
	"sahavet",
	"sakamet",
	"sakatat",
	"sakıt",
	"salabet",
	"salahiyet",
	"salat",
	"saltanat",
	"salâbet",
	"salâhiyet",
	"salât",
	"salâvat",
	"samimiyet",
	"samut",
	"sanat",
	"sarahat",
	"satvet",
	"savlet",
	"sebat",
	"sebebiyet",
	"sefalet",
	"sefaret",
	"sekeratülmevt",
	"sekülarist",
	"selahiyet",
	"selaset",
	"selâmet",
	"selâset",
	"semahat",
	"servet",
	"set",
	"setriavret",
	"sevkiyat",
	"seyahat",
	"seyyiat",
	"sıdk",
	"sirkat",
	"siyak",
	"siyakat",
	"siyaset",
	"siyasiyat",
	"sohbet",
	"suhulet",
	"suhunet",
	"suikast",
	"suiniyet",
	"sukut",
	"surat",
	"suret",
	"sübut",
	"sükût",
	"sünnet",
	"sürat",
	"sür’at",
	"süt",
	"sıfat",
	"sıhhat",
	"sıhriyet",
	"sıklet",
	"sıkıt",
	"sınaat",
	"sırat",
	"sıyanet",
	"sik",
	"şaft",
	"şahsiyet",
	"şark",
	"şart",
	"şathiyat",
	"şavk",
	"şeamet",
	"şebabet",
	"şecaat",
	"şefaat",
	"şefkat",
	"şehadet",
	"şehvet",
	"şekilperest",
	"şenaat",
	"şeniyet",
	"şerbet",
	"şerait",
	"şeriat",
	"şerik",
	"şetaret",
	"şevk",
	"şevket",
	"şeytanet",
	"şiiriyet",
	"şikâyet",
	"şirk",
	"şirket",
	"şirret",
	"şubat",
	"şöhret",
	"taallûkat",
	"taalluk",
	"taaşşuk",
	"tabaat",
	"tababet",
	"tabiat",
	"tabiiyet",
	"tabut",
	"tadilat",
	"tadilât",
	"tafsilat",
	"tahakkuk",
	"taharet",
	"tahaşşüt",
	"tahdidat",
	"tahkik",
	"tahkikat",
	"tahkimat",
	"tahnit",
	"tahrifat",
	"tahrik",
	"tahrikât",
	"tahsilat",
	"tahvilat",
	"tahvilât",
	"tak",
	"takat",
	"takibat",
	"talik",
	"talimat",
	"talâkat",
	"tamamiyet",
	"tamik",
	"tamirat",
	"tank",
	"taravet",
	"tarik",
	"tarikat",
	"tasallut",
	"tasdik",
	"tatbik",
	"tatbikat",
	"tavassut",
	"tavik",
	"tazimat",
	"taziyet",
	"tağut",
	"tebaiyet",
	"tebeddülât",
	"tebligat",
	"tedrisat",
	"teessürat",
	"tefavüt",
	"teferruat",
	"tefrik",
	"tefrit",
	"tefrişat",
	"tekrarat",
	"teminat",
	"tenkisat",
	"tensik",
	"tensikat",
	"tenzilat",
	"tenzilât",
	"terk",
	"tesisat",
	"teslimat",
	"tetkik",
	"tetkikat",
	"tevfik",
	"tevliyet",
	"tevsik",
	"teşrik",
	"tezvirat",
	"teçhizat",
	"teşkilat",
	"teşkilât",
	"ticaret",
	"tilavet",
	"tilâvet",
	"tuluat",
	"tulûat",
	"turp",
	"töhmet",
	"tınnet",
	"tıynet",
	"ubudiyet",
	"ufunet",
	"uhuvvet",
	"ukubet",
	"uluhiyet",
	"ulviyet",
	"ulûhiyet",
	"umumiyet",
	"uşşak",
	"uzlet",
	"uzviyet",
	"ücret",
	"ülfet",
	"ülûhiyet",
	"ümmet",
	"ünsiyet",
	"vahamet",
	"vahdaniyet",
	"vahdet",
	"vakit",
	"varidat",
	"vasat",
	"vasiyet",
	"vatvat",
	"vaziyet",
	"vazıyet",
	"vefat",
	"vekâlet",
	"veladet",
	"velayet",
	"velinimet",
	"velâyet",
	"vesayet",
	"vezaret",
	"vilâyet",
	"vuslat",
	"vücûdiyyât",
	"vüsat",
	"yakut",
	"zabt",
	"zabt u rabt",
	"zabıt",
	"zafiyet",
	"zahmet",
	"zamk",
	"zanaat",
	"zapt",
	"zapturapt",
	"zarafet",
	"zaruret",
	"zat",
	"zeamet",
	"zekât",
	"zerk",
	"zerzevat",
	"zevk",
	"zihniyet",
	"zillet",
	"zimmet",
	"ziraat",
	"ziyafet",
	"ziyaret",
	"ziynet",
	"zulmet",
	"zürriyet",
	"zıddiyet",
}

--Bazı kalın ünlü ile biten sözcükler de ince okunduğundan ince ünlü ile başlayan çekim eki alır.
p.istisnaIncelme = Set {
	"aciz",
	"acz",
	"ahit",
	"akit",
	"eflak",
	"emlak",
	"fevk",
	"had",
	"hakikat",
	"hal",
	"hâl",
	"harf",
	"helak",
	"ideal",
	"idrak",
	"imsak",
	"istiklal",
	"istiklâl",
	"istimlak",
	"iştirak",
	"kalp",
	"katil",
	"kavim",
	"kemal",
	"Kemal",
	"Kemâl",
	"koramiral",
	"liyakat",
	"merkat",
	"metal",
	"nakit",	
	"nihal",
	"normal",
	"oval",
	"peştamal",
	"portal",
	"refik",
	"rikkat",
	"saat",	
	"seyahat",
	"serhat",
	"sıhhat",
	"sukutuhayal",	
	"şefkat",
	"vakit",
	"vüsat",	
	"yalın hâl",
}

--Bazı adlarda sondaki ünlü düşer.
p.istisnaDusme = Set {
	"aciz",
	"ağız",
	"ahit",
	"akit",
	"akıl",
	"batın",
	"beyin",
	"burun",
	"cehil",
	"cisim",
	"dahil",
	"devir",
	"fetih",
	"fikir",
	"göğüs",
	"gönül",
	"hasım",
	"hapis",
	"hüküm",
	"ilim",
	"isim",
	"karın",
	"kasıt",
	"kavim",
	"kayıt",
	"kayıp",
	"keyif",
	"meyil",
	"mühür",
	"nakit",	
	"nakış",
	"nehir",
	"nutuk",
	"omuz",
	"resim",
	"rızık",
	"satıh",
	"seyir",
	"sihir",
	"şehir",
	"şekil",
	"şükür",
	"temsilî resim",
	"ufuk",
	"uzuv",
	"vakit",
	"vasıf",
	"vezin",
	"zehir",
	"zihin",
	"zikir",
	"zulüm",
}

--Bazı bileşik kelimelerde son ünlüden sonra "y" ünsüzü yerine "n" ünsüzü gelir ve çoğullarında da sondaki ünlü düşer.
p.istisnaBilesik = Set {
	"aslanağzı",
	"aslansütü",
	"atasözü",
	"ayçiçeği",
	"başsağlığı",
	"burası",
	"buzdolabı",
	"camevi",
	"denizaslanı",
	"denizgülü",
	"denizşakayığı",
	"fildişi",
	"gelinkuşağı",
	"gökkuşağı",
	"gözbebeği",
	"gözyaşı",
	"halkevi",
	"içgüveysi",
	"işgücü",
	"kafatası",
	"kızevi",
	"kitabevi",
	"oymakbaşı",
	"peygamberdevesi",
	"sepettopu",
	"sınır boyu",
	"soyağacı",
	"susamuru",
	"tavukgötü",
	"yavruağzı",
}

--Bazı sözcüklerde son ünsüz tekrar ederek ikizleşir.
p.istisnaIkizlesme = Set {
	"behat",
	"emrihak",
	"fek",
	"had",
	"hak",
	"hat",
	"haz",
	"his",
	"hüsnühat",
	"met",
	"şek",
	"şet",
	"şer",
	"tıp",
}

--Yalın hâli ı, i, u veya ü ile biten kelimelerde son ünlüden sonra "y" ünsüzü gelir.
p.istisnaI = Set {
	"abacı",
	"abadi",
	"abajurcu",
	"dolu",
	"efendi",
	"geri",
	"hamsi",
	"ileri",
	"kutu",
	"kedi",	
	"pamukçu"
}

return p