Module:grc-adj-decl/3

Από Βικιλεξικό
Μετάβαση στην πλοήγηση Πήδηση στην αναζήτηση

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

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



-- αρχαία ελληνικά επίθετα & μετοχές - 3η κλίση - ancient greek adjectives/participles 3rd declension 2021.06. Sarri.greek
-- INSTRUCTIONS & help at bottom of [[Module:grc-adj-decl]] - ΟΔΗΓΙΕΣ στο τέλος της κύριας σελίδας
-- All parameters at the /param page.
--  ======================= ΚΛΙΣΗ 3 επίθετα αρχαία ελληνικά ================================= --
--[=[ CONTENTS - ΠΕΡΙΕΧΟΜΕΝΑ  τα Πρότυπα α...ω
Ονοματοδοσία προτύπων: χωρίς διακριτικά (μόνο τόνο οξεία τιμών αντί με περισπωμένη), τα μονοσύλλαβα άτονα (στας)
* ΕΠΙΘΕΤΑ βαθύς, βελτίων, δίπηχυς, έπηλυς, εύβοτρυς, ευδαίμων, εύελπις+note, εύχαρις, θήλυς+ήμισυς, 
	μανιώδης, μείζων(δίχρ=), μέλας, πας=πᾶς, συνεχής, συνήθης, σώφρων(δίχρ=), 
	ταχύπους, χαρίεις, χαυλιόδους
* ΜΕΤΟΧΕΣ δεικνύς, διδούς, λελυκώς, λυθείς, λύσας(δίχρ=) +[[σύμπας]], λύων(δίχρ=), 
	ποιών=ποιῶν(ΣΝΡ), στας=στάς, τεθνεώς, τιμών=τιμῶν(ΣΝΡ), φυγών, ὤν

EDITOR_MUST_DEFINE see main page (λύων, λύσας)
ΑΣΥΝΑΙΡΕΤΟ+ΣΥΝΗΡΗΜΕΝΟ?? ποιών τιμών
]=]--


export = {}

-- ====================== ΕΠΙΘΕΤΑ τριτόκλιτα ====================== --

-- ### TO DO epic κλίση
-- =================== 3η [[βαθύς]] ============================== --
-- f.create_link used here
--  θέματα καταλήξεις όπως στο σχολικό Οικονόμου και στον Τζάρτζανο
-- Smyth http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D23
--		http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Asmythp%3D297
-- επική κλίση ΕΚΚΡΕΜΟΤΗΤΑ
-- linkcontrol does not work
export['βαθύς'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'βαθύς']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- βαθ	

    args['κλίση'] = '3'
    args['κατηγορία κλίσης'] = 'βαθύς'
    args['τύπος'] = 'βαθύς'
    args['όπως'] = 'βαθύς'
    args['κατηγ0'] = 'Λέξεις οξύτονες'
    args['κατηγ01'] = 'Επίθετα οξύτονα'
    args['mod-σημ'] = 'Οι ασυναίρετοι τύποι [http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D23 όπως στο παράδειγμα]'
    .. ' του [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Smyth|Smyth]].<br>Ο συνηρημένος δυϊκός, όπως στο'
    .. ' [http://ebooks.edu.gr/ebooks/v/html/8547/2340/Grammatiki-Archaias-Ellinikis_Gymnasiou-Lykeiou_html-apli/index_02_10.html σχολικό βιβλίο] (Οικονόμου).'
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = stem["θ"] .. "ύ"		args['οεθ+-αρσ'] = stem["θ"] .. "ῠ́"	args['οε-αρσ'] = "ς"
	args['γεθ-αρσ'] = stem["θ"] .. "έ"												args['γε-αρσ'] = "ος"
-- Smyth / MUST repeat the creat_link function IN HERE
	args['δεΛκειμ1-αρσ'] = '(<span style="font-size:80%;">' 
	.. create_link(stem["θ"] .."έ" .. "ϊ", stem_color(stem["θ"]) .. infix_color("έ") .. ending_color("ϊ")) .. '</span>) '
	args['δε-αρσ'] = "εῖ" -- έϊ
	args['αεθ-αρσ'] = stem["θ"] .. "ύ"		args['αεθ+-αρσ'] = stem["θ"] .. "ῠ́"	args['αε-αρσ'] = "ν"
	args['κεθ-αρσ'] = stem["θ"] .. "ύ"		args['κεθ+-αρσ'] = stem["θ"] .. "ῠ́"	args['κε-αρσ'] = "0"
-- Smtyth
	args['οπΛκειμ1-αρσ'] = '(<span style="font-size:80%;">' 
	.. create_link(stem["θ"] .."έ" .. "ες", stem_color(stem["θ"]) .. infix_color("έ") .. ending_color("ες")) .. '</span>) '
	args['οπ-αρσ'] = "εῖς" --εες
	args['γπθ-αρσ'] = stem["θ"] .. "έ"												args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "έ"												args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απ-αρσ'] = "εῖς"
-- Smtyth
	args['κπΛκειμ1-αρσ'] = '(<span style="font-size:80%;">' 
	.. create_link(stem["θ"] .."έ" .. "ες", stem_color(stem["θ"]) .. infix_color("έ") .. ending_color("ες")) .. '</span>) '
	args['κπ-αρσ'] = "εῖς" --εες
-- schoolbook.Ikonomu
	args['οδΛκειμ-αρσ'] = ' (<span style="font-size:80%;">' .. stem["θ"] .. "εῖ" .. '</span>)'
	args['οδθ-αρσ'] = stem["θ"] .. "έ"												args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ"] .. "έ"												args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "ε"				args['οε-θηλ'] = "ῖα"		args['οε+-θηλ'] = "ῖᾰ"
 	args['γεθ-θηλ'] = stem["θ"] .. "ε"				args['γε-θηλ'] = "ίας"		args['γε+-θηλ'] = "ίᾱς"
	args['δεθ-θηλ'] = stem["θ"] .. "ε"				args['δε-θηλ'] = "ίᾳ"
	args['αεθ-θηλ'] = stem["θ"] .. "ε"				args['αε-θηλ'] = "ῖαν"		args['αε+-θηλ'] = "ῖᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "ε"				args['κε-θηλ'] = "ῖα"		args['κε+-θηλ'] = "ῖᾰ"
	args['οπθ-θηλ'] = stem["θ"] .. "ε"				args['οπ-θηλ'] = "ῖαι"
	args['γπθ-θηλ'] = stem["θ"] .. "ε"				args['γπ-θηλ'] = "ιῶν"
	args['δπθ-θηλ'] = stem["θ"] .. "ε"				args['δπ-θηλ'] = "ίαις"
	args['απθ-θηλ'] = stem["θ"] .. "ε"				args['απ-θηλ'] = "ίας"		args['απ+-θηλ'] = "ίᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "ε"				args['κπ-θηλ'] = "ῖαι"
	args['οδθ-θηλ'] = stem["θ"] .. "ε"				args['οδ-θηλ'] = "ία"		args['οδ+-θηλ'] = "ίᾱ"
	args['γδθ-θηλ'] = stem["θ"] .. "ε"				args['γδ-θηλ'] = "ίαιν"
-- neu	
	args['οεθ-ουδ'] = stem["θ"] .. "ύ"		args['οεθ+-ουδ'] = stem["θ"] .. "ῠ́"	args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"] .. "έ"												args['γε-ουδ'] = "ος"
-- Smyth
	args['δεΛκειμ1-ουδ'] = '(<span style="font-size:80%;">' 
	.. create_link(stem["θ"] .."έ" .. "ϊ", stem_color(stem["θ"]) .. infix_color("έ") .. ending_color("ϊ")) .. '</span>) '
	args['δε-ουδ'] = "εῖ" -- έϊ
	args['αεθ-ουδ'] = stem["θ"] .. "ύ"		args['αεθ+-ουδ'] = stem["θ"] .. "ῠ́"	args['αε-ουδ'] = "0"
	args['κεθ-ουδ'] = stem["θ"] .. "ύ"		args['κεθ+-ουδ'] = stem["θ"] .. "ῠ́"	args['κε-ουδ'] = "0"
	args['οπθ-ουδ'] = stem["θ"] .. "έ"												args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ"] .. "έ"												args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ"] .. "έ"												args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ"] .. "έ"												args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"
	args['κπθ-ουδ'] = stem["θ"] .. "έ"												args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"
-- schoolbook.Ikonomu
	args['οδΛκειμ-ουδ'] = ' (<span style="font-size:80%;">' .. stem["θ"] .. "εῖ" .. '</span>)'
	args['οδθ-ουδ'] = stem["θ"] .. "έ"												args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ"] .. "έ"												args['γδ-ουδ'] = "οιν"
return decl(args)
end	



-- ================ 3η ΚΛΙΣΗ  [[βελτίων]]-ονος, -ων, βέλτιον============= --
-- RECESSIVE accent ΜΕΤΑΚΙΝΟΥΝ τον τόνο στο ουδέτερο βέλτιον.
-- PROBLEM Module:grk-stems does not read diphthongs μείζων  gives μέιζον. this is like σώφρων see #μείζων
-- it is a variant +types of #ευδαίμων
export['βελτίων'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'βελτίων']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
	
mw.addWarning('<b><span style="color:#b22222; font-size:14px;">Προσοχή στο ουδέτερο! Εξετάστε αν χρειάζεται η &#123;&#123;grc-κλίση-&#39;μείζων&#39;&#125;&#125; ή η  &#123;&#123;grc-κλίση-&#39;βελτίων&#39;&#125;&#125;</span></b>')

-- stems
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- βελτί-ων minus 2 letters from end, stemnumber = 3
	stem["θ0"] = m_stems.word0(stem["θ"])				-- βελτι-όνων removes accent
	stem["θ2"] = m_stems.word2(stem["θ0"])				-- βέλτι-ον puts okseia at 2nd vowel from the end

	args['κλίση'] = 'τρίτη' -- δικατάληκτο, δεν υπάρχει θηλυκό, 3&1 κλίση
	args['αθ'] = '1'
	args['θηλ'] = '-'
	args['κατηγορία κλίσης'] = 'βελτίων'
	args['τύπος'] = 'βελτίων'
	args['όπως'] = 'βελτίων'
	args['κατηγ0'] = 'Λέξεις παροξύτονες'	
	args['κατηγ01'] = 'Επίθετα παροξύτονα'
	args['br'] = 'dash' -- no break line for second word
	char = "ον"
	char0 = "ον"
	char1 = "όν"
	chardat = "o"
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at masc.dat.pl and neu.dat.pl.
-- masc    	
	args['οεθ-αρσ'] = args['λήμμα']	args['οε-αρσ'] = "0"
	args['γεθ-αρσ'] = stem["θ"] .. char		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. char		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. char		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
		args['αε2θ-αρσ'] = stem["θ"]		args['αε2-αρσ'] = "ω"
	args['κεθ-αρσ'] = stem["θ2"] .. char0	args['κε-αρσ'] = "0"	--same as neuter
	args['οπθ-αρσ'] = stem["θ"] .. char		args['οπ-αρσ'] = "ες"
		args['οπ2θ-αρσ'] = stem["θ"]		args['οπ2-αρσ'] = "ους"
	args['γπθ-αρσ'] = stem["θ0"] .. char1	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. chardat	args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. char		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
		args['απ2θ-αρσ'] = stem["θ"]		args['απ2-αρσ'] = "ους"
	args['κπθ-αρσ'] = stem["θ"] .. char		args['κπ-αρσ'] = "ες"	-- same as nom.
		args['κπ2θ-αρσ'] = stem["θ"]		args['κπ2-αρσ'] = "ους"
	args['οδθ-αρσ'] = stem["θ"] .. char		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. char1	args['γδ-αρσ'] = "οιν"
-- fem = masc

-- neu	
	args['οεθ-ουδ'] = stem["θ2"] .. char0	args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"] .. char		args['γε-ουδ'] = "ος"	-- same as masc.gen
	args['δεθ-ουδ'] = stem["θ"] .. char		args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"	-- same as masc.dat
	args['αεθ-ουδ'] = stem["θ2"] .. char0	args['αε-ουδ'] = "0"	-- acc same as nom    
	args['κεθ-ουδ'] = stem["θ2"] .. char0	args['κε-ουδ'] = "0"	-- voc same as nom
	args['οπθ-ουδ'] = stem["θ"] .. char		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
		args['οπ2θ-ουδ'] = stem["θ"]		args['οπ2-ουδ'] = "ω"
	args['γπθ-ουδ'] = stem["θ0"] .. char1	args['γπ-ουδ'] = "ων"	-- same as masc.gen
	args['δπθ-ουδ'] = stem["θ"] .. chardat	args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"	-- same as masc.dat
	args['απθ-ουδ'] = stem["θ"] .. char		args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"	-- same as nom
		args['απ2θ-ουδ'] = stem["θ"]		args['απ2-ουδ'] = "ω"
	args['κπθ-ουδ'] = stem["θ"] .. char		args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom
		args['κπ2θ-ουδ'] = stem["θ"]		args['κπ2-ουδ'] = "ω"
	args['οδθ-ουδ'] = stem["θ"] .. char		args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ0"] .. char1	args['γδ-ουδ'] = "οιν"
return decl(args)
end



-- =================== 3η [[δίπηχυς]] ============================== --
-- like [[πῆχυς]], πήχεος Same for [[πέλεκυς]] compounds [[ἑξαπέλεκυς]] *διπέλεκυς of schoolgrammar, not found at LSJ)
export['δίπηχυς'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'δίπηχυς']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- δίπηχ-υ-ς ἑξαπέλεκ-υ-ς minus 2 letters from end, stemnumber = 3
	stem["θ0"] = m_stems.word0(stem["θ"])				-- διπηχ-έ-ων  ἑξαπελεκ-έ-ων !?ἑξαπελέκ-ε-ων ?? removes accent IS the πόλεων accentuation CANCELLED?
	stem["θ1"] = m_stems.word1(stem["θ0"])				-- διπήχ-ε-ως ἑξαπελέκ-ε-ως accent on 1st vowel from the end

    args['κλίση'] = 'τρίτη'		-- δικατάληκτο, not 3η&1η
	args['αθ'] = '1'
	args['θηλ'] = '-'
    args['κατηγορία κλίσης'] = 'δίπηχυς'
	args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
	args['κατηγ01'] = 'Επίθετα προπαροξύτονα'
	if mw.ustring.find(args['λήμμα'], 'πέλεκυς$') then -- $ at the end of the word
		args['τύπος'] = 'ἑξαπέλεκυς'
		args['όπως'] = 'ἑξαπέλεκυς'
	else -- πηχυς
		args['τύπος'] = 'δίπηχυς'
		args['όπως'] = 'δίπηχυς'
	end
    args['br'] = 'dash' -- do not break line, just a dash
-- dictionaries do not give prosody for υ
-- ##?? shall i put all ε at stem?
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc+fem
	args['οεθ-αρσ'] = stem["θ"] .. "υ"		args['οε-αρσ'] = "ς"
	args['γεθ-αρσ'] = stem["θ1"] .. "ε"		args['γε-αρσ'] = "ως"
	args['δεθ-αρσ'] = stem["θ1"]			args['δε-αρσ'] = "ει"
	args['αεθ-αρσ'] = stem["θ"] .. "υ"		args['αε-αρσ'] = "ν"
	args['κεθ-αρσ'] = stem["θ"] .. "υ"		args['κε-αρσ'] = "0"
	args['οπθ-αρσ'] = stem["θ1"]			args['οπ-αρσ'] = "εις"
	args['γπθ-αρσ'] = stem["θ0"] .. "έ"		args['γπ-αρσ'] = "ων"	-- DOES NOT FOLLOW των πήχεων των πελέκεων
	args['δπθ-αρσ'] = stem["θ1"] .. "ε"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ1"]			args['απ-αρσ'] = "εις"	-- same as nom.
	args['κπθ-αρσ'] = stem["θ1"]			args['κπ-αρσ'] = "εις"	-- same as nom.
	args['οδθ-αρσ'] = stem["θ1"]			args['οδ-αρσ'] = "ει"
	args['γδθ-αρσ'] = stem["θ0"] .. "έ"		args['γδ-αρσ'] = "οιν"
