Module:grc-nouns-decl/param

Module:grc-nouns-decl : param : κλίση1 - κλίση2 - κλίση3 - ανώμαλα : τεκμηρίωση
Κατηγορία:Πρότυπα κλίσης ουσιαστικών (αρχαία ελληνικά) - Κατηγορία:Έλεγχος κλίσης - manual
Παράρτημα:Ουσιαστικά (αρχαία ελληνικά) : 1η : 2η : 3η : ανώμαλα - Κατηγορία:Ουσιαστικά (αρχαία ελληνικά)
Βοήθεια:Πρότυπα κλίσης ουσιαστικών (αρχαία ελληνικά) - Module:grc-articles - Module:grk-stems

Κατηγορία:Σελίδες με σφάλματα δέσμης ενεργειών
Κατηγορία:Σελίδες με σφάλματα στο πρότυπο κλίσης ουσιαστικών (αρχαία ελληνικά)
Κατηγορία:Ουσιαστικά με κλίση όπως το '' (αρχαία ελληνικά)
Κατηγορία:Λήμματα χωρίς προσωδία σε δίχρονο φωνήεν (αρχαία ελληνικά)
Κατηγορία:Λέξεις με άγνωστη προσωδία (αρχαία ελληνικά)
Κατηγορία:Ουσιαστικά με άγνωστη κλίση (αρχαία ελληνικά)

---

-- αρχαία ελληνικά ουσιαστικά - parameters for Ancient Greek noun cases as added in declension tables
-- 2021.05.12
-- INSTRUCTIONS & help at bottom of [[Module:grc-nouns-decl]] - ΟΔΗΓΙΕΣ στο τέλος της κύριας σελίδας
--[=[ INSTRUCTIONS for this page:
Call it from the main page by placing EXACTLY where it is needed:
	require ('Module:xxx/param').param (args)
	DO NOT change anything else. DO NOT add at top of page a m_xxxx = require this and that.
USE: local for the functions of THIS module
]=]--
--[=[
-- mod- (Prefix for parameters as defined in the module		e.g. args['mod-someparam']
	Without the prefix, is for the use of the editor.	e.g. args['someparam']
	The editor suppresses mod- and writes his own correction)
-- Instructions for stems, see below #stems
-- more EXPLANATIONS, see main page
STRUCTURE
a) copy from main page what is needed
b) MAIN FUNCTION: local function param (args)
	1. Stems + some copypaste help
	2. Languages (grc, gkm, kath) for categories and titles
	3. unk=1  rar=1 
	4. title line
	5. br (breaks of lines, spaces between words)
	6. notes
	... all parameters
c) close with:		 end	return {param = param}
TO DO
* small fonts for second word fells perhaps better? Fits better, for sure.
* second COLUMN words, stems, endings
]=]--

--------------------------------------------------------------------------
-- COPY HERE what is needed from the Module 
--------------------------------------------------------------------------

local languages = mw.loadData("Module:Languages") -- needed: grc (gkm, kath the articles are the same)

-- font colours
local c_ending = '#eb0000'			-- is DeepPink. For wikitext, template [[Πρότυπο:χκ]], never bold
local c_stem = '#002000'				-- For wikitext, template [[Πρότυπο:χθ]], never bold

--  ============== apply font colours - εφαρμογή χρωμάτων
local ending_color = function(suffix)
    return '<span style="color:' .. c_ending ..'; font-weight:normal;">' .. suffix .. '</span>'
end

local stem_color = function(thema)
	thema = thema or '' -- otherwise, it does not work
    return '<span style="color:' .. c_stem ..'; font-weight:normal;">' .. thema .. '</span>'
end

local infix_color = function(infix) -- this is not exactly an inifix. It is extra letters of a 2nd stem.
    return '<span style="color:' .. c_stem ..'; font-weight:normal;">' .. infix .. '</span>'
end


-- thanks to [[w:en:User talk:Trappist the monk]]
--[[--------------------------< I S _ S E T >------------ 

Returns true if argument is set; false otherwise. Argument is 'set' when it exists (not nil) or when it is not an empty string.

]]
--[=[ explanation:
The is_set() function may be added so that tests like this:
	if args['ακε'] ~= '' and args['ακε'] ~= nil then args['ακε'] = args['ακε'] else args['ακε'] = '' end
can be reduced to:
	if not is_set (args['ακε']) then args['ακε'] = '' end
]=]--

local function is_set (var)
	return not (var == nil or var == '');
end

---------------------------------------------------------------------------
-- ========================MAIN FUNCTION================================ --
--                        Greek noun cases                               --
---------------------------------------------------------------------------
local function param (args)
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end


---------------------------------------------------------------------------
-- ============== START HERE ALL PARAMETERS ============== --
---------------------------------------------------------------------------


-- ===============  STEMS  - default stem = word minus 2 letters from end
-- stems
    local stem = {} -- do not move
    local minusletters = args['μείον'] or ''	-- args μείον is not used in Templates
-- If subfunctions have a defintion for lemma and stem of their own
-- we need to write there the stems for all cases.
    if stemnumber == '' or stemnumber == nil then
    	if minusletters == 1 then
    		stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2)
    	elseif minusletters == '0' then
    		stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-1) -- test [[πῦρ]]
		elseif minusletters ~= '0' and minusletters ~= '' and minusletters ~= nil then
    		stemnumber = minusletters+1
    	else
    		stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- default stem
    	end
    end

--[=[ INSTRUCTIONS for STEMS: application in functions
STEMS: default stem is minus 2 letters from the end (stemnumber 3) args['μείον'] = 2 
		- otherwise stems should be written out
		If special features are needed (brackets, etc), then the full line should be written, 
		with create_link, as in /param page

	local stem = {}
	args["θ"] = stem["θ"]					-- stem as found in lemma, default minus 2 letters from end, or defined at function
	stem["θ0"] = m_stems.word0(stem["θ"])				-- remove accent
-- needed to created correct stem["θ2"] δανείζω δάνειζ- ΝΟΤ δανέιζ,  and more καταπράυνσ- - καταπραΰνσ-
	stem["θ0"] = m_stems.word2syn(stem["θ"])			-- to create correct e.g. [[δανείζω]], δάνειζ- ΝΟΤ δανέιζ-
    stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"])	-- convert oxia to perispomeni -- also named θ1ο
	stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"])	-- convert perispomeni to oxeia
    stem["θ1"] = m_stems.word1(stem["θ0"])				-- accent on 1st syllable from the end (Accent is tonos or oksia. Used mainly for monotonic script)
	stem["θ2"] = m_stems.word2(stem["θ0"])				-- accent on 2nd syllable from the end
Examples
	local stem = {}
    if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
      	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)
    else
    	args['μείον'] = 1 -- override default stemnumber = 3 (μείον 2)
    end
if mw.ustring.find(args['λήμμα'], 'όοι$') then -- $ = at the end    
]=]--





-- DO NOT use cat-extra with lang_name in the pages. Use κατηγ or υποκατ
-- =============== LANGUAGES for categories and notes in appendix
cat_pos = args['μέρος λόγου'] or 'Ουσιαστικά' -- pos: Part of Speech
	lang_iso = lang_iso or 'grc'
	lang_link = languages[lang_iso]['link'] or ''
	lang_name = languages[lang_iso]['name'] or ''
if (args['δωρ'] == '1' or args['grc-dor'] == '1' or args['λακ'] == '1' or args['grc-lak'] == '1') then lang_name = 'δωρική διάλεκτος' end
if (args['επικ'] == '1' or args['grc-epi'] == '1') then lang_name = 'επική διάλεκτος' end
if args['άρθρα'] == 'δωρ' then args['δωρ'] = '1'  args['grc-dor'] = '1' lang_name = 'δωρική διάλεκτος'  end

-- ======= HELLENISTIC KOINE
--	about = args['about'] or ''
	-- withdrawn
	about = '' -- '<br>Οι κλιτικοί πίνακες (αρχαία ή ελληνιστική)<br>με όλους τους δυνατούς τύπους, μαρτυρημένους και αμάρτυρους.'
	about_kath = '' -- '<br>Κλιτικοί τύποι όπως στα αρχαία ελληνικά.'
	about_gkm = '' -- '<br>Κλιτικοί τύποι όπως στα αρχαία ελληνικά.'
-- 1 = only title and Κατηγορία:Λήμματα με κλίσεις (languagename)
-- 2 = all categories
-- # SEE handling of titles like mod-τίτλος below, at params
		-- used if ONLY hellenistic, exclusively
-- [[Πρότυπο:grc-κλίση-'κούπα']] is hellenistic. STILL the HOST language is always grc αρχαία ελληνικά
		if args['grc-koi']  == '2' or args['ελνστ'] == '2' then
			args['lang_title'] = '[[:Κατηγορία:Ελληνιστική κοινή|ελληνιστική κοινή]]<br><i><small>δε μαρτυρείται δυϊκός αριθμός</small></i>'
--				.. '[[Κατηγορία:' .. cat_pos .. ' με ελληνιστικές κλίσεις (ελληνιστική κοινή)]]'
			lang_iso = 'grc-koi'
			lang_name = languages['grc-koi']['name']
		elseif args['grc-koi']  == '1' or args['ελνστ'] == '1' then	-- but categories grc / 2022.03. test all categories = Koine
			args['lang_title'] = "<i>[[:Κατηγορία:Ουσιαστικά (ελληνιστική κοινή)|ελληνιστική κοινή (αρχαία κλίση)]]</i><br><i><small>δε μαρτυρείται δυϊκός αριθμός</small></i>" 
				.. '[[Κατηγορία:' .. cat_pos .. ' με αρχαίες κλίσεις (ελληνιστική κοινή)]]'
			--	check [[βάρβαξ]] [[Βακτρία]]
			lang_iso = 'grc-koi'
			-- hellenistic words with classic declensions -- + category for statistical purpose
			lang_name = languages['grc-koi']['name']
		end

-- (no prosody for the following languages)		
-- ======= learned MEDIAEVAL GREEK -- check learned [[Λεβαδία]] - vulgar [[παλληκάριον]] 
-- for vulgar mediaeval greek see Modern Greek modules (it had no dative)
		if args['gkm']  == '2' or args['μσν'] == '2' then
			args['lang_title'] = '[[:Κατηγορία:Μεσαιωνικά ελληνικά|μεσαιωνικά ελληνικά]]'
-- test [[παλληκάριον]] (with otherwise nocat=1 for decl.Categories)
-- test [[Πρότυπο:gkm-κλίση-'κούπα']] [[κοῦπα]] (equiavelnt of hellenistic decl by the same name see above)
			.. '[[Κατηγορία:' .. cat_pos .. ' με μεσαιωνικές κλίσεις (μεσαιωνικά ελληνικά)]]'
			lang_iso = 'gkm'
			lang_name = languages['gkm']['name']
			about = about_gkm -- withdrawn
			c_extra= '#cfcfe2;'
			c_3 = '#dfdfec;' -- title3,	as in m2 at [[Πρότυπο:el-biblio/style.css]]
--			args['τύπος'] = 'μεσαιωνική κλίση' -- this param is compulsory (for clitic paradigm), skip it with pseudoname
--			args['nocat'] = '1' -- we do not need Decl-Categories as in grc
			args['δυ'] = '-'	-- no dual
			args['δοτ'] = '-'	-- no datives

			-- NO prosody (see below)
		elseif args['gkm']  == '1' or args['μσν'] == '1' then
			args['lang_title'] = "''[[:Κατηγορία:Μεσαιωνικά ελληνικά|λόγια μεσαιωνική ελληνική με αρχαία κλίση]]''" 
				.. '[[Κατηγορία:' .. cat_pos .. ' με αρχαίες κλίσεις (μεσαιωνικά ελληνικά)]]'
			lang_iso = 'gkm'
			c_extra= '#cfcfe2;' 
			c_3 = '#dfdfec;'
			args['δυ'] = '-'	-- no dual
			-- NO prosody (see below)
			args['nocat'] = '1'	-- do not create subcategories	
			
			
-- for Katharevousa ========= check  [[Ἀχλαδέα]] -- has no =2 declensions of its own
		elseif args['kath']  == '2' or args['καθ'] == '2' then
			args['lang_title'] = '[[:Κατηγορία:Καθαρεύουσα|καθαρεύουσα]] (κατά την αρχαία κλίση)'
			lang_iso = 'kath'
			about = about_kath -- withdrawn
			c_3 = '#d5e2f6' -- title3, all the subtitles as in Modern Greek table-colours
		elseif args['kath']  == '1' or args['καθ'] == '1' then
			args['lang_title'] = '<i>[[:Κατηγορία:Καθαρεύουσα|καθαρεύουσα]] (κατά την αρχαία κλίση)</i>'  
				.. '[[Κατηγορία:' .. cat_pos .. ' με αρχαίες κλίσεις (καθαρεύουσα)]]'
			lang_iso = 'kath'
			c_3 = '#d5e2f6'
			args['δυ'] = '-'	-- no dual
			args['nocat'] = '1'	-- do not create subcategories	
			-- NO prosody (see below)
		else
--			args['lang_title'] = ''	-- no, otherwise all other titles vanish
			about = about -- withdrawn
			lang_iso = 'grc'
			c_3 = c_3
		end	

-- Place this UNDER LANGUAGES,  not before!!!!  -- test [[Λεβαδία]]
-- ====================== Links
-- create_link((args['οεθ'] .. args['οε']), (stem_color(args['οεθ']) .. ending_color(args['οε+'])))
function create_link (page, text)
		if text then
		return '[[' .. page .. '#' .. languages[lang_iso]['link'] .. '|' .. text .. ']]'
		else
		return '[[' .. page .. '#' .. languages[lang_iso]['link'] .. '|' .. page .. ']]'
		end
end

