Module:grc-adj-decl/3
Module:grc-adj-decl : param : 2κλιτα - 3κλιτα : τεκμηρίωση
Κατηγορία:Πρότυπα κλίσης επιθέτων και μετοχών (αρχαία ελληνικά) - Κατηγορία:Έλεγχος κλίσης
Παράρτημα:Επίθετα και μετοχές (αρχαία ελληνικά) : 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;">Προσοχή στο ουδέτερο! Εξετάστε αν χρειάζεται η {{grc-κλίση-'μείζων'}} ή η {{grc-κλίση-'βελτίων'}}</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;">Προσοχή στο ουδέτερο! Εξετάστε αν χρειάζεται η {{grc-κλίση-'σώφρων'}} ή η {{grc-κλίση-'ευδαίμων'}}</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 §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;">Προσοχή στο ουδέτερο! Εξετάστε αν χρειάζεται η {{grc-κλίση-'μείζων'}} ή η {{grc-κλίση-'βελτίων'}}</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;">Προσοχή στο ουδέτερο! Εξετάστε αν χρειάζεται η {{grc-κλίση-'συνήθης'}} ή η {{grc-κλίση-'μανιώδης'}}</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;">Προσοχή στο ουδέτερο! Εξετάστε αν χρειάζεται η {{grc-κλίση-'σώφρων'}} ή η {{grc-κλίση-'ευδαίμων'}}</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 §.305b])'
.. ' και του [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Σταματάκος|του Σταματάκου]] (§.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['οεΛκειμ-ουδ'] = " (" .. 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['αεΛκειμ-ουδ'] = " (" .. create_link(stem["θ"] .."ό" .. "ς", stem_color(stem["θ"]) .. infix_color("ό") .. ending_color("ς")) .. ")"
args['κεθ-ουδ'] = stem["θ"] args['κε-ουδ'] = "ώς" -- same as nom
args['κεΛκειμ-ουδ'] = " (" .. 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