-- fem at masc
-- neu	
	args['οεθ-ουδ'] = stem["θ"] .. "υ"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ1"] .. "ε"		args['γε-ουδ'] = "ος"	-- !! ος
	args['δεθ-ουδ'] = stem["θ1"]			args['δε-ουδ'] = "ει"
	args['αεθ-ουδ'] = stem["θ"] .. "υ"		args['αε-ουδ'] = "0"	-- same as nom.
	args['κεθ-ουδ'] = stem["θ"] .. "υ"		args['κε-ουδ'] = "0"	-- same as nom.
	args['οπθ-ουδ'] = stem["θ1"] .. "ε"		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
		args['οπ2θ-ουδ'] = stem["θ1"]	args['οπ2-ουδ'] = "η"
	args['γπθ-ουδ'] = stem["θ0"] .. "έ"		args['γπ-ουδ'] = "ων"	-- @shcolgrammar. Does NOT FOLLOW πήχεων πελέκεων
	args['δπθ-ουδ'] = stem["θ"] .. "ε"		args['δπ-ουδ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ1"] .. "ε"		args['απ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"	-- same as nom.
		args['απ2θ-ουδ'] = stem["θ1"]	args['απ2-ουδ'] = "η"
	args['κπθ-ουδ'] = stem["θ1"] .. "ε"		args['κπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"	-- same as nom.
		args['κπ2θ-ουδ'] = stem["θ1"]	args['κπ2-ουδ'] = "η"
	args['οδθ-ουδ'] = stem["θ1"] .. "ε"		args['οδ-ουδ'] = "ι"
	args['γδθ-ουδ'] = stem["θ0"] .. "έ"		args['γδ-ουδ'] = "οιν"
return decl(args)
end	


-- =================== 3η [[ἔπηλυς]] ============================== --
-- like nouns [[νέηλυς]]
export['έπηλυς'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'έπηλυς']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- ἔπηλ-υ-ς minus 2 letters from end, stemnumber = 3
	stem["θ0"] = m_stems.word0(stem["θ"])				-- επηλ-υ-δ  removes accent
	stem["θ1"] = m_stems.word1(stem["θ0"])				-- επήλ-ύ-δ-ων accent on 1st vowel from the end

    args['κλίση'] = 'τρίτη'		-- δικατάληκτο, not 3η&1η
	args['αθ'] = '1'
	args['θηλ'] = '-'
    args['κατηγορία κλίσης'] = 'ἔπηλυς'
    args['τύπος'] = 'ἔπηλυς'
    args['όπως'] = 'ἔπηλυς'
    args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
    args['κατηγ01'] = 'Επίθετα προπαροξύτονα'
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc+fem
	args['οεθ-αρσ'] = stem["θ"] .. "υ"		args['οε-αρσ'] = "ς"
	args['γεθ-αρσ'] = stem["θ1"] .. "υδ"		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ1"] .. "υδ"		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ1"] .. "υδ"		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"] .. "υ"		args['κε-αρσ'] = "ς"	-- same as nom.
	args['οπθ-αρσ'] = stem["θ1"] .. "υδ"		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ0"] .. "ύδ"		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ1"] .. "υ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ1"] .. "υδ"		args['απ-αρσ'] = "ας"	args['απ-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ1"] .. "υδ"		args['κπ-αρσ'] = "ες"	-- same as nom.
	args['οδθ-αρσ'] = stem["θ1"] .. "υδ"		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. "ύδ"		args['γδ-αρσ'] = "οιν"
-- fem at masc
-- neu	
	args['οεθ-ουδ'] = stem["θ"] .. "υ"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ1"] .. "υδ"		args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ1"] .. "υδ"		args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"
	args['αεθ-ουδ'] = stem["θ"] .. "υ"		args['αε-ουδ'] = "0"	-- same as nom.
	args['κεθ-ουδ'] = stem["θ"] .. "υ"		args['κε-ουδ'] = "0"	-- same as nom.
	args['οπθ-ουδ'] = stem["θ1"] .. "υδ"		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. "ύδ"		args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ1"] .. "υ"		args['δπ-ουδ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ1"] .. "υδ"		args['απ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"	-- same as nom.
	args['κπθ-ουδ'] = stem["θ1"] .. "υδ"		args['κπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"	-- same as nom.
	args['οδθ-ουδ'] = stem["θ1"] .. "υδ"		args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ0"] .. "ύδ"		args['γδ-ουδ'] = "οιν"
return decl(args)
end	



-- =================== 3η [[εὔβοτρυς]] ============================== --
-- like [[βότρυς]]
export['εύβοτρυς'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'εύβοτρυς']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- εὔβοτρ-υ-ς minus 2 letters from end, stemnumber = 3
	stem["θ0"] = m_stems.word0(stem["θ"])				-- εὐβοτρ-ύ-ων removes accent
	stem["θ1"] = m_stems.word1(stem["θ0"])				-- εὐβότρ-υ-ος accent on 1st vowel from the end

    args['κλίση'] = 'τρίτη'		-- δικατάληκτο, not 3η&1η
	args['αθ'] = '1'
	args['θηλ'] = '-'
    args['κατηγορία κλίσης'] = 'εὔβοτρυς'
    args['τύπος'] = 'εὔβοτρυς'
    args['όπως'] = 'εὔβοτρυς'
    args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
    args['κατηγ01'] = 'Επίθετα προπαροξύτονα'
-- dictionaries do not give prosody for υ
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc+fem
	args['οεθ-αρσ'] = stem["θ"] .. "υ"		args['οε-αρσ'] = "ς"
	args['γεθ-αρσ'] = stem["θ1"] .. "υ"		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ1"] .. "υ"		args['δε-αρσ'] = "ϊ"
	args['αεθ-αρσ'] = stem["θ"] .. "υ"		args['αε-αρσ'] = "ν"
	args['κεθ-αρσ'] = stem["θ"] .. "υ"		args['κε-αρσ'] = "0"
	args['οπθ-αρσ'] = stem["θ1"] .. "υ"		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ0"] .. "ύ"		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "υ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ1"] .. "υ"		args['απθ+-αρσ'] = stem["θ1"] .. "ῡ"		args['απ-αρσ'] = "ς"
	args['κπθ-αρσ'] = stem["θ1"] .. "υ"		args['κπ-αρσ'] = "ες"	-- same as nom.
	args['οδθ-αρσ'] = stem["θ1"] .. "υ"		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. "ύ"		args['γδ-αρσ'] = "οιν"
-- fem at masc
-- neu	
	args['οεθ-ουδ'] = stem["θ"] .. "υ"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ1"] .. "υ"		args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ1"] .. "υ"		args['δε-ουδ'] = "ϊ"
	args['αεθ-ουδ'] = stem["θ"] .. "υ"		args['αε-ουδ'] = "0"	-- same as nom.
	args['κεθ-ουδ'] = stem["θ"] .. "υ"		args['κε-ουδ'] = "0"	-- same as nom.
	args['οπθ-ουδ'] = stem["θ1"] .. "υ"		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. "ύ"		args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ"] .. "υ"		args['δπ-ουδ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ1"] .. "υ"		args['απ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"	-- same as nom.
	args['κπθ-ουδ'] = stem["θ1"] .. "υ"		args['κπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"	-- same as nom.
	args['οδθ-ουδ'] = stem["θ1"] .. "υ"		args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ0"] .. "ύ"		args['γδ-ουδ'] = "οιν"
return decl(args)
end	





--# ?? έχει και -ην, -ωρ ?
-- ================ 3η ΚΛΙΣΗ  [[εὐδαίμων]]-ονος, -ων, εὔδαιμον============= --
-- RECESSIVE accent ΜΕΤΑΚΙΝΟΥΝ τον τόνο στο ουδέτερο εύδαιμον.
-- PROBLEM Module:grk-stems cannot see αι as diphthong δαι- and moves back accent ευδάιμον instead of εύδαιμον.
-- for persistent accent, see σώφρων
-- see variant #βελτίων with no problem
export['ευδαίμων'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'ευδαίμων']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
	
mw.addWarning('<b><span style="color:#b22222; font-size:14px;">Προσοχή στο ουδέτερο! Εξετάστε αν χρειάζεται η &#123;&#123;grc-κλίση-&#39;σώφρων&#39;&#125;&#125; ή η  &#123;&#123;grc-κλίση-&#39;ευδαίμων&#39;&#125;&#125;</span></b>')

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
-- εὔδαιμ-ον -- !!oops It cannot se υ-δαι. It sees υ-δα-ι > resault ευδάιμ-
-- find out if more like this.
	if mw.ustring.find(args['λήμμα'], 'δαίμων$') then
	    stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5)		-- εὐδα-ίμ-ων minus 4 letters from end, stemnumber = 5
	    char = "ίμον"
		char0 = "ιμoν"
		char1 = "ιμόν"
		chardat = "ίμο"
	else
		stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- μεγαλοπράγμ-ων
		char = "ον"
		char0 = "ον"
		char1 = "όν"
		chardat = "ο"
	end
		stem["θ0"] = m_stems.word0(stem["θ"])				-- ευδα- μεγαλοπραγμ-
		stem["θ2"] = m_stems.word2(stem["θ0"])				-- εύδα- μεγαλόπραγμ-

	args['κλίση'] = 'τρίτη' -- δικατάληκτο, δεν υπάρχει θηλυκό, 3&1 κλίση
	args['αθ'] = '1'
	args['θηλ'] = '-'
	if args['ουδ'] == '-' then args['κατηγ1'] = 'Επίθετα διγενή μονοκατάληκτα' end
	args['κατηγορία κλίσης'] = 'εὐδαίμων'
	args['τύπος'] = 'εὐδαίμων'
	args['όπως'] = 'εὐδαίμων'
	args['κατηγ0'] = 'Λέξεις παροξύτονες'
	args['κατηγ01'] = 'Επίθετα παροξύτονα'

args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at masc.dat.pl and neu.dat.pl.
-- masc    	
	args['οεθ-αρσ'] = args['λήμμα']	args['οε-αρσ'] = "0"
	args['γεθ-αρσ'] = stem["θ"] .. char		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. char		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. char		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ2"] .. char0	args['κε-αρσ'] = "0"	--same as neuter
	args['οπθ-αρσ'] = stem["θ"] .. char		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ0"] .. char1	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. chardat	args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. char		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. char		args['κπ-αρσ'] = "ες"	-- same as nom.
	args['οδθ-αρσ'] = stem["θ"] .. char		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. char1	args['γδ-αρσ'] = "οιν"
-- fem = masc

-- neu	
	args['οεθ-ουδ'] = stem["θ2"] .. char0	args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"] .. char		args['γε-ουδ'] = "ος"	-- same as masc.gen
	args['δεθ-ουδ'] = stem["θ"] .. char		args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"	-- same as masc.dat
	args['αεθ-ουδ'] = stem["θ2"] .. char0	args['αε-ουδ'] = "0"	-- acc same as nom    
	args['κεθ-ουδ'] = stem["θ2"] .. char0	args['κε-ουδ'] = "0"	-- voc same as nom
	args['οπθ-ουδ'] = stem["θ"] .. char		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. char1	args['γπ-ουδ'] = "ων"	-- same as masc.gen
	args['δπθ-ουδ'] = stem["θ"] .. chardat	args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"	-- same as masc.dat
	args['απθ-ουδ'] = stem["θ"] .. char		args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"	-- same as nom
	args['κπθ-ουδ'] = stem["θ"] .. char		args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. char		args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ0"] .. char1	args['γδ-ουδ'] = "οιν"
return decl(args)
end


-- EXTERNAL_LINK
-- =================== 3η [[εὔελπις]] ============================== --
-- like [[ἐλπίς]]
-- VOCATIVE SINGULAR for oxytones -ίς -ίδος see NOUNS, #πατρίς
export['εύελπις'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'εύελπις']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- εὔελπ-ι-ς minus 2 letters from end, stemnumber = 3
	stem["θ0"] = m_stems.word0(stem["θ"])				-- εὐελπ-ίδ-ων removes accent
	stem["θ1"] = m_stems.word1(stem["θ0"])				-- εὐέλπ-ιδ-ος accent on 1st vowel from the end

    args['κλίση'] = 'τρίτη'		-- δικατάληκτο, not 3η&1η
	args['αθ'] = '1'
	args['θηλ'] = '-'
    args['κατηγορία κλίσης'] = 'εὔελπις'
    args['τύπος'] = 'εὔελπις'
    args['όπως'] = 'εὔελπις'
    args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
    args['κατηγ01'] = 'Επίθετα προπαροξύτονα'
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc+fem
	args['οεθ-αρσ'] = stem["θ"] .. "ι"			args['οεθ+-αρσ'] = stem["θ"] .. "ῐ"			args['οε-αρσ'] = "ς"
	args['γεθ-αρσ'] = stem["θ1"] .. "ιδ"		args['γεθ+-αρσ'] = stem["θ1"] .. "ῐδ"		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ1"] .. "ιδ"		args['δεθ+-αρσ'] = stem["θ1"] .. "ῐδ"		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
-- acc.sg. Smyth  https://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Asmythp%3D292 + schoolgrammar gives τόν, τὴν εὔελπι-ν not εὐέλπῐδᾰ
	args['αεθ-αρσ'] = stem["θ"] .. "ι"			args['αεθ+-αρσ'] = stem["θ"] .. "ι"		args['αε-αρσ'] = "ν"
-- voc.sg. Smyth gives εύελπι, schoolgrammars give εύελπις = like nom.
	args['br'] = "<br><small><i>ή</i></small>"
	--args['SmythVocative'] = 
	args['mod-σημ'] = '* Κατά τη [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Smyth|Γραμματική του Smyth]]' 
		.. ', [https://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Asmythp%3D292 &sect;292], η κλητική ενικού χωρίς το  <b>-ς</b>'
	args['κεθ-αρσ'] = stem["θ"] .. "ι"			args['κεθ+-αρσ'] = stem["θ"] .. "ῐ"			args['κε-αρσ'] = "ς"	
	args['κε2θ-αρσ'] = stem["θ"] .. "ι"			args['κε2θ+-αρσ'] = stem["θ"] .. "ῐ"		args['κε2-αρσ'] = "0"	
		args['κε2Λκειμ-αρσ'] = "*"
	args['οπθ-αρσ'] = stem["θ1"] .. "ιδ"		args['οπθ+-αρσ'] = stem["θ1"] .. "ῐδ"		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ0"] .. "ίδ"		args['γπθ+-αρσ'] = stem["θ0"] .. "ῐ́δ"		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ1"] .. "ι"			args['δπθ+-αρσ'] = stem["θ"] .. "ῐ"			args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ1"] .. "ιδ"		args['απθ+-αρσ'] = stem["θ1"] .. "ῐδ"		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ1"] .. "ιδ"		args['κπθ+-αρσ'] = stem["θ1"] .. "ῐδ"		args['κπ-αρσ'] = "ες"	-- same as nom.
	args['οδθ-αρσ'] = stem["θ1"] .. "ιδ"		args['οδθ+-αρσ'] = stem["θ1"] .. "ῐδ"		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. "ίδ"		args['γδθ+-αρσ'] = stem["θ0"] .. "ῐ́δ"		args['γδ-αρσ'] = "οιν"
-- fem at masc
-- neu	
	args['οεθ-ουδ'] = stem["θ"] .. "ι"			args['οεθ+-ουδ'] = stem["θ"] .. "ῐ"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ1"] .. "ιδ"		args['γεθ+-ουδ'] = stem["θ1"] .. "ῐδ"	args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ1"] .. "ιδ"		args['δεθ+-ουδ'] = stem["θ1"] .. "ῐδ"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"
	args['αεθ-ουδ'] = stem["θ"] .. "ι"			args['αεθ+-ουδ'] = stem["θ"] .. "ῐ"		args['αε-ουδ'] = "0"	-- same as nom.
	args['κεθ-ουδ'] = stem["θ"] .. "ι"			args['κεθ+-ουδ'] = stem["θ"] .. "ῐ"		args['κε-ουδ'] = "0"	-- same as nom.
	args['οπθ-ουδ'] = stem["θ1"] .. "ιδ"		args['οπθ-ουδ'] = stem["θ1"] .. "ῐδ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. "ίδ"		args['γπθ+-ουδ'] = stem["θ0"] .. "ῐ́δ"		args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ1"] .. "ι"			args['δπθ+-ουδ'] = stem["θ"] .. "ῐ"			args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ1"] .. "ιδ"		args['απθ-ουδ'] = stem["θ1"] .. "ῐδ"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"	-- same as nom.
	args['κπθ-ουδ'] = stem["θ1"] .. "ιδ"		args['δπθ-ουδ'] = stem["θ1"] .. "ῐδ"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom.
	args['οδθ-ουδ'] = stem["θ1"] .. "ιδ"		args['οδθ-ουδ'] = stem["θ1"] .. "ῐδ"	args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ0"] .. "ίδ"		args['γδθ+-ουδ'] = stem["θ0"] .. "ῐ́δ"		args['γδ-ουδ'] = "οιν"
return decl(args)
end	


-- =================== 3η [[εὔχαρις]] ============================== --
-- like [[χάρις]]
-- same as #εύελπις, but no problem with  VOCATIVE SINGULAR, here is OK, same as nom, NOT as for oxytones -ίς -ίδος see NOUNS, #πατρίς
export['εύχαρις'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'εύχαρις']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- εὔχαρ-ι-ς minus 2 letters from end, stemnumber = 3
	stem["θ0"] = m_stems.word0(stem["θ"])				-- εὐχαρπ-ίτ-ων removes accent
	stem["θ1"] = m_stems.word1(stem["θ0"])				-- εὐχάρ-ιτ-ος accent on 1st vowel from the end

    args['κλίση'] = 'τρίτη'		-- δικατάληκτο, not 3η&1η
	args['αθ'] = '1'
	args['θηλ'] = '-'
    args['κατηγορία κλίσης'] = 'εὔχαρις'
    args['τύπος'] = 'εὔχαρις'
    args['όπως'] = 'εὔχαρις'
    args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
    args['κατηγ01'] = 'Επίθετα προπαροξύτονα'
args['ν'] = '1'	-- movable nu - νυ εφελκυστικόν για δοτικές
-- masc+fem
	args['οεθ-αρσ'] = stem["θ"] .. "ι"			args['οεθ+-αρσ'] = stem["θ"] .. "ῐ"			args['οε-αρσ'] = "ς"
	args['γεθ-αρσ'] = stem["θ1"] .. "ιτ"		args['γεθ+-αρσ'] = stem["θ1"] .. "ῐτ"		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ1"] .. "ιτ"		args['δεθ+-αρσ'] = stem["θ1"] .. "ῐτ"		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "ι"			args['αεθ+-αρσ'] = stem["θ"] .. "ι"		args['αε-αρσ'] = "ν"
	args['κεθ-αρσ'] = stem["θ"] .. "ι"			args['κεθ+-αρσ'] = stem["θ"] .. "ῐ"			args['κε-αρσ'] = "ς"
	args['οπθ-αρσ'] = stem["θ1"] .. "ιτ"		args['οπθ+-αρσ'] = stem["θ1"] .. "ῐτ"		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ0"] .. "ίτ"		args['γπθ+-αρσ'] = stem["θ0"] .. "ῐ́τ"		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ1"] .. "ι"			args['δπθ+-αρσ'] = stem["θ1"] .. "ῐ"			args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ1"] .. "ιτ"		args['απθ+-αρσ'] = stem["θ1"] .. "ῐτ"		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ1"] .. "ιτ"		args['κπθ+-αρσ'] = stem["θ1"] .. "ῐτ"		args['κπ-αρσ'] = "ες"	-- same as nom.
	args['οδθ-αρσ'] = stem["θ1"] .. "ιτ"		args['οδθ+-αρσ'] = stem["θ1"] .. "ῐτ"		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. "ίτ"		args['γδθ+-αρσ'] = stem["θ0"] .. "ῐ́τ"		args['γδ-αρσ'] = "οιν"
-- fem at masc
-- neu	
	args['οεθ-ουδ'] = stem["θ"] .. "ι"			args['οεθ+-ουδ'] = stem["θ"] .. "ῐ"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ1"] .. "ιτ"		args['γεθ+-ουδ'] = stem["θ1"] .. "ῐτ"	args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ1"] .. "ιτ"		args['δεθ+-ουδ'] = stem["θ1"] .. "ῐτ"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"
	args['αεθ-ουδ'] = stem["θ"] .. "ι"			args['αεθ+-ουδ'] = stem["θ"] .. "ῐ"		args['αε-ουδ'] = "0"	-- same as nom.
	args['κεθ-ουδ'] = stem["θ"] .. "ι"			args['κεθ+-ουδ'] = stem["θ"] .. "ῐ"		args['κε-ουδ'] = "0"	-- same as nom.
	args['οπθ-ουδ'] = stem["θ1"] .. "ιτ"		args['οπθ-ουδ'] = stem["θ1"] .. "ῐτ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. "ίτ"		args['γπθ+-ουδ'] = stem["θ0"] .. "ῐ́τ"		args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ1"] .. "ι"			args['δπθ+-ουδ'] = stem["θ1"] .. "ῐ"			args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ1"] .. "ιτ"		args['απθ-ουδ'] = stem["θ1"] .. "ῐτ"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"	-- same as nom.
	args['κπθ-ουδ'] = stem["θ1"] .. "ιτ"		args['δπθ-ουδ'] = stem["θ1"] .. "ῐτ"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom.
	args['οδθ-ουδ'] = stem["θ1"] .. "ιτ"		args['οδθ-ουδ'] = stem["θ1"] .. "ῐτ"	args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ0"] .. "ίτ"		args['γδθ+-ουδ'] = stem["θ0"] .. "ῐ́τ"		args['γδ-ουδ'] = "οιν"
return decl(args)
end	

-- =================== 3η [[θῆλυς]] [[ἥμισυς]]============================== --
--  τα μόνα (?) βαρύτονα από την κλίση βαθύς
-- Smyth http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D23
-- http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Asmythp%3D297
export['θήλυς'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'θήλυς']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- θῆλ-υς ἥμισ-υς minus 2 letters from end, stemnumber = 3
	stem["θ0"] = m_stems.word0(stem["θ"])				-- θηλ ημισ remove accent
	stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"])	-- θήλ convert oxia to perispomeni 
	
	args['br'] = 'dash' -- do not break line for 2 terms in one cell
    args['κλίση'] = '3'
    args['κατηγορία κλίσης'] = 'βαθύς'
    if mw.ustring.find(args['λήμμα'], 'θῆλυς$') then
    	stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"])	-- θήλ convert oxia to perispomeni 
    	stem["θ0"] = m_stems.word0(stem["θ"])				-- θηλ  remove accent
    	args['τύπος'] = 'θῆλυς'
	    args['όπως'] = 'θῆλυς'
	    args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
	    args['κατηγ01'] = 'Επίθετα προπερισπώμενα'
--	    args['υποκατ03'] = "που κλίνονται όπως το 'βαθύς' προπερισπώμενα"
	else -- ἥμισυς, maybe more? δίπηχυς?? ο! = αθ
		stem["θοξ"] = m_stems.word1(stem["θ0"])			-- accent on 1st syllable from the end 
		stem["θ0"] = m_stems.word0(stem["θ"])			-- θηλ =ημίσ remove accent
		args['τύπος'] = 'ἥμισυς'
	    args['όπως'] = 'ἥμισυς'
	    args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
	    args['κατηγ01'] = 'Επίθετα προπαροξύτονα'
--	    args['υποκατ03'] = "που κλίνονται όπως το 'βαθύς' προπαροξύτονα"
    end
-- common cases
	args['ν'] = '1' -- (ν) at datives