-- ======================== άγνωστες λέξεις χωρίς πηγές (ονόματα ====================
-- unk=1 Κατηγορία:Ουσιαστικά με κλίση χωρίς χρονολόγηση (αρχαία ελληνικά)
	args['unk'] = args['unk'] or ''
	args['rar'] = args['rar'] or ''
	if args['unk'] == '1' then
		args['nocat'] = '1'
		args['σημ'] = args['σημ'] .. '[[Κατηγορία:Ουσιαστικά με κλίση χωρίς χρονολόγηση (αρχαία ελληνικά)]]'
	end
	if args['rar'] == '1' then
		args['nocat'] = '1'
		args['σημ'] = args['σημ'] .. '[[Κατηγορία:Σπάνια κύρια ονόματα κατά την κλίση (αρχαία ελληνικά)]]'
	end
	
-- ================================ TTILES ===========
-- PLACE THIS UNDER LANGUAGES
--  (title from module + extra title) check [[Βαβυλωνίς]] Control: [[Λεβαδία]] (only mod-title, [[Βαβυλωνεύς]] (no title)) [[κρίνον]] (only editor's title)
-- [[αἰθήρ]] auto addition for α-θ = 1
	-- args['lang_title'] see LANGUAGES
--[=[ About dialects / Σχετικά με διαλέκτους CAREFULL!! Buck, Introduction to the study of the Greek dialects @archive.org
ΔΩΡΙΚΗ διάλεκτος DORIC dialect // Use ΛΑΚΩΝΙΚΗ διάλεκτος if so, NOT δωρική ή λακωνική.
* the article may be Doric, but the declension has no difference from classic
e.g. [[ὄρπαξ]] 
	** Κατηγορία:Ουσιαστικά 3ης κλίσης (δωρική διάλεκτος) -- indeed, it is a Doric word
	** title= ΝΟΤ δωρική κλίση The declension is not Doric, only the artilces are.
		It should be: κλίση με δωρικά άρθρα (DO NOT USE ή λακωνική)
		User τίτλος= to change the title.
* the articles AND the delcenion is Doric
e.g. [[τύχα]]
	** Κατηγορία:Ουσιαστικά 1ης κλίσης (δωρική διάλεκτος)
	** title= δωρική κλίση --not ή λακωνική
ΕΠΙΚΟΙ όροι - EPIC terms
* Both articles and declenion are Epic
at the moment we do not have OTHER dialects in declension (2023.11.)
]=]--
--Taking off all...  or args['λακ'] == '1' or args['grc-lak'] == '1') 
-- USE if args['άρθρα'] == 'δωρ' then 'κλίση με δωρικά άρθρα'
	args['mod-τίτλος'] = args['mod-τίτλος'] or ''
	args['τίτλος'] = args['τίτλος'] or ''
	extratitle_str = args['mod-τίτλος'] or '' 
	editor_title = args['τίτλος'] or ''
	if args['mod-τίτλος'] ~= '' and args['mod-τίτλος'] ~= nil then
		if args['τίτλος'] ~= '' and args['τίτλος'] ~= nil then
			args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος']
			if args['α-θ'] == '1' then
					if (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>" 
					.. '[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i>δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>" 
					.. '[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>" 
					.. '[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					end
			elseif args['θ-1'] == '1' then
					if (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>" 
					.. '[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i>δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>" 
					.. '[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>" 
					.. '[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'	
					end
			else
					if args['άρθρα'] == 'δωρ' or args['άρθρα'] == 'grc-dor' then	 -- find example
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>" 
					.. 'κλίση με δωρικά άρθρα'
					elseif (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>" 
					.. ' [[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i>δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>" 
					.. ' [[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>" 
					end
			end
		else -- yes mod-τίτλος,  no τίτλος
		args['mod-τίτλος'] = args['mod-τίτλος']
			if args['α-θ'] == '1' then
					if (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i> δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					end				
			elseif args['θ-1'] == '1' then
					if (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i>δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'
					end		
			else
					if args['άρθρα'] == 'δωρ' or args['άρθρα'] == 'grc-dor' then	 -- check  [[γυνά]]
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
					.. 'κλίση με δωρικά άρθρα'	
					elseif (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i>δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
					end				
			end
		end
	else -- NO mod-τιτλος
		-- no mod-τίτλος, yes τίτλος
		if args['τίτλος'] ~= '' and args['τίτλος'] ~= nil then
			args['mod-τίτλος'] = args['τίτλος']
			if args['α-θ'] == '1' then
					if (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] = args['τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i>δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] = args['τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] = args['τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					end		
			elseif args['θ-1'] == '1' then
					if (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] = args['τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i>δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] = args['τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] = args['τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'
					end				
			else
					if args['άρθρα'] == 'δωρ' or args['άρθρα'] == 'grc-dor' then	 -- find example
					args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
					.. 'κλίση με δωρικά άρθρα'
					elseif (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] = args['τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i>δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] = args['τίτλος'] .. "<br>"
					.. '[[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] = args['τίτλος'] .. "<br>"
					end
			end
		else -- no mod-τίτλος, no τίτλος, nothing
		args['mod-τίτλος'] = args['mod-τίτλος'] or ''
		args['τίτλος'] = args['τίτλος'] or ''
			if args['α-θ'] == '1' then -- [[αἰθήρ]] 
					if (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] =
					'[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i>δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] =
					'[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] =
					'[[:Κατηγορία:Ουσιαστικά αρσενικά ή θηλυκά (αρχαία ελληνικά)|αρσενικό ή θηλυκό]]'
					end
			elseif args['θ-1'] == '1' then
					if (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] =
					'[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i>δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] =
					'[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'
					.. ' [[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] =
					'[[:Κατηγορία:Ουσιαστικά θηλυκά ή αρσενικά (αρχαία ελληνικά)|θηλυκό ή αρσενικό]]'
					end			
			else
					if args['άρθρα'] == 'δωρ' or args['άρθρα'] == 'grc-dor' then	 -- check  [[ὄρπαξ]]
					args['mod-τίτλος'] =
					'κλίση με δωρικά άρθρα'	
					elseif (args['δωρ'] == '1' or args['grc-dor'] == '1') then
					args['mod-τίτλος'] =
					'[[:Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)|<i>δωρική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με δωρικές κλίσεις (αρχαία ελληνικά)]]'
					elseif (args['επικ'] == '1' or args['grc-epi'] == '1') then
					args['mod-τίτλος'] =
					'[[:Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)|<i>επική κλίση</i>]]' .. '[[Κατηγορία:Ουσιαστικά με επικές κλίσεις (αρχαία ελληνικά)]]'
					else
					args['mod-τίτλος'] = args['mod-τίτλος'] or ''
					end
			end
		end
	end


-- ================================ BREAKS
-- optional no break line, no &, just a space with br=- for all second lines (TEST at voc.sg)
-- optional no break line, no &, just a space with br=- for all second lines (TEST at voc.sg)
br = args['br'] or ''
-- for dual (du), never change line. User brdu

		if args['br'] == '&' then br = '&nbsp;&&nbsp;'	brdu = '&nbsp;&&nbsp;'		-- & at same line nobreak
	elseif args['br'] == 'dash' then br = '&nbsp;-&nbsp;'	brdu = '&nbsp;-&nbsp;'		-- dash, same line nobreak
	elseif args['br'] == '-' then br = '&nbsp;'		brdu = '&nbsp;'		-- just a space
	elseif args['br'] == 'brtext' then 
		br = '<br />' .. args['br'] .. '&nbsp;' -- little text in new line
		brdu = '&nbsp;' .. args['br'] .. '&nbsp;'
	elseif args['br'] == 'br' then 
		br = '<br />'	-- change line, no &
		brdu = '&nbsp;'		-- just a space
	elseif args['br'] == '' or args['br'] == nil then 
		br = '<br />&&nbsp;'	-- DEFAULT
		brdu = '&nbsp;&&nbsp;'		-- DEFAULT & at same line nobreak
	else br = '&nbsp;' .. args['br'] .. '&nbsp;' -- a little text in between, like ή, και etc
		brdu = '&nbsp;' .. args['br'] .. '&nbsp;'
	end



-- ================================ NOTES (mod-σημ from the Module, σημ by the editor)
-- check [[Γλυκέριον]]
-- see MAIN PAGE for note = args['mod-σημ']

-- if editor writes σημ= then the module-σημ changes
if args['σημ'] ~= '' and args['σημ'] ~= nil then args['mod-σημ'] = args['σημ'] end
-- if the editor does not want the mod-σημ of the Module
	-- but if we write args['σημ'] ΙΝ module functions, then the editor cannot erase or edit it
	-- For some notes, we do not want the editor to change anything
	if args['σημ'] == '-' then
		args['mod-σημ'] = ''
	else
		args['σημ'] = args['σημ']
	end

-- ================================  common word for polylectics e.g. [[Ἀντινόου πόλις]]
-- before the word
	args['κοινό1'] = args['κοινό1']  or ''
	if args['κοινό1'] ~= '' and args['κοινό1'] ~= nil then
		args['κοινό1'] = args['κοινό1'] .. '&nbsp;'
	else
		args['κοινό1'] = ''
	end

-- after the word -- no example has come up
-- add a repetitive term at the beginning or at the end of each cell:
	args['κοινό'] = args['κοινό'] or ''
	if args['κοινό'] ~= '' and args['κοινό'] ~= nil then
		args['κοινό'] =  '&nbsp;' .. args['κοινό'] 
	else
		args['κοινό'] = ''
	end

-- ===================== TESTS
--[=[
if args['υπότιτλος-εν'] == 'αρσ' then args['υπότιτλος-εν'] = '[[αρσενικό|' .. black_color('αρσενικό') .. ']]'
			-- check [[λύχνος]]
			args['αοε'] = "αρσ"	args['αγε'] = "αρσ"	args['αδε'] = "αρσ"	args['ααε'] = "αρσ"
end
]=]--

-- ================================ NO PROSODY for some languages
-- languages with NO prosody
	args['μσν'] = args['μσν'] or ''			-- μεσαιωνικά ελληνικά -- test [[Λεβαδία]] -- only testing
	args['gkm'] = args['gkm'] or ''			-- Mediaeval Grek code

	args['καθ'] = args['καθ'] or ''				-- καθαρεύουσα -- test [[Ἀχλαδέα]]
	args['kath'] = args['kath'] or ''			-- Katharevousa code

if args['kath'] == '1' or args['καθ'] == '1' or args['gkm'] == '1' or args['μσν'] == '1' then
-- STEMS no prosdy
-- @modules
	args['mod-οεθ+'] = args['mod-οεθ']	args['mod-γεθ+'] = args['mod-γεθ']	args['mod-δεθ+'] = args['mod-δεθ']	args['mod-αεθ+'] = args['mod-αεθ']	args['mod-κεθ+'] = args['mod-κεθ']
	args['mod-οπθ+'] = args['mod-οπθ']	args['mod-γπθ+'] = args['mod-γπθ']	args['mod-δπθ+'] = args['mod-δπθ']	args['mod-απθ+'] = args['mod-απθ']	args['mod-κπθ+'] = args['mod-κπθ']
-- editors
	args['οεθ+'] = args['οεθ']	args['γεθ+'] = args['γεθ']	args['δεθ+'] = args['δεθ']	args['αεθ+'] = args['αεθ']	args['κεθ+'] = args['κεθ']
	args['οπθ+'] = args['οπθ']	args['γπθ+'] = args['γπθ']	args['δπθ+'] = args['δπθ']	args['απθ+'] = args['απθ']	args['κπθ+'] = args['κπθ']
-- ENDINGS no prosody
-- @modules
	args['mod-οε+'] = args['mod-οε']	args['mod-γε+'] = args['mod-γε']	args['mod-δε+'] = args['mod-δε']	args['mod-αε+'] = args['mod-αε']	args['mod-κε+'] = args['mod-κε']
	args['mod-οπ+'] = args['mod-οπ']	args['mod-γπ+'] = args['mod-γπ']	args['mod-δπ+'] = args['mod-δπ']	args['mod-απ+'] = args['mod-απ']	args['mod-κπ+'] = args['mod-κπ']
-- editors
	args['οε+'] = args['οε']	args['γε+'] = args['γε']	args['δε+'] = args['δε']	args['αε+'] = args['αε']	args['κε+'] = args['κε']
	args['οπ+'] = args['οπ']	args['γπ+'] = args['γπ']	args['δπ+'] = args['δπ']	args['απ+'] = args['απ']	args['κπ+'] = args['κπ']
end

-- ================================ START WORDS
-- whole words @modules ALSO SNUMBERED
	args['mod-οεΛ'] = args['mod-οεΛ'] or args['1'] or ''	args['mod-γεΛ'] = args['mod-γεΛ'] or args['2'] or ''	args['mod-δεΛ'] = args['mod-δεΛ'] or args['3'] or ''	
	args['mod-αεΛ'] = args['mod-αεΛ'] or args['4'] or ''	args['mod-κεΛ'] = args['mod-κεΛ'] or args['5'] or ''
	args['mod-οπΛ'] = args['mod-οπΛ'] or args['6'] or ''	args['mod-γπΛ'] = args['mod-γπΛ'] or args['7'] or ''	args['mod-δπΛ'] = args['mod-δπΛ'] or args['8'] or ''	
	args['mod-απΛ'] = args['mod-απΛ'] or args['9'] or ''	args['mod-κπΛ'] = args['mod-κπΛ'] or args['10'] or ''
	args['mod-οδΛ'] = args['mod-οδΛ'] or args['11'] or ''	args['mod-γδΛ'] = args['mod-γδΛ'] or args['12'] or ''
	-- second word
	args['mod-οε2Λ'] = args['mod-οε2Λ'] or ''	args['mod-γε2Λ'] = args['mod-γε2Λ'] or ''	args['mod-δε2Λ'] = args['mod-δε2Λ'] or ''	
	args['mod-αε2Λ'] = args['mod-αε2Λ'] or ''	args['mod-κε2Λ'] = args['mod-κε2Λ'] or ''
	args['mod-οπ2Λ'] = args['mod-οπ2Λ'] or ''	args['mod-γπ2Λ'] = args['mod-γπ2Λ'] or ''	args['mod-δπ2Λ'] = args['mod-δπ2Λ'] or ''	
	args['mod-απ2Λ'] = args['mod-απ2Λ'] or ''	args['mod-κπ2Λ'] = args['mod-κπ2Λ'] or ''
	args['mod-οδ2Λ'] = args['mod-οδ2Λ'] or ''	args['mod-γδ2Λ'] = args['mod-γδ2Λ'] or ''
-- whole words for editors
	args['οεΛ'] = args['οεΛ'] or ''	args['γεΛ'] = args['γεΛ'] or ''	args['δεΛ'] = args['δεΛ'] or ''	
	args['αεΛ'] = args['αεΛ'] or ''	args['κεΛ'] = args['κεΛ'] or ''
	args['οπΛ'] = args['οπΛ'] or ''	args['γπΛ'] = args['γπΛ'] or ''	args['δπΛ'] = args['δπΛ'] or ''	
	args['απΛ'] = args['απΛ'] or ''	args['κπΛ'] = args['κπΛ'] or ''
	args['οδΛ'] = args['οδΛ'] or ''	args['γδΛ'] = args['γδΛ'] or ''
	-- second word
	args['οε2Λ'] = args['οε2Λ'] or ''	args['γε2Λ'] = args['γε2Λ'] or ''	args['δε2Λ'] = args['δε2Λ'] or ''	
	args['αε2Λ'] = args['αε2Λ'] or ''	args['κε2Λ'] = args['κε2Λ'] or ''
	args['οπ2Λ'] = args['οπ2Λ'] or ''	args['γπ2Λ'] = args['γπ2Λ'] or ''	args['δπ2Λ'] = args['δπ2Λ'] or ''	
	args['απ2Λ'] = args['απ2Λ'] or ''	args['κπ2Λ'] = args['κπ2Λ'] or ''
	args['οδ2Λ'] = args['οδ2Λ'] or ''	args['γδ2Λ'] = args['γδ2Λ'] or ''
-- if οεΛ then mod-οεΛ=οεΛ
	if args['οεΛ'] ~= '' and args['οεΛ'] ~= nil then args['mod-οεΛ'] = args['οεΛ'] end
	if args['γεΛ'] ~= '' and args['γεΛ'] ~= nil then args['mod-γεΛ'] = args['γεΛ'] end
	if args['δεΛ'] ~= '' and args['δεΛ'] ~= nil then args['mod-δεΛ'] = args['δεΛ'] end
	if args['αεΛ'] ~= '' and args['αεΛ'] ~= nil then args['mod-αεΛ'] = args['αεΛ'] end
	if args['κεΛ'] ~= '' and args['κεΛ'] ~= nil then args['mod-κεΛ'] = args['κεΛ'] end
	if args['οπΛ'] ~= '' and args['οπΛ'] ~= nil then args['mod-οπΛ'] = args['οπΛ'] end
	if args['γπΛ'] ~= '' and args['γπΛ'] ~= nil then args['mod-γπΛ'] = args['γπΛ'] end
	if args['δπΛ'] ~= '' and args['δπΛ'] ~= nil then args['mod-δπΛ'] = args['δπΛ'] end
	if args['απΛ'] ~= '' and args['απΛ'] ~= nil then args['mod-απΛ'] = args['απΛ'] end
	if args['κπΛ'] ~= '' and args['κπΛ'] ~= nil then args['mod-κπΛ'] = args['κπΛ'] end
	if args['οδΛ'] ~= '' and args['οδΛ'] ~= nil then args['mod-οδΛ'] = args['οδΛ'] end
	if args['γδΛ'] ~= '' and args['γδΛ'] ~= nil then args['mod-γδΛ'] = args['γδΛ'] end
	-- second word  CHECK [[ἄγλις]]
	if args['οε2Λ'] ~= '' and args['οε2Λ'] ~= nil then args['mod-οε2Λ'] = args['οε2Λ'] end
	if args['γε2Λ'] ~= '' and args['γε2Λ'] ~= nil then args['mod-γε2Λ'] = args['γε2Λ'] end
	if args['δε2Λ'] ~= '' and args['δε2Λ'] ~= nil then args['mod-δε2Λ'] = args['δε2Λ'] end
	if args['αε2Λ'] ~= '' and args['αε2Λ'] ~= nil then args['mod-αε2Λ'] = args['αε2Λ'] end
	if args['κε2Λ'] ~= '' and args['κε2Λ'] ~= nil then args['mod-κε2Λ'] = args['κε2Λ'] end
	if args['οπ2Λ'] ~= '' and args['οπ2Λ'] ~= nil then args['mod-οπ2Λ'] = args['οπ2Λ'] end
	if args['γπ2Λ'] ~= '' and args['γπ2Λ'] ~= nil then args['mod-γπ2Λ'] = args['γπ2Λ'] end
	if args['δπ2Λ'] ~= '' and args['δπ2Λ'] ~= nil then args['mod-δπ2Λ'] = args['δπ2Λ'] end
	if args['απ2Λ'] ~= '' and args['απ2Λ'] ~= nil then args['mod-απ2Λ'] = args['απ2Λ'] end
	if args['κπ2Λ'] ~= '' and args['κπ2Λ'] ~= nil then args['mod-κπ2Λ'] = args['κπ2Λ'] end
	if args['οδ2Λ'] ~= '' and args['οδ2Λ'] ~= nil then args['mod-οδ2Λ'] = args['οδ2Λ'] end
	if args['γδ2Λ'] ~= '' and args['γδ2Λ'] ~= nil then args['mod-γδ2Λ'] = args['γδ2Λ'] end
	
-- ========== DEFAULT STEMS auto  -- place this here, ABOVE the stems, otherwise it shows nothing
-- this is for module stems, no need to rewrite default (minus 2 letters from end) 
-- BUT IF the function's stem is not the default stem, all stems have to be written
	if args['mod-οεθ'] == '' or args['mod-οεθ'] == nil then args['mod-οεθ'] = stem["θ"] else args['mod-οεθ'] = args['mod-οεθ'] end
	if args['mod-γεθ'] == '' or args['mod-γεθ'] == nil then args['mod-γεθ'] = stem["θ"] else args['mod-γεθ'] = args['mod-γεθ'] end
	if args['mod-δεθ'] == '' or args['mod-δεθ'] == nil then args['mod-δεθ'] = stem["θ"] else args['mod-δεθ'] = args['mod-δεθ'] end
	if args['mod-αεθ'] == '' or args['mod-αεθ'] == nil then args['mod-αεθ'] = stem["θ"] else args['mod-αεθ'] = args['mod-αεθ'] end
	if args['mod-κεθ'] == '' or args['mod-κεθ'] == nil then args['mod-κεθ'] = stem["θ"] else args['mod-κεθ'] = args['mod-κεθ'] end
	if args['mod-οπθ'] == '' or args['mod-οπθ'] == nil then args['mod-οπθ'] = stem["θ"] else args['mod-οπθ'] = args['mod-οπθ'] end
	if args['mod-γπθ'] == '' or args['mod-γπθ'] == nil then args['mod-γπθ'] = stem["θ"] else args['mod-γπθ'] = args['mod-γπθ'] end
	if args['mod-δπθ'] == '' or args['mod-δπθ'] == nil then args['mod-δπθ'] = stem["θ"] else args['mod-δπθ'] = args['mod-δπθ'] end
	if args['mod-απθ'] == '' or args['mod-απθ'] == nil then args['mod-απθ'] = stem["θ"] else args['mod-απθ'] = args['mod-απθ'] end
	if args['mod-κπθ'] == '' or args['mod-κπθ'] == nil then args['mod-κπθ'] = stem["θ"] else args['mod-κπθ'] = args['mod-κπθ'] end
	if args['mod-οδθ'] == '' or args['mod-οδθ'] == nil then args['mod-οδθ'] = stem["θ"] else args['mod-οδθ'] = args['mod-οδθ'] end
	if args['mod-γδθ'] == '' or args['mod-γδθ'] == nil then args['mod-γδθ'] = stem["θ"] else args['mod-γδθ'] = args['mod-γδθ'] end
	-- stem for second words
	if args['mod-οε2θ'] == '' or args['mod-οε2θ'] == nil then args['mod-οε2θ'] = stem["θ"] else args['mod-οε2θ'] = args['mod-οε2θ'] end
	if args['mod-γε2θ'] == '' or args['mod-γε2θ'] == nil then args['mod-γε2θ'] = stem["θ"] else args['mod-γε2θ'] = args['mod-γε2θ'] end
	if args['mod-δε2θ'] == '' or args['mod-δε2θ'] == nil then args['mod-δε2θ'] = stem["θ"] else args['mod-δε2θ'] = args['mod-δε2θ'] end
	if args['mod-αε2θ'] == '' or args['mod-αε2θ'] == nil then args['mod-αε2θ'] = stem["θ"] else args['mod-αε2θ'] = args['mod-αε2θ'] end
	if args['mod-κε2θ'] == '' or args['mod-κε2θ'] == nil then args['mod-κε2θ'] = stem["θ"] else args['mod-κε2θ'] = args['mod-κε2θ'] end
	if args['mod-οπ2θ'] == '' or args['mod-οπ2θ'] == nil then args['mod-οπ2θ'] = stem["θ"] else args['mod-οπ2θ'] = args['mod-οπ2θ'] end
	if args['mod-γπ2θ'] == '' or args['mod-γπ2θ'] == nil then args['mod-γπ2θ'] = stem["θ"] else args['mod-γπ2θ'] = args['mod-γπ2θ'] end
	if args['mod-δπ2θ'] == '' or args['mod-δπ2θ'] == nil then args['mod-δπ2θ'] = stem["θ"] else args['mod-δπ2θ'] = args['mod-δπ2θ'] end
	if args['mod-απ2θ'] == '' or args['mod-απ2θ'] == nil then args['mod-απ2θ'] = stem["θ"] else args['mod-απ2θ'] = args['mod-απ2θ'] end
	if args['mod-κπ2θ'] == '' or args['mod-κπ2θ'] == nil then args['mod-κπ2θ'] = stem["θ"] else args['mod-κπ2θ'] = args['mod-κπ2θ'] end
	if args['mod-οδ2θ'] == '' or args['mod-οδ2θ'] == nil then args['mod-οδ2θ'] = stem["θ"] else args['mod-οδ2θ'] = args['mod-οδ2θ'] end
	if args['mod-γδ2θ'] == '' or args['mod-γδ2θ'] == nil then args['mod-γδ2θ'] = stem["θ"] else args['mod-γδ2θ'] = args['mod-γδ2θ'] end
-- this is for editor's words. Editor does not have to write the default stem
-- CHECK [[πῦρ]] with invoke. 
-- CHECK [[Σουσάννα]] with addition of second words
-- CHECK [[λόχμη]] with second dative plural plus movable n 
	if args['οεθ'] == '' or args['οεθ'] == nil then args['οεθ'] = stem["θ"] else args['οεθ'] = args['οεθ'] end
	if args['γεθ'] == '' or args['γεθ'] == nil then args['γεθ'] = stem["θ"] else args['γεθ'] = args['γεθ'] end
	if args['δεθ'] == '' or args['δεθ'] == nil then args['δεθ'] = stem["θ"] else args['δεθ'] = args['δεθ'] end
	if args['αεθ'] == '' or args['αεθ'] == nil then args['αεθ'] = stem["θ"] else args['αεθ'] = args['αεθ'] end
	if args['κεθ'] == '' or args['κεθ'] == nil then args['κεθ'] = stem["θ"] else args['κεθ'] = args['κεθ'] end
	if args['οπθ'] == '' or args['οπθ'] == nil then args['οπθ'] = stem["θ"] else args['οπθ'] = args['οπθ'] end
	if args['γπθ'] == '' or args['γπθ'] == nil then args['γπθ'] = stem["θ"] else args['γπθ'] = args['γπθ'] end
	if args['δπθ'] == '' or args['δπθ'] == nil then args['δπθ'] = stem["θ"] else args['δπθ'] = args['δπθ'] end
	if args['απθ'] == '' or args['απθ'] == nil then args['απθ'] = stem["θ"] else args['απθ'] = args['απθ'] end
	if args['κπθ'] == '' or args['κπθ'] == nil then args['κπθ'] = stem["θ"] else args['κπθ'] = args['κπθ'] end
	if args['οδθ'] == '' or args['οδθ'] == nil then args['οδθ'] = stem["θ"] else args['οδθ'] = args['οδθ'] end
	if args['γδθ'] == '' or args['γδθ'] == nil then args['γδθ'] = stem["θ"] else args['γδθ'] = args['γδθ'] end
	-- stem for second words [[Σουσάννα]]
	if args['οε2θ'] == '' or args['οε2θ'] == nil then args['οε2θ'] = stem["θ"] else args['οε2θ'] = args['οε2θ'] end
	if args['γε2θ'] == '' or args['γε2θ'] == nil then args['γε2θ'] = stem["θ"] else args['γε2θ'] = args['γε2θ'] end
	if args['δε2θ'] == '' or args['δε2θ'] == nil then args['δε2θ'] = stem["θ"] else args['δε2θ'] = args['δε2θ'] end
	if args['αε2θ'] == '' or args['αε2θ'] == nil then args['αε2θ'] = stem["θ"] else args['αε2θ'] = args['αε2θ'] end
	if args['κε2θ'] == '' or args['κε2θ'] == nil then args['κε2θ'] = stem["θ"] else args['κε2θ'] = args['κε2θ'] end
	if args['οπ2θ'] == '' or args['οπ2θ'] == nil then args['οπ2θ'] = stem["θ"] else args['οπ2θ'] = args['οπ2θ'] end
	if args['γπ2θ'] == '' or args['γπ2θ'] == nil then args['γπ2θ'] = stem["θ"] else args['γπ2θ'] = args['γπ2θ'] end
	if args['δπ2θ'] == '' or args['δπ2θ'] == nil then args['δπ2θ'] = stem["θ"] else args['δπ2θ'] = args['δπ2θ'] end
	if args['απ2θ'] == '' or args['απ2θ'] == nil then args['απ2θ'] = stem["θ"] else args['απ2θ'] = args['απ2θ'] end
	if args['κπ2θ'] == '' or args['κπ2θ'] == nil then args['κπ2θ'] = stem["θ"] else args['κπ2θ'] = args['κπ2θ'] end
	if args['οδ2θ'] == '' or args['οδ2θ'] == nil then args['οδ2θ'] = stem["θ"] else args['οδ2θ'] = args['οδ2θ'] end
	if args['γδ2θ'] == '' or args['γδ2θ'] == nil then args['γδ2θ'] = stem["θ"] else args['γδ2θ'] = args['γδ2θ'] end

-- STEM PROSODY needed e.g. at [[Αἴας]] Αἴ-αντ-ος κλητική ὦ Αἶ-ᾰν!
-- STEM prosody - no prosody @modules
if args['mod-οεθ+'] == '' or args['mod-οεθ+'] == nil then args['mod-οεθ+'] = args['mod-οεθ'] end
if args['mod-γεθ+'] == '' or args['mod-γεθ+'] == nil then args['mod-γεθ+'] = args['mod-γεθ'] end
if args['mod-δεθ+'] == '' or args['mod-δεθ+'] == nil then args['mod-δεθ+'] = args['mod-δεθ'] end
if args['mod-αεθ+'] == '' or args['mod-αεθ+'] == nil then args['mod-αεθ+'] = args['mod-αεθ'] end
if args['mod-κεθ+'] == '' or args['mod-κεθ+'] == nil then args['mod-κεθ+'] = args['mod-κεθ'] end
if args['mod-οπθ+'] == '' or args['mod-οπθ+'] == nil then args['mod-οπθ+'] = args['mod-οπθ'] end
if args['mod-γπθ+'] == '' or args['mod-γπθ+'] == nil then args['mod-γπθ+'] = args['mod-γπθ'] end
if args['mod-δπθ+'] == '' or args['mod-δπθ+'] == nil then args['mod-δπθ+'] = args['mod-δπθ'] end
if args['mod-απθ+'] == '' or args['mod-απθ+'] == nil then args['mod-απθ+'] = args['mod-απθ'] end
if args['mod-κπθ+'] == '' or args['mod-κπθ+'] == nil then args['mod-κπθ+'] = args['mod-κπθ'] end
if args['mod-οδθ+'] == '' or args['mod-οδθ+'] == nil then args['mod-οδθ+'] = args['mod-οδθ'] end
if args['mod-γδθ+'] == '' or args['mod-γδθ+'] == nil then args['mod-γδθ+'] = args['mod-γδθ'] end

if args['mod-οε2θ+'] == '' or args['mod-οε2θ+'] == nil then args['mod-οε2θ+'] = args['mod-οε2θ'] end
if args['mod-γε2θ+'] == '' or args['mod-γε2θ+'] == nil then args['mod-γε2θ+'] = args['mod-γε2θ'] end
if args['mod-δε2θ+'] == '' or args['mod-δε2θ+'] == nil then args['mod-δε2θ+'] = args['mod-δε2θ'] end
if args['mod-αε2θ+'] == '' or args['mod-αε2θ+'] == nil then args['mod-αε2θ+'] = args['mod-αε2θ'] end
if args['mod-κε2θ+'] == '' or args['mod-κε2θ+'] == nil then args['mod-κε2θ+'] = args['mod-κε2θ'] end
if args['mod-οπ2θ+'] == '' or args['mod-οπ2θ+'] == nil then args['mod-οπ2θ+'] = args['mod-οπ2θ'] end
if args['mod-γπ2θ+'] == '' or args['mod-γπ2θ+'] == nil then args['mod-γπ2θ+'] = args['mod-γπ2θ'] end
if args['mod-δπ2θ+'] == '' or args['mod-δπ2θ+'] == nil then args['mod-δπ2θ+'] = args['mod-δπ2θ'] end
if args['mod-απ2θ+'] == '' or args['mod-απ2θ+'] == nil then args['mod-απ2θ+'] = args['mod-απ2θ'] end
if args['mod-κπ2θ+'] == '' or args['mod-κπ2θ+'] == nil then args['mod-κπ2θ+'] = args['mod-κπ2θ'] end
if args['mod-οδ2θ+'] == '' or args['mod-οδ2θ+'] == nil then args['mod-οδ2θ+'] = args['mod-οδ2θ'] end
if args['mod-γδ2θ+'] == '' or args['mod-γδ2θ+'] == nil then args['mod-γδ2θ+'] = args['mod-γδ2θ'] end
-- STEM prosody - no prosody for editors
if args['οεθ+'] == '' or args['οεθ+'] == nil then args['οεθ+'] = args['οεθ'] end
if args['γεθ+'] == '' or args['γεθ+'] == nil then args['γεθ+'] = args['γεθ'] end
if args['δεθ+'] == '' or args['δεθ+'] == nil then args['δεθ+'] = args['δεθ'] end
if args['αεθ+'] == '' or args['αεθ+'] == nil then args['αεθ+'] = args['αεθ'] end
if args['κεθ+'] == '' or args['κεθ+'] == nil then args['κεθ+'] = args['κεθ'] end
if args['οπθ+'] == '' or args['οπθ+'] == nil then args['οπθ+'] = args['οπθ'] end
if args['γπθ+'] == '' or args['γπθ+'] == nil then args['γπθ+'] = args['γπθ'] end
if args['δπθ+'] == '' or args['δπθ+'] == nil then args['δπθ+'] = args['δπθ'] end
if args['απθ+'] == '' or args['απθ+'] == nil then args['απθ+'] = args['απθ'] end
if args['κπθ+'] == '' or args['κπθ+'] == nil then args['κπθ+'] = args['κπθ'] end
if args['οδθ+'] == '' or args['οδθ+'] == nil then args['οδθ+'] = args['οδθ'] end
if args['γδθ+'] == '' or args['γδθ+'] == nil then args['γδθ+'] = args['γδθ'] end

if args['οε2θ+'] == '' or args['οε2θ+'] == nil then args['οε2θ+'] = args['οε2θ'] end
if args['γε2θ+'] == '' or args['γε2θ+'] == nil then args['γε2θ+'] = args['γε2θ'] end
if args['δε2θ+'] == '' or args['δε2θ+'] == nil then args['δε2θ+'] = args['δε2θ'] end
if args['αε2θ+'] == '' or args['αε2θ+'] == nil then args['αε2θ+'] = args['αε2θ'] end
if args['κε2θ+'] == '' or args['κε2θ+'] == nil then args['κε2θ+'] = args['κε2θ'] end
if args['οπ2θ+'] == '' or args['οπ2θ+'] == nil then args['οπ2θ+'] = args['οπ2θ'] end
if args['γπ2θ+'] == '' or args['γπ2θ+'] == nil then args['γπ2θ+'] = args['γπ2θ'] end
if args['δπ2θ+'] == '' or args['δπ2θ+'] == nil then args['δπ2θ+'] = args['δπ2θ'] end
if args['απ2θ+'] == '' or args['απ2θ+'] == nil then args['απ2θ+'] = args['απ2θ'] end
if args['κπ2θ+'] == '' or args['κπ2θ+'] == nil then args['κπ2θ+'] = args['κπ2θ'] end
if args['οδ2θ+'] == '' or args['οδ2θ+'] == nil then args['οδ2θ+'] = args['οδ2θ'] end
if args['γδ2θ+'] == '' or args['γδ2θ+'] == nil then args['γδ2θ+'] = args['γδ2θ'] end
-- ENDINGS PROSODY
-- ENDINGS prosody - no prosody @modules
if args['mod-οε+'] == '' or args['mod-οε+'] == nil then args['mod-οε+'] = args['mod-οε'] end
if args['mod-γε+'] == '' or args['mod-γε+'] == nil then args['mod-γε+'] = args['mod-γε'] end
if args['mod-δε+'] == '' or args['mod-δε+'] == nil then args['mod-δε+'] = args['mod-δε'] end
if args['mod-αε+'] == '' or args['mod-αε+'] == nil then args['mod-αε+'] = args['mod-αε'] end
if args['mod-κε+'] == '' or args['mod-κε+'] == nil then args['mod-κε+'] = args['mod-κε'] end
if args['mod-οπ+'] == '' or args['mod-οπ+'] == nil then args['mod-οπ+'] = args['mod-οπ'] end
if args['mod-γπ+'] == '' or args['mod-γπ+'] == nil then args['mod-γπ+'] = args['mod-γπ'] end
if args['mod-δπ+'] == '' or args['mod-δπ+'] == nil then args['mod-δπ+'] = args['mod-δπ'] end
if args['mod-απ+'] == '' or args['mod-απ+'] == nil then args['mod-απ+'] = args['mod-απ'] end
if args['mod-κπ+'] == '' or args['mod-κπ+'] == nil then args['mod-κπ+'] = args['mod-κπ'] end
if args['mod-οδ+'] == '' or args['mod-οδ+'] == nil then args['mod-οδ+'] = args['mod-οδ'] end
if args['mod-γδ+'] == '' or args['mod-γδ+'] == nil then args['mod-γδ+'] = args['mod-γδ'] end

if args['mod-οε2+'] == '' or args['mod-οε2+'] == nil then args['mod-οε2+'] = args['mod-οε2'] end
if args['mod-γε2+'] == '' or args['mod-γε2+'] == nil then args['mod-γε2+'] = args['mod-γε2'] end
if args['mod-δε2+'] == '' or args['mod-δε2+'] == nil then args['mod-δε2+'] = args['mod-δε2'] end
if args['mod-αε2+'] == '' or args['mod-αε2+'] == nil then args['mod-αε2+'] = args['mod-αε2'] end
if args['mod-κε2+'] == '' or args['mod-κε2+'] == nil then args['mod-κε2+'] = args['mod-κε2'] end
if args['mod-οπ2+'] == '' or args['mod-οπ2+'] == nil then args['mod-οπ2+'] = args['mod-οπ2'] end
if args['mod-γπ2+'] == '' or args['mod-γπ2+'] == nil then args['mod-γπ2+'] = args['mod-γπ2'] end
if args['mod-δπ2+'] == '' or args['mod-δπ2+'] == nil then args['mod-δπ2+'] = args['mod-δπ2'] end
if args['mod-απ2+'] == '' or args['mod-απ2+'] == nil then args['mod-απ2+'] = args['mod-απ2'] end
if args['mod-κπ2+'] == '' or args['mod-κπ2+'] == nil then args['mod-κπ2+'] = args['mod-κπ2'] end
if args['mod-οδ2+'] == '' or args['mod-οδ2+'] == nil then args['mod-οδ2+'] = args['mod-οδ2'] end
if args['mod-γδ2+'] == '' or args['mod-γδ2+'] == nil then args['mod-γδ2+'] = args['mod-γδ2'] end
-- ENDINGS prosody - no prosody for editors
if args['οε+'] == '' or args['οε+'] == nil then args['οε+'] = args['οε'] end
if args['γε+'] == '' or args['γε+'] == nil then args['γε+'] = args['γε'] end
if args['δε+'] == '' or args['δε+'] == nil then args['δε+'] = args['δε'] end
if args['αε+'] == '' or args['αε+'] == nil then args['αε+'] = args['αε'] end
if args['κε+'] == '' or args['κε+'] == nil then args['κε+'] = args['κε'] end
if args['οπ+'] == '' or args['οπ+'] == nil then args['οπ+'] = args['οπ'] end
if args['γπ+'] == '' or args['γπ+'] == nil then args['γπ+'] = args['γπ'] end
if args['δπ+'] == '' or args['δπ+'] == nil then args['δπ+'] = args['δπ'] end
if args['απ+'] == '' or args['απ+'] == nil then args['απ+'] = args['απ'] end
if args['κπ+'] == '' or args['κπ+'] == nil then args['κπ+'] = args['κπ'] end
if args['οδ+'] == '' or args['οδ+'] == nil then args['οδ+'] = args['οδ'] end
if args['γδ+'] == '' or args['γδ+'] == nil then args['γδ+'] = args['γδ'] end

if args['οε2+'] == '' or args['οε2+'] == nil then args['οε2+'] = args['οε2'] end
if args['γε2+'] == '' or args['γε2+'] == nil then args['γε2+'] = args['γε2'] end
if args['δε2+'] == '' or args['δε2+'] == nil then args['δε2+'] = args['δε2'] end
if args['αε2+'] == '' or args['αε2+'] == nil then args['αε2+'] = args['αε2'] end
if args['κε2+'] == '' or args['κε2+'] == nil then args['κε2+'] = args['κε2'] end
if args['οπ2+'] == '' or args['οπ2+'] == nil then args['οπ2+'] = args['οπ2'] end
if args['γπ2+'] == '' or args['γπ2+'] == nil then args['γπ2+'] = args['γπ2'] end
if args['δπ2+'] == '' or args['δπ2+'] == nil then args['δπ2+'] = args['δπ2'] end
if args['απ2+'] == '' or args['απ2+'] == nil then args['απ2+'] = args['απ2'] end
if args['κπ2+'] == '' or args['κπ2+'] == nil then args['κπ2+'] = args['κπ2'] end
if args['οδ2+'] == '' or args['οδ2+'] == nil then args['οδ2+'] = args['οδ2'] end
if args['γδ2+'] == '' or args['γδ2+'] == nil then args['γδ2+'] = args['γδ2'] end
-- uncontracted/contracted display, only at Appendix (ἔκπλοος) ἔκπλους (ὀστέον) ὀστοῦν. Use οεΛκειμ1

-- ==================== STEMS parameters
-- STEMS
	args['οεθ'] = args['οεθ'] or ''	
	args['γεθ'] = args['γεθ'] or ''
	args['δεθ'] = args['δεθ'] or ''
	args['αεθ'] = args['αεθ'] or ''
	args['κεθ'] = args['κεθ'] or ''
	args['οπθ'] = args['οπθ'] or ''
	args['γπθ'] = args['γπθ'] or ''
	args['δπθ'] = args['δπθ'] or ''
	args['απθ'] = args['απθ'] or ''
	args['κπθ'] = args['κπθ'] or ''
	args['οδθ'] = args['οδθ'] or ''
	args['γδθ'] = args['γδθ'] or ''
-- STEMS 2
	args['οε2θ'] = args['οε2θ'] or ''
	args['γε2θ'] = args['γε2θ'] or ''
	args['δε2θ'] = args['δε2θ'] or ''
	args['αε2θ'] = args['αε2θ'] or ''
	args['κε2θ'] = args['κε2θ'] or ''
	args['οπ2θ'] = args['οπ2θ'] or ''
	args['γπ2θ'] = args['γπ2θ'] or ''
	args['δπ2θ'] = args['δπ2θ'] or ''
	args['απ2θ'] = args['απ2θ'] or ''
	args['κπ2θ'] = args['κπ2θ'] or ''
	args['οδ2θ'] = args['οδ2θ'] or ''
	args['γδ2θ'] = args['γδ2θ'] or ''
-- ================= ENDINGS parameters	
-- ENDINGS
	args['οε'] = args['οε'] or ''
	args['γε'] = args['γε'] or ''
	args['δε'] = args['δε'] or ''
	args['αε'] = args['αε'] or ''
	args['κε'] = args['κε'] or ''
	args['οπ'] = args['οπ'] or ''
	args['γπ'] = args['γπ'] or ''
	args['δπ'] = args['δπ'] or ''
	args['απ'] = args['απ'] or ''
	args['κπ'] = args['κπ'] or ''
	args['οδ'] = args['οδ'] or ''
	args['γδ'] = args['γδ'] or ''
-- ENDINGS2
	args['οε2'] = args['οε2'] or ''
	args['γε2'] = args['γε2'] or ''
	args['δε2'] = args['δε2'] or ''
	args['αε2'] = args['αε2'] or ''
	args['κε2'] = args['κε2'] or ''
	args['οπ2'] = args['οπ2'] or ''
	args['γπ2'] = args['γπ2'] or ''
	args['δπ2'] = args['δπ2'] or ''
	args['απ2'] = args['απ2'] or ''
	args['κπ2'] = args['κπ2'] or ''
	args['οδ2'] = args['οδ2'] or ''
	args['γδ2'] = args['γδ2'] or ''
	
	
-- κείμενο μετά τη λέξη -- text after word @modules & for editors
    args['mod-οεΛκειμ'] = args['mod-οεΛκειμ'] or ''		args['οεΛκειμ'] = args['οεΛκειμ'] or ''
    if args['οεΛκειμ'] ~= '' and args['οεΛκειμ'] ~= nil then args['mod-οεΛκειμ'] = args['οεΛκειμ'] end
    args['mod-γεΛκειμ'] = args['mod-γεΛκειμ'] or ''		args['γεΛκειμ'] = args['γεΛκειμ'] or ''
    if args['γεΛκειμ'] ~= '' and args['γεΛκειμ'] ~= nil then args['mod-γεΛκειμ'] = args['γεΛκειμ'] end
    args['mod-δεΛκειμ'] = args['mod-δεΛκειμ'] or ''		args['δεΛκειμ'] = args['δεΛκειμ'] or ''
    if args['δεΛκειμ'] ~= '' and args['δεΛκειμ'] ~= nil then args['mod-δεΛκειμ'] = args['δεΛκειμ'] end
    args['mod-αεΛκειμ'] = args['mod-αεΛκειμ'] or ''		args['αεΛκειμ'] = args['αεΛκειμ'] or ''
    if args['αεΛκειμ'] ~= '' and args['αεΛκειμ'] ~= nil then args['mod-αεΛκειμ'] = args['αεΛκειμ'] end
    args['mod-κεΛκειμ'] = args['mod-κεΛκειμ'] or ''		args['κεΛκειμ'] = args['κεΛκειμ'] or ''
    if args['κεΛκειμ'] ~= '' and args['κεΛκειμ'] ~= nil then args['mod-κεΛκειμ'] = args['κεΛκειμ'] end
    args['mod-οπΛκειμ'] = args['mod-οπΛκειμ'] or ''		args['οπΛκειμ'] = args['οπΛκειμ'] or ''
    if args['οπΛκειμ'] ~= '' and args['οπΛκειμ'] ~= nil then args['mod-οπΛκειμ'] = args['οπΛκειμ'] end
    args['mod-γπΛκειμ'] = args['mod-γπΛκειμ'] or ''		args['γπΛκειμ'] = args['γπΛκειμ'] or ''
    if args['γπΛκειμ'] ~= '' and args['γπΛκειμ'] ~= nil then args['mod-γπΛκειμ'] = args['γπΛκειμ'] end
    args['mod-δπΛκειμ'] = args['mod-δπΛκειμ'] or ''		args['δπΛκειμ'] = args['δπΛκειμ'] or ''
    if args['δπΛκειμ'] ~= '' and args['δπΛκειμ'] ~= nil then args['mod-δπΛκειμ'] = args['δπΛκειμ'] end
    args['mod-απΛκειμ'] = args['mod-απΛκειμ'] or ''		args['απΛκειμ'] = args['απΛκειμ'] or ''
    if args['απΛκειμ'] ~= '' and args['απΛκειμ'] ~= nil then args['mod-απΛκειμ'] = args['απΛκειμ'] end
    args['mod-κπΛκειμ'] = args['mod-κπΛκειμ'] or ''		args['κπΛκειμ'] = args['κπΛκειμ'] or ''
    if args['κπΛκειμ'] ~= '' and args['κπΛκειμ'] ~= nil then args['mod-κπΛκειμ'] = args['κπΛκειμ'] end
    args['mod-οδΛκειμ'] = args['mod-οδΛκειμ'] or ''		args['οδΛκειμ'] = args['οδΛκειμ'] or ''
    if args['οδΛκειμ'] ~= '' and args['οδΛκειμ'] ~= nil then args['mod-οδΛκειμ'] = args['οδΛκειμ'] end
    args['mod-γδΛκειμ'] = args['mod-γδΛκειμ'] or ''		args['γδΛκειμ'] = args['γδΛκειμ'] or ''
    if args['γδΛκειμ'] ~= '' and args['γδΛκειμ'] ~= nil then args['mod-γδΛκειμ'] = args['γδΛκειμ'] end
-- text after second word    
    args['mod-οε2Λκειμ'] = args['mod-ο2εΛκειμ'] or ''		args['οε2Λκειμ'] = args['ο2εΛκειμ'] or ''
    if args['οε2Λκειμ'] ~= '' and args['οε2Λκειμ'] ~= nil then args['mod-οε2Λκειμ'] = args['οε2Λκειμ'] end
    args['mod-γε2Λκειμ'] = args['mod-γε2Λκειμ'] or ''		args['γε2Λκειμ'] = args['γε2Λκειμ'] or ''
    if args['γε2Λκειμ'] ~= '' and args['γε2Λκειμ'] ~= nil then args['mod-γε2Λκειμ'] = args['γε2Λκειμ'] end
    args['mod-δε2Λκειμ'] = args['mod-δε2Λκειμ'] or ''		args['δε2Λκειμ'] = args['δε2Λκειμ'] or ''
    if args['δε2Λκειμ'] ~= '' and args['δε2Λκειμ'] ~= nil then args['mod-δε2Λκειμ'] = args['δε2Λκειμ'] end
    args['mod-αε2Λκειμ'] = args['mod-αε2Λκειμ'] or ''		args['αε2Λκειμ'] = args['αε2Λκειμ'] or ''
    if args['αε2Λκειμ'] ~= '' and args['αε2Λκειμ'] ~= nil then args['mod-αε2Λκειμ'] = args['αε2Λκειμ'] end
    args['mod-κε2Λκειμ'] = args['mod-κε2Λκειμ'] or ''		args['κε2Λκειμ'] = args['κε2Λκειμ'] or ''
    if args['κε2Λκειμ'] ~= '' and args['κε2Λκειμ'] ~= nil then args['mod-κε2Λκειμ'] = args['κε2Λκειμ'] end
    args['mod-οπ2Λκειμ'] = args['mod-οπ2Λκειμ'] or ''		args['οπ2Λκειμ'] = args['οπ2Λκειμ'] or ''
    if args['οπ2Λκειμ'] ~= '' and args['οπ2Λκειμ'] ~= nil then args['mod-οπ2Λκειμ'] = args['οπ2Λκειμ'] end
    args['mod-γπ2Λκειμ'] = args['mod-γπ2Λκειμ'] or ''		args['γπ2Λκειμ'] = args['γπ2Λκειμ'] or ''
    if args['γπ2Λκειμ'] ~= '' and args['γπ2Λκειμ'] ~= nil then args['mod-γπ2Λκειμ'] = args['γπ2Λκειμ'] end
    args['mod-δπ2Λκειμ'] = args['mod-δπ2Λκειμ'] or ''		args['δπ2Λκειμ'] = args['δπ2Λκειμ'] or ''
    if args['δπ2Λκειμ'] ~= '' and args['δπ2Λκειμ'] ~= nil then args['mod-δπ2Λκειμ'] = args['δπ2Λκειμ'] end
    args['mod-απ2Λκειμ'] = args['mod-απ2Λκειμ'] or ''		args['απ2Λκειμ'] = args['απ2Λκειμ'] or ''
    if args['απ2Λκειμ'] ~= '' and args['απ2Λκειμ'] ~= nil then args['mod-απ2Λκειμ'] = args['απ2Λκειμ'] end
    args['mod-κπ2Λκειμ'] = args['mod-κπ2Λκειμ'] or ''		args['κπ2Λκειμ'] = args['κπ2Λκειμ'] or ''
    if args['κπ2Λκειμ'] ~= '' and args['κπ2Λκειμ'] ~= nil then args['mod-κπ2Λκειμ'] = args['κπ2Λκειμ'] end
    args['mod-οδ2Λκειμ'] = args['mod-οδ2Λκειμ'] or ''		args['οδ2Λκειμ'] = args['οδ2Λκειμ'] or ''
    if args['οδ2Λκειμ'] ~= '' and args['οδ2Λκειμ'] ~= nil then args['mod-οδ2Λκειμ'] = args['οδ2Λκειμ'] end
    args['mod-γδ2Λκειμ'] = args['mod-γδ2Λκειμ'] or ''		args['γδ2Λκειμ'] = args['γδ2Λκειμ'] or ''
    if args['γδ2Λκειμ'] ~= '' and args['γδ2Λκειμ'] ~= nil then args['mod-γδ2Λκειμ'] = args['γδ2Λκειμ'] end

-- κείμενο πριν τη λέξη - text before word @modules & for editors  -- check [[Παράρτημα:Ουσιαστικά (αρχαία ελληνικά)/1#μνά]]
    args['mod-οεΛκειμ1'] = args['mod-οεΛκειμ1'] or ''		args['οεΛκειμ1'] = args['οεΛκειμ1'] or ''
    if args['οεΛκειμ1'] ~= '' and args['οεΛκειμ1'] ~= nil then args['mod-οεΛκειμ1'] = args['οεΛκειμ1'] end
    args['mod-γεΛκειμ1'] = args['mod-γεΛκειμ1'] or ''		args['γεΛκειμ1'] = args['γεΛκειμ1'] or ''
    if args['γεΛκειμ1'] ~= '' and args['γεΛκειμ1'] ~= nil then args['mod-γεΛκειμ1'] = args['γεΛκειμ1'] end
    args['mod-δεΛκειμ1'] = args['mod-δεΛκειμ1'] or ''		args['δεΛκειμ1'] = args['δεΛκειμ1'] or ''
    if args['δεΛκειμ1'] ~= '' and args['δεΛκειμ1'] ~= nil then args['mod-δεΛκειμ1'] = args['δεΛκειμ1'] end
    args['mod-αεΛκειμ1'] = args['mod-αεΛκειμ1'] or ''		args['αεΛκειμ1'] = args['αεΛκειμ1'] or ''
    if args['αεΛκειμ1'] ~= '' and args['αεΛκειμ1'] ~= nil then args['mod-αεΛκειμ1'] = args['αεΛκειμ1'] end
    args['mod-κεΛκειμ1'] = args['mod-κεΛκειμ1'] or ''		args['κεΛκειμ1'] = args['κεΛκειμ1'] or ''
    if args['κεΛκειμ1'] ~= '' and args['κεΛκειμ1'] ~= nil then args['mod-κεΛκειμ1'] = args['κεΛκειμ1'] end
    args['mod-οπΛκειμ1'] = args['mod-οπΛκειμ1'] or ''		args['οπΛκειμ1'] = args['οπΛκειμ1'] or ''
    if args['οπΛκειμ1'] ~= '' and args['οπΛκειμ1'] ~= nil then args['mod-οπΛκειμ1'] = args['οπΛκειμ1'] end
    args['mod-γπΛκειμ1'] = args['mod-γπΛκειμ1'] or ''		args['γπΛκειμ1'] = args['γπΛκειμ1'] or ''
    if args['γπΛκειμ1'] ~= '' and args['γπΛκειμ1'] ~= nil then args['mod-γπΛκειμ1'] = args['γπΛκειμ1'] end
    args['mod-δπΛκειμ1'] = args['mod-δπΛκειμ1'] or ''		args['δπΛκειμ1'] = args['δπΛκειμ1'] or ''
    if args['δπΛκειμ1'] ~= '' and args['δπΛκειμ1'] ~= nil then args['mod-δπΛκειμ1'] = args['δπΛκειμ1'] end
    args['mod-απΛκειμ1'] = args['mod-απΛκειμ1'] or ''		args['απΛκειμ1'] = args['απΛκειμ1'] or ''
    if args['απΛκειμ1'] ~= '' and args['απΛκειμ1'] ~= nil then args['mod-απΛκειμ1'] = args['απΛκειμ1'] end
    args['mod-κπΛκειμ1'] = args['mod-κπΛκειμ1'] or ''		args['κπΛκειμ1'] = args['κπΛκειμ1'] or ''
    if args['κπΛκειμ1'] ~= '' and args['κπΛκειμ1'] ~= nil then args['mod-κπΛκειμ1'] = args['κπΛκειμ1'] end
    args['mod-οδΛκειμ1'] = args['mod-οδΛκειμ1'] or ''		args['οδΛκειμ1'] = args['οδΛκειμ1'] or ''
    if args['οδΛκειμ1'] ~= '' and args['οδΛκειμ1'] ~= nil then args['mod-οδΛκειμ1'] = args['οδΛκειμ1'] end
    args['mod-γδΛκειμ1'] = args['mod-γδΛκειμ1'] or ''		args['γδΛκειμ1'] = args['γδΛκειμ1'] or ''
    if args['γδΛκειμ1'] ~= '' and args['γδΛκειμ1'] ~= nil then args['mod-γδΛκειμ1'] = args['γδΛκειμ1'] end
-- text before second word    
    args['mod-οε2Λκειμ1'] = args['mod-ο2εΛκειμ1'] or ''		args['οε2Λκειμ1'] = args['ο2εΛκειμ1'] or ''
    if args['οε2Λκειμ1'] ~= '' and args['οε2Λκειμ1'] ~= nil then args['mod-οε2Λκειμ1'] = args['οε2Λκειμ1'] end
    args['mod-γε2Λκειμ1'] = args['mod-γε2Λκειμ1'] or ''		args['γε2Λκειμ1'] = args['γε2Λκειμ1'] or ''
    if args['γε2Λκειμ1'] ~= '' and args['γε2Λκειμ1'] ~= nil then args['mod-γε2Λκειμ1'] = args['γε2Λκειμ1'] end
    args['mod-δε2Λκειμ1'] = args['mod-δε2Λκειμ1'] or ''		args['δε2Λκειμ1'] = args['δε2Λκειμ1'] or ''
    if args['δε2Λκειμ1'] ~= '' and args['δε2Λκειμ1'] ~= nil then args['mod-δε2Λκειμ1'] = args['δε2Λκειμ1'] end
    args['mod-αε2Λκειμ1'] = args['mod-αε2Λκειμ1'] or ''		args['αε2Λκειμ1'] = args['αε2Λκειμ1'] or ''
    if args['αε2Λκειμ1'] ~= '' and args['αε2Λκειμ1'] ~= nil then args['mod-αε2Λκειμ1'] = args['αε2Λκειμ1'] end
    args['mod-κε2Λκειμ1'] = args['mod-κε2Λκειμ1'] or ''		args['κε2Λκειμ1'] = args['κε2Λκειμ1'] or ''
    if args['κε2Λκειμ1'] ~= '' and args['κε2Λκειμ1'] ~= nil then args['mod-κε2Λκειμ1'] = args['κε2Λκειμ1'] end
    args['mod-οπ2Λκειμ1'] = args['mod-οπ2Λκειμ1'] or ''		args['οπ2Λκειμ1'] = args['οπ2Λκειμ1'] or ''
    if args['οπ2Λκειμ1'] ~= '' and args['οπ2Λκειμ1'] ~= nil then args['mod-οπ2Λκειμ1'] = args['οπ2Λκειμ1'] end
    args['mod-γπ2Λκειμ1'] = args['mod-γπ2Λκειμ1'] or ''		args['γπ2Λκειμ1'] = args['γπ2Λκειμ1'] or ''
    if args['γπ2Λκειμ1'] ~= '' and args['γπ2Λκειμ1'] ~= nil then args['mod-γπ2Λκειμ1'] = args['γπ2Λκειμ1'] end
    args['mod-δπ2Λκειμ1'] = args['mod-δπ2Λκειμ1'] or ''		args['δπ2Λκειμ1'] = args['δπ2Λκειμ1'] or ''
    if args['δπ2Λκειμ1'] ~= '' and args['δπ2Λκειμ1'] ~= nil then args['mod-δπ2Λκειμ1'] = args['δπ2Λκειμ1'] end
    args['mod-απ2Λκειμ1'] = args['mod-απ2Λκειμ1'] or ''		args['απ2Λκειμ1'] = args['απ2Λκειμ1'] or ''
    if args['απ2Λκειμ1'] ~= '' and args['απ2Λκειμ1'] ~= nil then args['mod-απ2Λκειμ1'] = args['απ2Λκειμ1'] end
    args['mod-κπ2Λκειμ1'] = args['mod-κπ2Λκειμ1'] or ''		args['κπ2Λκειμ1'] = args['κπ2Λκειμ1'] or ''
    if args['κπ2Λκειμ1'] ~= '' and args['κπ2Λκειμ1'] ~= nil then args['mod-κπ2Λκειμ1'] = args['κπ2Λκειμ1'] end
    args['mod-οδ2Λκειμ1'] = args['mod-οδ2Λκειμ1'] or ''		args['οδ2Λκειμ1'] = args['οδ2Λκειμ1'] or ''
    if args['οδ2Λκειμ1'] ~= '' and args['οδ2Λκειμ1'] ~= nil then args['mod-οδ2Λκειμ1'] = args['οδ2Λκειμ1'] end
    args['mod-γδ2Λκειμ1'] = args['mod-γδ2Λκειμ1'] or ''		args['γδ2Λκειμ1'] = args['γδ2Λκειμ1'] or ''
    if args['γδ2Λκειμ1'] ~= '' and args['γδ2Λκειμ1'] ~= nil then args['mod-γδ2Λκειμ1'] = args['γδ2Λκειμ1'] end

-- make forms / χτίσιμο τύπων ---------------------------------
-- + αν υπάρχει εμφάνιση προσωδίας στην κατάληξη. Η προσωδία του θέματος, στο |θέματα=
-- and args Eίναι απαραίτητο, αλλιώς δίνει error nil
-- If subfunctions have a defintion for lemma and stem of their own
-- we need to write there the stems for all cases.


-- ονομαστική ενικού -- nominative singular
-- @modules
	-- default stem
	if args['mod-οεθ'] == '' or args['mod-οεθ'] == nil then args['mod-οεθ'] = stem["θ"] else args['mod-οεθ'] = args['mod-οεθ'] end
	if args['mod-οε2θ'] == '' or args['mod-οε2θ'] == nil then args['mod-οε2θ'] = stem["θ"] else args['mod-οε2θ'] = args['mod-οε2θ'] end
	-- first word
	if args['mod-οε'] ~= '-' and args['mod-οε'] ~= '0' and args['mod-οε'] ~= '' and args['mod-οε'] ~= nil then
		args['mod-οεΛ'] = args['mod-οεΛκειμ1'] .. args['κοινό1']
		.. create_link((args['mod-οεθ'] .. args['mod-οε']), (stem_color(args['mod-οεθ+']) .. ending_color(args['mod-οε+']))) .. args['mod-οεΛκειμ']
	-- zero ending
	elseif args['mod-οε'] == '0' then
		args['mod-οεΛ'] = args['mod-οεΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-οεθ']), (stem_color(args['mod-οεθ+']))) .. args['mod-οεΛκειμ']
   	elseif args['mod-οε'] == '-' then
   		args['mod-οεΛ'] = args['mod-οεΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-οεΛκειμ']
   	end
	-- second word at new line
	if args['mod-οε2'] ~= '-' and args['mod-οε2'] ~= '0' and args['mod-οε2'] ~= '' and args['mod-οε2'] ~= nil then
		if args['mod-οε2θ'] == '' or args['mod-οε2θ'] == nil then args['mod-οε2θ'] = args['mod-οεθ'] end
		args['mod-οε2Λ'] = br .. args['mod-οε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-οε2θ'] .. args['mod-οε2']), (stem_color(args['mod-οε2θ+']) .. ending_color(args['mod-οε2+']))) .. args['mod-οε2Λκειμ']
	-- zero ending -- check ἔαρ
	elseif args['mod-οε2'] == "0" then
		args['mod-οε2Λ'] = br .. args['mod-οε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-οε2θ']), (stem_color(args['mod-οε2θ+']))) .. args['mod-οε2Λκειμ']
   	elseif args['mod-οε2'] == '-' then
   		args['mod-οε2Λ'] = br .. args['mod-οε2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-οε2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['οεθ'] == '' or args['οεθ'] == nil then args['οεθ'] = stem["θ"] else args['οεθ'] = args['οεθ'] end
	if args['οε2θ'] == '' or args['οε2θ'] == nil then args['οε2θ'] = stem["θ"] else args['οε2θ'] = args['οε2θ'] end
	-- first word
	if args['οε'] ~= '-' and args['οε'] ~= '0' and args['οε'] ~= '' and args['οε'] ~= nil then
		args['οεΛ'] = args['οεΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['οεθ'] .. args['οε']), (stem_color(args['οεθ+']) .. ending_color(args['οε+']))) .. args['οεΛκειμ']
	-- zero ending
	elseif args['οε'] == '0' then
		args['οεΛ'] = args['οεΛκειμ1'] .. args['κοινό1'] .. create_link((args['οεθ']), (stem_color(args['οεθ+']))) .. args['οεΛκειμ']
   	elseif args['οε'] == '-' then
   		args['οεΛ'] = args['οεΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['οεΛκειμ']
   	end
	-- second word at new line
	if args['οε2'] ~= '-' and args['οε2'] ~= '0' and args['οε2'] ~= '' and args['οε2'] ~= nil then
		if args['οε2θ'] == '' or args['οε2θ'] == nil then args['οε2θ'] = args['οεθ'] end
		args['οε2Λ'] = br .. args['οε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['οε2θ'] .. args['οε2']), (stem_color(args['οε2θ+']) .. ending_color(args['οε2+']))) .. args['οε2Λκειμ']
	-- zero ending
	elseif args['οε2'] == '0' then
		args['οε2Λ'] = br .. args['οε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['οε2θ']), (stem_color(args['οε2θ+']))) .. args['οε2Λκειμ']
   	elseif args['οε2'] == '-' then
   		args['οε2Λ'] = br .. args['οε2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['οε2Λκειμ']
   	end
-- option
   	if  args['οεΛ'] ~= '' and args['οεΛ'] ~= nil then
   		args['οεΛ'] =  args['οεΛ'] .. args['οε2Λ']  
   	else
   		if args['οε2'] ~= '' and args['οε2'] ~= nil then
   			args['οεΛ'] = args['mod-οεΛ'] .. args['οε2Λ']
   		else
			args['οεΛ'] = args['mod-οεΛ'] .. args['mod-οε2Λ'] 
		end
	end  


-- γενική ενικού -- genitive singular
-- @modules
	-- default stem
	if args['mod-γεθ'] == '' or args['mod-γεθ'] == nil then args['mod-γεθ'] = stem["θ"] else args['mod-γεθ'] = args['mod-γεθ'] end
	if args['mod-γε2θ'] == '' or args['mod-γε2θ'] == nil then args['mod-γε2θ'] = stem["θ"] else args['mod-γε2θ'] = args['mod-γε2θ'] end
	-- first word
	if args['mod-γε'] ~= '-' and args['mod-γε'] ~= '0' and args['mod-γε'] ~= '' and args['mod-γε'] ~= nil then
		args['mod-γεΛ'] = args['mod-γεΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-γεθ'] .. args['mod-γε']), (stem_color(args['mod-γεθ+']) .. ending_color(args['mod-γε+']))) .. args['mod-γεΛκειμ']
	-- zero ending
	elseif args['mod-γε'] == '0' then
		args['mod-γεΛ'] = args['mod-γεΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-γεθ']), (stem_color(args['mod-γεθ+']))) .. args['mod-γεΛκειμ']
   	elseif args['mod-γε'] == '-' then
   		args['mod-γεΛ'] = args['mod-γεΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-γεΛκειμ']
   	end
	-- second word at new line
	if args['mod-γε2'] ~= '-' and args['mod-γε2'] ~= '0' and args['mod-γε2'] ~= '' and args['mod-γε2'] ~= nil then
		if args['mod-γε2θ'] == '' or args['mod-γε2θ'] == nil then args['mod-γε2θ'] = args['mod-γεθ'] end
		args['mod-γε2Λ'] = br .. args['mod-γε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-γε2θ'] .. args['mod-γε2']), (stem_color(args['mod-γε2θ+']) .. ending_color(args['mod-γε2+']))) .. args['mod-γε2Λκειμ']
	-- zero ending 
	elseif args['mod-γε2'] == "0" then
		args['mod-γε2Λ'] = br .. args['mod-γε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-γε2θ']), (stem_color(args['mod-γε2θ+']))) .. args['mod-γε2Λκειμ']
   	elseif args['mod-γε2'] == '-' then
   		args['mod-γε2Λ'] = br .. args['mod-γε2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-γε2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['γεθ'] == '' or args['γεθ'] == nil then args['γεθ'] = stem["θ"] else args['γεθ'] = args['γεθ'] end
	if args['γε2θ'] == '' or args['γε2θ'] == nil then args['γε2θ'] = stem["θ"] else args['γε2θ'] = args['γε2θ'] end
	-- first word
	if args['γε'] ~= '-' and args['γε'] ~= '0' and args['γε'] ~= '' and args['γε'] ~= nil then
		args['γεΛ'] = args['γεΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['γεθ'] .. args['γε']), (stem_color(args['γεθ+']) .. ending_color(args['γε+']))) .. args['γεΛκειμ']
	-- zero ending
	elseif args['γε'] == '0' then
		args['γεΛ'] = args['γεΛκειμ1'] .. args['κοινό1'] .. create_link((args['γεθ']), (stem_color(args['γεθ+']))) .. args['γεΛκειμ']
   	elseif args['γε'] == '-' then
   		args['γεΛ'] = args['γεΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['γεΛκειμ']
   	end
	-- second word at new line
	if args['γε2'] ~= '-' and args['γε2'] ~= '0' and args['γε2'] ~= '' and args['γε2'] ~= nil then
		if args['γε2θ'] == '' or args['γε2θ'] == nil then args['γε2θ'] = args['γεθ'] end
		args['γε2Λ'] = br .. args['γε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['γε2θ'] .. args['γε2']), (stem_color(args['γε2θ+']) .. ending_color(args['γε2+']))) .. args['γε2Λκειμ']
	-- zero ending
	elseif args['γε2'] == '0' then
		args['γε2Λ'] = br .. args['γε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['γε2θ']), (stem_color(args['γε2θ+']))) .. args['γε2Λκειμ']
   	elseif args['γε2'] == '-' then
   		args['γε2Λ'] = br .. args['γε2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['γε2Λκειμ']
   	end
-- option
   	if  args['γεΛ'] ~= '' and args['γεΛ'] ~= nil then
   		args['γεΛ'] =  args['γεΛ'] .. args['γε2Λ']  
   	else
   		if args['γε2'] ~= '' and args['γε2'] ~= nil then
   			args['γεΛ'] = args['mod-γεΛ'] .. args['γε2Λ']
   		else
			args['γεΛ'] = args['mod-γεΛ'] .. args['mod-γε2Λ'] 
		end
	end


-- δοτική ενικού -- dative singular
-- @modules
	-- default stem
	if args['mod-δεθ'] == '' or args['mod-δεθ'] == nil then args['mod-δεθ'] = stem["θ"] else args['mod-δεθ'] = args['mod-δεθ'] end
	if args['mod-δε2θ'] == '' or args['mod-δε2θ'] == nil then args['mod-δε2θ'] = stem["θ"] else args['mod-δε2θ'] = args['mod-δε2θ'] end
	-- first word
	if args['mod-δε'] ~= '-' and args['mod-δε'] ~= '0' and args['mod-δε'] ~= '' and args['mod-δε'] ~= nil then
		args['mod-δεΛ'] = args['mod-δεΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-δεθ'] .. args['mod-δε']), (stem_color(args['mod-δεθ+']) .. ending_color(args['mod-δε+']))) .. args['mod-δεΛκειμ']
	-- zero ending
	elseif args['mod-δε'] == '0' then
		args['mod-δεΛ'] = args['mod-δεΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-δεθ']), (stem_color(args['mod-δεθ+']))) .. args['mod-δεΛκειμ']
   	elseif args['mod-δε'] == '-' then
   		args['mod-δεΛ'] = args['mod-δεΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-δεΛκειμ']
   	end
	-- second word at new line
	if args['mod-δε2'] ~= '-' and args['mod-δε2'] ~= '0' and args['mod-δε2'] ~= '' and args['mod-δε2'] ~= nil then
		if args['mod-δε2θ'] == '' or args['mod-δε2θ'] == nil then args['mod-δε2θ'] = args['mod-δεθ'] end
		args['mod-δε2Λ'] = br .. args['mod-δε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-δε2θ'] .. args['mod-δε2']), (stem_color(args['mod-δε2θ+']) .. ending_color(args['mod-δε2+']))) .. args['mod-δε2Λκειμ']
	-- zero ending
	elseif args['mod-δε2'] == "0" then
		args['mod-δε2Λ'] = br .. args['mod-δε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-δε2θ']), (stem_color(args['mod-δε2θ+']))) .. args['mod-δε2Λκειμ']
   	elseif args['mod-δε2'] == '-' then
   		args['mod-δε2Λ'] = br .. args['mod-δε2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-δε2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['δεθ'] == '' or args['δεθ'] == nil then args['δεθ'] = stem["θ"] else args['δεθ'] = args['δεθ'] end
	if args['δε2θ'] == '' or args['δε2θ'] == nil then args['δε2θ'] = stem["θ"] else args['δε2θ'] = args['δε2θ'] end
	-- first word
	if args['δε'] ~= '-' and args['δε'] ~= '0' and args['δε'] ~= '' and args['δε'] ~= nil then
		args['δεΛ'] = args['δεΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['δεθ'] .. args['δε']), (stem_color(args['δεθ+']) .. ending_color(args['δε+']))) .. args['δεΛκειμ']
	elseif args['δε'] == '0' then
		args['δεΛ'] = args['δεΛκειμ1'] .. args['κοινό1'] .. create_link((args['δεθ']), (stem_color(args['δεθ+']))) .. args['δεΛκειμ']
   	elseif args['δε'] == '-' then
   		args['δεΛ'] = args['δεΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['δεΛκειμ']
   	end
	-- second word at new line
	if args['δε2'] ~= '-' and args['δε2'] ~= '0' and args['δε2'] ~= '' and args['δε2'] ~= nil then
		if args['δε2θ'] == '' or args['δε2θ'] == nil then args['δε2θ'] = args['δεθ'] end
		args['δε2Λ'] = br .. args['δε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['δε2θ'] .. args['δε2']), (stem_color(args['δε2θ+']) .. ending_color(args['δε2+']))) .. args['δε2Λκειμ']
	-- zero ending
	elseif args['δε2'] == '0' then
		args['δε2Λ'] = br .. args['δε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['δε2θ']), (stem_color(args['δε2θ+']))) .. args['δε2Λκειμ']
   	elseif args['δε2'] == '-' then
   		args['δε2Λ'] = br .. args['δε2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['δε2Λκειμ']
   	end
-- option
   	if  args['δεΛ'] ~= '' and args['δεΛ'] ~= nil then
   		args['δεΛ'] =  args['δεΛ'] .. args['δε2Λ']  
   	else
   		if args['δε2'] ~= '' and args['δε2'] ~= nil then
   			args['δεΛ'] = args['mod-δεΛ'] .. args['δε2Λ']
   		else
			args['δεΛ'] = args['mod-δεΛ'] .. args['mod-δε2Λ']
		end
	end


-- αιτιατική ενικού -- accusative singular
-- @modules
	-- default stem
	if args['mod-αεθ'] == '' or args['mod-αεθ'] == nil then args['mod-αεθ'] = stem["θ"] else args['mod-αεθ'] = args['mod-αεθ'] end
	if args['mod-αε2θ'] == '' or args['mod-αε2θ'] == nil then args['mod-αε2θ'] = stem["θ"] else args['mod-αε2θ'] = args['mod-αε2θ'] end
	-- first word
	if args['mod-αε'] ~= '-' and args['mod-αε'] ~= '0' and args['mod-αε'] ~= '' and args['mod-αε'] ~= nil then
		args['mod-αεΛ'] = args['mod-αεΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-αεθ'] .. args['mod-αε']), (stem_color(args['mod-αεθ+']) .. ending_color(args['mod-αε+']))) .. args['mod-αεΛκειμ']
	-- zero ending
	elseif args['mod-αε'] == '0' then
		args['mod-αεΛ'] = args['mod-αεΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-αεθ']), (stem_color(args['mod-αεθ+']))) .. args['mod-αεΛκειμ']
   	elseif args['mod-αε'] == '-' then
   		args['mod-αεΛ'] = args['mod-αεΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-αεΛκειμ']
   	end
	-- second word at new line
	if args['mod-αε2'] ~= '-' and args['mod-αε2'] ~= '0' and args['mod-αε2'] ~= '' and args['mod-αε2'] ~= nil then
		if args['mod-αε2θ'] == '' or args['mod-αε2θ'] == nil then args['mod-αε2θ'] = args['mod-αεθ'] end
		args['mod-αε2Λ'] = br .. args['mod-αε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-αε2θ'] .. args['mod-αε2']), (stem_color(args['mod-αε2θ+']) .. ending_color(args['mod-αε2+']))) .. args['mod-αε2Λκειμ']
	-- zero ending 
	elseif args['mod-αε2'] == "0" then
		args['mod-αε2Λ'] = br .. args['mod-αε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-αε2θ']), (stem_color(args['mod-αε2θ+']))) .. args['mod-αε2Λκειμ']
   	elseif args['mod-αε2'] == '-' then
   		args['mod-αε2Λ'] = br .. args['mod-αε2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-αε2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['αεθ'] == '' or args['αεθ'] == nil then args['αεθ'] = stem["θ"] else args['αεθ'] = args['αεθ'] end
	if args['αε2θ'] == '' or args['αε2θ'] == nil then args['αε2θ'] = stem["θ"] else args['αε2θ'] = args['αε2θ'] end
	-- first word
	if args['αε'] ~= '-' and args['αε'] ~= '0' and args['αε'] ~= '' and args['αε'] ~= nil then
		args['αεΛ'] = args['αεΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['αεθ'] .. args['αε']), (stem_color(args['αεθ+']) .. ending_color(args['αε+']))) .. args['αεΛκειμ']
	-- zero ending
	elseif args['αε'] == '0' then
		args['αεΛ'] = args['αεΛκειμ1'] .. args['κοινό1'] .. create_link((args['αεθ']), (stem_color(args['αεθ+']))) .. args['αεΛκειμ']
   	elseif args['αε'] == '-' then
   		args['αεΛ'] = args['αεΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['αεΛκειμ']
   	end
	-- second word at new line
	if args['αε2'] ~= '-' and args['αε2'] ~= '0' and args['αε2'] ~= '' and args['αε2'] ~= nil then
		if args['αε2θ'] == '' or args['αε2θ'] == nil then args['αε2θ'] = args['αεθ'] end
		args['αε2Λ'] = br .. args['αε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['αε2θ'] .. args['αε2']), (stem_color(args['αε2θ+']) .. ending_color(args['αε2+']))) .. args['αε2Λκειμ']
	-- zero ending
	elseif args['αε2'] == '0' then
		args['αε2Λ'] = br .. args['αε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['αε2θ']), (stem_color(args['αε2θ+']))) .. args['αε2Λκειμ']
   	elseif args['αε2'] == '-' then
   		args['αε2Λ'] = br .. args['αε2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['αε2Λκειμ']
   	end
-- option
   	if  args['αεΛ'] ~= '' and args['αεΛ'] ~= nil then
   		args['αεΛ'] =  args['αεΛ'] .. args['αε2Λ']  
   	else
   		if args['αε2'] ~= '' and args['αε2'] ~= nil then
   			args['αεΛ'] = args['mod-αεΛ'] .. args['αε2Λ']
   		else
			args['αεΛ'] = args['mod-αεΛ'] .. args['mod-αε2Λ']
		end
	end


-- κλητική ενικού -- vocative singular
-- @modules
	-- default stem
	if args['mod-κεθ'] == '' or args['mod-κεθ'] == nil then args['mod-κεθ'] = stem["θ"] else args['mod-κεθ'] = args['mod-κεθ'] end
	if args['mod-κε2θ'] == '' or args['mod-κε2θ'] == nil then args['mod-κε2θ'] = stem["θ"] else args['mod-κε2θ'] = args['mod-κε2θ'] end
	-- first word
	if args['mod-κε'] ~= '-' and args['mod-κε'] ~= '0' and args['mod-κε'] ~= '' and args['mod-κε'] ~= nil then
		args['mod-κεΛ'] = args['mod-κεΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-κεθ'] .. args['mod-κε']), (stem_color(args['mod-κεθ+']) .. ending_color(args['mod-κε+']))) .. args['mod-κεΛκειμ']
	-- zero ending
	elseif args['mod-κε'] == '0' then
		args['mod-κεΛ'] = args['mod-κεΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-κεθ']), (stem_color(args['mod-κεθ+']))) .. args['mod-κεΛκειμ']
   	elseif args['mod-κε'] == '-' then
   		args['mod-κεΛ'] = args['mod-κεΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-κεΛκειμ']
   	end
	-- second word at new line
	if args['mod-κε2'] ~= '-' and args['mod-κε2'] ~= '0' and args['mod-κε2'] ~= '' and args['mod-κε2'] ~= nil then
		if args['mod-κε2θ'] == '' or args['mod-κε2θ'] == nil then args['mod-κε2θ'] = args['mod-κεθ'] end
		args['mod-κε2Λ'] = br .. args['mod-κε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-κε2θ'] .. args['mod-κε2']), (stem_color(args['mod-κε2θ+']) .. ending_color(args['mod-κε2+']))) .. args['mod-κε2Λκειμ']
	-- zero ending -- check [[Οἰδίπους]]
	elseif args['mod-κε2'] == "0" then
		args['mod-κε2Λ'] = br .. args['mod-κε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-κε2θ']), (stem_color(args['mod-κε2θ+']))) .. args['mod-κε2Λκειμ']
   	elseif args['mod-κε2'] == '-' then
   		args['mod-κε2Λ'] = br .. args['mod-κε2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-κε2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['κεθ'] == '' or args['κεθ'] == nil then args['κεθ'] = stem["θ"] else args['κεθ'] = args['κεθ'] end
	if args['κε2θ'] == '' or args['κε2θ'] == nil then args['κε2θ'] = stem["θ"] else args['κε2θ'] = args['κε2θ'] end
	-- first word
	if args['κε'] ~= '-' and args['κε'] ~= '0' and args['κε'] ~= '' and args['κε'] ~= nil then
		args['κεΛ'] = args['κεΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['κεθ'] .. args['κε']), (stem_color(args['κεθ+']) .. ending_color(args['κε+']))) .. args['κεΛκειμ']
	-- zero ending
	elseif args['κε'] == '0' then
		args['κεΛ'] = args['κεΛκειμ1'] .. args['κοινό1'] .. create_link((args['κεθ']), (stem_color(args['κεθ+']))) .. args['κεΛκειμ']
   	elseif args['κε'] == '-' then
   		args['κεΛ'] = args['κεΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['κεΛκειμ']
   	end
	-- second word at new line
	if args['κε2'] ~= '-' and args['κε2'] ~= '0' and args['κε2'] ~= '' and args['κε2'] ~= nil then
		if args['κε2θ'] == '' or args['κε2θ'] == nil then args['κε2θ'] = args['κεθ'] end
		args['κε2Λ'] = br .. args['κε2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['κε2θ'] .. args['κε2']), (stem_color(args['κε2θ+']) .. ending_color(args['κε2+']))) .. args['κε2Λκειμ']
	-- zero ending
	elseif args['κε2'] == '0' then
		args['κε2Λ'] = br .. args['κε2Λκειμ1'] .. args['κοινό1'] .. create_link((args['κε2θ']), (stem_color(args['κε2θ+']))) .. args['κε2Λκειμ']
   	elseif args['κε2'] == '-' then
   		args['κε2Λ'] = br .. args['κε2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['κε2Λκειμ']
   	end
-- option
   	if  args['κεΛ'] ~= '' and args['κεΛ'] ~= nil then
   		args['κεΛ'] =  args['κεΛ'] .. args['κε2Λ']  
   	else
   		if args['κε2'] ~= '' and args['κε2'] ~= nil then
   			args['κεΛ'] = args['mod-κεΛ'] .. args['κε2Λ']
   		else
			args['κεΛ'] = args['mod-κεΛ'] .. args['mod-κε2Λ']
		end
	end


-- ΟΝΟΜΑΣΤΙΚΗ ΠΛΗΘΥΝΤΙΚΟΥ -- MOMINATIVE PLURAL
-- @modules
	-- default stem
	if args['mod-οπθ'] == '' or args['mod-οπθ'] == nil then args['mod-οπθ'] = stem["θ"] else args['mod-οπθ'] = args['mod-οπθ'] end
	if args['mod-οπ2θ'] == '' or args['mod-οπ2θ'] == nil then args['mod-οπ2θ'] = stem["θ"] else args['mod-οπ2θ'] = args['mod-οπ2θ'] end
	-- first word
	if args['mod-οπ'] ~= '-' and args['mod-οπ'] ~= '0' and args['mod-οπ'] ~= '' and args['mod-οπ'] ~= nil then
		args['mod-οπΛ'] = args['mod-οπΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-οπθ'] .. args['mod-οπ']), (stem_color(args['mod-οπθ+']) .. ending_color(args['mod-οπ+']))) .. args['mod-οπΛκειμ']
	-- zero ending
	elseif args['mod-οπ'] == '0' then
		args['mod-οπΛ'] = args['mod-οπΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-οπθ']), (stem_color(args['mod-οπθ+']))) .. args['mod-οπΛκειμ']
   	elseif args['mod-οπ'] == '-' then
   		args['mod-οπΛ'] = args['mod-οπΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-οπΛκειμ']
   	end
	-- second word at new line
	if args['mod-οπ2'] ~= '-' and args['mod-οπ2'] ~= '0' and args['mod-οπ2'] ~= '' and args['mod-οπ2'] ~= nil then
		if args['mod-οπ2θ'] == '' or args['mod-οπ2θ'] == nil then args['mod-οπ2θ'] = args['mod-οπθ'] end
		args['mod-οπ2Λ'] = br .. args['mod-οπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-οπ2θ'] .. args['mod-οπ2']), (stem_color(args['mod-οπ2θ+']) .. ending_color(args['mod-οπ2+']))) .. args['mod-οπ2Λκειμ']
	-- zero ending 
	elseif args['mod-οπ2'] == "0" then
		args['mod-οπ2Λ'] = br .. args['mod-οπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-οπ2θ']), (stem_color(args['mod-οπ2θ+']))) .. args['mod-οπ2Λκειμ']
   	elseif args['mod-οπ2'] == '-' then
   		args['mod-οπ2Λ'] = br .. args['mod-οπ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-οπ2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['οπθ'] == '' or args['οπθ'] == nil then args['οπθ'] = stem["θ"] else args['οπθ'] = args['οπθ'] end
	if args['οπ2θ'] == '' or args['οπ2θ'] == nil then args['οπ2θ'] = stem["θ"] else args['οπ2θ'] = args['οπ2θ'] end
	-- first word
	if args['οπ'] ~= '-' and args['οπ'] ~= '0' and args['οπ'] ~= '' and args['οπ'] ~= nil then
		args['οπΛ'] = args['οπΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['οπθ'] .. args['οπ']), (stem_color(args['οπθ+']) .. ending_color(args['οπ+']))) .. args['οπΛκειμ']
	-- zero ending
	elseif args['οπ'] == '0' then
		args['οπΛ'] = args['οπΛκειμ1'] .. args['κοινό1'] .. create_link((args['οπθ']), (stem_color(args['οπθ+']))) .. args['οπΛκειμ']
   	elseif args['οπ'] == '-' then
   		args['οπΛ'] = args['οπΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['οπΛκειμ']
   	end
	-- second word at new line
	if args['οπ2'] ~= '-' and args['οπ2'] ~= '0' and args['οπ2'] ~= '' and args['οπ2'] ~= nil then
		if args['οπ2θ'] == '' or args['οπ2θ'] == nil then args['οπ2θ'] = args['οπθ'] end
		args['οπ2Λ'] = br .. args['οπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['οπ2θ'] .. args['οπ2']), (stem_color(args['οπ2θ+']) .. ending_color(args['οπ2+']))) .. args['οπ2Λκειμ']
	-- zero ending
	elseif args['οπ2'] == '0' then
		args['οπ2Λ'] = br .. args['οπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['οπ2θ']), (stem_color(args['οπ2θ+']))) .. args['οπ2Λκειμ']
   	elseif args['οπ2'] == '-' then
   		args['οπ2Λ'] = br .. args['οπ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['οπ2Λκειμ']
   	end
-- option
   	if  args['οπΛ'] ~= '' and args['οπΛ'] ~= nil then
   		args['οπΛ'] =  args['οπΛ'] .. args['οπ2Λ']  
   	else
   		if args['οπ2'] ~= '' and args['οπ2'] ~= nil then
   			args['οπΛ'] = args['mod-οπΛ'] .. args['οπ2Λ']
   		else
			args['οπΛ'] = args['mod-οπΛ'] .. args['mod-οπ2Λ']
		end	
	end

-- ΓΕΝΙΚΗ ΠΛΗΘΥΝΤΙΚΟΥ -- GENITIVE PLURAL
-- @modules
	-- default stem
	if args['mod-γπθ'] == '' or args['mod-γπθ'] == nil then args['mod-γπθ'] = stem["θ"] else args['mod-γπθ'] = args['mod-γπθ'] end
	if args['mod-γπ2θ'] == '' or args['mod-γπ2θ'] == nil then args['mod-γπ2θ'] = stem["θ"] else args['mod-γπ2θ'] = args['mod-γπ2θ'] end
	-- first word
	if args['mod-γπ'] ~= '-' and args['mod-γπ'] ~= '0' and args['mod-γπ'] ~= '' and args['mod-γπ'] ~= nil then
		args['mod-γπΛ'] = args['mod-γπΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-γπθ'] .. args['mod-γπ']), (stem_color(args['mod-γπθ+']) .. ending_color(args['mod-γπ+']))) .. args['mod-γπΛκειμ']
	-- zero ending
	elseif args['mod-γπ'] == '0' then
		args['mod-γπΛ'] = args['mod-γπΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-γπθ']), (stem_color(args['mod-γπθ+']))) .. args['mod-γπΛκειμ']
   	elseif args['mod-γπ'] == '-' then
   		args['mod-γπΛ'] = args['mod-γπΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-γπΛκειμ']
   	end
	-- second word at new line
	if args['mod-γπ2'] ~= '-' and args['mod-γπ2'] ~= '0' and args['mod-γπ2'] ~= '' and args['mod-γπ2'] ~= nil then
		if args['mod-γπ2θ'] == '' or args['mod-γπ2θ'] == nil then args['mod-γπ2θ'] = args['mod-γπθ'] end
		args['mod-γπ2Λ'] = br .. args['mod-γπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-γπ2θ'] .. args['mod-γπ2']), (stem_color(args['mod-γπ2θ+']) .. ending_color(args['mod-γπ2+']))) .. args['mod-γπ2Λκειμ']
	-- zero ending 
	elseif args['mod-γπ2'] == "0" then
		args['mod-γπ2Λ'] = br .. args['mod-γπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-γπ2θ']), (stem_color(args['mod-γπ2θ+']))) .. args['mod-γπ2Λκειμ']
   	elseif args['mod-γπ2'] == '-' then
   		args['mod-γπ2Λ'] = br .. args['mod-γπ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-γπ2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['γπθ'] == '' or args['γπθ'] == nil then args['γπθ'] = stem["θ"] else args['γπθ'] = args['γπθ'] end
	if args['γπ2θ'] == '' or args['γπ2θ'] == nil then args['γπ2θ'] = stem["θ"] else args['γπ2θ'] = args['γπ2θ'] end
	-- first word
	if args['γπ'] ~= '-' and args['γπ'] ~= '0' and args['γπ'] ~= '' and args['γπ'] ~= nil then
		args['γπΛ'] = args['γπΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['γπθ'] .. args['γπ']), (stem_color(args['γπθ+']) .. ending_color(args['γπ+']))) .. args['γπΛκειμ']
	-- zero ending
	elseif args['γπ'] == '0' then
		args['γπΛ'] = args['γπΛκειμ1'] .. args['κοινό1'] .. create_link((args['γπθ']), (stem_color(args['γπθ+']))) .. args['γπΛκειμ']
   	elseif args['γπ'] == '-' then
   		args['γπΛ'] = args['γπΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['γπΛκειμ']
   	end
	-- second word at new line
	if args['γπ2'] ~= '-' and args['γπ2'] ~= '0' and args['γπ2'] ~= '' and args['γπ2'] ~= nil then
		if args['γπ2θ'] == '' or args['γπ2θ'] == nil then args['γπ2θ'] = args['γπθ'] end
		args['γπ2Λ'] = br .. args['γπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['γπ2θ'] .. args['γπ2']), (stem_color(args['γπ2θ+']) .. ending_color(args['γπ2+']))) .. args['γπ2Λκειμ']
	-- zero ending
	elseif args['γπ2'] == '0' then
		args['γπ2Λ'] = br .. args['γπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['γπ2θ']), (stem_color(args['γπ2θ+']))) .. args['γπ2Λκειμ']
   	elseif args['γπ2'] == '-' then
   		args['γπ2Λ'] = br .. args['γπ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['γπ2Λκειμ']
   	end
-- option
   	if  args['γπΛ'] ~= '' and args['γπΛ'] ~= nil then
   		args['γπΛ'] =  args['γπΛ'] .. args['γπ2Λ']  
   	else
   		if args['γπ2'] ~= '' and args['γπ2'] ~= nil then
   			args['γπΛ'] = args['mod-γπΛ'] .. args['γπ2Λ']
   		else
			args['γπΛ'] = args['mod-γπΛ'] .. args['mod-γπ2Λ']
		end
	end

-- ΔΟΤΙΚΗ ΠΛΗΘΥΝΤΙΚΟΥ -- DATIVE PLURAL plus novable nu - νυ εφελκυτικόν e.g. [[πατρίς]], double forms at [[καρίς]]
-- @modules -- DO NOT change param ν, ν2
	-- default stem
	if args['mod-δπθ'] == '' or args['mod-δπθ'] == nil then args['mod-δπθ'] = stem["θ"] else args['mod-δπθ'] = args['mod-δπθ'] end
	if args['mod-δπ2θ'] == '' or args['mod-δπ2θ'] == nil then args['mod-δπ2θ'] = stem["θ"] else args['mod-δπ2θ'] = args['mod-δπ2θ'] end
	-- first word + movable nu option
	if args['mod-δπ'] ~= '-' and args['mod-δπ'] ~= '0' and args['mod-δπ'] ~= '' and args['mod-δπ'] ~= nil then
		if args['ν'] == '1' then
		args['mod-δπΛ'] = args['mod-δπΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-δπθ'] .. args['mod-δπ']), (stem_color(args['mod-δπθ+']) .. ending_color(args['mod-δπ+'])))
		.. create_link((args['mod-δπθ'] .. args['mod-δπ'] .. "ν"), (stem_color("&#40;") .. ending_color("ν") .. stem_color("&#41;"))) 
		.. args['mod-δπΛκειμ']
		else
		args['mod-δπΛ'] = args['mod-δπΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-δπθ'] .. args['mod-δπ']), (stem_color(args['mod-δπθ+']) .. ending_color(args['mod-δπ+'])))
		.. args['mod-δπΛκειμ']
		end
	-- zero ending
	elseif args['mod-δπ'] == '0' then
		args['mod-δπΛ'] = args['mod-δπΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-δπθ']), (stem_color(args['mod-δπθ+']))) .. args['mod-δπΛκειμ']
   	elseif args['mod-δπ'] == '-' then
   		args['mod-δπΛ'] = args['mod-δπΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-δπΛκειμ']
   	end
	-- second word at new line +  + movable nu option
	if args['mod-δπ2'] ~= '-' and args['mod-δπ2'] ~= '0' and args['mod-δπ2'] ~= '' and args['mod-δπ2'] ~= nil then
		if args['mod-δπ2θ'] == '' or args['mod-δπ2θ'] == nil then args['mod-δπ2θ'] = args['mod-δπθ'] end
		if args['ν2'] == '1' then
		args['mod-δπ2Λ'] = br .. args['mod-δπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-δπ2θ'] .. args['mod-δπ2']), (stem_color(args['mod-δπ2θ+']) .. ending_color(args['mod-δπ2+'])))
		.. create_link((args['mod-δπ2θ'] .. args['mod-δπ2'] .. "ν"), (stem_color("&#40;") .. ending_color("ν") .. stem_color("&#41;"))) 
		.. args['mod-δπ2Λκειμ']
		else
		args['mod-δπ2Λ'] = br .. args['mod-δπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-δπ2θ'] .. args['mod-δπ2']), (stem_color(args['mod-δπ2θ+']) .. ending_color(args['mod-δπ2+']))) .. args['mod-δπ2Λκειμ']
		end
	-- zero ending 
	elseif args['mod-δπ2'] == "0" then
		args['mod-δπ2Λ'] = br .. args['mod-δπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-δπ2θ']), (stem_color(args['mod-δπ2θ+']))) .. args['mod-δπ2Λκειμ']
   	elseif args['mod-δπ2'] == '-' then
   		args['mod-δπ2Λ'] = br .. args['mod-δπ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-δπ2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['δπθ'] == '' or args['δπθ'] == nil then args['δπθ'] = stem["θ"] else args['δπθ'] = args['δπθ'] end
	if args['δπ2θ'] == '' or args['δπ2θ'] == nil then args['δπ2θ'] = stem["θ"] else args['δπ2θ'] = args['δπ2θ'] end
	-- first word + movable nu option
	if args['δπ'] ~= '-' and args['δπ'] ~= '0' and args['δπ'] ~= '' and args['δπ'] ~= nil then
		if args['ν'] == '1' then
		args['δπΛ'] = args['δπΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['δπθ'] .. args['δπ']), (stem_color(args['δπθ+']) .. ending_color(args['δπ+'])))
		.. create_link((args['δπθ'] .. args['δπ'] .. "ν"), (stem_color("&#40;") .. ending_color("ν") .. stem_color("&#41;"))) 
		.. args['δπΛκειμ']
		else
		args['δπΛ'] = args['δπΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['δπθ'] .. args['δπ']), (stem_color(args['δπθ+']) .. ending_color(args['δπ+'])))
		.. args['δπΛκειμ']
		end
	-- zero ending
	elseif args['δπ'] == '0' then
		args['δπΛ'] = args['δπΛκειμ1'] .. args['κοινό1'] .. create_link((args['δπθ']), (stem_color(args['δπθ+']))) .. args['δπΛκειμ']
   	elseif args['δπ'] == '-' then
   		args['δπΛ'] = args['δπΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['δπΛκειμ']
   	end
	-- second word at new line +  + movable nu option
	if args['δπ2'] ~= '-' and args['δπ2'] ~= '0' and args['δπ2'] ~= '' and args['δπ2'] ~= nil then
		if args['δπ2θ'] == '' or args['δπ2θ'] == nil then args['δπ2θ'] = args['δπθ'] end
		if args['ν2'] == '1' then
		args['δπ2Λ'] = br .. args['δπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['δπ2θ'] .. args['δπ2']), (stem_color(args['δπ2θ+']) .. ending_color(args['δπ2+'])))
		.. create_link((args['δπ2θ'] .. args['δπ2'] .. "ν"), (stem_color("&#40;") .. ending_color("ν") .. stem_color("&#41;"))) 
		.. args['δπ2Λκειμ']
		else
		args['δπ2Λ'] = br .. args['δπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['δπ2θ'] .. args['δπ2']), (stem_color(args['δπ2θ+']) .. ending_color(args['δπ2+']))) .. args['δπ2Λκειμ']
		end
	-- zero ending
	elseif args['δπ2'] == '0' then
		args['δπ2Λ'] = br .. args['δπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['δπ2θ']), (stem_color(args['δπ2θ+']))) .. args['δπ2Λκειμ']
   	elseif args['δπ2'] == '-' then
   		args['δπ2Λ'] = br .. args['δπ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['δπ2Λκειμ']
   	end
-- option
   	if  args['δπΛ'] ~= '' and args['δπΛ'] ~= nil then
   		args['δπΛ'] =  args['δπΛ'] .. args['δπ2Λ']  
   	else -- check [[δῶρον]]
   		if args['δπ2'] ~= '' and args['δπ2'] ~= nil then
   			args['δπΛ'] = args['mod-δπΛ'] .. args['δπ2Λ']
   		else
			args['δπΛ'] = args['mod-δπΛ'] .. args['mod-δπ2Λ']
		end
	end


-- ΑΙΤΙΑΤΙΚΗ ΠΛΗΘΥΝΤΙΚΟΥ -- ACCUSATIVE PLURAL
-- @modules
	-- default stem
	if args['mod-απθ'] == '' or args['mod-απθ'] == nil then args['mod-απθ'] = stem["θ"] else args['mod-απθ'] = args['mod-απθ'] end
	if args['mod-απ2θ'] == '' or args['mod-απ2θ'] == nil then args['mod-απ2θ'] = stem["θ"] else args['mod-απ2θ'] = args['mod-απ2θ'] end
	-- first word
	if args['mod-απ'] ~= '-' and args['mod-απ'] ~= '0' and args['mod-απ'] ~= '' and args['mod-απ'] ~= nil then
		args['mod-απΛ'] = args['mod-απΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-απθ'] .. args['mod-απ']), (stem_color(args['mod-απθ+']) .. ending_color(args['mod-απ+']))) .. args['mod-απΛκειμ']
	-- zero ending
	elseif args['mod-απ'] == '0' then
		args['mod-απΛ'] = args['mod-απΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-απθ']), (stem_color(args['mod-απθ+']))) .. args['mod-απΛκειμ']
   	elseif args['mod-απ'] == '-' then
   		args['mod-απΛ'] = args['mod-απΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-απΛκειμ']
   	end
	-- second word at new line
	if args['mod-απ2'] ~= '-' and args['mod-απ2'] ~= '0' and args['mod-απ2'] ~= '' and args['mod-απ2'] ~= nil then
		if args['mod-απ2θ'] == '' or args['mod-απ2θ'] == nil then args['mod-απ2θ'] = args['mod-απθ'] end
		args['mod-απ2Λ'] = br .. args['mod-απ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-απ2θ'] .. args['mod-απ2']), (stem_color(args['mod-απ2θ+']) .. ending_color(args['mod-απ2+']))) .. args['mod-απ2Λκειμ']
	-- zero ending 
	elseif args['mod-απ2'] == "0" then
		args['mod-απ2Λ'] = br .. args['mod-απ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-απ2θ']), (stem_color(args['mod-απ2θ+']))) .. args['mod-απ2Λκειμ']
   	elseif args['mod-απ2'] == '-' then
   		args['mod-απ2Λ'] = br .. args['mod-απ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-απ2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['απθ'] == '' or args['απθ'] == nil then args['απθ'] = stem["θ"] else args['απθ'] = args['απθ'] end
	if args['απ2θ'] == '' or args['απ2θ'] == nil then args['απ2θ'] = stem["θ"] else args['απ2θ'] = args['απ2θ'] end
	-- first word
	if args['απ'] ~= '-' and args['απ'] ~= '0' and args['απ'] ~= '' and args['απ'] ~= nil then
		args['απΛ'] = args['απΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['απθ'] .. args['απ']), (stem_color(args['απθ+']) .. ending_color(args['απ+']))) .. args['απΛκειμ']
	-- zero ending
	elseif args['απ'] == '0' then
		args['απΛ'] = args['απΛκειμ1'] .. args['κοινό1'] .. create_link((args['απθ']), (stem_color(args['απθ+']))) .. args['απΛκειμ']
   	elseif args['απ'] == '-' then
   		args['απΛ'] = args['απΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['απΛκειμ']
   	end
	-- second word at new line
	if args['απ2'] ~= '-' and args['απ2'] ~= '0' and args['απ2'] ~= '' and args['απ2'] ~= nil then
		if args['απ2θ'] == '' or args['απ2θ'] == nil then args['απ2θ'] = args['απθ'] end
		args['απ2Λ'] = br .. args['απ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['απ2θ'] .. args['απ2']), (stem_color(args['απ2θ+']) .. ending_color(args['απ2+']))) .. args['απ2Λκειμ']
	-- zero ending
	elseif args['απ2'] == '0' then
		args['απ2Λ'] = br .. args['απ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['απ2θ']), (stem_color(args['απ2θ+']))) .. args['απ2Λκειμ']
   	elseif args['απ2'] == '-' then
   		args['απ2Λ'] = br .. args['απ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['απ2Λκειμ']
   	end
-- option
   	if  args['απΛ'] ~= '' and args['απΛ'] ~= nil then
   		args['απΛ'] =  args['απΛ'] .. args['απ2Λ']  
   	else
   		if args['απ2'] ~= '' and args['απ2'] ~= nil then
   			args['απΛ'] = args['mod-απΛ'] .. args['απ2Λ']
   		else
			args['απΛ'] = args['mod-απΛ'] .. args['mod-απ2Λ']
		end
	end


-- ΚΛΗΤΙΚΗ ΠΛΗΘΥΝΤΙΚΟΥ -- VOCATIVE PLURAL
-- @modules
	-- default stem
	if args['mod-κπθ'] == '' or args['mod-κπθ'] == nil then args['mod-κπθ'] = stem["θ"] else args['mod-κπθ'] = args['mod-κπθ'] end
	if args['mod-κπ2θ'] == '' or args['mod-κπ2θ'] == nil then args['mod-κπ2θ'] = stem["θ"] else args['mod-κπ2θ'] = args['mod-κπ2θ'] end
	-- first word
	if args['mod-κπ'] ~= '-' and args['mod-κπ'] ~= '0' and args['mod-κπ'] ~= '' and args['mod-κπ'] ~= nil then
		args['mod-κπΛ'] = args['mod-κπΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-κπθ'] .. args['mod-κπ']), (stem_color(args['mod-κπθ+']) .. ending_color(args['mod-κπ+']))) .. args['mod-κπΛκειμ']
	-- zero ending
	elseif args['mod-κπ'] == '0' then
		args['mod-κπΛ'] = args['mod-κπΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-κπθ']), (stem_color(args['mod-κπθ+']))) .. args['mod-κπΛκειμ']
   	elseif args['mod-κπ'] == '-' then
   		args['mod-κπΛ'] = args['mod-κπΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-κπΛκειμ']
   	end
	-- second word at new line
	if args['mod-κπ2'] ~= '-' and args['mod-κπ2'] ~= '0' and args['mod-κπ2'] ~= '' and args['mod-κπ2'] ~= nil then
		if args['mod-κπ2θ'] == '' or args['mod-κπ2θ'] == nil then args['mod-κπ2θ'] = args['mod-κπθ'] end
		args['mod-κπ2Λ'] = br .. args['mod-κπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-κπ2θ'] .. args['mod-κπ2']), (stem_color(args['mod-κπ2θ+']) .. ending_color(args['mod-κπ2+']))) .. args['mod-κπ2Λκειμ']
	-- zero ending 
	elseif args['mod-κπ2'] == "0" then
		args['mod-κπ2Λ'] = br .. args['mod-κπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-κπ2θ']), (stem_color(args['mod-κπ2θ+']))) .. args['mod-κπ2Λκειμ']
   	elseif args['mod-κπ2'] == '-' then
   		args['mod-κπ2Λ'] = br .. args['mod-κπ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-κπ2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['κπθ'] == '' or args['κπθ'] == nil then args['κπθ'] = stem["θ"] else args['κπθ'] = args['κπθ'] end
	if args['κπ2θ'] == '' or args['κπ2θ'] == nil then args['κπ2θ'] = stem["θ"] else args['κπ2θ'] = args['κπ2θ'] end
	-- first word
	if args['κπ'] ~= '-' and args['κπ'] ~= '0' and args['κπ'] ~= '' and args['κπ'] ~= nil then
		args['κπΛ'] = args['κπΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['κπθ'] .. args['κπ']), (stem_color(args['κπθ+']) .. ending_color(args['κπ+']))) .. args['κπΛκειμ']
	-- zero ending
	elseif args['κπ'] == '0' then
		args['κπΛ'] = args['κπΛκειμ1'] .. args['κοινό1'] .. create_link((args['κπθ']), (stem_color(args['κπθ+']))) .. args['κπΛκειμ']
   	elseif args['κπ'] == '-' then
   		args['κπΛ'] = args['κπΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['κπΛκειμ']
   	end
	-- second word at new line
	if args['κπ2'] ~= '-' and args['κπ2'] ~= '0' and args['κπ2'] ~= '' and args['κπ2'] ~= nil then
		if args['κπ2θ'] == '' or args['κπ2θ'] == nil then args['κπ2θ'] = args['κπθ'] end
		args['κπ2Λ'] = br .. args['κπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['κπ2θ'] .. args['κπ2']), (stem_color(args['κπ2θ+']) .. ending_color(args['κπ2+']))) .. args['κπ2Λκειμ']
	-- zero ending
	elseif args['κπ2'] == '0' then
		args['κπ2Λ'] = br .. args['κπ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['κπ2θ']), (stem_color(args['κπ2θ+']))) .. args['κπ2Λκειμ']
   	elseif args['κπ2'] == '-' then
   		args['κπ2Λ'] = br .. args['κπ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['κπ2Λκειμ']
   	end
-- option
   	if  args['κπΛ'] ~= '' and args['κπΛ'] ~= nil then
   		args['κπΛ'] =  args['κπΛ'] .. args['κπ2Λ']  
   	else
   		if args['κπ2'] ~= '' and args['κπ2'] ~= nil then
   			args['κπΛ'] = args['mod-κπΛ'] .. args['κπ2Λ']
   		else
			args['κπΛ'] = args['mod-κπΛ'] .. args['mod-κπ2Λ'] 
		end
	end  




-- ΔΥΪΚΟΣ ονομαστική - αιτιατική -- DUAL nominative - accusative - voc
-- @modules
	-- default stem
	if args['mod-οδθ'] == '' or args['mod-οδθ'] == nil then args['mod-οδθ'] = stem["θ"] else args['mod-οδθ'] = args['mod-οδθ'] end
	if args['mod-οδ2θ'] == '' or args['mod-οδ2θ'] == nil then args['mod-οδ2θ'] = stem["θ"] else args['mod-οδ2θ'] = args['mod-οδ2θ'] end
	-- first word
	if args['mod-οδ'] ~= '-' and args['mod-οδ'] ~= '0' and args['mod-οδ'] ~= '' and args['mod-οδ'] ~= nil then
		args['mod-οδΛ'] = args['mod-οδΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-οδθ'] .. args['mod-οδ']), (stem_color(args['mod-οδθ+']) .. ending_color(args['mod-οδ+']))) .. args['mod-οδΛκειμ']
	-- zero ending
	elseif args['mod-οδ'] == '0' then
		args['mod-οδΛ'] = args['mod-οδΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-οδθ']), (stem_color(args['mod-οδθ+']))) .. args['mod-οδΛκειμ']
   	elseif args['mod-οδ'] == '-' then
   		args['mod-οδΛ'] = args['mod-οδΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-οδΛκειμ']
   	end
	-- second word at new line
	if args['mod-οδ2'] ~= '-' and args['mod-οδ2'] ~= '0' and args['mod-οδ2'] ~= '' and args['mod-οδ2'] ~= nil then
		if args['mod-οδ2θ'] == '' or args['mod-οδ2θ'] == nil then args['mod-οδ2θ'] = args['mod-οδθ'] end
		args['mod-οδ2Λ'] = brdu .. args['mod-οδ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-οδ2θ'] .. args['mod-οδ2']), (stem_color(args['mod-οδ2θ+']) .. ending_color(args['mod-οδ2+']))) .. args['mod-οδ2Λκειμ']
	-- zero ending 
	elseif args['mod-οδ2'] == "0" then
		args['mod-οδ2Λ'] = brdu .. args['mod-οδ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-οδ2θ']), (stem_color(args['mod-οδ2θ+']))) .. args['mod-οδ2Λκειμ']
   	elseif args['mod-οδ2'] == '-' then
   		args['mod-οδ2Λ'] = brdu .. args['mod-οδ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-οδ2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['οδθ'] == '' or args['οδθ'] == nil then args['οδθ'] = stem["θ"] else args['οδθ'] = args['οδθ'] end
	if args['οδ2θ'] == '' or args['οδ2θ'] == nil then args['οδ2θ'] = stem["θ"] else args['οδ2θ'] = args['οδ2θ'] end
	-- first word
	if args['οδ'] ~= '-' and args['οδ'] ~= '0' and args['οδ'] ~= '' and args['οδ'] ~= nil then
		args['οδΛ'] = args['οδΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['οδθ'] .. args['οδ']), (stem_color(args['οδθ+']) .. ending_color(args['οδ+']))) .. args['οδΛκειμ']
	-- zero ending
	elseif args['οδ'] == '0' then
		args['οδΛ'] = args['οδΛκειμ1'] .. args['κοινό1'] .. create_link((args['οδθ']), (stem_color(args['οπθ+']))) .. args['οδΛκειμ']
   	elseif args['οδ'] == '-' then
   		args['οδΛ'] = args['οδΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['οδΛκειμ']
   	end
	-- second word at new line
	if args['οδ2'] ~= '-' and args['οδ2'] ~= '0' and args['οδ2'] ~= '' and args['οδ2'] ~= nil then
		if args['οδ2θ'] == '' or args['οδ2θ'] == nil then args['οδ2θ'] = args['οδθ'] end
		args['οδ2Λ'] = brdu .. args['οδ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['οδ2θ'] .. args['οδ2']), (stem_color(args['οδ2θ+']) .. ending_color(args['οδ2+']))) .. args['οδ2Λκειμ']
	-- zero ending
	elseif args['οδ2'] == '0' then
		args['οδ2Λ'] = brdu .. args['οδ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['οδ2θ']), (stem_color(args['οδ2θ+']))) .. args['οδ2Λκειμ']
   	elseif args['οδ2'] == '-' then
   		args['οδ2Λ'] = brdu .. args['οδ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['οδ2Λκειμ']
   	end
-- option
   	if  args['οδΛ'] ~= '' and args['οδΛ'] ~= nil then
   		args['οδΛ'] =  args['οδΛ'] .. args['οδ2Λ']  
   	else
   		if args['οδ2'] ~= '' and args['οδ2'] ~= nil then
   			args['οδΛ'] = args['mod-οδΛ'] .. args['οδ2Λ']
   		else
			args['οδΛ'] = args['mod-οδΛ'] .. args['mod-οδ2Λ'] 
		end
	end    


-- ΔΥΪΚΟΣ γενική - δοτική -- DUAL genitive - dative
-- @modules
	-- default stem
	if args['mod-γδθ'] == '' or args['mod-γδθ'] == nil then args['mod-γδθ'] = stem["θ"] else args['mod-γδθ'] = args['mod-γδθ'] end
	if args['mod-γδ2θ'] == '' or args['mod-γδ2θ'] == nil then args['mod-γδ2θ'] = stem["θ"] else args['mod-γδ2θ'] = args['mod-γδ2θ'] end
	-- first word
	if args['mod-γδ'] ~= '-' and args['mod-γδ'] ~= '0' and args['mod-γδ'] ~= '' and args['mod-γδ'] ~= nil then
		args['mod-γδΛ'] = args['mod-γδΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-γδθ'] .. args['mod-γδ']), (stem_color(args['mod-γδθ+']) .. ending_color(args['mod-γδ+']))) .. args['mod-γδΛκειμ']
	-- zero ending
	elseif args['mod-γδ'] == '0' then
		args['mod-γδΛ'] = args['mod-γδΛκειμ1'] .. args['κοινό1'] .. create_link((args['mod-γδθ']), (stem_color(args['mod-γδθ+']))) .. args['mod-γδΛκειμ']
   	elseif args['mod-γδ'] == '-' then
   		args['mod-γδΛ'] = args['mod-γδΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-γδΛκειμ']
   	end
	-- second word at new line
	if args['mod-γδ2'] ~= '-' and args['mod-γδ2'] ~= '0' and args['mod-γδ2'] ~= '' and args['mod-γδ2'] ~= nil then
		if args['mod-γδ2θ'] == '' or args['mod-γδ2θ'] == nil then args['mod-γδ2θ'] = args['mod-γδθ'] end
		args['mod-γδ2Λ'] = brdu .. args['mod-γδ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-γδ2θ'] .. args['mod-γδ2']), (stem_color(args['mod-γδ2θ+']) .. ending_color(args['mod-γδ2+']))) .. args['mod-γδ2Λκειμ']
	-- zero ending 
	elseif args['mod-γδ2'] == "0" then
		args['mod-γδ2Λ'] = brdu .. args['mod-γδ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['mod-γδ2θ']), (stem_color(args['mod-γδ2θ+']))) .. args['mod-γδ2Λκειμ']
   	elseif args['mod-γδ2'] == '-' then
   		args['mod-γδ2Λ'] = brdu .. args['mod-γδ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['mod-γδ2Λκειμ']
   	end
-- for editors
	-- default stem
	if args['γδθ'] == '' or args['γδθ'] == nil then args['γδθ'] = stem["θ"] else args['γδθ'] = args['γδθ'] end
	if args['γδ2θ'] == '' or args['γδ2θ'] == nil then args['γδ2θ'] = stem["θ"] else args['γδ2θ'] = args['γδ2θ'] end
	-- first word
	if args['γδ'] ~= '-' and args['γδ'] ~= '0' and args['γδ'] ~= '' and args['γδ'] ~= nil then
		args['γδΛ'] = args['γδΛκειμ1'] .. args['κοινό1'] 
		.. create_link((args['γδθ'] .. args['γδ']), (stem_color(args['γδθ+']) .. ending_color(args['γδ+']))) .. args['γδΛκειμ']
	-- zero ending
	elseif args['γδ'] == '0' then
		args['γδΛ'] = args['γδΛκειμ1'] .. args['κοινό1'] .. create_link((args['γδθ']), (stem_color(args['γδθ+']))) .. args['γδΛκειμ']
   	elseif args['γδ'] == '-' then
   		args['γδΛ'] = args['γδΛκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['γδΛκειμ']
   	end
	-- second word at new line
	if args['γδ2'] ~= '-' and args['γδ2'] ~= '0' and args['γδ2'] ~= '' and args['γδ2'] ~= nil then
		if args['γδ2θ'] == '' or args['γδ2θ'] == nil then args['γδ2θ'] = args['γδθ'] end
		args['γδ2Λ'] = brdu .. args['γδ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['γδ2θ'] .. args['γδ2']), (stem_color(args['γδ2θ+']) .. ending_color(args['γδ2+']))) .. args['γδ2Λκειμ']
	-- zero ending
	elseif args['γδ2'] == '0' then
		args['γδ2Λ'] = brdu .. args['γδ2Λκειμ1'] .. args['κοινό1'] 
		.. create_link((args['γδ2θ']), (stem_color(args['γδ2θ+']))) .. args['γδ2Λκειμ']
   	elseif args['γδ2'] == '-' then
   		args['γδ2Λ'] = brdu .. args['γδ2Λκειμ1'] .. '<span style="text-align:center; color:#dddddd;">&mdash;</span>' .. args['γδ2Λκειμ']
   	end
-- option
   	if  args['γδΛ'] ~= '' and args['γδΛ'] ~= nil then
   		args['γδΛ'] =  args['γδΛ'] .. args['γδ2Λ']  
   	else
   		if args['γδ2'] ~= '' and args['γδ2'] ~= nil then
   			args['γδΛ'] = args['mod-γδΛ'] .. args['γδ2Λ']
   		else
			args['γδΛ'] = args['mod-γδΛ'] .. args['mod-γδ2Λ']
		end
	end 


-- 2ος ενικός	
	args['οεΛ2'] = args['οεΛ2'] or ''
	args['γεΛ2'] = args['γεΛ2'] or ''
	args['δεΛ2'] = args['δεΛ2'] or ''
	args['αεΛ2'] = args['αεΛ2'] or ''
	args['κεΛ2'] = args['κεΛ2'] or ''
-- 2ος πληθυντικός	-- ὁ [[θύρσος]] οἱ θύρσοι + τὰ θύρσα
	args['οπΛ2'] = args['οπΛ2'] or ''
	args['γπΛ2'] = args['γπΛ2'] or ''
	args['δπΛ2'] = args['δπΛ2'] or ''
	args['απΛ2'] = args['απΛ2'] or ''
	args['κπΛ2'] = args['κπΛ2'] or ''
-- no 2ος δυϊκός


end -- close  function param

return {param = param}