-- masc
	args['οεθ-αρσ'] = stem["θ"] .. "υ"		args['οεθ+-αρσ'] = stem["θ"] .. "ῠ"		args['οε-αρσ'] = "ς"
	args['γεθ-αρσ'] = stem["θοξ"] .. "ε"	args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θοξ"]			args['δε-αρσ'] = "ει"
	args['αεθ-αρσ'] = stem["θ"] .. "υ"		args['αεθ+-αρσ'] = stem["θ"] .. "ῠ"		args['αε-αρσ'] = "ν"
	args['κεθ-αρσ'] = stem["θ"] .. "υ"		args['κεθ+-αρσ'] = stem["θ"] .. "ῠ"		args['κε-αρσ'] = "0"
	args['οπθ-αρσ'] = stem["θοξ"]			args['οπ-αρσ'] = "εις"
	args['γπθ-αρσ'] = stem["θ0"] .. "έ"		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θοξ"] .. "ε"	args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θοξ"]			args['απ-αρσ'] = "εις"
	args['κπθ-αρσ'] = stem["θοξ"]			args['κπ-αρσ'] = "εις"
	-- nom.du, εε / ει at schoolgrammar
	args['οδθ-αρσ'] = stem["θοξ"] .. "ε"	args['οδ-αρσ'] = "ε"	args['οδ2θ-αρσ'] = stem["θοξ"]		args['οδ2-αρσ'] = "ει"
	args['γδθ-αρσ'] = stem["θ0"] .. "έ"		args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θοξ"] .. "ε"		args['οε-θηλ'] = "ια"		args['οε+-θηλ'] = "ιᾰ"
 	args['γεθ-θηλ'] = stem["θ0"] .. "ε"			args['γε-θηλ'] = "ίας"		args['γε+-θηλ'] = "ίᾱς"
	args['δεθ-θηλ'] = stem["θ0"] .. "ε"			args['δε-θηλ'] = "ίᾳ"
	args['αεθ-θηλ'] = stem["θοξ"] .. "ε"		args['αε-θηλ'] = "ιαν"		args['αε+-θηλ'] = "ιᾰν"
	args['κεθ-θηλ'] = stem["θοξ"] .. "ε"		args['κε-θηλ'] = "ια"		args['κε+-θηλ'] = "ιᾰ"
	args['οπθ-θηλ'] = stem["θοξ"] .. "ε"		args['οπ-θηλ'] = "ιαι"
	args['γπθ-θηλ'] = stem["θ0"] .. "ε"			args['γπ-θηλ'] = "ιῶν"
	args['δπθ-θηλ'] = stem["θ0"] .. "ε"			args['δπ-θηλ'] = "ίαις"
	args['απθ-θηλ'] = stem["θ0"] .. "ε"			args['απ-θηλ'] = "ίας"		args['απ+-θηλ'] = "ίᾱς"
	args['κπθ-θηλ'] = stem["θοξ"] .. "ε"		args['κπ-θηλ'] = "ιαι"
	args['οδθ-θηλ'] = stem["θ0"] .. "ε"			args['οδ-θηλ'] = "ία"		args['οδ+-θηλ'] = "ίᾱ"
	args['γδθ-θηλ'] = stem["θ0"] .. "ε"			args['γδ-θηλ'] = "ίαιν"
-- neu	
	args['οεθ-ουδ'] = stem["θ"] .. "υ"		args['οεθ+-ουδ'] = stem["θ"] .. "ῠ"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θοξ"] .. "ε"	args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θοξ"]			args['δε-ουδ'] = "ει"
	args['αεθ-ουδ'] = stem["θ"] .. "υ"		args['αεθ+-ουδ'] = stem["θ"] .. "ῠ"		args['αε-ουδ'] = "0"
	args['κεθ-ουδ'] = stem["θ"] .. "υ"		args['κεθ+-ουδ'] = stem["θ"] .. "ῠ"		args['κε-ουδ'] = "0"
	args['οπθ-ουδ'] = stem["θοξ"] .. "ε"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. "έ"		args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θοξ"] .. "ε"	args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = stem["θοξ"] .. "ε"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"
	args['κπθ-ουδ'] = stem["θοξ"] .. "ε"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"
-- schoolbook.Ikonomu
	-- nom.du, εε / ει at schoolgrammar
	args['οδθ-ουδ'] = stem["θοξ"] .. "ε"	args['οδ-ουδ'] = "ε"	args['οδ2θ-ουδ'] = stem["θοξ"]		args['οδ2-ουδ'] = "ει"
	args['γδθ-ουδ'] = stem["θ0"] .. "έ"		args['γδ-ουδ'] = "οιν"
return decl(args)
end	


-- =================== 3η [[μανιώδης]] ============================== --
export['μανιώδης'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'μανιώδης']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem Default stem minus 2 letters, args['μείον'] = 2 (stemnumber = 3) persistent accent
	--need to rewrite for the dative
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- μανιώδ	
	stem["θ0"] = m_stems.word0(stem["θ"])				-- μανιωδ
    stem["θ1"] = m_stems.PerispomeniToOxia(stem["θ"])	-- convert oxia to perispomeni -- also named θ1ο
	stem["θ1π"] = m_stems.OxiaToPerispomeni(stem["θ"])	-- convert perispomeni to oxeia	

    args['κλίση'] = 'τρίτη'	-- δικατάληκτα, no 3&1
    args['αθ'] = '1'
    args['θηλ'] = '-'
    args['κατηγορία κλίσης'] = 'μανιώδης'
    args['τύπος'] = 'μανιώδης'
    args['όπως'] = 'μανιώδης'
    args['κατηγ0'] = 'Λέξεις παροξύτονες'
    args['κατηγ01'] = 'Επίθετα παροξύτονα'
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc + fem  	
	args['οε-αρσ'] = "ης"
    args['γε-αρσ'] = "ους"
    args['δε-αρσ'] = "ει"
    args['αε-αρσ'] = "η"
    args['κεθ-αρσ'] = stem["θ1π"]		args['κε-αρσ'] = "ες"
    args['οπ-αρσ'] = "εις"
	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "εσ"		args['δπ-αρσ'] = "ι"	args['δπ+-αρσ'] = "ῐ"
	args['απ-αρσ'] = "εις"
	args['κπ-αρσ'] = "εις"
	args['οδ-αρσ'] = "ει"
    args['γδ-αρσ'] = "οιν"
-- neu	
	args['οεθ-ουδ'] = stem["θ1π"]		args['οε-ουδ'] = "ες"
    args['γε-ουδ'] = "ους"
    args['δε-ουδ'] = "ει"
    args['αεθ-ουδ'] = stem["θ1π"]		args['αε-ουδ'] = "ες"
    args['κεθ-ουδ'] = stem["θ1π"]		args['κε-ουδ'] = "ες"
    args['οπ-ουδ'] = "η"
	args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ"] .. "εσ"		args['δπ-ουδ'] = "ι"	args['δπ+-ουδ'] = "ῐ"
	args['απ-ουδ'] = "η"
	args['κπ-ουδ'] = "η"
	args['οδ-ουδ'] = "ει"
    args['γδ-ουδ'] = "οιν"
return decl(args)
end	

-- EDITOR_MUST_DEFINE δίχρ= 
-- ================ 3η ΚΛΙΣΗ  [[μείζων]]-ονος, -ων, μεῖζον============= --
-- PERSISTENT accent ΔΕΝ ΜΕΤΑΚΙΝΟΥΝ τον τόνο στο ουδέτερο βέλτιον. Variant of σώφρων + extra forms
-- for recessive accent see βελτίων, βέλτιον
export['μείζων'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'μείζων']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
	
mw.addWarning('<b><span style="color:#b22222; font-size:14px;">Προσοχή στο ουδέτερο! Εξετάστε αν χρειάζεται η &#123;&#123;grc-κλίση-&#39;μείζων&#39;&#125;&#125; ή η  &#123;&#123;grc-κλίση-&#39;βελτίων&#39;&#125;&#125;</span></b>')

-- stem
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- μείζ-ων
	stem["θ0"] = m_stems.word0(stem["θ"])				-- μειζ- 
	-- θ1 is either θ  or θ1π
	stem["θ1π"] = m_stems.OxiaToPerispomeni(stem["θ"])	-- μεῖζ

	args['κλίση'] = 'τρίτη' -- δικατάληκτο, δεν υπάρχει 3&1
	args['αθ'] = '1'
	args['θηλ'] = '-'
	if args['ουδ'] == '-' then args['κατηγ1'] = 'Επίθετα διγενή μονοκατάληκτα' end
	args['κατηγ0'] = 'Λέξεις παροξύτονες'
	args['κατηγ01'] = 'Επίθετα παροξύτονα'
--	args['ομάδα'] = 'μείζων'
	args['κατηγορία κλίσης'] = 'μείζων'


	char = "ον" char2 = "όν"	chardat = "ο"		-- μείζ-ον, μειζ-όν-ων, μείζ-ο-σι
	args['br'] = 'dash'

args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at masc.dat.pl and neu.dat.pl.
-- masc    	
	args['οεθ-αρσ'] = args['λήμμα']	args['οε-αρσ'] = "0"
	args['γεθ-αρσ'] = stem["θ"] .. char		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. char		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. char		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
		args['αε2θ-αρσ'] = stem["θ"]		args['αε2-αρσ'] = "ω"
	--voc.sg.masc. see define dichrona
	args['οπθ-αρσ'] = stem["θ"] .. char		args['οπ-αρσ'] = "ες"
		args['οπ2θ-αρσ'] = stem["θ"]		args['οπ2-αρσ'] = "ους"
	args['γπθ-αρσ'] = stem["θ0"] .. char2	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. chardat		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. char		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
		args['απ2θ-αρσ'] = stem["θ"]		args['απ2-αρσ'] = "ους"
	args['κπθ-αρσ'] = stem["θ"] .. char		args['κπ-αρσ'] = "ες"	-- same as nom.
		args['κπ2θ-αρσ'] = stem["θ"]		args['κπ2-αρσ'] = "ους"
	args['οδθ-αρσ'] = stem["θ"] .. char		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. char2	args['γδ-αρσ'] = "οιν"
-- fem = masc

-- neu	
	--nom.sg.neu. see define dichrona
	args['γεθ-ουδ'] = stem["θ"] ..char		args['γε-ουδ'] = "ος"	-- same as masc.gen
	args['δεθ-ουδ'] = stem["θ"] .. char		args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"	-- same as masc.dat
	-- acc same as nom    
	-- voc same as nom
	args['οπθ-ουδ'] = stem["θ"] .. char		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
		args['οπ2θ-ουδ'] = stem["θ"]		args['οπ2-ουδ'] = "ω"
	args['γπθ-ουδ'] = stem["θ0"] .. char2	args['γπ-ουδ'] = "ων"	-- same as masc.gen
	args['δπθ-ουδ'] = stem["θ"] .. chardat	args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"	-- same as masc.dat
	args['απθ-ουδ'] = stem["θ"] .. char		args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"	-- same as nom
		args['απ2θ-ουδ'] = stem["θ"]		args['απ2-ουδ'] = "ω"
	args['κπθ-ουδ'] = stem["θ"] .. char		args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom
		args['κπ2θ-ουδ'] = stem["θ"]		args['κπ2-ουδ'] = "ω"
	args['οδθ-ουδ'] = stem["θ"] .. char		args['οδ-ουδ'] = "ε"	-- same as nom
	args['γδθ-ουδ'] = stem["θ0"] .. char2	args['γδ-ουδ'] = "οιν"	-- same as nom

-- ===================== define prosody on accented syllable as macron, brachy or ambiguous
-- brachy+oxia/varia
	if mw.ustring.find(stem["θ"], m_data.brachy_oxeia) -- brachy+okseia or vareia
	then 
		prosody = 'βραχύ'
				args['τύπος'] = 'πλέων'
				args['όπως'] = 'πλέων'
	end
-- macron
	if mw.ustring.find(args['λήμμα'], m_data.vowel_perispomeni) -- any vowel+perispomeni
	or mw.ustring.find(args['λήμμα'], m_data.macron_oxeia) -- marcon+okseia or vareia
	then
		prosody = 'μακρό'
				args['τύπος'] = 'μείζων'
				args['όπως'] = 'μείζων'
	end
-- ambiguous dicrhona α ι υ Return: unknown
	if mw.ustring.find(args['λήμμα'], m_data.dichronon_oxeia) -- dichronon+okseia or vareia all ambiguous accented (NOT perispomeni, NOT subscript iota)
	then
		--but not in diphthong
		if mw.ustring.find(args['λήμμα'], m_data.diphthong_tonos) -- diphthong+tonos (oskeia, vareia, persipomeni) -- NOT dialytics ΐῒῗΰῢῧ
		then 
			prosody = 'μακρό'
				args['τύπος'] = 'μείζων'
				args['όπως'] = 'μείζων'
		else
			prosody = 'άγνωστο'
		end
	end
-- ================ define masculine.voc.sg and neuter singular nom-acc-voc
	if prosody == 'βραχύ' then -- keep oxia
		args['κεθ-αρσ'] = stem["θ"] .. char		args['κε-αρσ'] = "0"
		args['οεθ-ουδ'] = stem["θ"] .. char		args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ"] .. char		args['αε-ουδ'] = "0"
		args['κεθ-ουδ'] = stem["θ"] .. char		args['κε-ουδ'] = "0"
	end
	if prosody == 'μακρό' then -- make perispomeni
		args['κεθ-αρσ'] = stem["θ1π"] .. char	args['κε-αρσ'] = "0"
		args['οεθ-ουδ'] = stem["θ1π"] .. char	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1π"] .. char	args['αε-ουδ'] = "0"
		args['κεθ-ουδ'] = stem["θ1π"] .. char	args['κε-ουδ'] = "0"
	end
	if prosody == 'άγνωστο' then
		if args['δίχρ'] == 'β' 
		then -- keep oxia
			args['mod-σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι βραχύ.'
				args['τύπος'] = 'πλέων'
				args['όπως'] = 'πλέων'
			args['κεθ-αρσ'] = stem["θ"] .. char		args['κε-αρσ'] = "0"
			args['οεθ-ουδ'] = stem["θ"] .. char		args['οε-ουδ'] = "0"
			args['αεθ-ουδ'] = stem["θ"] .. char		args['αε-ουδ'] = "0"
			args['κεθ-ουδ'] = stem["θ"] .. char		args['κε-ουδ'] = "0"
		elseif args['δίχρ'] == 'μ' 
		then -- make perispomeni
				args['τύπος'] = 'μείζων'
				args['όπως'] = 'μείζων'
			args['κεθ-αρσ'] = stem["θ1π"] .. char	args['κε-αρσ'] = "0"
			args['οεθ-ουδ'] = stem["θ1π"] .. char	args['οε-ουδ'] = "0"
			args['αεθ-ουδ'] = stem["θ1π"] .. char	args['αε-ουδ'] = "0"
			args['κεθ-ουδ'] = stem["θ1π"] .. char	args['κε-ουδ'] = "0"
		elseif args['δίχρ'] == '?' then
		args['σημ'] = '<span style="color:red;">Δεν</span> υπάρχουν πληροφορίες για την προσωδία<br>του δίχρονου φωνήεντος στην παραλήγουσα ώστε να γίνει σωστά ο τονισμός.'
		args['κατηγ'] = "Λέξεις με άγνωστη προσωδία"
				args['τύπος'] = '?'
				args['όπως'] = '?'
				args['κατηγ2'] = "Επίθετα με κλίση όπως το 'μείζων' με άγνωστη προσωδία"
		args['κεΛ-αρσ'] = '...<span style="color:red;">?</span>...' .. char
		args['οεΛ-ουδ'] = '...<span style="color:red;">?</span>...' .. char
		args['αεΛ-ουδ'] = '...<span style="color:red;">?</span>...' .. char
		args['κεΛ-ουδ'] = '...<span style="color:red;">?</span>...' .. char

		-- if the editor does nothing, ERROR.
		elseif args['δίχρ'] ~= 'β' and args['δίχρ'] ~= 'μ' and args['δίχρ'] ~= '?'
		or (args['δίχρ'] == '' or args['δίχρ'] == nil)
		then
			return error_dichr(errordichrstring) -- cf error fucntions at Module
		end -- close if ?
	end -- close unknown prosody

return decl(args)
end



-- =================== 3η [[μέλας]]============================== --
--  τάλας (ηροσωδία προκύπτει από την ονομ.εν.)
export['μέλας'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'μέλας']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- μέλ-ας minus 2 letters from end, stemnumber = 3
	stem["θ0"] = m_stems.word0(stem["θ"])				-- μελ- remove accent
	
    args['κλίση'] = '3'
    args['κατηγορία κλίσης'] = 'μέλας'
   	args['τύπος'] = 'μέλας'
	args['όπως'] = 'μέλας'
	args['κατηγ0'] = 'Λέξεις παροξύτονες'
	args['κατηγ01'] = 'Επίθετα παροξύτονα'
-- common cases
	args['ν'] = '1' -- (ν) at datives
-- masc
	args['οεθ-αρσ'] = stem["θ"] .. "α"		args['οεθ+-αρσ'] = stem["θ"] .. "ᾱ"		args['οε-αρσ'] = "ς"
	args['γεθ-αρσ'] = stem["θ"] .. "αν"		args['γεθ+-αρσ'] = stem["θ"] .. "ᾰν"	args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "αν"		args['δεθ+-αρσ'] = stem["θ"] .. "ᾰν"	args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "αν"		args['αεθ+-αρσ'] = stem["θ"] .. "ᾰν"	args['αε-αρσ'] = "α"	args['αε-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"] .. "αν"		args['κεθ+-αρσ'] = stem["θ"] .. "ᾰν"	args['κε-αρσ'] = "0"
	args['οπθ-αρσ'] = stem["θ"] .. "αν"		args['οπθ+-αρσ'] = stem["θ"] .. "ᾰν"	args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ0"] .. "άν"	args['γπθ+-αρσ'] = stem["θ0"] .. "ᾰ́ν"	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "α"		args['δπθ+-αρσ'] = stem["θ"] .. "ᾰ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "αν"		args['απθ+-αρσ'] = stem["θ"] .. "ᾰν"	args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "αν"		args['κπθ+-αρσ'] = stem["θ"] .. "ᾰν"		args['κπ-αρσ'] = "ες"
	args['οδθ-αρσ'] = stem["θ"] .. "αν"		args['οδθ+-αρσ'] = stem["θ"] .. "ᾰν"		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. "άν"	args['γδθ+-αρσ'] = stem["θ0"] .. "ᾰ́ν"	args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "αιν"		args['οε-θηλ'] = "α"		args['οε+-θηλ'] = "ᾰ"
 	args['γεθ-θηλ'] = stem["θ0"] .. "αίν"		args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ0"] .. "αίν"		args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "αιν"		args['αε-θηλ'] = "αν"		args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "αιν"		args['κε-θηλ'] = "α"		args['κε+-θηλ'] = "ᾰ"
	args['οπθ-θηλ'] = stem["θ"] .. "αιν"		args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ0"] .. "αίν"		args['γπ-θηλ'] = "ων"
	args['δπθ-θηλ'] = stem["θ0"] .. "αίν"		args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ0"] .. "αίν"		args['απ-θηλ'] = "ας"		args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "αιν"		args['κπ-θηλ'] = "αι"
	args['οδθ-θηλ'] = stem["θ0"] .. "αίν"		args['οδ-θηλ'] = "α"		args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ0"] .. "αίν"		args['γδ-θηλ'] = "αιν"
-- neu	
	args['οεθ-ουδ'] = stem["θ"] .. "αν"		args['οεθ+-ουδ'] = stem["θ"] .. "ᾰν"	args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"] .. "αν"		args['γεθ+-ουδ'] = stem["θ"] .. "ᾰν"	args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ"] .. "αν"		args['δεθ+-ουδ'] = stem["θ"] .. "ᾰν"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"
	args['αεθ-ουδ'] = stem["θ"] .. "αν"		args['αεθ+-ουδ'] = stem["θ"] .. "ᾰν"	args['αε-ουδ'] = "0"
	args['κεθ-ουδ'] = stem["θ"] .. "αν"		args['κεθ+-ουδ'] = stem["θ"] .. "ᾰν"	args['κε-ουδ'] = "0"
	args['οπθ-ουδ'] = stem["θ"] .. "αν"		args['οπθ+-ουδ'] = stem["θ"] .. "ᾰν"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. "άν"	args['γπθ+-ουδ'] = stem["θ0"] .. "ᾰ́ν"	args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ"] .. "α"		args['δπθ+-ουδ'] = stem["θ"] .. "ᾰ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ"] .. "αν"		args['απθ+-ουδ'] = stem["θ"] .. "ᾰν"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"
	args['κπθ-ουδ'] = stem["θ"] .. "αν"		args['κπθ+-ουδ'] = stem["θ"] .. "ᾰν"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"
	args['οδθ-ουδ'] = stem["θ"] .. "αν"		args['οδθ+-ουδ'] = stem["θ"] .. "ᾰν"		args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ0"] .. "άν"	args['γδθ+-ουδ'] = stem["θ0"] .. "ᾰ́ν"	args['γδ-ουδ'] = "οιν"
return decl(args)
end	



-- =================== 3η ΕΠΙΘΕΤΟ μοναδικό [[πᾶς]] ============================== --
-- #prosody at παντ- is too complicated, omit it.
export['πας'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'πας']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems -- unique, no stems needed?
 
		args['κλίση'] = '3'
		args['μέρος λόγου'] = 'Επίθετα'
		args['κατηγορία κλίσης'] = 'σύμπας'
		args['τύπος'] = 'πᾶς'
		args['όπως'] = 'πᾶς'
		args['δυ'] = "-" -- NO DUAL
	    args['κατηγ0'] = 'Λέξεις περισπώμενες'
	    args['κατηγ01'] = 'Επίθετα περισπώμενα'

args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = "πᾶ"			args['οε-αρσ'] = "ς"
	args['γεθ-αρσ'] = "παντ"		args['γε-αρσ'] = "ός"
	args['δεθ-αρσ'] = "παντ"		args['δε-αρσ'] = "ί"	args['δε+-αρσ'] = "ῐ́"
	args['αεθ-αρσ'] = "πάντ"		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = "πᾶ"			args['κε-αρσ'] = "ς"	-- same as nom
	args['οπθ-αρσ'] = "πάντ"		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = "πάντ"		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = "πᾶ"			args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = "πάντ"		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = "πάντ"		args['κπ-αρσ'] = "ες"	-- same as nom

-- fem
	args['οεθ-θηλ'] = "πᾶσ"		args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = "πάσ"		args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = "πάσ"		args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = "πᾶσ"		args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = "πᾶσ"		args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"	-- same as nom
	args['οπθ-θηλ'] = "πᾶσ"		args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = "πασ"		args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = "πάσ"		args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = "πάσ"		args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = "πᾶσ"		args['κπ-θηλ'] = "αι"	-- same as nom

-- neu
	args['οεθ-ουδ'] = "πᾶν"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = "παντ"	args['γε-ουδ'] = "ός"
	args['δεθ-ουδ'] = "παντ"	args['δε-ουδ'] = "ί"	args['δε+-ουδ'] = "ῐ́"
	args['αεθ-ουδ'] = "πᾶν"		args['αε-ουδ'] = "0" -- same as nom.
	args['κεθ-ουδ'] = "πᾶν"		args['κε-ουδ'] = "0" -- same as nom.
	args['οπθ-ουδ'] = "πάντ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = "πάντ"	args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = "πᾶ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = "πάντ"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"	-- same as nom.
	args['κπθ-ουδ'] = "πάντ"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom
return decl(args)
end	


-- =================== 3η [[συνεχής]] ============================== --
export['συνεχής'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'συνεχής']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem Default stem minus 2 letters, args['μείον'] = 2 (stemnumber = 3) persistent accent
	--need to rewrite for the dative
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- συνεχ	
	
    args['κλίση'] = 'τρίτη'	-- δικατάληκτα, no 3&1
    args['αθ'] = '1'
    args['θηλ'] = '-'
    args['κατηγορία κλίσης'] = 'συνεχής'
    args['τύπος'] = 'συνεχής'
    args['όπως'] = 'συνεχής'
    args['κατηγ0'] = 'Λέξεις οξύτονες'
    args['κατηγ01'] = 'Επίθετα οξύτονα'
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc + fem  	
	args['οε-αρσ'] = "ής"
    args['γε-αρσ'] = "οῦς"
    args['δε-αρσ'] = "εῖ"
    args['αε-αρσ'] = "ῆ"
    args['κεθ-αρσ'] = stem["θ"] .. "ές"		args['κε-αρσ'] = "0"
    args['οπ-αρσ'] = "εῖς"
	args['γπ-αρσ'] = "ῶν"
	args['δπθ-αρσ'] = stem["θ"] .. "έσ"		args['δπ-αρσ'] = "ι"	args['δπ+-αρσ'] = "ῐ"
	args['απ-αρσ'] = "εῖς"
	args['κπ-αρσ'] = "εῖς"
	args['οδ-αρσ'] = "εῖ"
    args['γδ-αρσ'] = "οῖν"
-- neu	
	args['οεθ-ουδ'] = stem["θ"] .. "ές"		args['οε-ουδ'] = "0"
    args['γε-ουδ'] = "οῦς"
    args['δε-ουδ'] = "εῖ"
    args['αεθ-ουδ'] = stem["θ"] .. "ές"		args['αε-ουδ'] = "0"
    args['κεθ-ουδ'] = stem["θ"] .. "ές"		args['κε-ουδ'] = "0"
    args['οπ-ουδ'] = "ῆ"
	args['γπ-ουδ'] = "ῶν"
	args['δπθ-ουδ'] = stem["θ"] .. "έσ"		args['δπ-ουδ'] = "ι"	args['δπ+-ουδ'] = "ῐ"
	args['απ-ουδ'] = "ῆ"
	args['κπ-ουδ'] = "ῆ"
	args['οδ-ουδ'] = "εῖ"
    args['γδ-ουδ'] = "οῖν"
return decl(args)
end	


-- ================ 3η ΚΛΙΣΗ  [[συνήθης]]-ης-σύνηθες============= --
-- RECESSIVE accent ΜΕΤΑΚΙΝΟΥΝ τον τόνο στο ουδέτερο σύνηθες.
-- αν υπάρξει με δίφθογγο π.χ. -αιθης, τότε χρειάζεται ειδικό χειρισμό, όπως #ευδαίμων
export['συνήθης'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'συνήθης']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

mw.addWarning('<b><span style="color:#b22222; font-size:14px;">Προσοχή στο ουδέτερο! Εξετάστε αν χρειάζεται η &#123;&#123;grc-κλίση-&#39;συνήθης&#39;&#125;&#125; ή η  &#123;&#123;grc-κλίση-&#39;μανιώδης&#39;&#125;&#125;</span></b>')

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
		stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- συνήθ-ης minus 2 letters from end, stemnumber=3
		stem["θ0"] = m_stems.word0(stem["θ"])				-- συνηθ-
		stem["θ2"] = m_stems.word2(stem["θ0"])				-- σύνηθ- places accent okseia at 2nd vowel from end

	args['κλίση'] = 'τρίτη' -- δικατάληκτο, δεν υπάρχει θηλυκό, 3&1 κλίση
	args['αθ'] = '1'
	args['θηλ'] = '-'
	if args['ουδ'] == '-' then args['κατηγ1'] = 'Επίθετα διγενή μονοκατάληκτα' end
	args['κατηγορία κλίσης'] = 'συνήθης'
	args['τύπος'] = 'συνήθης'
	args['όπως'] = 'συνήθης'
	args['κατηγ0'] = 'Λέξεις παροξύτονες'
	args['κατηγ01'] = 'Επίθετα παροξύτονα'

args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at masc.dat.pl and neu.dat.pl.
-- masc    	
	args['οεθ-αρσ'] = stem["θ"]		args['οε-αρσ'] = "ης"
	args['γεθ-αρσ'] = stem["θ"]		args['γε-αρσ'] = "ους"
	args['δεθ-αρσ'] = stem["θ"]		args['δε-αρσ'] = "ει"
	args['αεθ-αρσ'] = stem["θ"]		args['αε-αρσ'] = "η"
	args['κεθ-αρσ'] = stem["θ2"] .. "ες"	args['κε-αρσ'] = "0"	--same as neuter
	args['οπθ-αρσ'] = stem["θ"]		args['οπ-αρσ'] = "εις"
	args['γπθ-αρσ'] = stem["θ"]		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "εσ"	args['δπ-αρσ'] = "ι"	args['δπ+-αρσ'] = "ῐ"
	args['απθ-αρσ'] = stem["θ"]		args['απ-αρσ'] = "εις"
	args['κπθ-αρσ'] = stem["θ"]		args['κπ-αρσ'] = "εις"
	args['οδθ-αρσ'] = stem["θ"]		args['οδ-αρσ'] = "ει"
	args['γδθ-αρσ'] = stem["θ"]		args['γδ-αρσ'] = "οιν"
-- fem = masc

-- neu	
	args['οεθ-ουδ'] = stem["θ2"] .. "ες"	args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"]		args['γε-ουδ'] = "ους"	-- same as masc.gen
	args['δεθ-ουδ'] = stem["θ"]		args['δε-ουδ'] = "ει"
	args['αεθ-ουδ'] = stem["θ2"] .. "ες"	args['αε-ουδ'] = "0"	-- acc same as nom    
	args['κεθ-ουδ'] = stem["θ2"] .. "ες"	args['κε-ουδ'] = "0"	-- voc same as nom
	args['οπθ-ουδ'] = stem["θ"]		args['οπ-ουδ'] = "η"
	args['γπθ-ουδ'] = stem["θ"]		args['γπ-ουδ'] = "ων"	-- same as masc.gen
	args['δπθ-ουδ'] = stem["θ"] .. "εσ"	args['δπ-ουδ'] = "ι"	args['δπ+-ουδ'] = "ῐ"	-- same as masc.dat
	args['απθ-ουδ'] = stem["θ"]		args['απ-ουδ'] = "η"
	args['κπθ-ουδ'] = stem["θ"]		args['κπ-ουδ'] = "η"	-- same as nom
	args['οδθ-ουδ'] = stem["θ"]		args['οδ-ουδ'] = "ει"
	args['γδθ-ουδ'] = stem["θ"]		args['γδ-ουδ'] = "οιν"
return decl(args)
end


-- ### ΕΚΚΡΕΜΟΤΗΤΑ να βρεθούν επίθετα για περιπτώσεις βραχύ -μακρο 
-- EDITOR_MUST_DEFINE δίχρ= ΠΡΟΣΟΧΗ warning μεγαλοπράγμων
-- ΥΓΡΟΛΗΚΤΑ ή ΕΝΡΙΝΟΛΗΚΤΑ χωρίς μετακίνση τόνου στο ουδέτερο
-- ================ 3η ΚΛΙΣΗ  [[σώφρων]]-ονος, -ων, -ον  άρρην απάτωρ ΧΩΡΙΣ ΜΕΤΑΚΙΝΗΣΗ ΤΟΝΟΥ============= --
-- PERSISTENT ACCENT, NO RECESSIVE ACCENT (for recessive accent see κλίση ευδαίμων) . NO RECESSIVES: αιδήμων αιδῆμον  ἀμνήμων, τὸ ἀμνῆμον
-- compounds: if 1st has the accent: no recessive μεγαλό-φρων μεγαλό-φρον.
export['σώφρων'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'σώφρων']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
	
mw.addWarning('<b><span style="color:#b22222; font-size:14px;">Προσοχή στο ουδέτερο! Εξετάστε αν χρειάζεται η &#123;&#123;grc-κλίση-&#39;σώφρων&#39;&#125;&#125; ή η  &#123;&#123;grc-κλίση-&#39;ευδαίμων&#39;&#125;&#125;</span></b>')

-- stem
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- σώφρ-ων   Also see εὐδαίμ-ων ἄρρ-ην ἀπάτ-ωρ
	stem["θ0"] = m_stems.word0(stem["θ"])				-- σωφρ- 
	-- θ1 is either θ  or θ1π
	stem["θ1π"] = m_stems.OxiaToPerispomeni(stem["θ"])	-- σῶφρον

	args['κλίση'] = 'τρίτη' -- δικατάληκτο, δεν υπάρχει 3&1
	args['αθ'] = '1'
	args['θηλ'] = '-'
	if args['ουδ'] == '-' then args['κατηγ1'] = 'Επίθετα διγενή μονοκατάληκτα' end
	-- args['κατηγορία κλίσης'] see 3 categirues below
	args['κατηγ0'] = 'Λέξεις παροξύτονες'
	args['κατηγ01'] = 'Επίθετα παροξύτονα'
	
	
 -- $ (at the end of the word)
 -- at the moment, ONLY σώφρων has group (see below)

	if mw.ustring.find(args['λήμμα'], 'ων$') then char = "ον" char2 = "όν"	chardat = "ο"		-- σώφρων, σώφρ-ον-ος
		args['ομάδα'] = 'σώφρων'
	elseif mw.ustring.find(args['λήμμα'], 'ην$') then char = "εν" char2 = "έν" chardat = "ε"		-- ἄρρην, ἄρρεν-ος
--		args['ομάδα'] = 'ἄρρην'
	elseif mw.ustring.find(args['λήμμα'], 'ωρ$') then char = "ορ" char2 = "όρ" chardat = "ορ"		-- ἀπάτωρ, ἀπάτορος
--		args['ομάδα'] = 'ἀπάτωρ'
	end


args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at masc.dat.pl and neu.dat.pl.
-- masc    	
	args['οεθ-αρσ'] = args['λήμμα']	args['οε-αρσ'] = "0"
	args['γεθ-αρσ'] = stem["θ"] .. char		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. char		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. char		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	--voc.sg.masc. see define dichrona
	args['οπθ-αρσ'] = stem["θ"] .. char		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ0"] .. char2	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. chardat		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. char		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. char		args['κπ-αρσ'] = "ες"	-- same as nom.
	args['οδθ-αρσ'] = stem["θ"] .. char		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. char2	args['γδ-αρσ'] = "οιν"
-- fem = masc

-- neu	
	--nom.sg.neu. see define dichrona
	args['γεθ-ουδ'] = stem["θ"] ..char		args['γε-ουδ'] = "ος"	-- same as masc.gen
	args['δεθ-ουδ'] = stem["θ"] .. char		args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"	-- same as masc.dat
	-- acc same as nom    
	-- voc same as nom
	args['οπθ-ουδ'] = stem["θ"] .. char		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. char2	args['γπ-ουδ'] = "ων"	-- same as masc.gen
	args['δπθ-ουδ'] = stem["θ"] .. chardat	args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"	-- same as masc.dat
	args['απθ-ουδ'] = stem["θ"] .. char		args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"	-- same as nom
	args['κπθ-ουδ'] = stem["θ"] .. char		args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. char		args['οδ-ουδ'] = "ε"	-- same as nom
	args['γδθ-ουδ'] = stem["θ0"] .. char2	args['γδ-ουδ'] = "οιν"	-- same as nom

-- ===================== define prosody on accented syllable as macron, brachy or ambiguous
-- brachy+oxia/varia
	if mw.ustring.find(stem["θ"], m_data.brachy_oxeia) -- brachy+okseia or vareia
	then 
		prosody = 'βραχύ'	-- ὁ, ἡ ἄφρων, τὸ ἄφρον [[περίφρων]]-περίφρον
--+ κατηγορίες
			if mw.ustring.find(args['λήμμα'], 'ων$') then
				args['κατηγορία κλίσης'] = 'σώφρων'
				args['τύπος'] = 'ἔμφρων'
				args['όπως'] = 'ἔμφρων'
			elseif mw.ustring.find(args['λήμμα'], 'ην$') then
				args['κατηγορία κλίσης'] = 'ἄρρην'
				args['τύπος'] = 'ἄρρην'
				args['όπως'] = 'ἄρρην'
			elseif mw.ustring.find(args['λήμμα'], 'ωρ$') then
				args['κατηγορία κλίσης'] = 'ἀπάτωρ'
				args['τύπος'] = 'ἀπάτωρ'
				args['όπως'] = 'ἀπάτωρ'
			end
--+
	end
-- macron
	if mw.ustring.find(args['λήμμα'], m_data.vowel_perispomeni) -- any vowel+perispomeni
	or mw.ustring.find(args['λήμμα'], m_data.macron_oxeia) -- marcon+okseia or vareia
	then
		prosody = 'μακρό'
--+ κατηγορίες
			if mw.ustring.find(args['λήμμα'], 'ων$') then
				args['κατηγορία κλίσης'] = 'σώφρων'
				args['τύπος'] = 'σώφρων'
				args['όπως'] = 'σώφρων'
			elseif mw.ustring.find(args['λήμμα'], 'ην$') then
				args['κατηγορία κλίσης'] = 'ἄρρην'
				args['τύπος'] = '?'
				args['όπως'] = '?'
			elseif mw.ustring.find(args['λήμμα'], 'ωρ$') then
				args['κατηγορία κλίσης'] = 'ἀπάτωρ'
				args['τύπος'] = '?'
				args['όπως'] = '?'
			end
--+
	end
-- ambiguous dicrhona α ι υ Return: unknown
	if mw.ustring.find(args['λήμμα'], m_data.dichronon_oxeia) -- dichronon+okseia or vareia all ambiguous accented (NOT perispomeni, NOT subscript iota)
	then
		--but not in diphthong
		if mw.ustring.find(args['λήμμα'], m_data.diphthong_tonos) -- diphthong+tonos (oskeia, vareia, persipomeni) -- NOT dialytics ΐῒῗΰῢῧ
		then 
			prosody = 'μακρό'
--+ κατηγορίες
			if mw.ustring.find(args['λήμμα'], 'ων$') then
				args['κατηγορία κλίσης'] = 'σώφρων'
				args['τύπος'] = 'ἔμφρων'
				args['όπως'] = 'ἔμφρων'
			elseif mw.ustring.find(args['λήμμα'], 'ην$') then
				args['κατηγορία κλίσης'] = 'ἄρρην'
				args['τύπος'] = 'ἄρρην'
				args['όπως'] = 'ἄρρην'
			elseif mw.ustring.find(args['λήμμα'], 'ωρ$') then
				args['κατηγορία κλίσης'] = 'ἀπάτωρ'
				args['τύπος'] = 'ἀπάτωρ'
				args['όπως'] = 'ἀπάτωρ'
			end
--+
		else
			prosody = 'άγνωστο'
		end
	end
-- ================ define masculine.voc.sg and neuter singular nom-acc-voc
	if prosody == 'βραχύ' then -- keep oxia
		args['κεθ-αρσ'] = stem["θ"] .. char		args['κε-αρσ'] = "0"
		args['οεθ-ουδ'] = stem["θ"] .. char		args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ"] .. char		args['αε-ουδ'] = "0"
		args['κεθ-ουδ'] = stem["θ"] .. char		args['κε-ουδ'] = "0"
	end
	if prosody == 'μακρό' then -- make perispomeni
		args['κεθ-αρσ'] = stem["θ1π"] .. char	args['κε-αρσ'] = "0"
		args['οεθ-ουδ'] = stem["θ1π"] .. char	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1π"] .. char	args['αε-ουδ'] = "0"
		args['κεθ-ουδ'] = stem["θ1π"] .. char	args['κε-ουδ'] = "0"
	end
	if prosody == 'άγνωστο' then
		if args['δίχρ'] == 'β' 
		then -- keep oxia
			args['mod-σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι βραχύ.'
--+ κατηγορίες
			if mw.ustring.find(args['λήμμα'], 'ων$') then
				args['κατηγορία κλίσης'] = 'σώφρων'
				args['τύπος'] = 'ἔμφρων'
				args['όπως'] = 'ἔμφρων'
			elseif mw.ustring.find(args['λήμμα'], 'ην$') then
				args['κατηγορία κλίσης'] = 'ἄρρην'
				args['τύπος'] = 'ἄρρην'
				args['όπως'] = 'ἄρρην'
			elseif mw.ustring.find(args['λήμμα'], 'ωρ$') then
				args['κατηγορία κλίσης'] = 'ἀπάτωρ'
				args['τύπος'] = 'ἀπάτωρ'
				args['όπως'] = 'ἀπάτωρ'
			end
--+
			args['κεθ-αρσ'] = stem["θ"] .. char		args['κε-αρσ'] = "0"
			args['οεθ-ουδ'] = stem["θ"] .. char		args['οε-ουδ'] = "0"
			args['αεθ-ουδ'] = stem["θ"] .. char		args['αε-ουδ'] = "0"
			args['κεθ-ουδ'] = stem["θ"] .. char		args['κε-ουδ'] = "0"
		elseif args['δίχρ'] == 'μ' 
		then -- make perispomeni
--+ κατηγορίες
			if mw.ustring.find(args['λήμμα'], 'ων$') then
				args['κατηγορία κλίσης'] = 'σώφρων'
				args['τύπος'] = 'σώφρων'
				args['όπως'] = 'σώφρων'
			elseif mw.ustring.find(args['λήμμα'], 'ην$') then
				args['κατηγορία κλίσης'] = 'ἄρρην'
				args['τύπος'] = '?'
				args['όπως'] = '?'
			elseif mw.ustring.find(args['λήμμα'], 'ωρ$') then
				args['κατηγορία κλίσης'] = 'ἀπάτωρ'
				args['τύπος'] = '?'
				args['όπως'] = '?'
			end
--+
			args['κεθ-αρσ'] = stem["θ1π"] .. char	args['κε-αρσ'] = "0"
			args['οεθ-ουδ'] = stem["θ1π"] .. char	args['οε-ουδ'] = "0"
			args['αεθ-ουδ'] = stem["θ1π"] .. char	args['αε-ουδ'] = "0"
			args['κεθ-ουδ'] = stem["θ1π"] .. char	args['κε-ουδ'] = "0"
		elseif args['δίχρ'] == '?' then
		args['σημ'] = '<span style="color:red;">Δεν</span> υπάρχουν πληροφορίες για την προσωδία<br>του δίχρονου φωνήεντος στην παραλήγουσα ώστε να γίνει σωστά ο τονισμός.'
		args['κατηγ'] = "Λέξεις με άγνωστη προσωδία"
--+ κατηγορίες
			if mw.ustring.find(args['λήμμα'], 'ων$') then
				args['κατηγορία κλίσης'] = 'σώφρων'
				args['τύπος'] = '?'
				args['όπως'] = '?'
				args['κατηγ2'] = "Επίθετα με κλίση όπως το 'σώφρων' με άγνωστη προσωδία"
			elseif mw.ustring.find(args['λήμμα'], 'ην$') then
				args['κατηγορία κλίσης'] = 'ἄρρην'
				args['τύπος'] = '?'
				args['όπως'] = '?'
				args['κατηγ2'] = "Επίθετα με κλίση όπως το 'ἄρρην' με άγνωστη προσωδία"
			elseif mw.ustring.find(args['λήμμα'], 'ωρ$') then
				args['κατηγορία κλίσης'] = 'ἀπάτωρ'
				args['τύπος'] = '?'
				args['όπως'] = '?'
				args['κατηγ2'] = "Επίθετα με κλίση όπως το 'ἀπάτωρ' με άγνωστη προσωδία"
			end
--+
		args['κεΛ-αρσ'] = '...<span style="color:red;">?</span>...' .. char
		args['οεΛ-ουδ'] = '...<span style="color:red;">?</span>...' .. char
		args['αεΛ-ουδ'] = '...<span style="color:red;">?</span>...' .. char
		args['κεΛ-ουδ'] = '...<span style="color:red;">?</span>...' .. char

		-- if the editor does nothing, ERROR.
		elseif args['δίχρ'] ~= 'β' and args['δίχρ'] ~= 'μ' and args['δίχρ'] ~= '?'
		or (args['δίχρ'] == '' or args['δίχρ'] == nil)
		then
			return error_dichr(errordichrstring) -- cf error fucntions at Module
		end -- close if ?
	end -- close unknown prosody

return decl(args)
end



-- =================== 3η [[ταχύπους]] ============================== --
-- like [[πούς]] -ποδος -- τρίπους is like a noun Better ταχύπους?
-- acc + δίπουν  (not all, check dictionaries)
export['ταχύπους'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'ταχύπους']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4)		-- ταχύπ-ους minus 3 letters from end, stemnumber = 4
	stem["θ0"] = m_stems.word0(stem["θ"])				-- ταχυπ-όδ-ων  removes accent

    args['κλίση'] = 'τρίτη'		-- δικατάληκτο, not 3η&1η
	args['αθ'] = '1'
	args['θηλ'] = '-'
    args['κατηγορία κλίσης'] = 'ταχύπους'
    args['τύπος'] = 'ταχύπους'
    args['όπως'] = 'ταχύπους'
    args['κατηγ0'] = 'Λέξεις παροξύτονες'
    args['κατηγ01'] = 'Επίθετα παροξύτονα'
args['ν'] = '1'	-- movable nu - νυ εφελκυστικόν για δοτικές
-- masc+fem
	args['οεθ-αρσ'] = stem["θ"]				args['οε-αρσ'] = "ους"
	args['γεθ-αρσ'] = stem["θ"] .. "οδ"		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "όδ"		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "οδ"		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ" -- for δίπους, also δίπουν
	args['κεθ-αρσ'] = stem["θ"]				args['κε-αρσ'] = "ους"
	args['οπθ-αρσ'] = stem["θ"] .. "οδ"		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ0"] .. "όδ"	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "ο"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "οδ"		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "οδ"		args['κπ-αρσ'] = "ες"	-- same as nom.
	args['οδθ-αρσ'] = stem["θ"] .. "οδ"		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. "όδ"	args['γδ-αρσ'] = "οιν"
-- fem at masc
-- neu	
	args['οεθ-ουδ'] = stem["θ"]				args['οε-ουδ'] = "ουν"
	args['γεθ-ουδ'] = stem["θ"] .. "οδ"		args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ"] .. "οδ"		args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"
	args['αεθ-ουδ'] = stem["θ"]				args['αε-ουδ'] = "ουν"	-- same as nom.
-- schoolgrammar ουδ. ὦ δίπου
	args['κεθ-ουδ'] = stem["θ"]				args['κε-ουδ'] = "ουν"	-- same as nom.
	args['οπθ-ουδ'] = stem["θ"] .. "οδ"		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. "όδ"	args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ"] .. "ο"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ"] .. "οδ"		args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"	-- same as nom.
	args['κπθ-ουδ'] = stem["θ"] .. "οδ"		args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom.
	args['οδθ-ουδ'] = stem["θ"] .. "οδ"		args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ0"] .. "όδ"	args['γδ-ουδ'] = "οιν"
return decl(args)
end	

-- =================== 3η ΕΠΙΘΕΤΑ [[χαρίεις]] ============================== --
-- Smyth.299 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D23
-- φωνήεις με ΠΕΡΙΣΠΩΜΕΝΗ στο ουδ
export['χαρίεις'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'χαρίεις']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
--	args['μείον'] = 3 -- override default stemnumber = 3 (μείον 2)
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4)		-- χαρί-εις / εντ minus 3 letters from end
	stem["θ0"] = m_stems.word0(stem["θ"])				-- χαρι- remove accent
	stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"])	-- δαφνῆεν - φωνῆ-εν + συνηρημένοι τύποι
	args['κατηγορία κλίσης'] = 'χαρίεις'
    args['κλίση'] = '3'
    
    if mw.ustring.find(args['λήμμα'], 'ήεις$') then
	    args['τύπος'] = 'δαφνήεις'
	    args['όπως'] = 'δαφνήεις'
	else
		args['τύπος'] = 'χαρίεις'
		args['όπως'] = 'χαρίεις'
	end
    args['κατηγ0'] = 'Λέξεις παροξύτονες'
    args['κατηγ01'] = 'Επίθετα παροξύτονα'
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = stem["θ"] .. "ε"	args['οε-αρσ'] = "ις"
	args['γεθ-αρσ'] = stem["θ"] .. "εντ"	args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "εντ"	args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "εντ"	args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	if mw.ustring.find(args['λήμμα'], 'ήεις$') then
	args['κεθ-αρσ'] = stem["θπ"] .. "εν"	args['κε-αρσ'] = "0"
	else
	args['κεθ-αρσ'] = stem["θ"] .. "εν"	args['κε-αρσ'] = "0"
	end
	args['οπθ-αρσ'] = stem["θ"] .. "εντ"	args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ0"] .. "έντ"	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "ε"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "εντ"	args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "εντ"	args['κπ-αρσ'] = "ες"								-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "εντ"	args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. "έντ"	args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "εσσ"	args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = stem["θ0"] .. "έσσ"	args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ0"] .. "έσσ"	args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "εσσ"	args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "εσσ"	args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"		-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "εσσ"	args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ0"] .. "εσσ"	args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = stem["θ0"] .. "έσσ"	args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ0"] .. "έσσ"	args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "εσσ"	args['κπ-θηλ'] = "αι"								-- same as nom
	args['οδθ-θηλ'] = stem["θ0"] .. "έσσ"	args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ0"] .. "έσσ"	args['γδ-θηλ'] = "αιν"
-- neu
	if mw.ustring.find(args['λήμμα'], 'ήεις$') then
	args['οεθ-ουδ'] = stem["θπ"] .. 'εν'		args['οε-ουδ'] = "0"
	else
	args['οεθ-ουδ'] = stem["θ"] .. 'εν'		args['οε-ουδ'] = "0"
	end
	args['γεθ-ουδ'] = stem["θ"] .. "εντ"	args['γε-ουδ'] = "ος"								-- same as masc
	args['δεθ-ουδ'] = stem["θ"] .. "εντ"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"		-- same as masc
	if mw.ustring.find(args['λήμμα'], 'ήεις$') then
	args['αεθ-ουδ'] = stem["θπ"] .. 'εν'		args['αε-ουδ'] = "0"
	else
	args['αεθ-ουδ'] = stem["θ"] .. 'εν'		args['αε-ουδ'] = "0"
	end
	if mw.ustring.find(args['λήμμα'], 'ήεις$') then
	args['κεθ-ουδ'] = stem["θπ"] .. 'εν'		args['κε-ουδ'] = "0"
	else
	args['κεθ-ουδ'] = stem["θ"] .. 'εν'		args['κε-ουδ'] = "0"
	end
	args['οπθ-ουδ'] = stem["θ"] .. "εντ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. "έντ"	args['γπ-ουδ'] = "ων"								-- same as masc
	args['δπθ-ουδ'] = stem["θ0"] .. "έ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"		-- same as masc
	args['απθ-ουδ'] = stem["θ"] .. "εντ"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"		-- same as nom
	args['κπθ-ουδ'] = stem["θ"] .. "εντ"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"		-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. "εντ"	args['οδ-ουδ'] = "ε"								-- same as masc
	args['γδθ-ουδ'] = stem["θ0"] .. "έντ"	args['γδ-ουδ'] = "οιν"								-- same as masc
return decl(args)
end	


-- =================== 3η [[χαυλιόδους]] ============================== --
-- like [[ὀδούς]],  ὀδόντος. Το σχολικό βιβλίο έχει [[μονόδους]], μονόδουν, αλλά στα λεξικά δεν έχουν το ουδέτερο.
-- τα μόνα που βρήκαμε ως επίθετα είναι [[χαυλιόδους]] και [[καρχαρόδους]] (ίσως και το [[μυριόδους]])
-- το χαυλιόδους είναι ΚΑΙ ουσιαστικό
export['χαυλιόδους'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'χαυλιόδους']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke
-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stems
    local stem = {}
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-6)		-- χαυλι-όδ-ους minus 5 letters from end, stemnumber = 6


    args['κλίση'] = 'τρίτη'		-- δικατάληκτο, not 3η&1η
	args['αθ'] = '1'
	args['θηλ'] = '-'
    args['κατηγορία κλίσης'] = 'χαυλιόδους'
    args['τύπος'] = 'χαυλιόδους'
    args['όπως'] = 'χαυλιόδους'
    args['κατηγ0'] = 'Λέξεις παροξύτονες'
    args['κατηγ01'] = 'Επίθετα παροξύτονα'
args['ν'] = '1'	-- movable nu - νυ εφελκυστικόν για δοτικές
-- masc+fem
	args['οεθ-αρσ'] = stem["θ"] .. "όδ"			args['οε-αρσ'] = "ους"
	args['γεθ-αρσ'] = stem["θ"] .. "όδοντ"		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "όδοντ"		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "οδοντ"		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ" -- for δίπους, also δίπουν
	args['κεθ-αρσ'] = stem["θ"] .. "όδ"			args['κε-αρσ'] = "ους" -- same as nom. 
	args['οπθ-αρσ'] = stem["θ"] .. "όδοντ"		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ"] .. "οδόντ"		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "όδου"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "όδοντ"		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "όδοντ"		args['κπ-αρσ'] = "ες"	-- same as nom.
	args['οδθ-αρσ'] = stem["θ"] .. "όδοντ"		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ"] .. "οδόντ"		args['γδ-αρσ'] = "οιν"
-- fem at masc
-- neu	
	args['οεθ-ουδ'] = stem["θ"]	.. "όδ"			args['οε-ουδ'] = "ουν"
	args['γεθ-ουδ'] = stem["θ"] .. "όδοντ"		args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ"] .. "όδοντ"		args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"
	args['αεθ-ουδ'] = stem["θ"] .. "όδ"			args['αε-ουδ'] = "ουν"	-- same as nom.
	args['κεθ-ουδ'] = stem["θ"]	.. "όδ"			args['κε-ουδ'] = "ουν"	-- same as nom.
	args['οπθ-ουδ'] = stem["θ"] .. "όδοντ"		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ"] .. "οδόντ"		args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ"] .. "όδου"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ"] .. "όδοντ"		args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"	-- same as nom.
	args['κπθ-ουδ'] = stem["θ"] .. "όδοντ"		args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom.
	args['οδθ-ουδ'] = stem["θ"] .. "όδοντ"		args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ"] .. "οδόντ"		args['γδ-ουδ'] = "οιν"
return decl(args)
end	

-- ----------------------------------------------------------------
-- ====================== ΜΕΤΟΧΕΣ τριτόκλιτες ====================== --
-- ΔΕΝ καθορίζουμε το χρόνο της μετοχής από εδώ, αλλά με τα πρότυπα μετοχών


-- =================== 3η ΜΕΤΟΧΕΣ  [[δεικνύς]]-ῦσα, -ύν  ============================== --
-- όπως το ἱμάς, ἱμάντος
export['δεικνύς'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'δεικνύς']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
-- deufault stem, minus 2 letters from the end.
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- δεικν-ύς minus 2 letters from end, stemnumber = 3
	
    args['κλίση'] = '3'
	args['μέρος λόγου'] = 'Μετοχές'
	args['κατηγορία κλίσης'] = 'δεικνύς'
    args['τύπος'] = 'δεικνύς'
    args['όπως'] = 'δεικνύς'
    args['κατηγ0'] = 'Λέξεις οξύτονες'
    args['κατηγ01'] = 'Μετοχές οξύτονες'
--    args['κατηγ2'] = 'Μετοχές ενεργητικού ενεστώτα' -- του δείκνυμι
args['ν'] = '1'	-- movable nu νυ εφελκυστικόν για τις δοτικές
-- masc
	args['οεθ-αρσ'] = stem["θ"]				args['οε-αρσ'] = "ύς"	args['οε+-αρσ'] = "ῡ́ς"
	args['γεθ-αρσ'] = stem["θ"] .. "ύντ"	args['γεθ+-αρσ'] = stem["θ"] .. "ῠ́ντ"		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "ύντ"	args['δεθ+-αρσ'] = stem["θ"] .. "ῠ́ντ"		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "ύντ"	args['αεθ+-αρσ'] = stem["θ"] .. "ῠ́ντ"		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"]				args['κε-αρσ'] = "ύς"	args['κε+-αρσ'] = "ῡ́ς"				-- same as nom
	args['οπθ-αρσ'] = stem["θ"] .. "ύντ"	args['οπθ+-αρσ'] = stem["θ"] .. "ῠ́ντ"		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ"] .. "ύντ"	args['γπθ+-αρσ'] = stem["θ"] .. "ῠ́ντ"		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "ῦ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "ύντ"	args['απθ+-αρσ'] = stem["θ"] .. "ῠ́ντ"		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "ύντ"	args['κπθ+-αρσ'] = stem["θ"] .. "ῠ́ντ"		args['κπ-αρσ'] = "ες"				-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "ύντ"	args['οδθ+-αρσ'] = stem["θ"] .. "ῠ́ντ"		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ"] .. "ύντ"	args['γδθ+-αρσ'] = stem["θ"] .. "ῠ́ντ"		args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "ῦσ"	args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = stem["θ"] .. "ύσ"	args['γεθ+-θηλ'] = stem["θ"] .. "ῡ́σ"	args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ"] .. "ύσ"	args['δεθ+-θηλ'] = stem["θ"] .. "ῡ́σ"	args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "ύσ"	args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "ῦσ"	args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"						-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "ῦσ"	args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ"] .. "υσ"	args['γπθ+-θηλ'] = stem["θ"] .. "ῡσ"	args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = stem["θ"] .. "ύσ"	args['δπθ+-θηλ'] = stem["θ"] .. "ῡ́σ"	args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ"] .. "ύσ"	args['απθ+-θηλ'] = stem["θ"] .. "ῡ́σ"	args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "ῦσ"	args['κπ-θηλ'] = "αι"									-- same as nom
	args['οδθ-θηλ'] = stem["θ"] .. "ύσ"	args['οδθ+-θηλ'] = stem["θ"] .. "ῡ́σ"	args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ"] .. "ύσ"	args['γδθ+-θηλ'] = stem["θ"] .. "ῡ́σ"	args['γδ-θηλ'] = "αιν"
-- neu
	args['οεθ-ουδ'] = stem["θ"] .. "ύν"	args['οεθ+-ουδ'] = stem["θ"] .. "ῠ́ν"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"] .. "ύντ"	args['γεθ+-ουδ'] = stem["θ"] .. "ῠ́ντ"		args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ"] .. "ύντ"	args['δεθ+-ουδ'] = stem["θ"] .. "ῠ́ντ"		args['δε-ουδ'] = "ι"		args['δε+-ουδ'] = "ῐ"
	args['αεθ-ουδ'] = stem["θ"] .. "ύν"	args['αεθ+-ουδ'] = stem["θ"] .. "ῠ́ν"		args['αε-ουδ'] = "0"
	args['κεθ-ουδ'] = stem["θ"] .. "ύν"	args['κεθ+-ουδ'] = stem["θ"] .. "ῠ́ν"		args['κε-ουδ'] = "0"
	args['οπθ-ουδ'] = stem["θ"] .. "ύντ"	args['οπθ+-ουδ'] = stem["θ"] .. "ῠ́ντ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ"] .. "ύντ"	args['γπθ+-ουδ'] = stem["θ"] .. "ῠ́ντ"		args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ"] .. "ῦ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ"] .. "ύντ"	args['απθ+-ουδ'] = stem["θ"] .. "ῠ́ντ"		args['απ-ουδ'] = "α"	args['απ-ουδ'] = "ᾰ"
	args['κπθ-ουδ'] = stem["θ"] .. "ύντ"	args['κπθ+-ουδ'] = stem["θ"] .. "ῠ́ντ"		args['κπ-ουδ'] = "α"	args['κπ-ουδ'] = "ᾰ"
	args['οδθ-ουδ'] = stem["θ"] .. "ύντ"	args['οδθ+-ουδ'] = stem["θ"] .. "ῠ́ντ"		args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ"]	.. "ύντ"	args['γδθ+-ουδ'] = stem["θ"] .. "ῠ́ντ"		args['γδ-ουδ'] = "οιν"
return decl(args)
end	


-- =================== 3η ΜΕΤΟΧΕΣ  [[διδούς]]-οῦσᾰ-όν ============================== --
-- όπως το ὁ ὀδούς, τοῦ ὀδόντος
export['διδούς'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'διδούς']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
-- deufault stem, minus 2 letters from the end.
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4)		-- διδ-ούς minuw 3 letters from end, stemnumber = 4
	
    args['κλίση'] = '3'
	args['μέρος λόγου'] = 'Μετοχές'
	args['κατηγορία κλίσης'] = 'διδούς'
    args['τύπος'] = 'διδούς'
    args['όπως'] = 'διδούς'
    args['κατηγ0'] = 'Λέξεις οξύτονες'
    args['κατηγ01'] = 'Μετοχές οξύτονες'
--    args['κατηγ2'] = 'Μετοχές ενεργητικού ενεστώτα' -- του δίδωμι
args['ν'] = '1'	-- movable nu νυ εφελκυστικόν για τις δοτικές
-- masc
	args['οεθ-αρσ'] = stem["θ"]				args['οε-αρσ'] = "ούς"
	args['γεθ-αρσ'] = stem["θ"] .. "όντ"	args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "όντ"	args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "όντ"	args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"]				args['κε-αρσ'] = "ούς"								-- same as nom
	args['οπθ-αρσ'] = stem["θ"] .. "όντ"	args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ"] .. "όντ"	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "οῦ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "όντ"	args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "όντ"	args['κπ-αρσ'] = "ες"								-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "όντ"	args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ"]	.. "όντ"	args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "οῦσ"	args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = stem["θ"] .. "ούσ"	args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ"] .. "ούσ"	args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "ούσ"	args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "οῦσ"	args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"		-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "οῦσ"	args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ"] .. "ουσ"	args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = stem["θ"] .. "ούσ"	args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ"] .. "ούσ"	args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "οῦσ"	args['κπ-θηλ'] = "αι"								-- same as nom
	args['οδθ-θηλ'] = stem["θ"] .. "ούσ"	args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ"] .. "ούσ"	args['γδ-θηλ'] = "αιν"
-- neu
	args['οεθ-ουδ'] = stem["θ"] .. "όν"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"] .. "όντ"	args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ"] .. "όντ"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"		-- same as masc
	args['αεθ-ουδ'] = stem["θ"] .. "όν"		args['αε-ουδ'] = "0"	-- same as nom
	args['κεθ-ουδ'] = stem["θ"] .. "όν"		args['κε-ουδ'] = "0"	-- same as nom
	args['οπθ-ουδ'] = stem["θ"] .. "όντ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ"] .. "όντ"	args['γπ-ουδ'] = "ων"								-- same as masc
	args['δπθ-ουδ'] = stem["θ"] .. "οῦ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"		-- same as masc
	args['απθ-ουδ'] = stem["θ"] .. "όντ"	args['απ-ουδ'] = "α"	args['απ-ουδ'] = "ᾰ"		-- same as nom
	args['κπθ-ουδ'] = stem["θ"] .. "όντ"	args['κπ-ουδ'] = "α"	args['κπ-ουδ'] = "ᾰ"		-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. "όντ"	args['οδ-ουδ'] = "ε"								-- same as masc
	args['γδθ-ουδ'] = stem["θ"]	.. "όντ"	args['γδ-ουδ'] = "οιν"								-- same as masc
return decl(args)
end	




-- =================== 3η ΜΕΤΟΧΕΣ  [[λελυκώς]] ============================== --
export['λελυκώς'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'λελυκώς']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
-- deufault stem, minus 2 letters from the end.
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- λελυκ
	
    args['κλίση'] = '3'
	args['μέρος λόγου'] = 'Μετοχές'
	args['κατηγορία κλίσης'] = 'λελυκώς'
    args['τύπος'] = 'λελυκώς'
    args['όπως'] = 'λελυκώς'
    args['κατηγ0'] = 'Λέξεις οξύτονες'
    args['κατηγ01'] = 'Μετοχές οξύτονες'
--    args['κατηγ2'] = 'Μετοχές ενεργητικού παρακειμένου'
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = stem["θ"]			args['οε-αρσ'] = "ώς"
	args['γεθ-αρσ'] = stem["θ"] .. "ότ"		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "ότ"		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "ότ"		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"]			args['κε-αρσ'] = "ώς"			-- same as nom
	args['οπθ-αρσ'] = stem["θ"] .. "ότ"		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ"] .. "ότ"		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "ό"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "ότ"		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "ότ"		args['κπ-αρσ'] = "ες"		-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "ότ"		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ"] .. "ότ"		args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "υ"		args['οε-θηλ'] = "ῖα"	args['οε+-θηλ'] = "ῖᾰ"
	args['γεθ-θηλ'] = stem["θ"] .. "υ"		args['γε-θηλ'] = "ίας"	args['γε+-θηλ'] = "ίᾱς"
	args['δεθ-θηλ'] = stem["θ"] .. "υ"		args['δε-θηλ'] = "ίᾳ"
	args['αεθ-θηλ'] = stem["θ"] .. "υ"		args['αε-θηλ'] = "ῖαν"	args['αε+-θηλ'] = "ῖᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "υ"		args['κε-θηλ'] = "ῖα"	args['κε+-θηλ'] = "ῖᾰ"		-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "υ"		args['οπ-θηλ'] = "ῖαι"
	args['γπθ-θηλ'] = stem["θ"] .. "υ"		args['γπ-θηλ'] = "ιῶν"
	args['δπθ-θηλ'] = stem["θ"] .. "υ"		args['δπ-θηλ'] = "ίαις"
	args['απθ-θηλ'] = stem["θ"] .. "υ"		args['απ-θηλ'] = "ίας"	args['απ+-θηλ'] = "ίᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "υ"		args['κπ-θηλ'] = "ῖαι"								-- same as nom
	args['οδθ-θηλ'] = stem["θ"] .. "υ"		args['οδ-θηλ'] = "ία"	args['οδ+-θηλ'] = "ίᾱ"
	args['γδθ-θηλ'] = stem["θ"] .. "υ"		args['γδ-θηλ'] = "ίαιν"
-- neu
	args['οεθ-ουδ'] = stem["θ"]			args['οε-ουδ'] = "ός"
	args['γεθ-ουδ'] = stem["θ"] .. "ότ"		args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ"] .. "ότ"		args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"		-- same as masc
	args['αεθ-ουδ'] = stem["θ"]			args['αε-ουδ'] = "ός"	-- same as nom
	args['κεθ-ουδ'] = stem["θ"]			args['κε-ουδ'] = "ός"	-- same as nom
	args['οπθ-ουδ'] = stem["θ"] .. "ότ"		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ"] .. "ότ"		args['γπ-ουδ'] = "ων"								-- same as masc
	args['δπθ-ουδ'] = stem["θ"] .. "ό"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"		-- same as masc
	args['απθ-ουδ'] = stem["θ"] .. "ότ"		args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"		-- same as nom
	args['κπθ-ουδ'] = stem["θ"] .. "ότ"		args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"		-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. "ότ"		args['οδ-ουδ'] = "ε"								-- same as masc
	args['γδθ-ουδ'] = stem["θ"]	.. "ότ"		args['γδ-ουδ'] = "οιν"								-- same as masc
return decl(args)
end	




-- =================== 3η ΜΕΤΟΧΕΣ [[λυθείς]] ============================== --
export['λυθείς'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'λυθείς']] -- βλ. νεοελληνική [[πληγείς]]
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
	args['μείον'] = 3 -- override default stemnumber = 3 (μείον 2)
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4)		-- λυθ
	
    args['κλίση'] = '3'
	args['μέρος λόγου'] = 'Μετοχές'
	args['κατηγορία κλίσης'] = 'λυθείς'
    args['τύπος'] = 'λυθείς'
    args['όπως'] = 'λυθείς'
    args['κατηγ0'] = 'Λέξεις οξύτονες'
    args['κατηγ01'] = 'Μετοχές οξύτονες'
--    args['κατηγ2'] = 'Μετοχές παθητικού αορίστου'
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = stem["θ"]				args['οε-αρσ'] = "είς"
	args['γεθ-αρσ'] = stem["θ"] .. "έντ"	args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "έντ"	args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "έντ"	args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"]				args['κε-αρσ'] = "είς"								-- same as nom
	args['οπθ-αρσ'] = stem["θ"] .. "έντ"	args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ"] .. "έντ"	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "εῖ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "έντ"	args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "έντ"	args['κπ-αρσ'] = "ες"								-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "έντ"	args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ"] .. "έντ"	args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "εῖσ"	args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = stem["θ"] .. "είσ"	args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ"] .. "είσ"	args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "εῖσ"	args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "εῖσ"	args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"		-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "εῖσ"	args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ"] .. "εισ"	args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = stem["θ"] .. "είσ"	args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ"] .. "είσ"	args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "εῖσ"	args['κπ-θηλ'] = "αι"								-- same as nom
	args['οδθ-θηλ'] = stem["θ"] .. "είσ"	args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ"] .. "είσ"	args['γδ-θηλ'] = "αιν"
-- neu
	args['οεθ-ουδ'] = stem["θ"] .. 'έν'		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"] .. "έντ"	args['γε-ουδ'] = "ος"								-- same as masc
	args['δεθ-ουδ'] = stem["θ"] .. "έντ"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"		-- same as masc
	args['αεθ-ουδ'] = stem["θ"] .. "έν"		args['αε-ουδ'] = "0"									-- same as nom
	args['κεθ-ουδ'] = stem["θ"] .. "έν"		args['κε-ουδ'] = "0"									-- same as nom
	args['οπθ-ουδ'] = stem["θ"] .. "έντ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ"] .. "έντ"	args['γπ-ουδ'] = "ων"								-- same as masc
	args['δπθ-ουδ'] = stem["θ"] .. "εῖ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"		-- same as masc
	args['απθ-ουδ'] = stem["θ"] .. "έντ"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"		-- same as nom
	args['κπθ-ουδ'] = stem["θ"] .. "έντ"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"		-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. "έντ"	args['οδ-ουδ'] = "ε"								-- same as masc
	args['γδθ-ουδ'] = stem["θ"] .. "έντ"	args['γδ-ουδ'] = "οιν"								-- same as masc
return decl(args)
end	





-- =================== 3η ΜΕΤΟΧΕΣ [[λύσας]] ============================== --
-- EDITOR_MUST_DEFINE δίχρ=
-- + [[σύμπας]] Επίθετο Adjective
export['λύσας'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'λύσας']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
-- deufault stem, minus 2 letters from the end.
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- λύσ
	stem["θ0"] = m_stems.word0(stem["θ"])				-- λυσ
    stem["θ1"] = m_stems.PerispomeniToOxia(stem["θ"])	-- convert oxia to perispomeni -- also named θ1ο
	stem["θ1π"] = m_stems.OxiaToPerispomeni(stem["θ"])	-- convert perispomeni to oxeia
--   περισπώμενες ? (λήγουσα μακρά, παραλήουσα βραχύ)	

    
	-- FEW ADJECTIVES. masc. voc. as though participles ?????????????????????????????????????????? CHECK THIS
if args['λήμμα'] == 'ἅπας' or args['λήμμα'] == 'ἁπαξάπας' 
	or args['λήμμα'] == 'σύμπας' or args['λήμμα'] == 'συνάπας'
	-- also add the exceptions below, at δίχρ=β
	then
		args['κλίση'] = '3'
		args['μέρος λόγου'] = 'Επίθετα'
		args['κατηγορία κλίσης'] = 'σύμπας'
		args['δίχρ'] = 'β'
		args['mod-σημ'] = 'Κλίνεται κατά τη μετοχή «[[λύσας]]».<br>Το δίχρονο φωνήεν της παραλήγουσας είναι βραχύ.'
		args['τύπος'] = 'σύμπας'
		args['όπως'] = 'σύμπας'
	    args['κατηγ0'] = 'Λέξεις παροξύτονες'
	    args['κατηγ01'] = 'Επίθετα παροξύτονα'
		args['οεθ-ουδ'] = stem["θ1"] .. "αν"		args['οεθ+-ουδ'] = stem["θ1"] .. "ᾰν"	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1"] .. "αν"		args['αεθ+-ουδ'] = stem["θ1"] .. "ᾰν"	args['αε-ουδ'] = "0"
		args['κεθ-ουδ'] = stem["θ1"] .. "αν"		args['κεθ+-ουδ'] = stem["θ1"] .. "ᾰν"	args['κε-ουδ'] = "0"	-- same as nom
else
	
		args['μέρος λόγου'] = 'Μετοχές'
		args['κλίση'] = '3'
		args['κατηγορία κλίσης'] = 'λύσας'
		args['κατηγ0'] = 'Λέξεις παροξύτονες'
		args['κατηγ01'] = 'Μετοχές παροξύτονες'
		-- τύπος όπως βλ. define prosody
end	

-- all common cases, except neu nom-acc-voc sg όλα, εκτός ουδέτερο
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = stem["θ"] .. "α"		args['οεθ+-αρσ'] = stem["θ"] .. "ᾱ"		args['οε-αρσ'] = "ς"
	args['γεθ-αρσ'] = stem["θ"] .. "αντ"	args['γεθ+-αρσ'] = stem["θ"] .. "ᾰντ"	args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "αντ"	args['δεθ+-αρσ'] = stem["θ"] .. "ᾰντ"	args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "αντ"	args['αεθ+-αρσ'] = stem["θ"] .. "ᾰντ"	args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"] .. "α"		args['κεθ+-αρσ'] = stem["θ"] .. "ᾱ"		args['κε-αρσ'] = "ς"	-- same as nom
	args['οπθ-αρσ'] = stem["θ"] .. "αντ"	args['οπθ+-αρσ'] = stem["θ"] .. "ᾰντ"	args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ0"] .. "άντ"	args['γπθ+-αρσ'] = stem["θ0"] .. "ᾰ́ντ"	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "α"		args['δπθ+-αρσ'] = stem["θ"] .. "ᾱ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "αντ"	args['απθ+-αρσ'] = stem["θ"] .. "ᾰντ"	args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "αντ"	args['κπθ+-αρσ'] = stem["θ"] .. "ᾰντ"	args['κπ-αρσ'] = "ες"	-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "αντ"	args['οδθ+-αρσ'] = stem["θ"] .. "ᾰντ"	args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. "άντ"	args['γδθ+-αρσ'] = stem["θ"] .. "ᾰ́ντ"	args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "ασ"		args['οεθ+-θηλ'] = stem["θ"] .. "ᾱσ"	args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = stem["θ0"] .. "άσ"	args['γεθ+-θηλ'] = stem["θ0"] .. "ᾱ́σ"	args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ0"] .. "άσ"	args['δεθ+-θηλ'] = stem["θ0"] .. "ᾱ́σ"	args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "ασ"		args['αεθ+-θηλ'] = stem["θ"] .. "ᾱσ"	args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "ασ"		args['κεθ+-θηλ'] = stem["θ"] .. "ᾱσ"	args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"	-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "ασ"		args['οπθ+-θηλ'] = stem["θ"] .. "ᾱσ"	args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ0"] .. "ασ"	args['γπθ+-θηλ'] = stem["θ0"] .. "ᾱσ"	args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = stem["θ0"] .. "άσ"	args['δπθ+-θηλ'] = stem["θ0"] .. "ᾱ́σ"	args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ0"] .. "άσ"	args['απθ+-θηλ'] = stem["θ0"] .. "ᾱ́σ"	args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "ᾶσ"		args['κπθ+-θηλ'] = stem["θ"] .. "ᾱσ"	args['κπ-θηλ'] = "αι"	-- same as nom
	args['οδθ-θηλ'] = stem["θ0"] .. "άσ"	args['οδθ+-θηλ'] = stem["θ0"] .. "ᾱ́σ"	args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ0"] .. "άσ"	args['γδθ+-θηλ'] = stem["θ0"] .. "ᾱ́σ"	args['γδ-θηλ'] = "αιν"
-- neu
	-- nom, acc, voc = Define dichrona, macron, brachy See below
--	args['οεθ-ουδ'] =
	args['γεθ-ουδ'] = stem["θ"] .. "αντ"	args['γεθ+-ουδ'] = stem["θ"] .. "ᾰντ"	args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ"] .. "αντ"	args['δεθ+-ουδ'] = stem["θ"] .. "ᾰντ"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"
--	args['αεθ-ουδ'] =
--	args['κεθ-ουδ'] =
	args['οπθ-ουδ'] = stem["θ"] .. "αντ"	args['οπθ+-ουδ'] = stem["θ"] .. "ᾰντ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. "άντ"	args['γπθ+-ουδ'] = stem["θ0"] .. "ᾰ́ντ"	args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ"] .. "α"		args['δπθ+-ουδ'] = stem["θ"] .. "ᾱ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ"] .. "αντ"	args['απθ+-ουδ'] = stem["θ"] .. "ᾰντ"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"
	args['κπθ-ουδ'] = stem["θ"] .. "αντ"	args['κπθ+-ουδ'] = stem["θ"] .. "ᾰντ"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. "αντ"	args['οδθ+-ουδ'] = stem["θ"] .. "ᾰντ"	args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ0"] .. "άντ"	args['γδθ+-ουδ'] = stem["θ0"] .. "ᾰ́ντ"	args['γδ-ουδ'] = "οιν"

-- ===================== define prosody on accented syllable as macron, brachy or ambiguous
-- ========== need to make it a function OUTSIDE at [[Module:grc-stems]] test [[Module:ww]] test
-- brachy+oxia/varia
	if mw.ustring.find(stem["θ"], m_data.brachy_oxeia) -- brachy+okseia or vareia
	then 
		prosody = 'βραχύ'
		args['τύπος'] = 'κλέψας'
		args['όπως'] = 'κλέψας'
	end
-- macron
	if mw.ustring.find(args['λήμμα'], m_data.vowel_perispomeni) -- any vowel+perispomeni
	or mw.ustring.find(args['λήμμα'], m_data.macron_oxeia) -- marcon+okseia or vareia
	then
		prosody = 'μακρό'
		args['τύπος'] = 'νικήσας'
		args['όπως'] = 'νικήσας'
	end
-- ambiguous dicrhona α ι υ Return: unknown
	if mw.ustring.find(args['λήμμα'], m_data.dichronon_oxeia) -- dichronon+okseia or vareia all ambiguous accented (NOT perispomeni, NOT subscript iota)
	then
		--but not in diphthong
		if mw.ustring.find(args['λήμμα'], m_data.diphthong_tonos) -- diphthong+tonos (oskeia, vareia, persipomeni) -- NOT dialytics ΐῒῗΰῢῧ
		then 
			prosody = 'μακρό'
			args['τύπος'] = 'νικήσας'
			args['όπως'] = 'νικήσας'
		else
			prosody = 'άγνωστο'
		end
	end
-- ================ define neuter singular nom-acc-voc
	if prosody == 'βραχύ' then -- keep oxia
		args['οεθ-ουδ'] = stem["θ1"] .. "αν"		args['οεθ+-ουδ'] = stem["θ1"] .. "ᾰν"	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1"] .. "αν"		args['αεθ+-ουδ'] = stem["θ1"] .. "ᾰν"	args['αε-ουδ'] = "0"
		args['κεθ-ουδ'] = stem["θ1"] .. "αν"		args['κεθ+-ουδ'] = stem["θ1"] .. "ᾰν"	args['κε-ουδ'] = "0"	-- same as nom
	end
	if prosody == 'μακρό' then -- make perispomeni
		args['οεθ-ουδ'] = stem["θ1π"] .. "αν"	args['οεθ+-ουδ'] = stem["θ1π"] .. "ᾰν"	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1π"] .. "αν"	args['αεθ+-ουδ'] = stem["θ1π"] .. "ᾰν"	args['αε-ουδ'] = "0"
		args['κεθ-ουδ'] = stem["θ1π"] .. "αν"	args['κεθ+-ουδ'] = stem["θ1π"] .. "ᾰν"	args['κε-ουδ'] = "0"	-- same as nom
	end
	if prosody == 'άγνωστο' then
		if args['δίχρ'] == 'β' 
		and args['λήμμα'] ~= 'ἅπας' and args['λήμμα'] ~= 'ἁπαξάπας' 
		and args['λήμμα'] ~= 'σύμπας' and args['λήμμα'] ~= 'συνάπας'
		then -- keep oxia
			args['mod-σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι βραχύ.'
			args['τύπος'] = 'κλέψας'
			args['όπως'] = 'νομίσας'
			args['κατηγ03'] = "Μετοχές που κλίνονται όπως το 'νομίσας'"
		args['οεθ-ουδ'] = stem["θ1"] .. "αν"		args['οεθ+-ουδ'] = stem["θ1"] .. "ᾰν"	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1"] .. "αν"		args['αεθ+-ουδ'] = stem["θ1"] .. "ᾰν"	args['αε-ουδ'] = "0"
		args['κεθ-ουδ'] = stem["θ1"] .. "αν"		args['κεθ+-ουδ'] = stem["θ1"] .. "ᾰν"	args['κε-ουδ'] = "0"	-- same as nom
		elseif args['δίχρ'] == 'μ' then -- make perispomeni
			args['mod-σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι μακρό.'
			args['τύπος'] = 'νικήσας'
			args['όπως'] = 'λύσας'
			args['κατηγ03'] = "Μετοχές που κλίνονται όπως το 'λύσας'"
		args['οεθ-ουδ'] = stem["θ1π"] .. "αν"	args['οεθ+-ουδ'] = stem["θ1π"] .. "ᾰν"	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1π"] .. "αν"	args['αεθ+-ουδ'] = stem["θ1π"] .. "ᾰν"	args['αε-ουδ'] = "0"
		args['κεθ-ουδ'] = stem["θ1π"] .. "αν"	args['κεθ+-ουδ'] = stem["θ1π"] .. "ᾰν"	args['κε-ουδ'] = "0"	-- same as nom

		elseif args['δίχρ'] == '?' then
			args['τύπος'] = '-'
			args['όπως'] = 'λύσας'
		args['σημ'] = '<span style="color:red;">Δεν</span> υπάρχουν πληροφορίες για την προσωδία<br>του δίχρονου φωνήεντος στην παραλήγουσα ώστε να γίνει σωστά ο τονισμός.'
		args['κατηγ'] = "Λέξεις με άγνωστη προσωδία"
		args['κατηγ04'] = "Μετοχές με κλίση όπως το 'λύσας' με άγνωστη προσωδία"

--		args['οεθ-ουδ'] = args['οεΛ-ουδ']		args['οεθ+-ουδ'] = args['οεΛ-ουδ'] args['οε-ουδ'] = args['οεΛ-ουδ'] args['οε+-ουδ'] = args['οεΛ-ουδ']
		args['οεΛ-ουδ'] = '...<span style="color:red;">?</span>...ᾰν'
--		args['αεθ-ουδ'] = args['αεΛ-ουδ']		args['αεθ+-ουδ'] = args['αεΛ-ουδ'] args['αε-ουδ'] = args['αεΛ-ουδ'] args['αε+-ουδ'] = args['αεΛ-ουδ']
		args['αεΛ-ουδ'] = '...<span style="color:red;">?</span>...ᾰν'
--		args['κεθ-ουδ'] = args['κεΛ-ουδ']		args['κεθ+-ουδ'] = args['κεΛ-ουδ'] args['κε-ουδ'] = args['κεΛ-ουδ'] args['κε+-ουδ'] = args['κεΛ-ουδ']
		args['κεΛ-ουδ'] = '...<span style="color:red;">?</span>...ᾰν'

		-- if the editor does nothing, ERROR.
		elseif args['δίχρ'] ~= 'β' and args['δίχρ'] ~= 'μ' and args['δίχρ'] ~= '?'
		or (args['δίχρ'] == '' or args['δίχρ'] == nil)
		then
			return error_dichr(errordichrstring) -- cf error fucntions at Module
		end -- close if ?
	end -- close unknown prosody
	
return decl(args)
end



-- =================== 3η ΜΕΤΟΧΕΣ [[λύων]] ============================== --
-- EDITOR MUST DEFINE δίχρ=
-- και ἄκων επίθετο adjective
export['λύων'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'λύων']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
-- default stem, minus 2 letters from the end.
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- λύ -ων λήγ-ων τρέχ-ων
	stem["θ0"] = m_stems.word0(stem["θ"])				-- λυ-
    stem["θ1"] = m_stems.PerispomeniToOxia(stem["θ"])	-- convert oxia to perispomeni -- also named θ1ο
	stem["θ1π"] = m_stems.OxiaToPerispomeni(stem["θ"])	-- convert perispomeni to oxeia


-- [[ἄκων]] μέρος λόγου Επίθετα  ADJECTIVES. masc. voc. as though participles  ?? CHECK THIS
	if args['λήμμα'] == 'ἄκων'
	-- also add the exceptions below, at δίχρ=β
	then
		args['κλίση'] = '3'
		args['μέρος λόγου'] = 'Επίθετα'
		args['κατηγορία κλίσης'] = 'ἄκων'
	    args['κατηγ0'] = 'Λέξεις παροξύτονες'
	    args['κατηγ01'] = 'Επίθετα παροξύτονα'
	    -- τύπος όπως βλ. define prosody
	    args['κεθ-αρσ'] = stem["θ"] .. "ων"		args['κε-αρσ'] = "0"	args['κεΛκειμ-αρσ'] = "* "	-- same as nom
	    args['κε2θ-αρσ'] = stem["θ1π"] .. "ον"		args['κε2-αρσ'] = "0"	-- same as neu
	    args['mod-σημ'] = '* Κατά τη [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Smyth|Γραμματική του Smyth]]' 
		.. ' ([http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D24 &sect;.305b])'
		.. ' και του [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Σταματάκος|του Σταματάκου]] (&sect;.58)<br>το ἄκων κλίνεται όπως οι μετοχές'
		.. ' με την κλητική ενικού του αρσενικού όπως η ονομαστική.<br>Το δίχρονο φωνήεν της παραλήγουσας είναι μακρό.'
	else
		args['κλίση'] = '3'
		args['μέρος λόγου'] = 'Μετοχές'
		args['κατηγορία κλίσης'] = 'λύων'
		args['κατηγ0'] = 'Λέξεις παροξύτονες'
		args['κατηγ01'] = 'Μετοχές παροξύτονες'
		-- τύπος όπως βλ. define prosody
		args['κεθ-αρσ'] = stem["θ"] .. "ων"		args['κε-αρσ'] = "0"	-- same as nom
	end	

-- all common cases, except neu nom-acc-voc sg όλα, εκτός ουδέτερο AND except voc.sg.masc
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = stem["θ"] .. "ων"		args['οε-αρσ'] = "0"
	args['γεθ-αρσ'] = stem["θ"] .. "οντ"	args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "οντ"	args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "οντ"	args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	-- κεθ-αρσ see above
	args['οπθ-αρσ'] = stem["θ"] .. "οντ"	args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ0"] .. "όντ"	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "ου"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "οντ"	args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "οντ"	args['κπ-αρσ'] = "ες"	-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "οντ"	args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ0"] .. "όντ"	args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "ουσ"	args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = stem["θ0"] .. "ούσ"	args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ0"] .. "ούσ"	args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "ουσ"	args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "ουσ"	args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"	-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "ουσ"	args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ0"] .. "ουσ"	args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = stem["θ0"] .. "ούσ"	args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ0"] .. "ούσ"	args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "ουσ"	args['κπ-θηλ'] = "αι"	-- same as nom
	args['οδθ-θηλ'] = stem["θ0"] .. "ούσ"	args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ0"] .. "ούσ"	args['γδ-θηλ'] = "αιν"
-- neu
	-- nom, acc, voc = Define dichrona, macron, brachy See below
--	args['οεθ-ουδ'] =
	args['γεθ-ουδ'] = stem["θ"] .. "οντ"	args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ"] .. "οντ"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"
--	args['αεθ-ουδ'] =
--	args['κεθ-ουδ'] =
	args['οπθ-ουδ'] = stem["θ"] .. "οντ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ0"] .. "όντ"	args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ"] .. "ου"	args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ"] .. "οντ"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"	-- same as nom
	args['κπθ-ουδ'] = stem["θ"] .. "οντ"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. "οντ"	args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ0"] .. "όντ"	args['γδ-ουδ'] = "οιν"

-- ===================== define prosody on accented syllable as macron, brachy or ambiguous
-- ========== need to make it a function OUTSIDE at [[Module:grc-stems]]
-- brachy+oxia/varia
	if mw.ustring.find(stem["θ"], m_data.brachy_oxeia) -- brachy+okseia or vareia
	then  -- keep okseia
		prosody = 'βραχύ'
		args['τύπος'] = 'τρέχων'
		args['όπως'] = 'τρέχων'
		args['οεθ-ουδ'] = stem["θ1"] .. "ον"	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1"] .. "ον"	args['αε-ουδ'] = "0"	-- same as nom
		args['κεθ-ουδ'] = stem["θ1"] .. "ον"	args['κε-ουδ'] = "0"	-- same as nom
		args['mod-σημ'] = ''
	end
-- macron
	if mw.ustring.find(args['λήμμα'], m_data.vowel_perispomeni) -- any vowel+perispomeni
	or mw.ustring.find(args['λήμμα'], m_data.macron_oxeia) -- marcon+okseia or vareia
	then
		prosody = 'μακρό'
		args['τύπος'] = 'λήγων'
		args['όπως'] = 'λήγων'
		args['οεθ-ουδ'] = stem["θ1π"] .. "ον"	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1π"] .. "ον"	args['αε-ουδ'] = "0"	-- same as nom
		args['κεθ-ουδ'] = stem["θ1π"] .. "ον"	args['κε-ουδ'] = "0"	-- same as nom
		args['mod-σημ'] = ''
	end
-- ambiguous dicrhona α ι υ Return: unknown
	if mw.ustring.find(args['λήμμα'], m_data.dichronon_oxeia) -- dichronon+okseia or vareia all ambiguous accented (NOT perispomeni, NOT subscript iota)
	then
		--but not in diphthong
		if mw.ustring.find(args['λήμμα'], m_data.diphthong_tonos) -- diphthong+tonos (oskeia, vareia, persipomeni) -- NOT dialytics ΐῒῗΰῢῧ
		then 
			prosody = 'μακρό'
			args['τύπος'] = 'λήγων'
			args['όπως'] = 'λήγων'
		args['οεθ-ουδ'] = stem["θ1π"] .. "ον"	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1π"] .. "ον"	args['αε-ουδ'] = "0"	-- same as nom
		args['κεθ-ουδ'] = stem["θ1π"] .. "ον"	args['κε-ουδ'] = "0"	-- same as nom
		args['mod-σημ'] = ''
		else
			if args['λήμμα'] == 'ἄκων' then 
				prosody = 'μακρό'
				args['τύπος'] = 'λύων'
				args['όπως'] = 'λύων'
		args['οεθ-ουδ'] = stem["θ1π"] .. "ον"	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1π"] .. "ον"	args['αε-ουδ'] = "0"	-- same as nom
		args['κεθ-ουδ'] = stem["θ1π"] .. "ον"	args['κε-ουδ'] = "0"	-- same as nom
			else
				prosody = 'άγνωστο'
			end
		end
	end
-- ================ define neuter singular nom-acc-voc
	if prosody == 'άγνωστο' then
		if args['δίχρ'] == 'β' 
		then -- keep okseia
			args['mod-σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι βραχύ.'
			args['τύπος'] = 'τάσσων'
			args['όπως'] = 'τρέχων'
			args['κατηγ02'] = "Μετοχές που κλίνονται όπως το 'τρέχων'"
		args['οεθ-ουδ'] = stem["θ1"] .. "ον"	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1"] .. "ον"	args['αε-ουδ'] = "0"	-- same as nom
		args['κεθ-ουδ'] = stem["θ1"] .. "ον"	args['κε-ουδ'] = "0"	-- same as nom
		elseif args['δίχρ'] == 'μ'
		then -- make perispomeni
			args['mod-σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι μακρό.'
			args['τύπος'] = 'λύων'
			args['όπως'] = 'λύων'
			args['κατηγ02'] = "Μετοχές που κλίνονται όπως το 'λύων'"
		args['οεθ-ουδ'] = stem["θ1π"] .. "ον"	args['οε-ουδ'] = "0"
		args['αεθ-ουδ'] = stem["θ1π"] .. "ον"	args['αε-ουδ'] = "0"	-- same as nom
		args['κεθ-ουδ'] = stem["θ1π"] .. "ον"	args['κε-ουδ'] = "0"	-- same as nom

		elseif args['δίχρ'] == '?' then
			args['τύπος'] = '-'
			args['όπως'] = 'λύων'
		args['σημ'] = '<span style="color:red;">Δεν</span> υπάρχουν πληροφορίες για την προσωδία<br>του δίχρονου φωνήεντος στην παραλήγουσα ώστε να γίνει σωστά ο τονισμός.'
		args['κατηγ'] = "Λέξεις με άγνωστη προσωδία"
		args['κατηγ2'] = "Μετοχές με κλίση όπως το 'λύων' με άγνωστη προσωδία"
--		args['οεθ-ουδ'] = args['οεΛ-ουδ']		args['οεθ+-ουδ'] = args['οεΛ-ουδ'] args['οε-ουδ'] = args['οεΛ-ουδ'] args['οε+-ουδ'] = args['οεΛ-ουδ']
		args['οεΛ-ουδ'] = '...<span style="color:red;">?</span>...ον'
--		args['αεθ-ουδ'] = args['αεΛ-ουδ']		args['αεθ+-ουδ'] = args['αεΛ-ουδ'] args['αε-ουδ'] = args['αεΛ-ουδ'] args['αε+-ουδ'] = args['αεΛ-ουδ']
		args['αεΛ-ουδ'] = '...<span style="color:red;">?</span>...ον'
--		args['κεθ-ουδ'] = args['κεΛ-ουδ']		args['κεθ+-ουδ'] = args['κεΛ-ουδ'] args['κε-ουδ'] = args['κεΛ-ουδ'] args['κε+-ουδ'] = args['κεΛ-ουδ']
		args['κεΛ-ουδ'] = '...<span style="color:red;">?</span>...ον'

		-- if the editor does nothing, ERROR.
		elseif args['δίχρ'] ~= 'β' and args['δίχρ'] ~= 'μ' and args['δίχρ'] ~= '?'
		or (args['δίχρ'] == '' or args['δίχρ'] == nil)
		then
			return error_dichr(errordichrstring) -- cf error fucntions at Module
		end -- close if ?
	end -- close unknown prosody
	
return decl(args)
end



-- =================== 3η ΜΕΤΟΧΕΣ [[ποιῶν]] (ρημάτων σε -έω) + [[δηλῶν]] (για -όω) ============================== --
export['ποιών'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'ποιών']] -- βλ. νεοελληνική [[μειοψηφών]]
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
-- deufault stem, minus 2 letters from the end.
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- ποι -- δηλ
	
    args['κλίση'] = '3'
	args['μέρος λόγου'] = 'Μετοχές'
	args['κατηγορία κλίσης'] = 'ποιῶν'
    args['τύπος'] = 'ποιῶν'
    args['όπως'] = 'ποιῶν'
    args['κατηγ0'] = 'Λέξεις περισπώμενες'
    args['κατηγ01'] = 'Μετοχές περισπώμενες'
--    args['κατηγ2'] = 'Μετοχές ενεργητικού ενεστώτα' -- συνηρημένες
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = stem["θ"] .. "ῶν"		args['οε-αρσ'] = "0"
	args['γεθ-αρσ'] = stem["θ"] .. "οῦντ"	args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "οῦντ"	args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "οῦντ"	args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"] .. "ῶν"		args['κε-αρσ'] = "0"								-- same as nom
	args['οπθ-αρσ'] = stem["θ"] .. "οῦντ"	args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ"] .. "ούντ"	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "οῦ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "οῦντ"	args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "οῦντ"	args['κπ-αρσ'] = "ες"								-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "οῦντ"	args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ"] .. "ούντ"	args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "οῦσ"	args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = stem["θ"] .. "ούσ"	args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ"] .. "ούσ"	args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "οῦσ"	args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "οῦσ"	args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"		-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "οῦσ"	args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ"] .. "ουσ"	args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = stem["θ"] .. "ούσ"	args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ"] .. "ούσ"	args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "οῦσ"	args['κπ-θηλ'] = "αι"								-- same as nom
	args['οδθ-θηλ'] = stem["θ"] .. "ούσ"	args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ"] .. "ούσ"	args['γδ-θηλ'] = "αιν"
-- neu
	args['οεθ-ουδ'] = stem["θ"] .. 'οῦν'		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"] .. "οῦντ"	args['γε-ουδ'] = "ος"								-- same as masc
	args['δεθ-ουδ'] = stem["θ"] .. "οῦντ"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"		-- same as masc
	args['αεθ-ουδ'] = stem["θ"] .. "οῦν"		args['αε-ουδ'] = "0"									-- same as nom
	args['κεθ-ουδ'] = stem["θ"] .. "οῦν"		args['κε-ουδ'] = "0"									-- same as nom
	args['οπθ-ουδ'] = stem["θ"] .. "οῦντ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ"] .. "ούντ"	args['γπ-ουδ'] = "ων"								-- same as masc
	args['δπθ-ουδ'] = stem["θ"] .. "οῦ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"		-- same as masc
	args['απθ-ουδ'] = stem["θ"] .. "οῦντ"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"		-- same as nom
	args['κπθ-ουδ'] = stem["θ"] .. "οῦντ"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"		-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. "οῦντ"	args['οδ-ουδ'] = "ε"								-- same as masc
	args['γδθ-ουδ'] = stem["θ"] .. "ούντ"	args['γδ-ουδ'] = "οιν"								-- same as masc
return decl(args)
end	




-- =================== 3η ΜΕΤΟΧΕΣ [[στάς]] ============================== --
export['στας'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'στας']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
-- deufault stem, minus 2 letters from the end.
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- στ
	
    args['κλίση'] = '3'
	args['μέρος λόγου'] = 'Μετοχές'
	args['κατηγορία κλίσης'] = 'στάς'
    args['τύπος'] = 'στάς'
    args['όπως'] = 'στάς'
    args['κατηγ0'] = 'Λέξεις οξύτονες'
    args['κατηγ01'] = 'Μετοχές οξύτονες'
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = stem["θ"] .. "ά"		args['οεθ+-αρσ'] = stem["θ"] .. "ᾱ́"		args['οε-αρσ'] = "ς"
	args['γεθ-αρσ'] = stem["θ"] .. "άντ"	args['γεθ+-αρσ'] = stem["θ"] .. "ᾰ́ντ"	args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "άντ"	args['δεθ+-αρσ'] = stem["θ"] .. "ᾰ́ντ"	args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "άντ"	args['αεθ+-αρσ'] = stem["θ"] .. "ᾰ́ντ"	args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"] .. "ά"		args['κεθ+-αρσ'] = stem["θ"] .. "ᾱ́"		args['κε-αρσ'] = "ς"	-- same as nom
	args['οπθ-αρσ'] = stem["θ"] .. "άντ"	args['οπθ+-αρσ'] = stem["θ"] .. "ᾰ́ντ"	args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ"] .. "άντ"	args['γπθ+-αρσ'] = stem["θ"] .. "ᾰ́ντ"	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "ᾶ"												args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "άντ"	args['απθ+-αρσ'] = stem["θ"] .. "ᾰ́ντ"	args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
		-- CHECK### prosody -ας
	args['κπθ-αρσ'] = stem["θ"] .. "άντ"	args['κπθ+-αρσ'] = stem["θ"] .. "ᾰ́ντ"	args['κπ-αρσ'] = "ες"	-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "άντ"	args['οδθ+-αρσ'] = stem["θ"] .. "ᾰ́ντ"	args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ"] .. "άντ"	args['γδθ+-αρσ'] = stem["θ"] .. "ᾰ́ντ"	args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "ᾶσ"												args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = stem["θ"] .. "άσ"		args['γεθ+-θηλ'] = stem["θ"] .. "ᾱ́σ"	args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ"] .. "άσ"		args['δεθ+-θηλ'] = stem["θ"] .. "ᾱ́σ"	args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "ᾶσ"												args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "ᾶσ"												args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"	-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "ᾶσ"												args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ"] .. "ασ"		args['γπθ+-θηλ'] = stem["θ"] .. "ᾱσ"	args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = stem["θ"] .. "άσ"		args['δπθ+-θηλ'] = stem["θ"] .. "ᾱ́σ"	args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ"] .. "άσ"		args['απθ+-θηλ'] = stem["θ"] .. "ᾱ́σ"	args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "ᾶσ"												args['κπ-θηλ'] = "αι"	-- same as nom
	args['οδθ-θηλ'] = stem["θ"] .. "άσ"		args['οδθ+-θηλ'] = stem["θ"] .. "ᾱ́σ"	args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ"] .. "άσ"		args['γδθ+-θηλ'] = stem["θ"] .. "ᾱ́σ"	args['γδ-θηλ'] = "αιν"
-- neu
	args['οεθ-ουδ'] = stem["θ"] .. "άν"		args['οεθ+-ουδ'] = stem["θ"] .. "ᾰ́ν"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"] .. "άντ"	args['γεθ+-ουδ'] = stem["θ"] .. "ᾰ́ντ"	args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ"] .. "άντ"	args['δεθ+-ουδ'] = stem["θ"] .. "ᾰ́ντ"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"
	args['αεθ-ουδ'] = stem["θ"] .. "άν"		args['αεθ+-ουδ'] = stem["θ"] .. "ᾰ́ν"		args['αε-ουδ'] = "0"	-- same as nom
	args['κεθ-ουδ'] = stem["θ"] .. "άν"		args['κεθ+-ουδ'] = stem["θ"] .. "ᾰ́ν"		args['κε-ουδ'] = "0"	-- same as nom
	args['οπθ-ουδ'] = stem["θ"] .. "άντ"	args['οπθ+-ουδ'] = stem["θ"] .. "ᾰ́ντ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ"] .. "άντ"	args['γπθ+-ουδ'] = stem["θ"] .. "ᾰ́ντ"	args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = stem["θ"] .. "ᾶ"												args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = stem["θ"] .. "άντ"	args['απθ+-ουδ'] = stem["θ"] .. "ᾰ́ντ"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"
	args['κπθ-ουδ'] = stem["θ"] .. "άντ"	args['κπθ+-ουδ'] = stem["θ"] .. "ᾰ́ντ"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"	-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. "άντ"	args['οδθ+-ουδ'] = stem["θ"] .. "ᾰ́ντ"	args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = stem["θ"] .. "άντ"	args['γδθ+-ουδ'] = stem["θ"] .. "ᾰ́ντ"	args['γδ-ουδ'] = "οιν"
return decl(args)
end	




-- =================== 3η ΜΕΤΟΧΕΣ  [[τεθνεώς]] -ῶσα, -ὼς (ή -ός): ============================== --
-- f.create_link used here
-- ἑστώς, ἑστῶσα, ἑστὼς (-ός)
export['τεθνεώς'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'τεθνεώς']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
-- deufault stem, minus 2 letters from the end.
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- τεθνε-ώς
	
    args['κλίση'] = '3'
	args['μέρος λόγου'] = 'Μετοχές'
	args['κατηγορία κλίσης'] = 'τεθνεώς'
    args['τύπος'] = 'τεθνεώς'
    args['όπως'] = 'τεθνεώς'
    args['κατηγ0'] = 'Λέξεις οξύτονες'
    args['κατηγ01'] = 'Μετοχές οξύτονες'
--    args['κατηγ2'] = 'Μετοχές ενεργητικού παρακειμένου'
args['ν'] = '1'	-- movable nu νυ εφελκυστικόν για δοτικές
-- masc
	args['οεθ-αρσ'] = stem["θ"]				args['οε-αρσ'] = "ώς"
	args['γεθ-αρσ'] = stem["θ"] .. "ῶτ"		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "ῶτ"		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "ῶτ"		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"]				args['κε-αρσ'] = "ώς"								-- same as nom
	args['οπθ-αρσ'] = stem["θ"] .. "ῶτ"		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ"] .. "ώτ"		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "ῶ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "ῶτ"		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "ῶτ"		args['κπ-αρσ'] = "ες"								-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "ῶτ"		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ"]	.. "ώτ"		args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "ῶσ"		args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = stem["θ"] .. "ώσ"		args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ"] .. "ώσ"		args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "ῶσ"		args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "ῶσ"		args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"		-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "ῶσ"		args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ"] .. "ωσ"		args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = stem["θ"] .. "ώσ"		args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ"] .. "ώσ"		args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "ῶσ"		args['κπ-θηλ'] = "αι"								-- same as nom
	args['οδθ-θηλ'] = stem["θ"] .. "ώσ"		args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ"] .. "ώσ"		args['γδ-θηλ'] = "αιν"
-- neu
	args['οεθ-ουδ'] = stem["θ"]				args['οε-ουδ'] = "ώς"
		args['οεΛκειμ-ουδ'] = "&nbsp;(" .. create_link(stem["θ"] .."ό" .. "ς", stem_color(stem["θ"]) .. infix_color("ό") .. ending_color("ς")) .. ")"
	args['γεθ-ουδ'] = stem["θ"] .. "ῶτ"		args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ"] .. "ῶτ"		args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"		-- same as masc
	args['αεθ-ουδ'] = stem["θ"]				args['αε-ουδ'] = "ώς"	-- same as nom
		args['αεΛκειμ-ουδ'] = "&nbsp;(" .. create_link(stem["θ"] .."ό" .. "ς", stem_color(stem["θ"]) .. infix_color("ό") .. ending_color("ς")) .. ")"
	args['κεθ-ουδ'] = stem["θ"]				args['κε-ουδ'] = "ώς"	-- same as nom
		args['κεΛκειμ-ουδ'] = "&nbsp;(" .. create_link(stem["θ"] .."ό" .. "ς", stem_color(stem["θ"]) .. infix_color("ό") .. ending_color("ς")) .. ")"
	args['οπθ-ουδ'] = stem["θ"] .. "ῶτ"		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ"] .. "ώτ"		args['γπ-ουδ'] = "ων"								-- same as masc
	args['δπθ-ουδ'] = stem["θ"] .. "ῶ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"		-- same as masc
	args['απθ-ουδ'] = stem["θ"] .. "ῶτ"		args['απ-ουδ'] = "α"	args['απ-ουδ'] = "ᾰ"		-- same as nom
	args['κπθ-ουδ'] = stem["θ"] .. "ῶτ"		args['κπ-ουδ'] = "α"	args['κπ-ουδ'] = "ᾰ"		-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. "ῶτ"		args['οδ-ουδ'] = "ε"								-- same as masc
	args['γδθ-ουδ'] = stem["θ"]	.. "ώτ"		args['γδ-ουδ'] = "οιν"								-- same as masc
return decl(args)
end	




-- =================== 3η ΜΕΤΟΧΕΣ [[τιμῶν]] (ρημάτων σε -άω) ============================== --
export['τιμών'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'τιμών']] -- βλ. νεοελληνική [[κυβερνών]]
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
-- deufault stem, minus 2 letters from the end.
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- τιμ
	
    args['κλίση'] = '3'
	args['μέρος λόγου'] = 'Μετοχές'
	args['κατηγορία κλίσης'] = 'τιμῶν'
    args['τύπος'] = 'τιμῶν'
    args['όπως'] = 'τιμῶν'
    args['κατηγ0'] = 'Λέξεις περισπώμενες'
    args['κατηγ01'] = 'Μετοχές περισπώμενες'
--    args['κατηγ02'] = 'Μετοχές ενεργητικού ενεστώτα' -- συνηρημένες
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = stem["θ"] .. "ῶν"		args['οε-αρσ'] = "0"
	args['γεθ-αρσ'] = stem["θ"] .. "ῶντ"	args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "ῶντ"	args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "ῶντ"	args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"] .. "ῶν"		args['κε-αρσ'] = "0"								-- same as nom
	args['οπθ-αρσ'] = stem["θ"] .. "ῶντ"	args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ"] .. "ώντ"	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "ῶ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "ῶντ"	args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "ῶντ"	args['κπ-αρσ'] = "ες"								-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "ῶντ"	args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ"] .. "ώντ"	args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "ῶσ"		args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = stem["θ"] .. "ώσ"		args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ"] .. "ώσ"		args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "ῶσ"		args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "ῶσ"		args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"		-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "ῶσ"		args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ"] .. "ωσ"		args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = stem["θ"] .. "ώσ"		args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ"] .. "ώσ"		args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "ῶσ"		args['κπ-θηλ'] = "αι"								-- same as nom
	args['οδθ-θηλ'] = stem["θ"] .. "ώσ"		args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ"] .. "ώσ"		args['γδ-θηλ'] = "αιν"
-- neu
	args['οεθ-ουδ'] = stem["θ"] .. 'ῶν'		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"] .. "ῶντ"	args['γε-ουδ'] = "ος"								-- same as masc
	args['δεθ-ουδ'] = stem["θ"] .. "ῶντ"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"		-- same as masc
	args['αεθ-ουδ'] = stem["θ"] .. "ῶν"		args['αε-ουδ'] = "0"									-- same as nom
	args['κεθ-ουδ'] = stem["θ"] .. "ῶν"		args['κε-ουδ'] = "0"									-- same as nom
	args['οπθ-ουδ'] = stem["θ"] .. "ῶντ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ"] .. "ώντ"	args['γπ-ουδ'] = "ων"								-- same as masc
	args['δπθ-ουδ'] = stem["θ"] .. "ῶ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"		-- same as masc
	args['απθ-ουδ'] = stem["θ"] .. "ῶντ"	args['απ-ουδ'] = "α"	args['απ+-ουδ'] = "ᾰ"		-- same as nom
	args['κπθ-ουδ'] = stem["θ"] .. "ῶντ"	args['κπ-ουδ'] = "α"	args['κπ+-ουδ'] = "ᾰ"		-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. "ῶντ"	args['οδ-ουδ'] = "ε"								-- same as masc
	args['γδθ-ουδ'] = stem["θ"] .. "ώντ"	args['γδ-ουδ'] = "οιν"								-- same as masc
return decl(args)
end	


-- =================== 3η ΜΕΤΟΧΕΣ  [[φυγών]]-οῦσᾰ-όν ============================== --
-- ἑκών, ἑκοῦσα, ἑκόν = επίθετο
-- η ΜΟΝΗ διαφορά με το #διδούς είναι στην ονομαστική
export['φυγών'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'φυγών']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

-- lemma
	local lemma = args['λήμμα'] or ''
	PAGENAME = mw.title.getCurrentTitle().text
	if lemma  == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" ) 
		else lemma = args['λήμμα']
	end
-- stem
    local stem = {}
-- deufault stem, minus 2 letters from the end.
	stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)		-- φυγ-ών minuw 2 letters from end, stemnumber = 3
	
    args['κλίση'] = '3'
    if args['λήμμα'] == 'ἑκών' then
		args['μέρος λόγου'] = 'Επίθετα'
		args['κατηγορία κλίσης'] = 'ἑκών'
		args['τύπος'] = 'ἑκών'
		args['όπως'] = 'ἑκών'
		args['κατηγ0'] = 'Λέξεις οξύτονες'
		args['κατηγ01'] = 'Επίθετα οξύτονα'
	else
		args['μέρος λόγου'] = 'Μετοχές'
		args['κατηγορία κλίσης'] = 'φυγών'
	    args['τύπος'] = 'φυγών'
	    args['όπως'] = 'φυγών'
	    args['κατηγ0'] = 'Λέξεις οξύτονες'
	  	args['κατηγ01'] = 'Μετοχές οξύτονες'

-- ! υπάρχουν και ενεστώτα όπως [[ἐπιών]] κλπ. Ο καθορισμός πρέπει να γίνεται από αλλού
--		args['κατηγ2'] = 'Μετοχές ενεργητικού αορίστου'
	end
args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = stem["θ"]				args['οε-αρσ'] = "ών"
	args['γεθ-αρσ'] = stem["θ"] .. "όντ"	args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = stem["θ"] .. "όντ"	args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = stem["θ"] .. "όντ"	args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = stem["θ"]				args['κε-αρσ'] = "ών"								-- same as nom
	args['οπθ-αρσ'] = stem["θ"] .. "όντ"	args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = stem["θ"] .. "όντ"	args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = stem["θ"] .. "οῦ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = stem["θ"] .. "όντ"	args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = stem["θ"] .. "όντ"	args['κπ-αρσ'] = "ες"								-- same as nom
	args['οδθ-αρσ'] = stem["θ"] .. "όντ"	args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = stem["θ"]	.. "όντ"	args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = stem["θ"] .. "οῦσ"	args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = stem["θ"] .. "ούσ"	args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = stem["θ"] .. "ούσ"	args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = stem["θ"] .. "ούσ"	args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = stem["θ"] .. "οῦσ"	args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"		-- same as nom
	args['οπθ-θηλ'] = stem["θ"] .. "οῦσ"	args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = stem["θ"] .. "ουσ"	args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = stem["θ"] .. "ούσ"	args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = stem["θ"] .. "ούσ"	args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = stem["θ"] .. "οῦσ"	args['κπ-θηλ'] = "αι"								-- same as nom
	args['οδθ-θηλ'] = stem["θ"] .. "ούσ"	args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = stem["θ"] .. "ούσ"	args['γδ-θηλ'] = "αιν"
-- neu
	args['οεθ-ουδ'] = stem["θ"] .. "όν"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = stem["θ"] .. "όντ"	args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = stem["θ"] .. "όντ"	args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"		-- same as masc
	args['αεθ-ουδ'] = stem["θ"] .. "όν"		args['αε-ουδ'] = "0"	-- same as nom
	args['κεθ-ουδ'] = stem["θ"] .. "όν"		args['κε-ουδ'] = "0"	-- same as nom
	args['οπθ-ουδ'] = stem["θ"] .. "όντ"	args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = stem["θ"] .. "όντ"	args['γπ-ουδ'] = "ων"								-- same as masc
	args['δπθ-ουδ'] = stem["θ"] .. "οῦ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"		-- same as masc
	args['απθ-ουδ'] = stem["θ"] .. "όντ"	args['απ-ουδ'] = "α"	args['απ-ουδ'] = "ᾰ"		-- same as nom
	args['κπθ-ουδ'] = stem["θ"] .. "όντ"	args['κπ-ουδ'] = "α"	args['κπ-ουδ'] = "ᾰ"		-- same as nom
	args['οδθ-ουδ'] = stem["θ"] .. "όντ"	args['οδ-ουδ'] = "ε"								-- same as masc
	args['γδθ-ουδ'] = stem["θ"]	.. "όντ"	args['γδ-ουδ'] = "οιν"								-- same as masc
return decl(args)
end	



-- =================== 3η ΜΕΤΟΧΕΣ  [[ὤν]] οὖσα ὄν ============================== --
-- μοναδικό
export['ων'] = function(frame)		-- [[Πρότυπο:grc-κλίση-'ων']] 
    local args = frame:getParent().args		-- for Templates
--    local args = frame.args					-- to invoke

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

    args['κλίση'] = '3'
		args['μέρος λόγου'] = 'Μετοχές'
		args['κατηγορία κλίσης'] = 'ὤν'
	    args['τύπος'] = 'ὤν'
	    args['όπως'] = 'ὤν'
	    args['κατηγ0'] = 'Λέξεις οξύτονες'
		args['κατηγ01'] = 'Μετοχές οξύτονες'

args['ν'] = '1'	-- +ν στις δοτικές αρσ, ουδ +movable n at mast.dat.pl and neu.dat.pl.
-- masc
	args['οεθ-αρσ'] = "ὤν"		args['οε-αρσ'] = "0"
	args['γεθ-αρσ'] = "ὄντ"		args['γε-αρσ'] = "ος"
	args['δεθ-αρσ'] = "ὄντ"		args['δε-αρσ'] = "ι"	args['δε+-αρσ'] = "ῐ"
	args['αεθ-αρσ'] = "ὄντ"		args['αε-αρσ'] = "α"	args['αε+-αρσ'] = "ᾰ"
	args['κεθ-αρσ'] = "ὤν"		args['κε-αρσ'] = "0"
	args['οπθ-αρσ'] = "ὄντ"		args['οπ-αρσ'] = "ες"
	args['γπθ-αρσ'] = "ὄντ"		args['γπ-αρσ'] = "ων"
	args['δπθ-αρσ'] = "οὖ"		args['δπ-αρσ'] = "σι"	args['δπ+-αρσ'] = "σῐ"
	args['απθ-αρσ'] = "ὄντ"		args['απ-αρσ'] = "ας"	args['απ+-αρσ'] = "ᾰς"
	args['κπθ-αρσ'] = "ὄντ"		args['κπ-αρσ'] = "ες"
	args['οδθ-αρσ'] = "ὄντ"		args['οδ-αρσ'] = "ε"
	args['γδθ-αρσ'] = "ὄντ"		args['γδ-αρσ'] = "οιν"
-- fem
	args['οεθ-θηλ'] = "οὖσ"		args['οε-θηλ'] = "α"	args['οε+-θηλ'] = "ᾰ"
	args['γεθ-θηλ'] = "οὔσ"		args['γε-θηλ'] = "ης"
	args['δεθ-θηλ'] = "οὔσ"		args['δε-θηλ'] = "ῃ"
	args['αεθ-θηλ'] = "οὖσ"		args['αε-θηλ'] = "αν"	args['αε+-θηλ'] = "ᾰν"
	args['κεθ-θηλ'] = "οὖσ"		args['κε-θηλ'] = "α"	args['κε+-θηλ'] = "ᾰ"
	args['οπθ-θηλ'] = "οὖσ"		args['οπ-θηλ'] = "αι"
	args['γπθ-θηλ'] = "οὐσ"		args['γπ-θηλ'] = "ῶν"
	args['δπθ-θηλ'] = "οὔσ"		args['δπ-θηλ'] = "αις"
	args['απθ-θηλ'] = "οὔσ"		args['απ-θηλ'] = "ας"	args['απ+-θηλ'] = "ᾱς"
	args['κπθ-θηλ'] = "οὖσ"		args['κπ-θηλ'] = "αι"
	args['οδθ-θηλ'] = "οὔσ"		args['οδ-θηλ'] = "α"	args['οδ+-θηλ'] = "ᾱ"
	args['γδθ-θηλ'] = "οὔσ"		args['γδ-θηλ'] = "αιν"
-- neu
	args['οεθ-ουδ'] = "ὄν"		args['οε-ουδ'] = "0"
	args['γεθ-ουδ'] = "ὄντ"		args['γε-ουδ'] = "ος"
	args['δεθ-ουδ'] = "ὄντ"		args['δε-ουδ'] = "ι"	args['δε+-ουδ'] = "ῐ"
	args['αεθ-ουδ'] = "ὄν"		args['αε-ουδ'] = "0"
	args['κεθ-ουδ'] = "ὄν"		args['κε-ουδ'] = "0"
	args['οπθ-ουδ'] = "ὄντ"		args['οπ-ουδ'] = "α"	args['οπ+-ουδ'] = "ᾰ"
	args['γπθ-ουδ'] = "ὄντ"		args['γπ-ουδ'] = "ων"
	args['δπθ-ουδ'] = "οὖ"		args['δπ-ουδ'] = "σι"	args['δπ+-ουδ'] = "σῐ"
	args['απθ-ουδ'] = "ὄντ"		args['απ-ουδ'] = "α"	args['απ-ουδ'] = "ᾰ"
	args['κπθ-ουδ'] = "ὄντ"		args['κπ-ουδ'] = "α"	args['κπ-ουδ'] = "ᾰ"
	args['οδθ-ουδ'] = "ὄντ"		args['οδ-ουδ'] = "ε"
	args['γδθ-ουδ'] = "ὄντ"		args['γδ-ουδ'] = "οιν"
return decl(args)
end	


return export