Модуль:grc-nouns-decl/3
Документацію для цього модуля можна створити у Модуль:grc-nouns-decl/3/документація
-- αρχαία ουσιαστικά, 3η κλίση - ancient greek nouns, 3rd declenision 2021.06. Sarri.greek
-- INSTRUCTIONS & help at bottom of [[Module:grc-nouns-decl]] - ΟΔΗΓΙΕΣ στο τέλος της κύριας σελίδας
-- default stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- stemnumber = 3 (μείον 2) minus 2 letters from end
-- but if singular is different from plural (pluralia tanutum) it should be rewritten
-- In general, i rewrite it, to have a clear view of the whole word.
--[=[κατηγ0 = Λέξεις οξύτονες'γ
κατηγ01 = Ουσιαστικά που κλίνονται όπως το ...
υποκατ0 = οξύτονα
υποκατ01 = γένος
υποκατ02 = γένος οξύτονα
υποκατ03 = που κλίνονται όπως η ομάδα 'χχ' αρσενικά/θηλυκά κλπ
υποκατ04 = που κλίνονται όπως η ομάδα 'χχ' προπερισπώμενα κλπ
cat-extra0= Ουσιαστικά που ... (αρχαία ελληνικά)
* monosyllable Template-catchwords, with no accent for easytype. (αλς μην Τρως)
ΠΕΡΙΕΧΟΜΕΝΑ - CONTENTS
α...ω by Template name
* αθήρ, αιδώς, αλιεύς, αλς, άορ, άπαις, άστυ, βασιλεύς+[[Ἀντιοχεύς]], βέλος+βέλος2, βότρυς, βους,
* γάλα, γείτων, γέρων, γίγας, γραύς, γυψ
* δελφίς+δελφίν, δρύς, ηχώ+λεχώ, ήρως, ιδρώς, ιμάς, ιχθύς,
* κανών, κλητήρ+ιχώρ, κόμμι, κόνδυ/νᾶπυ, κτήμα, κτήτωρ, κώδων,
* λάτρις, μονόδους, ναυς, νεοθήξ+απορρώξ, Ξενοφών,
* οδούς, πατρίς, ΣΥΝΗΡΗΜΕΝΟΠερικλέης-Περικλής, ποιμήν, πόλις, προβλής, πρόπους,
* σίναπι, στίμμι, Σωκράτης, Τρώς, υἱύς,
* φύλαξ, χειμών, χθών, χούς, χρέος
* BUG capital+spirit #3πόλις, #3βέλος, #3φύλαξ see [[Ἄλπεις]] Άρτεμις,
Οι εξαιρέσεις των μονοσύλλαβων monosyllable exceptions at page /4
Συγκοπτόμενα (πατήρ ἀνήρ κλπ) at page /4
Τα κρέας, πέρα, γέρας κλπ at page /4
Το φως, στα ανώμαλα /4
ΕΚΚΡΕΜΟΤΗΤΕΣ
* Τι είναι το ὁ [[κῖς]]], τὸν κῖν, ὦ κῖ, τοὺς κῖς κάτω κάτω στο http://ebooks.edu.gr/ebooks/v/html/8547/2340/Grammatiki-Archaias-Ellinikis_Gymnasiou-Lykeiou_html-apli/index_02_06.html
@LSJ μόνο με οξεία https://logeion.uchicago.edu/κίς
* ? [[χοῦς]] να ελεγχθεί
* ?? τι είναι το αἰδώς, όος-οῦς (ἡ)? έχει μτγν πλ αἰδοί που το βάζω με +υπότιτλος-πλ
* Βίκτωρ-ωρος πραίτωρ-ωρος ΜΟΝΟ μονοθεματικό.
* [[σίναπυ]]-ῠος plural?
-ις-εως&ιος ΕΚΚΡΕΜΟΤΗΤΑ μνῆστις
-ις-εως&ιος&ιδος ΕΚΚΡΕΜΟΤΗΤΑ τίγρις σεμίδαλις
-ις-ιδος&ιος #Πάρις ΕΚΚΡΕΜΟΤΗΤΑ
-ις-ιος&ιδος Σῖρις ΕΚΚΡΕΜΟΤΗΤΑ
-ον-οντος ΕΚΚΡΕΜΟΤΗΤΑ μέλλον, μέλλοντα ουσιαστικοποιημένη μετοχή
-ός-ότος #συμβεβηκός ΕΚΚΡΕΜΟΤΗΤΑ ουσιαστικοποιημένη μετοχή
]=]--
export = {}
m_4 = require("Module:grc-nouns-decl/4") -- irregular and special declensions follow
-- Α @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'αθήρ']] @@@@@@@@@@@@@@@@@@@@@@@@
-- μόνο 3-4 αρσενικά, το αστήρ, με εξαίρεση στη δοτική Το [[ἀήρ]] μόνο στον ενικό.
-- αἰθήρ αρσενικό ή θηλ α-θ=1
-- ================= 3η κλίση [[ἀθήρ]]-έρος =========== --
-- Υγρόληκτα διπλόθεμα ακατάληκτα σε -ὴρ -έρος stems ἀθηρ- ἀθερ-
export['ἀθήρ'] = function(frame) -- [[Πρότυπο:grc-κλίση-'αθήρ']]
local args = frame:getParent().args
-- 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'
--gender = see below
args['κατηγορία κλίσης'] = 'ἀθήρ'
args['όπως'] = 'ἀθήρ'
args['τύπος'] = 'ἀθήρ'
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- ἀθ-έρες minus 4 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
-- never mind other genders...
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἀθήρ' αρσενικά"
else -- in singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- ἀθ-ήρ minus 2 letters from end
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['α-θ'] == '1' then -- [[αἰθήρ]]
args['υποκατ02'] = 'αρσενικά οξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἀθήρ' αρσενικά ή θηλυκά"
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἀθήρ' αρσενικά"
end
end
args['mod-οεθ'] = stem["θ"] .. "ήρ" args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ"] .. "έρ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "έρ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "έρ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] .. "ήρ" args['mod-κε'] = "0" -- same as nom
args['mod-οπθ'] = stem["θ"] .. "έρ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "έρ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "έρ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "έρ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "έρ" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "έρ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "έρ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Α @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'αιδώς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[αἰδώς]] =========== -- θέματα ἠχω- ἠχο-
-- ΕΚΚΡΕΜΟΤΗΤΑ -- ?? τι είναι το αἰδώς, όος-οῦς (ἡ)? έχει μτγν πλ αἰδοί που το βάζω με +υπότιτλος-πλ
-- τι κλίση είναι?? Ανώμαλα?? συνηρημένο αττικό? Μήπως υπάρχουν και full πληθυντικό??
-- https://logeion.uchicago.edu/αἰδώς DGE has dat φιλότητι καὶ αἰδοῖ φωτὸς
-- accusative τὴν ἐμὴν αἰδῶ
-- voc??? I presume = nominative
export['αἰδώς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'αιδώς']]
local args = frame:getParent().args
-- 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 -- different from default. All stems must be written.
local stem = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- αἰδ-ώς minus 2 letterw from end, stemnumber = 3
args['κλίση'] = '3'
args['θηλ'] = '1'
args['κατηγορία κλίσης'] = 'αἰδώς'
args['τύπος'] = 'αἰδώς'
args['όπως'] = 'αἰδώς'
-- ?? μονο με ενικό? (βλ. υπότιτλος-πλ για αἰδοί, later form)
-- posssible addition of hellenistic plurals at 2nd column!!
if args['υπότιτλος-πλ'] ~= '' and args['υπότιτλος-πλ'] ~= nil then
args['εξ'] = '1'
args['δυ'] = '-' -- get rid of dual
if args['αοπ'] ~= '' and args['αοπ'] ~= nil then args['αοπ'] = args['αοπ'] else args['αοπ'] = "-" end
if args['αγπ'] ~= '' and args['αγπ'] ~= nil then args['αγπ'] = args['αγπ'] else args['αγπ'] = "-" end
if args['αδπ'] ~= '' and args['αδπ'] ~= nil then args['αδπ'] = args['αγπ'] else args['αδπ'] = "-" end
if args['ααπ'] ~= '' and args['ααπ'] ~= nil then args['ααπ'] = args['ααπ'] else args['ααπ'] = "-" end
else
args['α'] = 'εν'
args['sg-default'] = '1' -- SUPPRESS Cat όπως 'ΧΧ' χωρίς πληθυντικό
end
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
args['υποκατ02'] = 'θηλυκά οξύτονα'
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ώς"
args['mod-γεθ'] = stem["θ"] .. "ό" args['mod-γε'] = "ος"
args['mod-γε2θ'] = stem["θ"] args['mod-γε2'] = "οῦς"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "οῖ"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "ῶ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "ώς"
return decl(args)
end
-- Α @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'αλιεύς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- EXTERNAL_LINK
--##### need ionic decl too
-- ================= 3η κλίση ΕΥΣ-έως [[ἁλιεύς]] =========== -- like βασιλεύς but with uncontraced+contracted
-- f.linkcontrol used here
-- 3η κλίση ευ http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D26
export['ἁλιεύς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'αλιεύς']] -- alias ἁλιεύς
local args = frame:getParent().args
-- 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 -- different from default. All stems must be written.
local stem = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- βασιλ minus 3 letters from end
args['κλίση'] = '3'
args['αρσ'] = '1'
args['ομάδα'] = 'βασιλεύς'
args['κατηγορία κλίσης'] = 'ἁλιεύς'
args['τύπος'] = 'ἁλιεύς'
args['όπως'] = 'ἁλιεύς'
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- ἁλιεῖς
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
args['υποκατ02'] = 'αρσενικά περισπώμενα'
else -- ἁλιεύς
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
if args['α'] == "εν" or args['α2'] == "εν" then
args['σημ'] = 'Κλίνεται όπως το <b>[[βασιλεύς#Αρχαία ελληνικά (grc)|βασιλεύς]]</b> με επιπλέον συνηρημένους τύπους.'
elseif args['α'] == "ενδ" or args['α2'] == "ενδ" then
args['σημ'] = 'Κλίνεται όπως το <b>[[βασιλεύς#Αρχαία ελληνικά (grc)|βασιλεύς]]</b> με επιπλέον συνηρημένους τύπους.'
.. '<br><sup>1</sup> όπως [http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D26 στη Γραμματική] του [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Smyth|Smyth]]'
.. '<br><sup>2</sup> όπως [http://ebooks.edu.gr/ebooks/v/html/8547/2340/Grammatiki-Archaias-Ellinikis_Gymnasiou-Lykeiou_html-apli/index_02_06.html στη Γραμματική Γυμνασίου-Λυκείου] [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Οικονόμου|Οικονόμου]].'
elseif args['α'] == "πλ" or args['α2'] == "πλ"
or args['δυ'] == '-' then
args['σημ'] = 'Κλίνεται όπως το <b>[[βασιλεύς#Αρχαία ελληνικά (grc)|βασιλεύς]]</b> με επιπλέον συνηρημένους τύπους.'
.. '<br>* <i>[[αττική διάλεκτος|αττικός]] τύπος</i>'
elseif args['σημ'] == '-'
then -- check [[Τυφωεύς]]
args['σημ'] = ''
else
args['σημ'] = 'Κλίνεται όπως το <b>[[βασιλεύς#Αρχαία ελληνικά (grc)|βασιλεύς]]</b> με επιπλέον συνηρημένους τύπους.'
.. '<br>* <i>[[αττική διάλεκτος|αττικός]] τύπος</i><br><sup>1</sup> όπως [http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D26 στη Γραμματική] του [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Smyth|Smyth]]'
.. '<br><sup>2</sup> όπως [http://ebooks.edu.gr/ebooks/v/html/8547/2340/Grammatiki-Archaias-Ellinikis_Gymnasiou-Lykeiou_html-apli/index_02_06.html στη Γραμματική Γυμνασίου-Λυκείου] [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Οικονόμου|Οικονόμου]].'
end
args['mod-οεθ'] = stem["θ"] .. "εύ" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "έ" args['mod-γε'] = "ως"
args['mod-γε2θ'] = stem["θ"] args['mod-γε2'] = "ῶς"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "εῖ"
args['mod-αεθ'] = stem["θ"] .. "έ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾱ"
args['mod-αε2θ'] = stem["θ"] args['mod-αε2'] = "ᾶ"
args['mod-κεθ'] = stem["θ"] .. "εῦ" args['mod-κε'] = "0"
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "εῖς" args['οπΛκειμ'] = ' - ' .. linkcontrol2(stem["θ"], "ῆς") .. '*'
args['mod-γπθ'] = stem["θ"] .. "έ" args['mod-γπ'] = "ων"
args['mod-γπ2θ'] = stem["θ"] args['mod-γπ2'] = "ῶν"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "εῦ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "έ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾱς"
args['mod-απ2θ'] = stem["θ"] args['mod-απ2'] = "ᾶς"
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "εῖς" args['κπΛκειμ'] = ' - ' .. linkcontrol2(stem["θ"], "ῆς") .. '*' -- as in nominative plural
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "ῆ" args['οδΛκειμ'] = '<sup><small>1</small></sup> ή ' .. linkcontrol2(stem["θ"], "εῖ") .. '<sup><small>2</small></sup>'
args['mod-γδθ'] = stem["θ"] .. "έ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Α @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'αλς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[ἅλς]] =========== --
-- φωνηεντόληκτα μονόθεμα καταληκτικά ουδέτερα οξύτονα μονοσύλλαβα σε [[Τρώς]] ώς -ωός
-- + ἡ ἅλς NO PLURAL found ++ ὁ ἅλς, οἱ ἅλες dat. pl. ἅλασιν -- DO SEPARATELY
-- Tzartzanos 86.Σημείωσις 2. ῾Υγρόληκτον μὲ χαρακτῆρα λεἶναι μόνον ὁ ἅλς ( τοῦ ἁλός , τῷ ἁλί , τὸν ἅλα , ὦ ἅλς - οἱ ἅλες , τῶν ἁλῶν , τοῖς ἁλσί , τοὺς ἅλαςκτλ.).
-- Smyth 267. Stems in ωϝ http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D24
-- Smtyh 252 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D15
-- gen. dual οῖν as excpected
export['ἅλς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'αλς']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- ἅλ-ες minus 2 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἅλς' θηλυκά"
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἅλς' αρσενικά"
end
else -- in singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- ἅλ-ς minus 1 letter from end
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά οξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἅλς' θηλυκά"
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἅλς' αρσενικά"
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- ἁλ-ός remove accent
args['κλίση'] = '3'
-- gender see above
args['κατηγορία κλίσης'] = 'ἅλς'
args['όπως'] = 'ἅλς'
args['τύπος'] = 'ἅλς'
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ0"] args['mod-γε'] = "ός"
args['mod-δεθ'] = stem["θ0"] args['mod-δε'] = "ί" args['mod-δε+'] = "ῐ́"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "ς" -- same as nom
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ0"] args['mod-γπ'] = "ῶν"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ0"] args['mod-δπ'] = "σί" args['mod-δπ+'] = "σῐ́"
args['ν2'] = '1'
args['mod-δπ2θ'] = stem["θ"] .. "α" args['mod-δπ2'] = "σι" args['mod-δπ2+'] = "σῐ"
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ0"] args['mod-γδ'] = "οῖν"
return decl(args)
end
-- Α @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'άπαις']] @@@@@@@@@@@@@@@@@@@@@@@@
-- separating it from #φύλαξ
-- ================= [[ἄπαις]] 3η κλίση ΒΑΡΥΤΟΝΑ αφωνόληκτα τύπου φύλαξ =========== --
-- compound of [[παίς]], declines like that.
export['άπαις'] = function(frame) -- [[Πρότυπο:grc-κλίση-'άπαις']]
local args = frame:getParent().args
-- 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
-- add it manually at Κατηγορία:Ουσιαστικά αφωνόληκτα βαρύτονα
args['κλίση'] = '3'
args['κατηγορία κλίσης'] = 'ἄπαις'
args['τύπος'] = 'ἄπαις'
args['όπως'] = 'ἄπαις'
-- gender, normally αθ common -- see below AFTER τύπος is defined
-- stem
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- ἄ-παι-δες minus 3 letters from end, stemnumber = 4
args['κατηγ'] = 'Λέξεις προπαροξύτονες'
args['υποκατ0'] = 'προπαροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ01'] = 'θηλυκά'
args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἄπαις' θηλυκά"
elseif args['αρσ'] == '1' then
args['υποκατ01'] = 'αρσενικά'
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἄπαις' αρσενικά"
else
args['αθ'] = '1'
args['υποκατ01'] = 'κοινού γένους'
args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἄπαις' κοινού γένους"
end
else -- in singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- ἄ-παι-ς minus 1 letter from end, stemnuber = 2
args['κατηγ'] = 'Λέξεις παροξύτονες'
args['υποκατ0'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ01'] = 'θηλυκά'
args['υποκατ02'] = 'θηλυκά παροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἄπαις' θηλυκά"
elseif args['αρσ'] == '1' then
args['υποκατ01'] = 'αρσενικά'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἄπαις' αρσενικά"
else
args['αθ'] = '1'
args['υποκατ01'] = 'κοινού γένους'
args['υποκατ02'] = 'κοινού γένους παροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἄπαις' κοινού γένους"
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- remove accent απαιδ-
stem["θ1"] = m_stems.word1(stem["θ0"]) -- put OKSEIA at the last syllable from end of atono
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "δ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "δ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "δ" args['mod-αε'] = "α" args['mod-δε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0" -- ω άπαι!
args['mod-οπθ'] = stem["θ"] .. "δ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ1"] .. "δ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "δ" args['mod-απ'] = "ας" args['mod-απ'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "δ" args['mod-κπ'] = "ες" -- same as nom.pl
args['mod-οδθ'] = stem["θ"] .. "δ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ1"] .. "δ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Α @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'άστυ']] @@@@@@@@@@@@@@@@@@@@@@@@
-- βλ. και #στίμμι, -ιος-εως-ιδος
-- ουδέτερα, αντίστοιχη κλίση του πόλις + [[σῶρυ]]
-- check if there are capitals -- are there proparoxytones?
-- also see κόμμι & σίναπι DOING THEM SEPARATELY, because at pluralia, there is a problem of typos
-- ======================= 3η κλίση [[ἄστυ]] [[σῶρυ]] ===================================== --
-- 3η κλίση φωνηεντόληκτα καταληκτικά διπλόθεμα ουδέτ. σε -ῠ (γεν. -εως)
-- 268 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D25
-- Ionic, Doric, and Aeolic have the open forms πήχεες, ἄστεϊ, ἄστεα; in the gen. sing. -ος, never -ως (πήχεος, ἄστεος
-- archive decl άστυ has 2n plurals (άστεα) in parenthesis
-- no stress shift
export['ἄστυ'] = function(frame) -- [[Πρότυπο:grc-κλίση-'άστυ']]
local args = frame:getParent().args
-- 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['br'] = 'dash'
args['κλίση'] = '3'
args['ουδ'] = '1'
-- κατηγορία κλίσης κλπ, βλ. below
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
if mw.ustring.find(args['λήμμα'], 'η$') then
-- ??? κόμμι? κόμη, εα editor would have to define type?
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- ἄστ-η stemnumber = 2 (μείον 1)
args['τύπος'] = 'ἄστυ'
args['όπως'] = 'ἄστυ'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
elseif mw.ustring.find(args['λήμμα'], 'εα$') then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- ἄστ-εα stemnumber = 3 (μείον 2)
args['τύπος'] = 'ἄστυ'
args['όπως'] = 'ἄστυ'
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- ἄστ-υ σῶρ-υ κόμμ-ι
-- ῐ ῠ
if mw.ustring.find(args['λήμμα'], 'ι$') then -- ends with ι (what about pluralia?? ## hope there are none)
args['χαρ'] = "ι" args['χαρ+'] = "ῐ"
args['κατηγορία κλίσης'] = 'κόμμι'
args['τύπος'] = 'κόμμι'
-- PERISPOMENA like [[σῶρι]]
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) then -- vowel+perispomeni
args['όπως'] = 'σῶρι'
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
args['υποκατ02'] = 'ουδέτερα προπερισπώμενα'
args['υποκατ03'] = "που κλίνονται όπως το 'κόμμι' περισπώμενα"
else -- NO persipomeni
args['όπως'] = 'κόμμι'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'κόμμι' παροξύτονα"
end
-- υ
elseif mw.ustring.find(args['λήμμα'], 'υ$') then -- ends with υ
args['χαρ'] = "υ" args['χαρ+'] = "ῠ"
args['κατηγορία κλίσης'] = 'ἄστυ'
args['τύπος'] = 'ἄστυ'
-- PERISPOMENA
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) then -- vowel+perispomeni
args['όπως'] = 'σῶρυ'
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
args['υποκατ02'] = 'ουδέτερα προπερισπώμενα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἄστυ' περισπώμενα"
else -- NO persipomeni
args['όπως'] = 'ἄστυ'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἄστυ' παροξύτονα"
end -- close if perispomeni for υ singular
end -- close sinular ῐ ῠ
end -- close numbers
stem["θ0"] = m_stems.word0(stem["θ"]) -- αστ ακαρ
-- stem["θ1"] = m_stems.word1(stem["θ0"]) -- CONTROL CHECK proparoxytones paroxytones
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- σώρ
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
then
stem["θ1οξ"] = stem["θοξ"] -- σώρ
else -- no perispomeni
stem["θ1οξ"] = m_stems.word1(stem["θοξ"]) -- άστ σινάπ (remains as is) ονόμ accent at last syllbable
end
args['mod-οεθ'] = stem["θ"] .. args['χαρ'] args['mod-οεθ+'] = stem["θ"] .. args['χαρ+'] args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ1οξ"] .. "ε" args['mod-γε'] = "ως"
args['mod-δεθ'] = stem["θ1οξ"] args['mod-δε'] = "ει"
args['mod-αεθ'] = stem["θ"] .. args['χαρ'] args['mod-αεθ+'] = stem["θ"] .. args['χαρ+'] args['mod-αε'] = "0"
args['mod-κεθ'] = stem["θ"] .. args['χαρ'] args['mod-κεθ+'] = stem["θ"] .. args['χαρ+'] args['mod-κε'] = "0"
-- ?? add second plurals -εα in parenthesis
args['mod-οπθ'] = stem["θ1οξ"] args['mod-οπ'] = "η"
args['mod-οπ2θ'] = stem["θ1οξ"] .. "ε" args['mod-οπ2'] = "α" args['mod-οπ2+'] = "ᾰ"
args['mod-γπθ'] = stem["θ1οξ"] .. "ε" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ1οξ"] .. "ε" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ1οξ"] args['mod-απ'] = "η" -- same as nom.
args['mod-απ2θ'] = stem["θ1οξ"] .. "ε" args['mod-απ2'] = "α" args['mod-απ2+'] = "ᾰ"
args['mod-κπθ'] = stem["θ1οξ"] args['mod-κπ'] = "η" -- same as nom.
args['mod-κπ2θ'] = stem["θ1οξ"] .. "ε" args['mod-κπ2'] = "α" args['mod-κπ2+'] = "ᾰ"
args['mod-οδθ'] = stem["θ1οξ"] args['mod-οδ'] = "ει"
args['mod-γδθ'] = stem["θ0"] .. "έ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Β @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'βασιλεύς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- PLUS only forms -ει- NO -η- as in [[Ἀντιοχεύς]]
-- EXTERNAL_LINK
-- ================= 3η κλίση ΕΥΣ-έως [[βασιλεύς]] + Αντιοχεύς =========== -- also see ἁλιεύς with uncontraced+contracted
-- f.linkcontrol used here
-- 3η κλίση ευ http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D26
-- http://ebooks.edu.gr/ebooks/v/html/8547/2340/Grammatiki-Archaias-Ellinikis_Gymnasiou-Lykeiou_html-apli/index_02_06.html
-- 117. Όσα φωνηεντόληκτα σε -εὺς έχουν πριν από το -εὺς φωνήεν συναιρούν συνήθως το τελικό ε που απομένει στο θέμα
-- με το ακόλουθο ω και α των καταλήξεων στη γενική και αιτιατική του ενικού
-- και πληθυντικού: (ἁλιεὺς) τοῦ ἁλιέ-ως = ἁλιῶς· τὸν ἁλιέ-α = ἁλιᾶ· τῶν ἁλιέ-ων = ἁλιῶν· τοὺς ἁλιέ-ας =ἁλιᾶς
-- - (ὁ Εὐβοεὺς) τοῦ Εὐβοέ-ως = Εὐβοῶς· τὸν Εὐβοέ-α = Εὐβοᾶ κτλ.
-- a lot of dialectal forms
export['βασιλεύς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'βασιλεύς']]
local args = frame:getParent().args
-- 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 -- different from default. All stems must be written.
local stem = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- βασιλ minus 3 letters from end
args['κλίση'] = '3'
args['αρσ'] = '1'
args['ομάδα'] = 'βασιλεύς'
args['κατηγορία κλίσης'] = 'βασιλεύς' -- βλ. και #αλιεύς
args['τύπος'] = 'βασιλεύς'
args['όπως'] = 'βασιλεύς'
-- annoying
-- mw.addWarning('<b><span style="color:#b22222; font-size:14px;">'
-- .. "Ελέγξτε μήπως χρειάζεται η {{grc-κλίση-'αλιεύς'}} για φωνήεν+εύς </span></b>")
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- βασιλεῖς
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
args['υποκατ02'] = 'αρσενικά περισπώμενα'
else -- βασιλεύς
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
if args['α'] == "εν" or args['α2'] == "εν" then
args['σημ'] = ''
elseif args['α'] == "ενδ" or args['α2'] == "ενδ" then
args['σημ'] = '<sup>1</sup> όπως [http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D26 στη Γραμματική] του [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Smyth|Smyth]]'
.. '<br><sup>2</sup> όπως [http://ebooks.edu.gr/ebooks/v/html/8547/2340/Grammatiki-Archaias-Ellinikis_Gymnasiou-Lykeiou_html-apli/index_02_06.html στη Γραμματική Γυμνασίου-Λυκείου] [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Οικονόμου|Οικονόμου]].'
elseif args['α'] == "πλ" or args['α2'] == "πλ"
or args['δυ'] == '-' then
args['σημ'] = '* <i>[[αττική διάλεκτος|αττικός]] τύπος</i>.'
elseif args['σημ'] == '-'
then -- check [[Τυφωεύς]]
args['σημ'] = ''
else
args['σημ'] = '* <i>[[αττική διάλεκτος|αττικός]] τύπος</i><br><sup>1</sup> όπως [http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D26 στη Γραμματική] του [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Smyth|Smyth]]'
.. '<br><sup>2</sup> όπως [http://ebooks.edu.gr/ebooks/v/html/8547/2340/Grammatiki-Archaias-Ellinikis_Gymnasiou-Lykeiou_html-apli/index_02_06.html στη Γραμματική Γυμνασίου-Λυκείου] [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Οικονόμου|Οικονόμου]].'
end
args['mod-οεθ'] = stem["θ"] .. "εύ" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "έ" args['mod-γε'] = "ως"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "εῖ"
args['mod-αεθ'] = stem["θ"] .. "έ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾱ"
args['mod-κεθ'] = stem["θ"] .. "εῦ" args['mod-κε'] = "0"
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "εῖς" args['οπΛκειμ'] = ' - ' .. linkcontrol2(stem["θ"], "ῆς") .. '*'
args['mod-γπθ'] = stem["θ"] .. "έ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "εῦ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "έ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾱς"
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "εῖς" args['κπΛκειμ'] = ' - ' .. linkcontrol2(stem["θ"], "ῆς") .. '*' -- as in nominative plural
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "ῆ" args['οδΛκειμ'] = '<sup><small>1</small></sup> ή ' .. linkcontrol2(stem["θ"], "εῖ") .. '<sup><small>2</small></sup>'
args['mod-γδθ'] = stem["θ"] .. "έ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- +++++++++++++ [[Πρότυπο:Αντιοχεύς]] IF dictionary does not say plural -ής
export['Αντιοχεύς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'Αντιοχεύς']]
local args = frame:getParent().args
-- 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 -- different from default. All stems must be written.
local stem = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- Αντιοχ-εύς minus 3 letters from end
args['κλίση'] = '3'
args['αρσ'] = '1'
args['ομάδα'] = 'βασιλεύς'
args['κατηγορία κλίσης'] = 'Ἀντιοχεύς' -- βλ. και βασιλεύς & #αλιεύς
args['τύπος'] = 'Ἀντιοχεύς'
args['όπως'] = 'Ἀντιοχεύς'
if args['α'] == "εν" or args['α2'] == "εν" then
args['σημ'] = ''
elseif args['α'] == "ενδ" or args['α2'] == "ενδ" then
args['σημ'] = ''
elseif args['α'] == "πλ" or args['α2'] == "πλ"
or args['δυ'] == '-' then
args['σημ'] = "Δεν καταγράφονται καταλήξεις πληθυντικού σε -ῆς."
elseif args['σημ'] == '-'
then -- check [[Τυφωεύς]]
args['σημ'] = ''
else
args['σημ'] = "Δεν καταγράφονται καταλήξεις πληθυντικού σε -ῆς."
end
-- annoying
-- mw.addWarning('<b><span style="color:#b22222; font-size:14px;">'
-- .. "Ελέγξτε μήπως χρειάζεται η {{grc-κλίση-'αλιεύς'}} για φωνήεν+εύς </span></b>")
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- Ἀντιοχεῖς
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
args['υποκατ02'] = 'αρσενικά περισπώμενα'
else -- Ἀντιοχεύς
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
args['mod-οεθ'] = stem["θ"] .. "εύ" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "έ" args['mod-γε'] = "ως"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "εῖ"
args['mod-αεθ'] = stem["θ"] .. "έ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾱ"
args['mod-κεθ'] = stem["θ"] .. "εῦ" args['mod-κε'] = "0"
-- simple plural NOT FOUNT -ῆς
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "εῖς"
args['mod-γπθ'] = stem["θ"] .. "έ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "εῦ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "έ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾱς"
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "εῖς" -- as in nominative plural
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "ῆ"
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "εῖ"
args['mod-γδθ'] = stem["θ"] .. "έ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Β @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'βέλος']] [[Πρότυπο:grc-κλίση-'βέλος2']] @@@@@@@@@@@@@@@@@@@@@@@@
-- EDITOR_MUST_DEFINE pluralia: τύπος=
-- bug at [[Ἄργος]] (makes genitive A psile) for βέλος I need steady θ For σκεύος i need θ1ο For στέλεχος i need θ1 chekc BUG capital at πλάγιες πτώσεις
-- when i rewrite the suffix |γε=ους}} it is OK!
-- THE PROBLEM IS: it reads capitals+diacritics as TWO syllables, so, it gives proparoxytone
-- group -εσ stems +DECL βέλος2 WITHOUT the uncontracted
-- ======================= 3η κλίση [[βέλος]] [[στέλεχος]]===================================== --
-- 3η κλίση ουδέτερα σιγμόληκτα βελεσ- εδαφεσ- Need editor to define ambiguous dichrona
-- http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D22
-- EXCEPTIONS: δέος (ε+εσ contracs) // βλ. κλίση χρέος / ἄνθος see DECL βέλος2
export['βέλος'] = function(frame) -- [[Πρότυπο:grc-κλίση-'βέλος']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
-- BUG Ἄργος capitals+spirit+tonos needs different command from PROparoxytones.
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- βέλη σκεύη στελέχη hypothetical Ἄργη
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- override default stemnumber = 3 (μείον 2)
else
-- check [[βέλος]] [[στέλεχος]] [[σκεῦος]] [[Ἄργος]]
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- βελ, σκευ στελεχ
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- σκεύ -- βέλ Ἄργ remain, but στέλεχος needs move to θ1
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) --
-- Ἄργος needs stem["θ1οξ"] = stem["θ"] otherwise, it will not work
-- stem["θ1οξ"] = m_stems.word1(stem["θ"]) -- this does not work for Ἄργος but it works for στέλεχος
-- stem["θ1οξ"] = m_stems.word1(stem["θοξ"]) -- this does not work for Ἄργος but it works for στέλεχος
-- stem["θ1"] = m_stems.word1(stem["θ0"]) -- this does not work for Ἄργος or any polytonic+diacritics on first letter
-- stem["θ2"] = m_stems.word2(stem["θ0"]) -- accent on 2nd syllable from the end
if mw.ustring.find(stem['θ'], '[ἌᾌἊᾊᾊἍᾍἋᾋἜἚἝἛἬᾜἪᾚᾚἭᾝἫᾛἼἺἽἻὌὊὍὋὝὛὬᾬὪᾪᾭὫᾫ]') -- capital+spirit+okseia (varia nevermind)
then
stem["θ1οξ"] = stem["θ"] -- for Ἄργος
-- BUT IF there is a proparoxytone, it DOES NOT WORK
-- if we find one, editor must add προπαροξ=1
elseif mw.ustring.find(stem['θ'], '[ἎᾎἏᾏἮᾞἯᾟἾἿὟὮᾮὯᾯ]') -- capital+spirit+perispomeni
then
stem["θ1οξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- for ? test hypothetical Ἆγος
else
stem["θ1οξ"] = m_stems.word1(stem["θοξ"])
end
args['κλίση'] = '3'
args['ουδ'] = '1'
-- EDITOR_MUST_DEFINE type for pluralia proparoxytones
if (args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ")
then
-- βέλη - σκεύη - στελέχη // βέλεα σκεύεα στελέχεα
-- ############ TODO FIX βέλεα σκεύεα στελέχεα
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
-- !!! editor has to define type it is not obvious what the singular would be
if args['τύπος'] == 'στέλεχος' or args['όπως'] == 'στέλεχος' then
args['κατηγορία κλίσης'] = 'στέλεχος'
args['τύπος'] = 'στέλεχος'
args['όπως'] = 'στέλεχος'
else
args['κατηγορία κλίσης'] = 'βέλος'
args['τύπος'] = 'βέλος'
args['όπως'] = 'βέλος'
args['br'] = 'dash'
end
else -- in singular
if stem["θ"] == stem["θ1οξ"] then -- or args['λήμμα'] == "Ἄργος"
args['κατηγορία κλίσης'] = 'βέλος'
args['τύπος'] = 'βέλος'
args['όπως'] = 'βέλος'
args['br'] = 'dash'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'βέλος' παροξύτονα"
elseif mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
then
args['κατηγορία κλίσης'] = 'βέλος'
args['τύπος'] = 'σκεῦος' -- [[σκεῦος]]
args['όπως'] = 'σκεῦος'
args['br'] = 'dash'
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
args['υποκατ02'] = 'ουδέτερα προπερισπώμενα'
args['υποκατ03'] = "που κλίνονται όπως το 'βέλος' προπερισπώμενα"
else -- στέλεχος
args['κατηγορία κλίσης'] = 'στέλεχος'
args['τύπος'] = 'στέλεχος'
args['όπως'] = 'στέλεχος'
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
end
end
-- Η δίχρονη παραλήγουσα dicrona α ι υ are obvious in singular:
--* τα βραχέα α, ι, υ, οξύνονται
--* τα μακρά α, ι, υ περισπώνται
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ος"
args['mod-γεθ'] = stem["θ1οξ"] args['mod-γε'] = "ους" args['mod-γε2θ'] = stem["θ1οξ"] .. "ε" args['mod-γε2'] = "ος"
args['mod-δεθ'] = stem["θ1οξ"] args['mod-δε'] = "ει" args['mod-δε2θ'] = stem["θ1οξ"] .. "ε" args['mod-δε2'] = "ϊ" args['mod-δε2+'] = "ῐ̈"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = args['mod-οε'] -- same as nom.
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = args['mod-οε'] -- same as nom.
args['mod-οπθ'] = stem["θ1οξ"] args['mod-οπ'] = "η" args['mod-οπ2θ'] = stem["θ1οξ"] .. "ε" args['mod-οπ2'] = "α" args['mod-οπ2+'] = "ᾰ"
args['mod-γπθ'] = stem["θ0"] args['mod-γπ'] = "ῶν" args['mod-γπ2θ'] = stem["θ0"] .. "έ" args['mod-γπ2'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ1οξ"] .. "εσ" args['mod-δπ'] = "ι" args['mod-δπ+'] = "ῐ"
args['mod-απθ'] = args['mod-οπθ'] args['mod-απ'] = args['mod-οπ'] args['mod-απ2θ'] = args['mod-οπ2θ'] args['mod-απ2'] = args['mod-οπ2'] -- same as nom.
args['mod-κπθ'] = args['mod-οπθ'] args['mod-κπ'] = args['mod-οπ'] args['mod-κπ2θ'] = args['mod-οπ2θ'] args['mod-κπ2'] = args['mod-οπ2'] -- same as nom.
args['mod-οδθ'] = stem["θ1οξ"] args['mod-οδ'] = "ει" args['mod-οδ2θ'] = stem["θ1οξ"] .. "ε" args['mod-οδ2'] = "ε"
args['mod-γδθ'] = stem["θ0"] args['mod-γδ'] = "οῖν" args['mod-γδ2θ'] = stem["θ0"] .. "έ" args['mod-γδ2'] = "οιν"
return decl(args)
end
-- =========== WITHOUT the uncontracted
-- [[δέος]] (ε+εσ contracs) / [[ἄνθος]] βλ. και χρέος
export['βέλος2'] = function(frame) -- [[Πρότυπο:grc-κλίση-'βέλος2']] WITHOUT uncontracted gen.sg
local args = frame:getParent().args
-- 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 -- different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- chek [[ἄνθη]]
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- override default stemnumber = 3 (μείον 2)
else
-- check [[ἄνθος]] hypothetical [[Ἄνθος]]
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)
end
stem["θ0"] = m_stems.word0(stem["θ"]) --
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) --
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) --
-- Ἄνθος needs stem["θ1οξ"] = stem["θ"] otherwise, it will not work
if mw.ustring.find(stem['θ'], '[ἌᾌἊᾊᾊἍᾍἋᾋἜἚἝἛἬᾜἪᾚᾚἭᾝἫᾛἼἺἽἻὌὊὍὋὝὛὬᾬὪᾪᾭὫᾫ]') -- capital+sprit+okseia (varia nevermind)
then
stem["θ1οξ"] = stem["θ"] -- for Ἄνθος
-- BUT IF there is a proparoxytone, it DOES NOT WORK
-- if we find one, editor must add προπαροξ=1
elseif mw.ustring.find(stem['θ'], '[ἎᾎἏᾏἮᾞἯᾟἾἿὟὮᾮὯᾯ]') -- capital+spirit+perispomeni
then
stem["θ1οξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- for ? test hypothetical Ἆγος
else
stem["θ1οξ"] = m_stems.word1(stem["θοξ"])
end
args['κλίση'] = '3'
args['ουδ'] = '1'
args['br'] = 'dash'
-- define the proparoxytones
if (args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ")
then
-- -η ### FIX if -εα
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
-- editor has to define type it is not obvious what the singular would be
-- no paroxytones here
if args['τύπος'] == 'στέλεχος' or args['όπως'] == 'στέλεχος' then
args['κατηγορία κλίσης'] = 'στέλεχος'
args['τύπος'] = 'στέλεχος'
args['όπως'] = 'στέλεχος'
else
args['κατηγορία κλίσης'] = 'βέλος'
args['τύπος'] = 'ἄνθος'
args['όπως'] = 'ἄνθος'
end
else -- in singular
if stem["θ"] == stem["θ1οξ"] then
args['κατηγορία κλίσης'] = 'βέλος'
args['τύπος'] = 'ἄνθος'
args['όπως'] = 'ἄνθος'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἄνθος' παροξύτονα"
-- υπάρχουν??
elseif mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
then
args['τύπος'] = '?'
args['όπως'] = '?'
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
args['υποκατ02'] = 'ουδέτερα προπερισπώμενα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἄνθος' προπερισπώμενα"
else -- στέλεχος not needed here
args['κατηγορία κλίσης'] = 'στέλεχος'
args['τύπος'] = 'στέλεχος'
args['όπως'] = 'στέλεχος'
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
end
end
-- Η δίχρονη παραλήγουσα dicrona α ι υ are obvious in singular:
--* τα βραχέα α, ι, υ, οξύνονται
--* τα μακρά α, ι, υ περισπώνται
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ος"
args['mod-γεθ'] = stem["θ1οξ"] args['mod-γε'] = "ους"
args['mod-δεθ'] = stem["θ1οξ"] args['mod-δε'] = "ει"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = args['mod-οε'] -- same as nom.
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = args['mod-οε'] -- same as nom.
args['mod-οπθ'] = stem["θ1οξ"] args['mod-οπ'] = "η"
args['mod-γπθ'] = stem["θ0"] args['mod-γπ'] = "ῶν"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ1οξ"] .. "εσ" args['mod-δπ'] = "ι" args['mod-δπ+'] = "ῐ"
args['mod-απθ'] = args['mod-οπθ'] args['mod-απ'] = args['mod-οπ'] -- same as nom.
args['mod-κπθ'] = args['mod-οπθ'] args['mod-κπ'] = args['mod-οπ'] -- same as nom.
args['mod-οδθ'] = stem["θ1οξ"] args['mod-οδ'] = "ει"
args['mod-γδθ'] = stem["θ0"] args['mod-γδ'] = "οῖν"
return decl(args)
end
-- Β @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'βότρυς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[βότρυς]] =========== --
-- φωνηεντόληκτα μονόθεμα καταληκτικά ουδέτερα παροξύτονα σε -υς -υος
-- αρσ, θηλ ἡ πίτυς // θηλ-αρσ [[Ὄθρυς]] // ουδ = function νᾶπυ
-- Smyth 269.rules http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apage%3D68
-- Smyth 268 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D25
-- θ-α -- [[Ὄθρυς]]
export['βότρυς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'βότρυς']]
local args = frame:getParent().args
-- 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'
-- gender, see below
args['κατηγορία κλίσης'] = 'βότρυς'
args['όπως'] = 'βότρυς'
args['τύπος'] = 'βότρυς'
-- ΝΟΟΟΟΟΟΟΟ args['σημ'] = "Το '''υ''' στις καταλήξεις είναι βραχύ: -ῠς, -υος, ..." / στάχυς has macron
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- βότρυ-ες minus 2 letters from end
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'βότρυς' θηλυκά"
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'βότρυς' αρσενικά"
end
else
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- βότρυ-ς minus 1 letter from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά παροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'βότρυς' θηλυκά"
elseif args['θ-α'] == '1' then -- [[Ὄθρυς]]
args['υποκατ02'] = 'θηλυκά ή αρσενικά παροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'βότρυς' θηλυκά ή αρσενικά"
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'βότρυς' αρσενικά"
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- remove accent
stem["θ1"] = m_stems.word1(stem["θ0"]) -- βοτρύ-ων accent on 1st syllable from the end
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "ϊ" args['mod-δε+'] = "ῐ̈"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "ν"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0"
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ1"] args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "ς" -- but also βότρυᾰς
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "ες"
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "ε" -- same as nom.
args['mod-γδθ'] = stem["θ1"] args['mod-γδ'] = "οιν"
return decl(args)
end
-- Β @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'βοῦς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[βοῦς]] UNIQUE =========== -- βούς βους also see similar χούς
-- 3η κλίση αθ http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D26
-- homeric forms, as note in the lemma, outside the table
export['βοῦς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'βοῦς']]
local args = frame:getParent().args
-- 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 -- different from default. All stems must be written.
local stem = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- β -οῦς/όες minus 3 letters from end
args['κλίση'] = '3'
-- gender, see below
args['κατηγορία κλίσης'] = 'βοῦς'
args['τύπος'] = 'βοῦς'
args['όπως'] = 'βοῦς'
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- βόες
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['αρσ'] == '1' then
args['υποκατ02'] = 'αρσενικά'
args['υποκατ03'] = 'αρσενικά παροξύτονα'
args['υποκατ04'] = "που κλίνονται όπως το 'βοῦς' αρσενικά"
elseif args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά'
args['υποκατ03'] = 'θηλυκά παροξύτονα'
args['υποκατ04'] = "που κλίνονται όπως το 'βοῦς' θηλυκά"
else
args['αθ'] = '1'
args['υποκατ02'] = 'κοινού γένους'
args['υποκατ03'] = 'κοινού γένους παροξύτονα'
args['υποκατ04'] = "που κλίνονται όπως το 'βοῦς' κοινού γένους"
end
else -- singular βοῦς
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
if args['αρσ'] == '1' then
args['υποκατ02'] = 'αρσενικά'
args['υποκατ03'] = 'αρσενικά περισπώμενα'
args['υποκατ04'] = "που κλίνονται όπως το 'βοῦς' αρσενικά"
elseif args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά'
args['υποκατ03'] = 'θηλυκά περισπώμενα'
args['υποκατ04'] = "που κλίνονται όπως το 'βοῦς' θηλυκά"
else
args['αθ'] = '1'
args['υποκατ02'] = 'κοινού γένους'
args['υποκατ03'] = 'κοινού γένους περισπώμενα'
args['υποκατ04'] = "που κλίνονται όπως το 'βοῦς' κοινού γένους"
end
end -- close numbers
args['mod-οεθ'] = stem["θ"] .. "οῦ" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "ο" args['mod-γε'] = "ός"
args['mod-δεθ'] = stem["θ"] .. "ο" args['mod-δε'] = "ΐ"
args['mod-αεθ'] = stem["θ"] .. "οῦ" args['mod-αε'] = "ν"
args['mod-κεθ'] = stem["θ"] .. "οῦ" args['mod-κε'] = "0"
args['mod-οπθ'] = stem["θ"] .. "ό" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "ο" args['mod-γπ'] = "ῶν"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "ου" args['mod-δπ'] = "σί" args['mod-δπ+'] = "σῐ́"
args['mod-απθ'] = stem["θ"] .. "οῦ" args['mod-απ'] = "ς"
args['mod-κπθ'] = args['mod-οπθ'] args['mod-κπ'] = args['mod-οπ'] -- as in nominative plural
args['mod-οδθ'] = stem["θ"] .. "ό" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "ο" args['mod-γδ'] = "οῖν"
return decl(args)
end
-- Γ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'γάλα']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ======================= 3η κλίση [[γάλα]]===================================== --
-- [[γάλα]] και σύνθετα όπως [[αφρόγαλα]]
-- όπως κτήμα, αλλά με κτ αντί τ
export['γάλα'] = function(frame) -- [[Πρότυπο:grc-κλίση-'γάλα']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- τύπος needs to be defined
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- γάλ-ακτα ἀφρογάλ-ακτα override default stemnumber = 5 (μείον 4)
else
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- γάλ-α ἀφρόγαλ-α
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- γαλ-α ἀφραγαλ-α
stem["θ1"] = m_stems.word1(stem["θ0"]) -- γάλ ἀφραγάλ ονόμ accent at last syllbable
args['κλίση'] = '3'
args['ουδ'] = '1'
args['κατηγορία κλίσης'] = 'γάλα'
args['τύπος'] = 'γάλα'
args['όπως'] = 'γάλα'
-- define the proparoxytones
if (args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ")
then
-- γάλ-ακτα ἀφρογάλ-ακτα
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
-- paroxytone, only γάλα,
else -- in singular this is only γάλα, I think
if stem["θ"] == stem["θ1"] then
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'γάλα' παροξύτονα"
else -- the compounds
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'γάλα' προπαροξύτονα"
end
end
args['mod-οεθ'] = stem["θ"] .. "α" args['mod-οεθ+'] = stem["θ"] .. "ᾰ" args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ1"] .. "ακτ" args['mod-γεθ+'] = stem["θ1"] .. "ᾰκτ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ1"] .. "ακτ" args['mod-δεθ+'] = stem["θ1"] .. "ᾰκτ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "α" args['mod-αεθ+'] = stem["θ"] .. "ᾰ" args['mod-αε'] = "0" -- same as nom.
args['mod-κεθ'] = stem["θ"] .. "α" args['mod-κεθ+'] = stem["θ"] .. "ᾰ" args['mod-κε'] = "0" -- same as nom.
args['mod-οπθ'] = stem["θ1"] .. "ακτ" args['mod-οπθ+'] = stem["θ1"] .. "ᾰκτ" args['mod-οπ'] = "α" args['mod-οπ+'] = "ᾰ"
args['mod-γπθ'] = stem["θ0"] .. "άκτ" args['mod-γπθ+'] = stem["θ0"] .. "ᾰ́κτ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ1"] .. "α" args['mod-δπθ+'] = stem["θ1"] .. "ᾰ" args['mod-δπ'] = "ξι" args['mod-δπ+'] = "ξῐ"
args['mod-απθ'] = stem["θ1"] .. "ακτ" args['mod-απθ+'] = stem["θ1"] .. "ᾰκτ" args['mod-απ'] = "α" args['mod-απ+'] = "ᾰ" -- same as nom.
args['mod-κπθ'] = stem["θ1"] .. "ατ" args['mod-κπθ+'] = stem["θ1"] .. "ᾰκτ" args['mod-κπ'] = "α" args['mod-κπ+'] = "ᾰ" -- same as nom.
args['mod-οδθ'] = stem["θ1"] .. "ατ" args['mod-οδθ+'] = stem["θ1"] .. "ᾰκτ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ0"] .. "άκτ" args['mod-γδθ+'] = stem["θ0"] .. "ᾰ́κτ" args['mod-γδ'] = "οιν"
return decl(args)
end
--## find better word for brachy
-- Γ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'γείτων']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ## this does not work if require("Module:ww").define_prosody(stem["θ"]) == 'μακρόν' then -- γεῖτον
-- EDITOR_MUST_DEFINE δίχρ= for voc.sg. γεῖτον
-- ================= 3η κλίση [[γείτων]] =========== --
-- ενρινόληκτα διπλόθεμα ακατάληκτα σε -ων-ονος, βαρύτονα κλητική -ον, Αγάμεμνον Αριστόγειτον
-- the πέπων -ονος με βραχύ is like adjective ΤΕΣΤ μέρος λόγου, do μέμνων? -- βλ και κώδων μονόθεμα
export['γείτων'] = function(frame) -- [[Πρότυπο:grc-κλίση-'γείτων']]
local args = frame:getParent().args
-- 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'
-- gender -- see above
-- τύπος see at voc.
-- όπως βλ. voc.
args['κατηγορία κλίσης'] = 'γείτων' -- τύπος = γείτων / μέμνων
-- stem
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- γείτ-ον-ες minus 4 letters from end
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- γείτ-ων minus 2 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- γειτ Αγαμεμν remove accent
stem["θ2"] = m_stems.word2(stem["θ0"]) -- γείτ Αγάμεμν accent on 2nd syllable from the end
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) -- γεῖτ-ον
-- cases except voc.sg
args['mod-οεθ'] = stem["θ"] .. "ων" args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ"] .. "ον" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "ον" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "ον" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
--κεθ
args['mod-οπθ'] = stem["θ"] .. "ον" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ0"] .. "όν" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "ο" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "ον" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "ον" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "ον" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ0"] .. "όν" args['mod-γδ'] = "οιν"
-- voc.sg define prosody
if args['λήμμα'] == "Ἀγαμέμνων" then args['mod-κεθ'] = "Ἀγάμεμνον" args['mod-κε'] = "0"
args['εξ'] = '1'
args['τύπος'] = 'μέμνων'
args['όπως'] = 'μέμνων'
args['υποκατ0'] = "που κλίνονται όπως το 'μέμνων' αρσενικά"
elseif args['λήμμα'] == "Ἀριστογείτων" then args['mod-κεθ'] = "Ἀριστόγειτον" args['mod-κε'] = "0"
args['εξ'] = '1'
args['τύπος'] = 'γείτων'
args['όπως'] = 'γείτων'
args['υποκατ0'] = "που κλίνονται όπως το 'γείτων' αρσενικά"
else
if mw.ustring.find(stem["θ"], m_data.brachy_oxeia) -- brachy+okseia or vareia
then -- keep okseia
args['mod-κεθ'] = stem["θ"] .. "ον" args['mod-κε'] = "0"
args['τύπος'] = 'μέμνων'
args['όπως'] = 'μέμνων'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'μέμνων' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'μέμνων' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'μέμνων' αρσενικά"
end
elseif mw.ustring.find(args['λήμμα'], m_data.macron_oxeia) -- marcon+okseia or vareia
or mw.ustring.find(args['λήμμα'], m_data.diphthong_tonos) -- diphthong+tonos (okseia, vareia, perispomeni) -- [[δαίωμν]]
then -- perispomeni γεῖτον
args['mod-κεθ'] = stem["θπ"] .. "ον" args['mod-κε'] = "0"
args['τύπος'] = 'γείτων'
args['όπως'] = 'γείτων'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'γείτων' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'γείτων' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'γείτων' αρσενικά"
end
-- dubious dichrona
elseif mw.ustring.find(args['λήμμα'], m_data.dichronon_oxeia) -- dichronon+okseia or vareia
then
-- NOT in diphtongs the ι υ
if mw.ustring.find(args['λήμμα'], m_data.diphthong_tonos) -- diphthong+tonos (okseia, vareia, perispomeni) NOT dialytics ΐῒῗΰῢῧ
then
args['mod-κεθ'] = stem["θπ"] .. "ον" args['mod-κε'] = "0"
else -- editor must define
if args['δίχρ'] == 'β' then -- KEEP IT
args['mod-κεθ'] = stem["θ"] .. "ον" args['mod-κε'] = "0"
if args['σημ'] == '-' then args['σημ'] = '' else
args['σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι βραχύ.'
end
args['τύπος'] = 'μέμνων'
args['όπως'] = 'μέμνων'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'μέμνων' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'μέμνων' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'μέμνων' αρσενικά"
end
elseif args['δίχρ'] == 'μ' then -- perispomeni
args['mod-κεθ'] = stem["θπ"] .. "ον" args['mod-κε'] = "0"
if args['σημ'] == '-' then args['σημ'] = '' else
args['σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι μακρό.'
end
args['τύπος'] = 'γείτων'
args['όπως'] = 'γείτων'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'γείτων' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'γείτων' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'γείτων' αρσενικά"
end
elseif args['δίχρ'] == '?' then
args['κεΛ'] = '...<span style="color:red;">?</span>' -- LOCKED for editors
args['σημ'] = '<span style="color:red;">Δεν</span> υπάρχουν πληροφορίες για την προσωδία<br>του δίχρονου φωνήεντος στην παραλήγουσα.'
args['κατηγορία κλίσης'] = 'γείτων'
args['τύπος'] = '-'
-- never mind genders
args['κατηγ02'] = "Λέξεις με άγνωστη προσωδία"
args['κατηγ03'] = "Ουσιαστικά με κλίση όπως το 'γείτων' με άγνωστη προσωδία"
elseif args['δίχρ'] ~= 'β' and args['δίχρ'] ~= 'μ' and args['δίχρ'] ~= '?'
or (args['δίχρ'] == '' or args['δίχρ'] == nil)
then
return error_dichr(errordichrstring) -- cf error fucntions at Module
end -- close editor must define
end -- close if dichrono
end -- close if prosody
end -- close voc exceptions
return decl(args)
end
-- Γ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'γέρων']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ## εκκρεμότητα: κάποιο που να έχει περισπωμένη στην κλητική
-- EDITOR_MUST_DEFINE δίχρ=
-- ======================== 3η κλίση [[γέρων]] -οντος, ω γέρον! ======================================= --
-- needs |δίχρ= for voc.sg. Οδοντικόληκτα ακατάληκτα διπλόθεμα με θέμα σε -ντ -ων-οντος
export['γέρων'] = function(frame) -- [[Πρότυπο:grc-κλίση-'γέρων']]
local args = frame:getParent().args
-- 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['όπως'] = 'γέρων'
if args['θηλ'] == '1' then
args['θηλ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'γέρων' θηλυκά"
elseif args['αθ'] == '1' then
args['αθ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'γέρων' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'γέρων' αρσενικά"
end
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-6) -- γερ-οντ-ες minus 5 letters from end
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
-- are there fem? common?
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
else args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
end
args['τύπος'] = 'γέρων'
-- no other categories for pluralia tantum
else -- SINGULAR
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- γέρ - ων
-- are there proparoxytones?
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- γερ
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) --
args['mod-οεθ'] = stem["θ"] .. "ων" args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ"] .. "οντ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "οντ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "οντ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
-- voc.sg cf
args['mod-οπθ'] = stem["θ"] .. "οντ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ0"] .. "όντ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "ου" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "οντ" args['mod-απ'] = "ας" args['mod-απ'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "οντ" args['mod-κπ'] = "ες" -- same as nom.pl
args['mod-οδθ'] = stem["θ"] .. "οντ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ0"] .. "όντ" args['mod-γδ'] = "οιν"
-- voc.sg. define prosody need dichrono
if args['α'] ~= "πλ" and args['α2'] ~= "πλ" and args['α'] ~= "πλδ" and args['α2'] ~= "πλδ" then
if mw.ustring.find(stem["θ"], m_data.brachy_oxeia) -- brachy+okseia or vareia
then
args['mod-κεθ'] = stem["θ"] .. "ον" args['mod-κε'] = "0"
args['τύπος'] = 'γέρων'
elseif mw.ustring.find(args['λήμμα'], m_data.macron_oxeia) -- marcon+okseia or vareia
then
args['mod-κεθ'] = stem["θπ"] .. "ον" args['mod-κε'] = "0"
args['τύπος'] = '?'
-- elsif find a dicrhonon+okseia but except in diphthongs
elseif mw.ustring.find(args['λήμμα'], m_data.dichronon_oxeia) -- dichronon+okseia or vareia
then
-- NOT in diphtongs the ι υ
if mw.ustring.find(args['λήμμα'], m_data.diphthong_tonos) -- diphthong+tonos (okseia, vareia, perispomeni) NOT dialytics ΐῒῗΰῢῧ
then
args['mod-κεθ'] = stem["θπ"] .. "ον" args['mod-κε'] = "0"
args['τύπος'] = '?'
else -- editor has to say
if args['δίχρ'] == 'β' then -- KEEP IT
args['mod-κεθ'] = stem["θ"] .. "ον" args['mod-κε'] = "0"
args['τύπος'] = 'γέρων'
if args['σημ'] == '-' then args['σημ'] = '' else
args['σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι βραχύ.'
end
elseif args['δίχρ'] == 'μ' then -- perispomeni
args['mod-κεθ'] = stem["θπ"] .. "ον" args['mod-κε'] = "0"
args['τύπος'] = 'Αἴας'
if args['σημ'] == '-' then args['σημ'] = '' else
args['σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι μακρό.'
end
elseif args['δίχρ'] == '?' then
args['κεΛ'] = '...<span style="color:red;">?</span>...ᾰν' -- LOCKED for editors
args['σημ'] = '<span style="color:red;">Δεν</span> υπάρχουν πληροφορίες για την προσωδία<br>του δίχρονου φωνήεντος στην παραλήγουσα.<br>Δε γνωρίζουμε πώς τονιζόταν η κλητική ενικού.'
args['κατηγορία κλίσης'] = 'γέρων'
args['τύπος'] = '-'
args['κατηγ02'] = "Λέξεις με άγνωστη προσωδία"
args['κατηγ03'] = "Ουσιαστικά με κλίση όπως το 'γέρων' με άγνωστη προσωδία"
elseif args['δίχρ'] ~= 'β' and args['δίχρ'] ~= 'μ' and args['δίχρ'] ~= '?'
or (args['δίχρ'] == '' or args['δίχρ'] == nil)
then
return error_dichr(errordichrstring) -- cf error fucntions at Module
end -- close dicrhona
end -- close if dubious
end -- close voc.sg with prosody definition
end -- close if not plural
return decl(args)
end
-- Γ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'γίγας']] @@@@@@@@@@@@@@@@@@@@@@@@
-- EDITOR_MUST_DEFINE δίχρ=
-- ======================== 3η κλίση [[γίγας]] -αντος, ω γίγαν! ======================================= --
-- γίγας separately from φύλαξ -- it needs |δίχρ= for voc.sg.
export['γίγας'] = function(frame) -- [[Πρότυπο:grc-κλίση-'γίγας']]
local args = frame:getParent().args
-- 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'
-- WITHOUT ομάδα, pluralia do not need δίχρ= dichronon to be determined.
args['κατηγορία κλίσης'] = 'γίγας'
args['τύπος'] = 'γίγας' -- see bolow βλ. παρακάτω βραχεία - μαρκά παραλήγουσα
-- args['όπως'] = see below, at vocative
if args['θηλ'] == '1' then
args['υποκατ0'] = "που κλίνονται όπως το 'γίγας' θηλυκά"
elseif args['αθ'] == '1' then
args['υποκατ0'] = "που κλίνονται όπως το 'γίγας' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'γίγας' αρσενικά"
end
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-6) -- γιγ - α+PROSOSDY - ντες / Αἴ -α ντες
args['όπως'] = 'γίγας'
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
-- are there fem? common?
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
else args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
end
-- no other categories for pluralia tantum
else -- SINGULAR
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- γιγ - α+PROSODY -ς / Αἴ-α-ς
-- are there proparoxytones?
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- γιγ Αἰ
stem["θ1"] = m_stems.PerispomeniToOxia(stem["θ"]) -- γίγ Αἴ
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) -- ὁ [[Αἴας]] κλητική ὦ Αἶ-ᾰν!
args['mod-οεθ'] = stem["θ"] .. "α" args['mod-οεθ+'] = stem["θ"] .. "ᾱ" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "αντ" args['mod-γεθ+'] = stem["θ"] .. "ᾰντ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "αντ" args['mod-δεθ+'] = stem["θ"] .. "ᾰντ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "αντ" args['mod-αεθ+'] = stem["θ"] .. "ᾰντ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
-- voc.sg cf
args['mod-οπθ'] = stem["θ"] .. "αντ" args['mod-οπθ+'] = stem["θ"] .. "ᾰντ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ0"] .. "άντ" args['mod-γπθ+'] = stem["θ0"] .. "ᾰ́ντ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "α" args['mod-δπθ+'] = stem["θ"] .. "ᾰ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "αντ" args['mod-απθ+'] = stem["θ"] .. "ᾰντ" args['mod-απ'] = "ας" args['mod-απ'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "αντ" args['mod-κπθ+'] = stem["θ"] .. "ᾰντ" args['mod-κπ'] = "ες" -- same as nom.pl
args['mod-οδθ'] = stem["θ"] .. "αντ" args['mod-οδθ+'] = stem["θ"] .. "ᾰντ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ0"] .. "άντ" args['mod-γδθ+'] = stem["θ0"] .. "ᾰ́ντ" args['mod-γδ'] = "οιν"
-- voc.sg. define prosody need dichrono
if args['α'] ~= "πλ" and args['α2'] ~= "πλ" and args['α'] ~= "πλδ" and args['α2'] ~= "πλδ" then
if mw.ustring.find(stem["θ"], m_data.brachy_oxeia) -- brachy+okseia or vareia
then
args['mod-κεθ'] = stem["θ"] .. "αν" args['mod-κεθ+'] = stem["θ"] .. "ᾰν" args['mod-κε'] = "0"
args['όπως'] = 'ἐλέφας'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' με βραχεία παραλήγουσα"
if args['θηλ'] == '1' then
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' θηλυκά με βραχεία παραλήγουσα"
elseif args['αθ'] == '1' then
args['αθ'] = '1'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' κοινού γένους με βραχεία παραλήγουσα"
else
args['αρσ'] = '1'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' αρσενικά με βραχεία παραλήγουσα"
end
elseif mw.ustring.find(args['λήμμα'], m_data.macron_oxeia) -- marcon+okseia or vareia
then
args['mod-κεθ'] = stem["θπ"] .. "αν" args['mod-κεθ+'] = stem["θπ"] .. "ᾰν" args['mod-κε'] = "0"
args['όπως'] = 'Αἴας'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' με μακρά παραλήγουσα"
if args['θηλ'] == '1' then
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' θηλυκά με μακρά παραλήγουσα"
elseif args['αθ'] == '1' then
args['αθ'] = '1'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' κοινού γένους με μακρά παραλήγουσα"
else
args['αρσ'] = '1'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' αρσενικά με μακρά παραλήγουσα"
end
-- elsif find a dicrhonon+okseia but except in diphthongs
elseif mw.ustring.find(args['λήμμα'], m_data.dichronon_oxeia) -- dichronon+okseia or vareia
then
-- NOT in diphtongs the ι υ
if mw.ustring.find(args['λήμμα'], m_data.diphthong_tonos) -- diphthong+tonos (okseia, vareia, perispomeni) NOT dialytics ΐῒῗΰῢῧ
then
args['mod-κεθ'] = stem["θπ"] .. "αν" args['mod-κεθ+'] = stem["θπ"] .. "ᾰν" args['mod-κε'] = "0"
args['όπως'] = 'Αἴας'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' με μακρά παραλήγουσα"
if args['θηλ'] == '1' then
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' θηλυκά με μακρά παραλήγουσα"
elseif args['αθ'] == '1' then
args['αθ'] = '1'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' κοινού γένους με μακρά παραλήγουσα"
else
args['αρσ'] = '1'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' αρσενικά με μακρά παραλήγουσα"
end
else -- editor has to say
if args['δίχρ'] == 'β' then -- KEEP IT
args['mod-κεθ'] = stem["θ"] .. "αν" args['mod-κεθ+'] = stem["θ"] .. "ᾰν" args['mod-κε'] = "0"
args['όπως'] = 'ἐλέφας'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' με βραχεία παραλήγουσα"
if args['θηλ'] == '1' then
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' θηλυκά με βραχεία παραλήγουσα"
elseif args['αθ'] == '1' then
args['αθ'] = '1'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' κοινού γένους με βραχεία παραλήγουσα"
else
args['αρσ'] = '1'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' αρσενικά με βραχεία παραλήγουσα"
end
if args['σημ'] == '-' then args['σημ'] = '' else
args['σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι βραχύ.'
end
elseif args['δίχρ'] == 'μ' then -- perispomeni
args['mod-κεθ'] = stem["θπ"] .. "αν" args['mod-κεθ+'] = stem["θπ"] .. "ᾰν" args['mod-κε'] = "0"
args['όπως'] = 'Αἴας'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' με μακρά παραλήγουσα"
if args['θηλ'] == '1' then
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' θηλυκά με μακρά παραλήγουσα"
elseif args['αθ'] == '1' then
args['αθ'] = '1'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' κοινού γένους με μακρά παραλήγουσα"
else
args['αρσ'] = '1'
args['υποκατ04'] = "που κλίνονται όπως το 'γίγας' αρσενικά με μακρά παραλήγουσα"
end
if args['σημ'] == '-' then args['σημ'] = '' else
args['σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι μακρό.'
end
elseif args['δίχρ'] == '?' then
args['κεΛ'] = '...<span style="color:red;">?</span>...ᾰν' -- LOCKED for editors
args['σημ'] = '<span style="color:red;">Δεν</span> υπάρχουν πληροφορίες για την προσωδία<br>του δίχρονου φωνήεντος στην παραλήγουσα.'
args['κατηγορία κλίσης'] = 'γίγας'
args['τύπος'] = '-'
args['κατηγ02'] = "Λέξεις με άγνωστη προσωδία"
args['κατηγ03'] = "Ουσιαστικά με κλίση όπως το 'γίγας' με άγνωστη προσωδία"
elseif args['δίχρ'] ~= 'β' and args['δίχρ'] ~= 'μ' and args['δίχρ'] ~= '?'
or (args['δίχρ'] == '' or args['δίχρ'] == nil)
then
return error_dichr(errordichrstring) -- cf error fucntions at Module
end -- close dicrhona
end -- close if dubious
end -- close voc.sg with prosody definition
end -- close if not plural
return decl(args)
end
-- Γ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'γραῦς']] @@@@@@@@@@@@@@@@@@@@@@@@
--####### epic needed
-- ================= 3η κλίση [[γραῦς]] UNIQUE =========== --
-- 3η κλίση αθ http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D26
-- ἡ ναῦς separately
export['γραῦς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'γραῦς']]
local args = frame:getParent().args
-- 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 -- different from default. All stems must be written.
local stem = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- γρ -αῦς/ᾶες minus 3 letters from end
args['κλίση'] = '3'
args['θηλ'] = '1'
args['κατηγορία κλίσης'] = 'γραῦς'
args['τύπος'] = 'γραῦς'
args['όπως'] = 'γραῦς'
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- γρᾶες
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
else -- γραῦς
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
args['υποκατ02'] = 'θηλυκά περισπώμενα'
end
args['mod-οεθ'] = stem["θ"] .. "αῦ" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "α" args['mod-γεθ+'] = stem["θ"] .. "ᾱ" args['mod-γε'] = "ός"
args['mod-δεθ'] = stem["θ"] .. "α" args['mod-δεθ+'] = stem["θ"] .. "ᾱ" args['mod-δε'] = "ΐ"
args['mod-αεθ'] = stem["θ"] .. "αῦ" args['mod-αε'] = "ν"
args['mod-κεθ'] = stem["θ"] .. "αῦ" args['mod-κε'] = "0"
args['mod-οπθ'] = stem["θ"] .. "ᾶ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "α" args['mod-γπθ+'] = stem["θ"] .. "ᾱ" args['mod-γπ'] = "ῶν"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "αυ" args['mod-δπ'] = "σί" args['mod-δπ+'] = "σῐ́"
args['mod-απθ'] = stem["θ"] .. "αῦ" args['mod-απ'] = "ς"
args['mod-κπθ'] = args['mod-οπθ'] args['mod-κπ'] = args['mod-οπ'] -- as in nominative plural
args['mod-οδθ'] = stem["θ"] .. "ᾶ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "α" args['mod-γδθ+'] = stem["θ"] .. "ᾱ" args['mod-γδ'] = "οῖν"
return decl(args)
end
-- Γ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'γυψ']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ΟΛΑ τα μονοσύλλαβα με γενική -ός, πλ -ών, μονόθεμα
-- EDITOR_MUST_DEFINE χαρ= δίχρ= AND possibly θέμα= (as in [[θρίξ]], τριχ-ός (no χαρ= needed)
-- ================= [[γύψ]] 3η κλίση αφωνόληκτα =========== --
-- -------------- κ-γ-χ =ξ, τ-δ-θ =ς, π-β-φ =ψ ν ρ ------------- --
-- Smyth.256 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D16
export['γυψ'] = function(frame) -- [[Πρότυπο:grc-κλίση-'γυψ']]
local args = frame:getParent().args
-- 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['τύπος'] = '' --cf below
-- args['όπως'] cf below
-- gender -- see below AFTER τύπος is defined
-- stems -- different from default, different for singular/plural. All stems must be written.
-- stem variations found at genitive singular. Editor must define consonant args χαρ -- For exceptions, define stem θέμα=
local stem = {}
-- creating pseudo stem['θ'] = lemma (PAGENAME or args['λήμμα']) MINUS last letter PLUS args['χαρ'] character (the last letter of genitive minus -ος)
-- the real stem is stem['θ'] + args['χαρ'] by editor
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- γῦ-π-ες φλέ-β-ες αἶ-γ-ες φλό-γ-ες χρῶ-τ-ες
else -- in singular
-- if editor forgets parameters:
char = args['χαρ'] or ''
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- γύ-ψ φλέ-ψ minus 1 letters from end
if (args['χαρ'] == '' or args['χαρ'] == nil) and (args['θέμα'] == '' or args['θέμα'] == nil) then
return errorhere('<span style="color:#b22222; font-size:16px;">Γράψτε <b>|χαρ=</b> το τελευταίο γράμμα του θέματος της γενικής,'
.. '<br>Αν είναι θηλυκό, <b>|θηλ=1</b> Αν είναι κοινού γένους, <b>|αθ=1</b></span>')
end
-- bithematic e.g. [[θρίξ]], τριχ-ός
-- args['θέμα'] is defined by editor
if args['θέμα'] ~= '' and args['θέμα'] ~= nil then
args['εξ'] = '1'
stem["θλήμμα"] = mw.ustring.sub(args['λήμμα'],1,-2) -- θρι only for nom.sg & voc.sg
args['χαρ'] = mw.ustring.sub(args['θέμα'],-1,-1) -- χ from τριχός
stem["θ"] = mw.ustring.sub(args['θέμα'],1,-2) -- τρι
stem["θ0"] = m_stems.word0(stem["θ"]) -- remove accent
stem["θοξ"] = m_stems.word1(stem["θ0"]) -- put OKSEIA at the last syllable from end of atono
-- stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ0"]) -- make okseia or allow okseia as it is
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θοξ"]) -- make perispomeni
-- args['υποκατ0'] = ?? μεταπλαστά DO MANUALLY, it is not irregular though.
else -- not bithematic
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- γύ-ψ minus one letter from end
stem["θ0"] = m_stems.word0(stem["θ"]) -- remove accent
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- make okseia or allow okseia as it is
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θοξ"]) -- make perispomeni
end
end -- close numbers for stems
-- character of stem, typos, (char, args['χαρ']) is the last consonant of the stem
-- datpl is the consontant of dative plural
char = args['χαρ'] or '' --repeat it here, otherwise plurals do not work
datpl = ''
-- for singular
-- ΟΔΟΝΤΙΚΟΛΗΚΤΑ πβφ, τδθ, κγχ
-- πβφ
if char == 'π' then datpl = 'ψ' args['κατηγορία κλίσης'] = 'γύψ' args['τύπος'] = 'γύψ' args['όπως'] = 'γύψ' end
if char == 'β' then datpl = 'ψ' args['κατηγορία κλίσης'] = 'φλέψ' args['τύπος'] = 'φλέψ' args['όπως'] = 'φλέψ' end
if char == 'φ' then datpl = 'ψ' args['κατηγορία κλίσης'] = '?' args['τύπος'] = '?' args['όπως'] = '?' end
-- τδθ no δ θ ?? -- το χρώς (και ανώμαλο λόγω δοτικής), όπως θής
if char == 'τ' then datpl = 'σ'
if mw.ustring.find(args['λήμμα'], 'ώς$') or mw.ustring.find(args['λήμμα'], 'αίς$') then
args['κατηγορία κλίσης'] = 'θής' args['τύπος'] = 'θής' args['όπως'] = 'θής'
elseif mw.ustring.find(args['λήμμα'], 'ής$') then
args['κατηγορία κλίσης'] = 'θής' args['τύπος'] = 'θής' args['όπως'] = 'θής'
end
end
-- κγχ
if char == 'κτ' then datpl = 'ξ' args['κατηγορία κλίσης'] = 'νύξ' args['τύπος'] = 'νύξ' args['όπως'] = 'νύξ' end
if char == 'κ' then datpl = 'ξ' args['κατηγορία κλίσης'] = 'φρίξ' args['τύπος'] = 'φρίξ' args['όπως'] = 'φρίξ' end
-- but γκ = see below
if args['χαρ'] == 'γ' then char = 'γ' datpl = 'ξ' args['κατηγορία κλίσης'] = 'φλόξ' args['τύπος'] = 'φλόξ' args['όπως'] = 'φλόξ' end
if args['χαρ'] == 'γγ' then char = 'γ' datpl = 'ξ' args['κατηγορία κλίσης'] = 'Σφίγξ' args['τύπος'] = 'Σφίγξ' args['όπως'] = 'Σφίγξ' end
if args['χαρ'] == 'γκ' then char = 'κ' datpl = 'ξ' args['κατηγορία κλίσης'] = 'λύγξ' args['τύπος'] = 'λύγξ' args['όπως'] = 'λύγξ' end
if args['χαρ'] == 'χ' then char = 'χ' datpl = 'ξ' args['κατηγορία κλίσης'] = 'ψίξ' args['τύπος'] = 'ψίξ' args['όπως'] = 'ψίξ' end
-- ΕΝΡΙΝΟΛΗΚΤΑ [[μήν]]
if args['χαρ'] == 'ν' then nchar = 'ν' datpl = 'σ'
if mw.ustring.find(args['λήμμα'], 'ήν$') then
args['κατηγορία κλίσης'] = 'μήν' args['τύπος'] = 'μήν' args['όπως'] = 'μήν'
elseif mw.ustring.find(args['λήμμα'], 'ίν$') then -- ελληνιστικός τύπος του [[ῥίς]]
args['κατηγορία κλίσης'] = 'ῥίν' args['τύπος'] = 'ῥίν' args['όπως'] = 'ῥίν'
elseif mw.ustring.find(args['λήμμα'], 'ίς$') then -- ελληνιστικός τύπος του [[ῥίς]]
-- see oε, οκ = ρίς
args['κατηγορία κλίσης'] = 'ῥίς' args['τύπος'] = 'ῥίς' args['όπως'] = 'ῥίς'
end
end
-- ΥΓΡΟΛΗΚΤΑ [[φθείρ]]
if args['χαρ'] == 'ρ' then char = 'ρ' datpl = 'ρσ' args['κατηγορία κλίσης'] = 'φθείρ' args['τύπος'] = 'φθείρ' args['όπως'] = 'φθείρ' end
-- for pluralia tantum ## check if more
-- πβφ
if mw.ustring.find(args['λήμμα'], 'πες$') then char = 'π' datpl = 'ψ' args['κατηγορία κλίσης'] = 'γύψ' args['τύπος'] = 'γύψ' args['όπως'] = 'γύψ' end
if mw.ustring.find(args['λήμμα'], 'βες$') then char = 'β' datpl = 'ψ' args['κατηγορία κλίσης'] = 'φλέψ' args['τύπος'] = 'φλέψ' args['όπως'] = 'φλέψ' end
if mw.ustring.find(args['λήμμα'], 'φες$') then char = 'φ' datpl = 'ψ' args['κατηγορία κλίσης'] = '?' args['τύπος'] = '?' args['όπως'] = '?' end
-- τδθ
if mw.ustring.find(args['λήμμα'], 'τες$') then char = 'τ' datpl = 'σ'
if mw.ustring.find(args['λήμμα'], 'ῆτες$') then
args['κατηγορία κλίσης'] = 'θής' args['τύπος'] = 'θής' args['όπως'] = 'θής'
elseif mw.ustring.find(args['λήμμα'], 'ῶτες$') or mw.ustring.find(args['λήμμα'], 'αῖτες$') then
args['κατηγορία κλίσης'] = 'θής' args['τύπος'] = 'θής' args['όπως'] = 'θής'
end
end
--κγχ
if mw.ustring.find(args['λήμμα'], 'κτες$') then char = 'κτ' datpl = 'ξ' args['κατηγορία κλίσης'] = 'νύξ' args['τύπος'] = 'νύξ' args['όπως'] = 'νύξ' end
if mw.ustring.find(args['λήμμα'], 'κες$') then char = 'κ' datpl = 'ξ' args['κατηγορία κλίσης'] = 'φρίξ' args['τύπος'] = 'φρίξ' args['όπως'] = 'φρίξ' end
if mw.ustring.find(args['λήμμα'], 'κες$') then datpl = 'ξ'
if args['χαρ'] == 'κ' then char = 'κ' args['κατηγορία κλίσης'] = 'φρίξ' args['τύπος'] = 'φρίξ' args['όπως'] = 'φρίξ'
elseif args['χαρ'] == 'γκ' then char = 'γκ' args['κατηγορία κλίσης'] = 'λύγξ' args['τύπος'] = 'λύγξ' args['όπως'] = 'λύγξ'
end
end
if mw.ustring.find(args['λήμμα'], 'γες$') then datpl = 'ξ'
if char == 'γ' then args['κατηγορία κλίσης'] = 'φλόξ' args['τύπος'] = 'φλόξ' args['όπως'] = 'φλόξ'
elseif char == 'γγ' then args['κατηγορία κλίσης'] = 'Σφίγξ' args['τύπος'] = 'Σφίγξ' args['όπως'] = 'Σφίγξ'
end
end
if mw.ustring.find(args['λήμμα'], 'χες$') then char = 'χ' datpl = 'ξ' args['κατηγορία κλίσης'] = 'ψίξ' args['τύπος'] = 'ψίξ' args['όπως'] = 'ψίξ' end
-- ΕΝΡΙΝΟΛΗΚΤΑ [[μήν]]
if mw.ustring.find(args['λήμμα'], 'νες$') then char = 'ν' datpl = 'σ'
if mw.ustring.find(args['λήμμα'], 'ῆνες$') then
args['κατηγορία κλίσης'] = 'μήν' args['τύπος'] = 'μήν' args['όπως'] = 'μήν'
elseif mw.ustring.find(args['λήμμα'], 'ῖνες$') then -- ignore [[ῥίν]] ελληνιστικός τύπος του [[ῥίς]]
-- see oε, οκ = ρίς
args['κατηγορία κλίσης'] = 'ῥίς' args['τύπος'] = 'ῥίς' args['όπως'] = 'ῥίς'
end
end
-- ΥΓΡΟΛΗΚΤΑ [[φθείρ]]
if mw.ustring.find(args['λήμμα'], 'ρες$') then char = 'ρ' datpl = 'ρσ' args['κατηγορία κλίσης'] = 'φθείρ' args['τύπος'] = 'φθείρ' args['όπως'] = 'φθείρ' end
-- genders & Categories
if args['θηλ'] == '1' then args['υποκατ1'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ1'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' κοινού γένους"
elseif args['α-θ'] == '1' then args['υποκατ1'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' αρσενικά ή θηλυκά" -- [[ψίξ]]
else
args['αρσ'] = '1'
args['υποκατ1'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' αρσενικά"
end
-- Categories: define accent
-- pluralia γῦπες (macron) φλόγες (with brachy) χρῶτες
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
then
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπερισπώμενα'
elseif args['α-θ'] == '1' then args['υποκατ02'] = 'αρσενικά ή θηλυκά προπερισπώμενα' -- ψῖχες
elseif args['αρσ'] == '1' then args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
end
args['υποκατ03'] = " που κλίνονται όπως το '" .. args['τύπος'] .. "' προπερισπώμενα"
args['υποκατ04'] = " που κλίνονται όπως το '" .. args['τύπος'] .. "' με μακρό φωνήεν"
else -- φλέβες
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους παροξύτονα'
elseif args['α-θ'] == '1' then args['υποκατ02'] = 'αρσενική ή θηλυκά παροξύτονα' -- no example
elseif args['αρσ'] == '1' then args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
args['υποκατ03'] = " που κλίνονται όπως το '" .. args['τύπος'] .. "' παροξύτονα"
args['υποκατ04'] = " που κλίνονται όπως το '" .. args['τύπος'] .. "' με βραχύ φωνήεν"
end
if args['θέμα'] ~= '' and args['θέμα'] ~= nil then
args['εξ'] = '1'
end
else -- singular is oxytone EXCEPT ὀφρῦς
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά οξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους οξύτονα'
elseif args['α-θ'] == '1' then args['υποκατ02'] = 'αρσενικά ή θηλυκά οξύτονα' -- [[ψίξ]]
elseif args['αρσ'] == '1' then args['υποκατ02'] = 'αρσενικά οξύτονα'
end
-- args['υποκατ03'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' οξύτονα" -- all of them, if not,
end -- close numbers
-- cases for all
-- οε
if args['θέμα'] ~= '' and args['θέμα'] ~= nil then
args['mod-οεθ'] = stem["θλήμμα"] args['mod-οε'] = mw.ustring.sub(args['λήμμα'],-1)
else
if args['χαρ'] == 'ρ' then args['mod-οεθ'] = stem["θ"] .. char args['mod-οε'] ='0'
elseif args['χαρ'] == 'ν' then
if mw.ustring.find(args['λήμμα'], 'ήν$') or mw.ustring.find(args['λήμμα'], 'ῆνες$') then
args['mod-οεθ'] = stem["θ"] .. char args['mod-οε'] ='0'
elseif mw.ustring.find(args['λήμμα'], 'ίν$') then
args['mod-οεθ'] = stem["θ"] .. char args['mod-οε'] ='0'
elseif mw.ustring.find(args['λήμμα'], 'ίς$') or mw.ustring.find(args['λήμμα'], 'ῖνες$') then
args['mod-οεθ'] = stem["θ"] .. "ς" args['mod-οε'] ='0'
end
elseif args['χαρ'] == 'σ' then
args['mod-οεθ'] = stem["θ"] .. "ς" args['mod-οε'] ='0'
else args['mod-οεθ'] = stem["θ"] args['mod-οε'] = mw.ustring.sub(args['λήμμα'],-1)
end
end
args['mod-γεθ'] = stem["θ0"] .. char args['mod-γε'] = "ός"
args['mod-δεθ'] = stem["θ0"] .. char args['mod-δε'] = "ί" args['mod-δε+'] = "ῐ́"
-- αε see dubious
-- κε
if args['θέμα'] ~= '' and args['θέμα'] ~= nil then
args['mod-κεθ'] = stem["θλήμμα"] args['mod-κε'] = mw.ustring.sub(args['λήμμα'],-1)
else
args['mod-κεθ'] = args['mod-οεθ'] args['mod-κε'] = args['mod-οε']
-- args['mod-κεθ'] = stem["θ"] args['mod-κε'] = mw.ustring.sub(args['λήμμα'],-1) -- same as nom
end
-- οπ see dubious
args['mod-γπθ'] = stem["θ0"] .. char args['mod-γπ'] = "ῶν"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ0"] .. datpl args['mod-δπ'] = "ί" args['mod-δπ+'] = "ῐ́"
-- απ see dubious
-- κπ see dubious
-- οδ see dubious
args['mod-γδθ'] = stem["θ0"] .. char args['mod-γδ'] = "οῖν"
-- EDITOR_MUST DEFINE dubious for acc.sg, nom.pl acc.pl voc.pl nom.dual
if mw.ustring.find(stem["θ"], m_data.brachy_oxeia) -- brachy+okseia or vareia
then -- keep okseia φλέβα
args['υποκατ04'] = " που κλίνονται όπως το '" .. args['τύπος'] .. "' με βραχύ φωνήεν"
args['mod-αεθ'] = stem["θοξ"] .. char args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-οπθ'] = stem["θοξ"] .. char args['mod-οπ'] = "ες"
args['mod-απθ'] = stem["θοξ"] .. char args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θοξ"] .. char args['mod-κπ'] = "ες" -- as in nom
args['mod-οδθ'] = stem["θοξ"] .. char args['mod-οδ'] = "ε"
elseif mw.ustring.find(stem["θ"], m_data.macron_oxeia) -- macron+okseia or vareia
then -- make perispomeni τὸν γῦπᾰ
args['υποκατ04'] = " που κλίνονται όπως το '" .. args['τύπος'] .. "' με μακρό φωνήεν"
args['mod-αεθ'] = stem["θπ"] .. char args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-οπθ'] = stem["θπ"] .. char args['mod-οπ'] = "ες"
args['mod-απθ'] = stem["θπ"] .. char args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θπ"] .. char args['mod-κπ'] = "ες" -- as in nom
args['mod-οδθ'] = stem["θπ"] .. char args['mod-οδ'] = "ε"
-- dubious dichrona
elseif mw.ustring.find(args['λήμμα'], m_data.dichronon_oxeia) -- dichronon+okseia or vareia
then
-- NOT in diphtongs the ι υ
if mw.ustring.find(args['λήμμα'], m_data.diphthong_tonos) -- diphthong+tonos (okseia, vareia, perispomeni) NOT dialytics ΐῒῗΰῢῧ
then -- make perispomeni τὸν γῦπᾰ
args['υποκατ04'] = " που κλίνονται όπως το '" .. args['τύπος'] .. "' με μακρό φωνήεν"
args['mod-αεθ'] = stem["θπ"] .. char args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-οπθ'] = stem["θπ"] .. char args['mod-οπ'] = "ες"
args['mod-απθ'] = stem["θπ"] .. char args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θπ"] .. char args['mod-κπ'] = "ες" -- as in nom
args['mod-οδθ'] = stem["θπ"] .. char args['mod-οδ'] = "ε"
else -- editor must define
if args['δίχρ'] == 'β' then -- KEEP IT
args['υποκατ04'] = " που κλίνονται όπως το '" .. args['τύπος'] .. "' με βραχύ φωνήεν"
args['mod-αεθ'] = stem["θοξ"] .. char args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-οπθ'] = stem["θοξ"] .. char args['mod-οπ'] = "ες"
args['mod-απθ'] = stem["θοξ"] .. char args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θοξ"] .. char args['mod-κπ'] = "ες" -- as in nom
args['mod-οδθ'] = stem["θοξ"] .. char args['mod-οδ'] = "ε"
if args['σημ'] == '-' then args['σημ'] = '' else
args['σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι βραχύ.'
end
elseif args['δίχρ'] == 'μ' then -- perispomeni
args['υποκατ04'] = " που κλίνονται όπως το '" .. args['τύπος'] .. "' με μακρό φωνήεν"
args['mod-αεθ'] = stem["θπ"] .. char args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-οπθ'] = stem["θπ"] .. char args['mod-οπ'] = "ες"
args['mod-απθ'] = stem["θπ"] .. char args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θπ"] .. char args['mod-κπ'] = "ες" -- as in nom
args['mod-οδθ'] = stem["θπ"] .. char args['mod-οδ'] = "ε"
if args['σημ'] == '-' then args['σημ'] = '' else
args['σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι μακρό.'
end
elseif args['δίχρ'] == '?' then
args['αεΛ'] = '...<span style="color:red;">?</span>...ᾰ' -- LOCKED for editors
args['οπΛ'] = '...<span style="color:red;">?</span>...ες' -- LOCKED for editors
args['απΛ'] = '...<span style="color:red;">?</span>...ᾰς' -- LOCKED for editors
args['κπΛ'] = '...<span style="color:red;">?</span>...ες' -- LOCKED for editors
args['οδΛ'] = '...<span style="color:red;">?</span>...ε' -- LOCKED for editors
args['σημ'] = '<span style="color:red;">Δεν</span> υπάρχουν πληροφορίες για την προσωδία<br>του δίχρονου φωνήεντος.'
args['τύπος'] = '-'
args['κατηγ02'] = "Λέξεις με άγνωστη προσωδία"
args['κατηγ03'] = "Ουσιαστικά με κλίση όπως το '" .. args['κατηγορία κλίσης'] .. "' με άγνωστη προσωδία"
elseif args['δίχρ'] ~= 'β' and args['δίχρ'] ~= 'μ' and args['δίχρ'] ~= '?'
or (args['δίχρ'] == '' or args['δίχρ'] == nil)
then
return error_dichr(errordichrstring) -- cf error fucntions at Module
end -- close editor must define
end -- close if dichrono
end -- close cases defined
return decl(args)
end
-- Δ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'δελφίς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[δελφίς]]+ [[δελφίν]] θηλ [[ἀκτίς]] =========== --
-- ενρινόληκτα μονόθεμα καταληκτικά σε -ίς, -ῖνος + ακατάληκτα -ίν
-- + grc-koi [[δελφίν]]
-- http://ebooks.edu.gr/ebooks/v/html/8547/2340/Grammatiki-Archaias-Ellinikis_Gymnasiou-Lykeiou_html-apli/index_02_06.html
-- 128. 1) Τα φωνήεντα ι και α εμπρός από το χαρακτήρα ν των ονομάτων σε -ις (γεν. -ινος) και -αν (γεν. -ανος)
-- είναι μακρόχρονα: τῆς ἀκτῖν-ος, τῆς Σαλαμῖν-ος· τοῦ Τιτᾶν-ος, τοῦ πελεκᾶν-ος.
export['δελφίς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'δελφίς']]
local args = frame:getParent().args
-- 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'
-- κατηγορία κλίσης, gender -- see below
args['σημ'] = 'Το δίχρονο φωνήεν του θέματος σε -ῑν είναι μακρό.'
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- common for both
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- δελφ-ῖνες minus 4 letters from end
args['κατηγορία κλίσης'] = 'δελφίς' -- OR the later δελφίν
args['τύπος'] = 'δελφίς'
args['όπως'] = 'δελφίς'
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπερισπώμενα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- δελφ-ίς δελφ-ίν minus 2 letters from end
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά οξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους οξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
if mw.ustring.find(args['λήμμα'], 'ίν$') then-- [[δελφίν]]
args['κατηγορία κλίσης'] = 'δελφίν'
args['τύπος'] = 'δελφίν'
args['όπως'] = 'δελφίν'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'δελφίν' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'δελφίν' κοινού γένους"
else args['υποκατ0'] = "που κλίνονται όπως το 'δελφίν' αρσενικά"
end
elseif mw.ustring.find(args['λήμμα'], 'ίς$') then-- [[δελφίν]]
args['κατηγορία κλίσης'] = 'δελφίς'
args['τύπος'] = 'δελφίς'
args['όπως'] = 'δελφίς'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'δελφίς' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'δελφίς' κοινού γένους"
else args['υποκατ0'] = "που κλίνονται όπως το 'δελφίς' αρσενικά"
end
end -- close numbers
end
if mw.ustring.find(args['λήμμα'], 'ίν$') then -- [[δελφίν]]
args['mod-οεθ'] = stem["θ"] .. "ίν" args['mod-οε'] = "0"
else
args['mod-οεθ'] = stem["θ"] .. "ί" args['mod-οε'] = "ς"
end
args['mod-γεθ'] = stem["θ"] .. "ῖν" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "ῖν" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "ῖν" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
if mw.ustring.find(args['λήμμα'], 'ίν$') then -- [[δελφίν]]
args['mod-κεθ'] = stem["θ"] .. "ίν" args['mod-κε'] = "0" -- same as nom
else
args['mod-κεθ'] = stem["θ"] .. "ί" args['mod-κε'] = "ς" -- same as nom
end
args['mod-οπθ'] = stem["θ"] .. "ῖν" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "ίν" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "ῖ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "ῖν" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "ῖν" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "ῖν" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "ίν" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Δ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'δρυς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[δρῦς]] =========== --
-- φωνηεντόληκτα μονόθεμα καταληκτικά σε -ῦς -υός
-- αθ = ὁ και ἡ [[σῦς]] αρσ = [[μῦς]]
-- Smyth 269.rules http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apage%3D68
-- Smyth 268 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D25
export['δρῦς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'δρυς']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- δρύ-ες minus 2 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'δρῦς' κοινού γένους"
elseif args['αρσ'] == '1' then
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'δρῦς' αρσενικά"
else
args['θηλ'] = '1'
args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'δρῦς' θηλυκά"
end
else
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- δρῦ-ς minus 1 letter from end
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
if args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους περισπώμενα'
args['υποκατ0'] = "που κλίνονται όπως το 'δρῦς' κοινού γένους"
elseif args['αρσ'] == '1' then
args['υποκατ02'] = 'αρσενικά περισπώμενα'
args['υποκατ0'] = "που κλίνονται όπως το 'δρῦς' αρσενικά"
else
args['θηλ'] = '1'
args['υποκατ02'] = 'θηλυκά περισπώμενα'
args['υποκατ0'] = "που κλίνονται όπως το 'δρῦς' θηλυκά"
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- δρυ-ός remove accent
stem["θο"] = m_stems.PerispomeniToOxia(stem["θ"]) -- convert perispomeni to okseia
args['κλίση'] = '3'
-- gender, see above
args['κατηγορία κλίσης'] = 'δρῦς'
args['όπως'] = 'δρῦς'
args['τύπος'] = 'δρῦς'
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ0"] args['mod-γε'] = "ός"
args['mod-δεθ'] = stem["θ0"] args['mod-δε'] = "ΐ" args['mod-δε+'] = "ῐ̈́"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "ν"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0"
args['mod-οπθ'] = stem["θο"] args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ0"] args['mod-γπ'] = "ῶν"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ0"] args['mod-δπ'] = "σί" args['mod-δπ+'] = "σῐ́"
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "ς"
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "ες" -- sam as nom.
args['mod-οδθ'] = stem["θο"] args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ0"] args['mod-γδ'] = "οῖν"
return decl(args)
end
-- ## έαρ νέκταρ, χωρίς πληθυντικό [[ἄορ]]/ ἆορ, gén. ἄορος ΝΑΙ
-- Ε @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'άορ']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ἔαρ-ος, μονόθεμα ακατάληκτα ουδέτερα / νέκταρ = ενικός
-- ================= 3η κλίση [[έαρ]] ΕΝΙΚΟΣ =========== -- βλ. κλητήρ
-- βλ και το όναρ έχει τύπους από άλλο (όνειρος)
export['άορ'] = function(frame) -- [[Πρότυπο:grc-κλίση-'άορ']]
local args = frame:getParent().args
-- 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['ουδ'] = '1'
args['κατηγορία κλίσης'] = 'ἄορ'
args['τύπος'] = 'ἄορ'
-- όπως, see below
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
-- hypothetical plural
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- ἄορ-1 minus 1 letters from end
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-1) -- minus zero letters
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni ἆορ
then
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
args['υποκατ02'] = 'ουδέτερα προπερισπώμενα'
else --
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- εαρ remove accent
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- άορ έαρ
stem["θ1"] = m_stems.word1(stem["θ0"]) -- εάρ-ων νέ-κταρ-ος accent on 1st syllable from the end
if mw.ustring.find(args['λήμμα'], 'αρ$') then
args['όπως'] = 'ἔαρ'
else
args['όπως'] = 'ἄορ'
end
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θοξ"] args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θοξ"] args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "0" -- same as nom
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0" -- same as nom
args['mod-οπθ'] = stem["θοξ"] args['mod-οπ'] = "α" args['mod-οπ+'] = "ᾰ"
args['mod-γπθ'] = stem["θ1"] args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θοξ"] args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θοξ"] args['mod-απ'] = "α" args['mod-απ+'] = "ᾰ" -- same as nom
args['mod-κπθ'] = stem["θοξ"] args['mod-κπ'] = "α" args['mod-κπ+'] = "ᾰ" -- same as nom
args['mod-οδθ'] = stem["θοξ"] args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ1"] args['mod-γδ'] = "οιν"
return decl(args)
end
-- Η @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'ήρως']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[ἥρως]] =========== --
-- φωνηεντόληκτα μονόθεμα καταληκτικά ουδέτερα παροξύτονα σε -ως -ωος
-- Smyth http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D24
export['ἥρως'] = function(frame) -- [[Πρότυπο:grc-κλίση-'ήρως']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- ἥρω-ες minus 2 letters from end
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
else
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- ἥρω-ς minus 1 letter from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- remove accent
stem["θ1"] = m_stems.word1(stem["θ0"]) -- ἡρώ-ων accent on 1st syllable from the end
args['κλίση'] = '3'
args['αρσ'] = '1'
args['κατηγορία κλίσης'] = 'ἥρως'
args['όπως'] = 'ἥρως'
args['τύπος'] = 'ἥρως'
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "ς" -- same as nom
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ1"] args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ1"] args['mod-γδ'] = "οιν"
return decl(args)
end
-- Η @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'ηχώ']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[ἠχώ]] =========== -- θέματα ἠχω- ἠχο-
-- ΕΚΚΡΕΜΟΤΗΤΑ [[τυτώ]] αν έχει πληθυντικούς, πρέπει να κάνω και τύπος=... με πληθ
-- http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D27
-- και έχουν ([[λεχώ]] +γε -όος) και δεν έχουν ([[Λητώ]] πληθυντικό
export['ἠχώ'] = function(frame) -- [[Πρότυπο:grc-κλίση-'ηχώ']] & ἠχὼ
local args = frame:getParent().args
-- 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 -- different from default. All stems must be written.
local stem = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- ἠχ minus 1 letter from end
args['κλίση'] = '3'
args['θηλ'] = '1'
args['ομάδα'] = 'ἠχώ'
-- τύπος = see below, at plural
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
args['υποκατ02'] = 'θηλυκά οξύτονα'
if args['λήμμα'] == 'λεχώ' then -- plural as 2nd declension
args['σημ'] = 'Μεταγενέστεροι τύποι πληθυντικού κατά τη 2η κλίση.'
args['υποκατ0'] = 'ετερόκλιτα'
args['κατηγορία κλίσης'] = 'λεχώ'
args['τύπος'] = 'λεχώ'
args['όπως'] = 'λεχώ'
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ώ"
args['mod-γεΛκειμ1'] = "λεχόος > "
args['mod-γεθ'] = stem["θ"] args['mod-γε'] = "οῦς"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "οῖ"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "ώ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "οῖ"
-- plural , dual as 2nd decl
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "οί"
args['αγπ'] = '-' args['αδπ'] = '-'
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "ούς"
args['αοδ'] = '-' args['αγδ'] = '-'
else -- only singular noun
args['α'] = 'εν'
args['sg-default'] = '1' -- SUPPRESS Cat όπως 'ΧΧ' χωρίς πληθυντικό
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
args['υποκατ02'] = 'θηλυκά οξύτονα'
-- φειδώ + ασυναίρετο
if args['τύπος'] == 'φειδώ' then
args['κατηγορία κλίσης'] = 'φειδώ'
args['όπως'] = 'φειδώ'
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ώ"
args['mod-γεθ'] = stem["θ"] .. "ό" args['mod-γε'] = "ος"
args['mod-γε2θ'] = stem["θ"] args['mod-γε2'] = "οῦς"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "οῖ"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "ώ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "οῖ"
else -- genitive only contracted
args['κατηγορία κλίσης'] = 'ἠχώ'
args['τύπος'] = 'ἠχώ'
args['όπως'] = 'ἠχώ'
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ώ"
args['mod-γεθ'] = stem["θ"] args['mod-γε'] = "οῦς"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "οῖ"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "ώ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "οῖ"
end
end
return decl(args)
end
-- Ι @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'ιδρώς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[ιδρώς]] =========== --
-- -ώς -ῶτος
export['ιδρώς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'ιδρώς']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- ἱδρ-ῶτ-ες minus 4 letters from end
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους προπερισπώμενα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- ἱδρ-ώς minus 2 letters from end
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά οξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους οξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
end
args['κλίση'] = '3'
-- gender
args['κατηγορία κλίσης'] = 'ἱδρώς'
args['τύπος'] = 'ἱδρώς'
args['όπως'] = 'ἱδρώς'
if args['θηλ'] == '1' then
args['υποκατ0'] = "που κλίνονται όπως το 'ἱδρώς' θηλυκά"
elseif args['αθ'] == '1' then
args['υποκατ0'] = "που κλίνονται όπως το 'ἱδρώς' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'ἱδρώς' αρσενικά"
end
args['mod-οεθ'] = stem["θ"] .. "ώ" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "ῶτ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "ῶτ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "ῶτ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] .. "ώ" args['mod-κε'] = "ς" -- same as nom
args['mod-οπθ'] = stem["θ"] .. "ῶτ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "ώτ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "ῶ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "ῶτ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "ῶτ" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "ῶτ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "ώτ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Ι @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'ιμάς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[ἱμάς]] [[πελεκᾶς]] =========== --
-- Οδοντικόληκτα καταληκτικά μονόθεμα με θέμα σε -ντ
export['ιμάς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'ιμάς']]
local args = frame:getParent().args
-- 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['κατηγορία κλίσης'] = 'ἱμάς'
-- gender see below
-- τύπος, όπως see below, oxytones, persipomena
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- ἱμά-ντ-ες πελεκᾶ-ντ-ες minus 4 letters from end
if mw.ustring.find(args['λήμμα'], 'άντες$') then
args['τύπος'] = 'ἱμάς'
args['όπως'] = 'ἱμάς'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
elseif mw.ustring.find(args['λήμμα'], 'ᾶντες$') then
args['τύπος'] = 'πελεκᾶς'
args['όπως'] = 'πελεκᾶς'
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους προπερισπώμενα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
end
end -- close -άντες, -ᾶνες
else -- in singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- ιμα-ς, πελεκᾶ-ς minus 1 letter from end
if mw.ustring.find(args['λήμμα'], 'άς$') then
args['τύπος'] = 'ἱμάς'
args['όπως'] = 'ἱμάς'
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά οξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους οξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
elseif mw.ustring.find(args['λήμμα'], 'ᾶς$') then
args['τύπος'] = 'πελεκᾶς'
args['όπως'] = 'πελεκᾶς'
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά περισπώμενα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους περισπώμενα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά περισπώμενα'
end
end -- close -άς -ᾶς
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- ιμα, πελεκα- remove accent
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- πελεκά- convert perispomeni to okseia
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "ντ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "ντ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "ντ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "ς" -- same as nom
args['mod-οπθ'] = stem["θ"] .. "ντ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θοξ"] .. "ντ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "ντ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "ντ" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .."ντ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θοξ"] .. "ντ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Ι @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'ιχθύς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[ἰχθύς]] =========== --
-- και γραφή με περισπωμένη [[ὀφρῦς]] / [[ὀφρύς]]
-- φωνηεντόληκτα μονόθεμα καταληκτικά ουδέτερα οξύτονα σε -ύς -ύος
-- Smyth 269.rules http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apage%3D68
-- Smyth 268 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D25
export['ἰχθύς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'ιχθύς']]
local args = frame:getParent().args
-- 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'
-- gender, see below
args['κατηγορία κλίσης'] = 'ἰχθύς'
args['όπως'] = 'ἰχθύς'
args['τύπος'] = 'ἰχθύς'
if args['σημ'] == '-' then
-- do nothing
else
args['σημ'] = "Το '''υ''' στις καταλήξεις είναι βραχύ ῠ- σε τρισύλλαβα και μακρό ῡ- σε δισύλλαβα."
end
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- ἰχθύ-ες ὀφρύ-ες (also CHECK ὀφρῦ-ες)minus 2 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά παροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἰχθύς' θηλυκά"
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἰχθύς' αρσενικά"
end
else
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- ἰχθύ-ς ὀφρῦ-ς minus 1 letter from end
if mw.ustring.find(args['λήμμα'], 'ῦς$') -- ῦς at end e.g. [[ὀφρῦς]]
then
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἰχθύς' περισπώμενα"
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά περισπώμενα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἰχθύς' θηλυκά"
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά περισπώμενα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἰχθύς' αρσενικά"
end
else -- NOT perispomeni
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'ἰχθύς' οξύτονα"
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά οξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἰχθύς' θηλυκά"
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
args['υποκατ0'] = "που κλίνονται όπως το 'ἰχθύς' αρσενικά"
end
end -- close plural singular
end -- close if perispomeni
stem["θο"] = m_stems.PerispomeniToOxia(stem["θ"]) -- ιχθύος οφρύος convert perispomeni to okseia
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) -- acc.pl. ἰχθῦς convert okseia to perispomeni
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θο"] args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θο"] args['mod-δε'] = "ϊ" args['mod-δε+'] = "ῐ̈"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "ν" -- stem as in nom ἰχθύν ὀφρῦν
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0" -- stem as in nom
args['mod-οπθ'] = stem["θο"] args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θο"] args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θο"] args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θπ"] args['mod-απ'] = "ς"
args['mod-κπθ'] = stem["θο"] args['mod-κπ'] = "ες" -- sam as nom.
args['mod-οδθ'] = stem["θο"] args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θο"] args['mod-γδ'] = "οιν"
return decl(args)
end
-- Κ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'κανών']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[κανών]] =========== --
-- ενρινόληκτα διπλόθεμα ακατάληκτα σε -ών -όνος
export['κανών'] = function(frame) -- [[Πρότυπο:grc-κλίση-'κανών']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- κανόν-ες minus 2 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
else -- singular
stem["θ"] = args['λήμμα'] -- κανών (nom.sg, voc.sg)
stem["θβ"] = mw.ustring.sub(args['λήμμα'],1,-3) --καν-
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά οξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους οξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
end
args['κλίση'] = '3'
-- gender -- see above
args['κατηγορία κλίσης'] = 'κανών'
args['τύπος'] = 'κανών'
args['όπως'] = 'κανών'
if args['θηλ'] == '1' then
args['υποκατ0'] = "που κλίνονται όπως το 'κανών' θηλυκά"
elseif args['αθ'] == '1' then
args['υποκατ0'] = "που κλίνονται όπως το 'κανών' κοινού γένους"
else args['υποκατ0'] = "που κλίνονται όπως το 'κανών' αρσενικά"
end
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θβ"] .. "όν" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θβ"] .. "όν" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θβ"] .. "όν" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0" -- same as nom
args['mod-οπθ'] = stem["θβ"] .. "όν" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θβ"] .. "όν" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θβ"] .. "ό" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θβ"] .. "όν" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θβ"] .. "όν" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θβ"] .. "όν" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θβ"] .. "όν" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Κ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'κλητήρ']] @@@@@@@@@@@@@@@@@@@@@@@@
-- # μπορούμε να βάλουμε το 'ρ' ως χαρ=ρ για να εξυπηρετηθεί π.χ. [[ἀπορρώξ]] ἀπορρῶγος
-- ================= 3η κλίση -ήρ-ῆρος & -ώρ-ῶρος [[κλητήρ]] [[ἰχώρ]] =========== --
export['κλητήρ'] = function(frame) -- [[Πρότυπο:grc-κλίση-'κλητήρ']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- κλητήρ-ες minus 2 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
else
stem["θ"] = args['λήμμα'] -- κλητήρ ἰχώρ
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
-- are they all macra I do not see any -έρ, όρ, OR dichrona -άρ, -ίρ, -ύρ
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"])
-- for genitive plural, need oksia IF in plurale tantum (stem is supposed κλητῆρ)
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- or okseia remains
args['κλίση'] = '3'
args['αρσ'] = '1' -- any other genders ??
args['όπως'] = 'κλητήρ'
if mw.ustring.find(args['λήμμα'], 'ώρ$') or mw.ustring.find(args['λήμμα'], 'ῶρες$') then
args['κατηγορία κλίσης'] = 'ἰχώρ'
args['τύπος'] = 'ἰχώρ'
args['όπως'] = 'ἰχώρ'
else
args['κατηγορία κλίσης'] = 'κλητήρ'
args['τύπος'] = 'κλητήρ'
args['όπως'] = 'κλητήρ'
end
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θπ"] args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θπ"] args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θπ"] args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
-- voc.sg
if args['λήμμα'] == 'σωτήρ' then
args['εξ'] = '1'
args['mod-κεθ'] = 'σῶτερ' args['mod-κε'] = "0" args['mod-κεΛκειμ'] = '<sup>*</sup>'
args['σημ'] = "* Εξαίρεση στην κλητική ενικού (αντί -ήρ)"
else
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0" -- same as nom
end
args['mod-οπθ'] = stem["θπ"] args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θοξ"] args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θπ"] args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θπ"] args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θπ"] args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θπ"] args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] args['mod-γδ'] = "οιν"
return decl(args)
end
-- Κ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'κόνδυ']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[κόνδυ]]-υος, [[νᾶπυ]] =========== --
-- φωνηεντόληκτα μονόθεμα καταληκτικά ουδέτερα παροξύτονα σε -υ -υος
-- βλ. βότρυς (αρσ, θηλ)
export['κόνδυ'] = function(frame) -- [[Πρότυπο:grc-κλίση-'κόνδυ']]
local args = frame:getParent().args
-- 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['ουδ'] = '1'
args['κατηγορία κλίσης'] = 'κόνδυ'
args['όπως'] = 'κόνδυ'
args['τύπος'] = 'κόνδυ'
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- κόνδ-υα minus 2 letters from end
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
else
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- κόνδ-υ νᾶπ-υ minus 2 letter from end
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
then
args['κατηγ0'] = 'Λέξεις προπερισπώμενες' -- [[νᾶπυ]]
args['υποκατ01'] = 'προπερισπώμενα'
args['υποκατ02'] = 'ουδέτερα προπερισπώμενα'
args['υποκατ03'] = "που κλίνονται όπως το 'κόνδυ' περισπώμενα"
else
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'κόνδυ' παροξύτονα"
end
end
-- υ belongs to stem
stem["θ0"] = m_stems.word0(stem["θ"]) -- κονδ-υ ναπ-υ remove accent
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- κόνδ-υος νάπυ-ος convert perispomeni to okseia
stem["θ1"] = m_stems.word1(stem["θ0"]) -- κονδ-ύων ναπύ-ων accent on 1st syllable from the end (Accent is tonos or oksia.)
args['mod-οεθ'] = stem["θ"] .. "υ" args['mod-οεθ+'] = stem["θ"] .. "ῠ" args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θοξ"] .. "υ" args['mod-γεθ+'] = stem["θοξ"] .. "ῠ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θοξ"] .. "υ" args['mod-δεθ+'] = stem["θοξ"] .. "ῠ" args['mod-δε'] = "ϊ" args['mod-δε+'] = "ῐ̈"
args['mod-αεθ'] = stem["θ"] .. "υ" args['mod-αεθ+'] = stem["θ"] .. "ῠ" args['mod-αε'] = "0" -- same as nom
args['mod-κεθ'] = stem["θ"] .. "υ" args['mod-κεθ+'] = stem["θ"] .. "ῠ" args['mod-κε'] = "0" -- same as nom
args['mod-οπθ'] = stem["θοξ"] .. "υ" args['mod-οπθ+'] = stem["θοξ"] .. "ῠ" args['mod-οπ'] = "α" args['mod-οπ+'] = "ᾰ"
args['mod-γπθ'] = stem["θ0"] .. "ύ" args['mod-γπθ+'] = stem["θ0"] .. "ῠ́" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θοξ"] .. "υ" args['mod-δπθ+'] = stem["θοξ"] .. "ῠ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θοξ"] .. "υ" args['mod-απθ+'] = stem["θοξ"] .. "ῠ" args['mod-απ'] = "α" args['mod-απ+'] = "ᾰ"
args['mod-κπθ'] = stem["θοξ"] .. "υ" args['mod-κπθ+'] = stem["θοξ"] .. "ῠ" args['mod-κπ'] = "α" args['mod-κπ+'] = "ᾰ"
args['mod-οδθ'] = stem["θοξ"] .. "υ" args['mod-οδθ+'] = stem["θοξ"] .. "ῠ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ0"] .. "ύ" args['mod-γδθ'] = stem["θ0"] .. "ῠ́" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Κ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'κτήμα']] @@@@@@@@@@@@@@@@@@@@@@@@
-- EDITOR_MUST_DEFINE pluralia: τύπος=
-- check if there are capitals
-- ======================= 3η κλίση [[κτῆμα]] [[ὄνομα]]===================================== --
-- 3η κλίση ουδέτερα οδοντικόληκτα ακατάληκτα μονόθεμα σε -α, -ατος
-- http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D18
-- |εξ=1 |παράρτημα=- USED with nocat at [[ὄνειρον]] for second plurals
-- και γάλα με κτ
export['κτῆμα'] = function(frame) -- [[Πρότυπο:grc-κλίση-'κτήμα']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- τύπος needs to be defined
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- κτήμ-ατα ονόμ-ατα override default stemnumber = 3 (μείον 2)
else
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- κτῆμ-α ὄνομ-α
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- κτημ βλεμμ ονομ
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- κτήμ BUT όνομ = θ1οξ ονόμ
-- stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) --
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
then
stem["θ1οξ"] = stem["θοξ"] -- κτήμ CHECK if any captial+spirit+tonos on first letter
else -- no perispomeni
stem["θ1οξ"] = m_stems.word1(stem["θοξ"]) -- βλέμμ (remains as is) ονόμ accent at last syllbable
end
args['κλίση'] = '3'
args['ουδ'] = '1'
-- args['υπερομάδα'] = 'ουδέτερα -α -ατος'
-- κατηγορία κλίσης below κτήμα / ὄνομα
-- define the proparoxytones
if (args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ")
then
-- κτήμ-ατα ονόμ-ατα
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
-- !!! editor has to define type it is not obvious what the singular would be
if args['τύπος'] == 'ὄνομα' or args['τύπος'] == 'ὄνομα' or args['όπως'] == 'ὄνομα' or args['όπως'] == 'ὄνομα' then
args['κατηγορία κλίσης'] = 'ὄνομα'
args['τύπος'] = 'ὄνομα'
args['όπως'] = 'ὄνομα'
else -- or a warning if empty??
args['κατηγορία κλίσης'] = 'κτῆμα'
args['τύπος'] = 'κτῆμα'
args['όπως'] = 'κτῆμα'
end
else -- in singular
if stem["θ"] == stem["θ1οξ"] then
args['κατηγορία κλίσης'] = 'κτῆμα'
args['τύπος'] = 'βλέμμα'
args['όπως'] = 'κτῆμα'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
elseif mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
then
args['κατηγορία κλίσης'] = 'κτῆμα'
args['τύπος'] = 'κτῆμα'
args['όπως'] = 'κτῆμα'
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
args['υποκατ02'] = 'ουδέτερα προπερισπώμενα'
else
args['κατηγορία κλίσης'] = 'ὄνομα'
args['τύπος'] = 'ὄνομα'
args['όπως'] = 'ὄνομα'
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
end
end
-- Η δίχρονη παραλήγουσα dicrona α ι υ are obvious in singular:
--* τα βραχέα α, ι, υ, οξύνονται
--* τα μακρά α, ι, υ περισπώνται
args['mod-οεθ'] = stem["θ"] .. "α" args['mod-οεθ+'] = stem["θ"] .. "ᾰ" args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ1οξ"] .. "ατ" args['mod-γεθ+'] = stem["θ1οξ"] .. "ᾰτ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ1οξ"] .. "ατ" args['mod-δεθ+'] = stem["θ1οξ"] .. "ᾰτ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "α" args['mod-αεθ+'] = stem["θ"] .. "ᾰ" args['mod-αε'] = "0" -- same as nom.
args['mod-κεθ'] = stem["θ"] .. "α" args['mod-κεθ+'] = stem["θ"] .. "ᾰ" args['mod-κε'] = "0" -- same as nom.
args['mod-οπθ'] = stem["θ1οξ"] .. "ατ" args['mod-οπθ+'] = stem["θ1οξ"] .. "ᾰτ" args['mod-οπ'] = "α" args['mod-οπ+'] = "ᾰ"
args['mod-γπθ'] = stem["θ0"] .. "άτ" args['mod-γπθ+'] = stem["θ0"] .. "ᾰ́τ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ1οξ"] .. "α" args['mod-δπθ+'] = stem["θ1οξ"] .. "ᾰ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ1οξ"] .. "ατ" args['mod-απθ+'] = stem["θ1οξ"] .. "ᾰτ" args['mod-απ'] = "α" args['mod-απ+'] = "ᾰ" -- same as nom.
args['mod-κπθ'] = stem["θ1οξ"] .. "ατ" args['mod-κπθ+'] = stem["θ1οξ"] .. "ᾰτ" args['mod-κπ'] = "α" args['mod-κπ+'] = "ᾰ" -- same as nom.
args['mod-οδθ'] = stem["θ1οξ"] .. "ατ" args['mod-οδθ+'] = stem["θ1οξ"] .. "ᾰτ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ0"] .. "άτ" args['mod-γδθ+'] = stem["θ0"] .. "ᾰ́τ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- EDITOR_MUST_DEFINE δίχρ=
-- Κ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'κτήτωρ']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[αὐτοκράτωρ]] =========== --
-- υγρόληκτα διπλόθεμα ακατάληκτα σε -ωρ-ορος
-- βλ και [[πραίτωρ]]-ωρος [[ἰχώρ]], ουδέτερο [[νέκταρ]]-αρος
export['κτήτωρ'] = function(frame) -- [[Πρότυπο:grc-κλίση-'κτήτωρ']]
local args = frame:getParent().args
-- 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'
-- gender -- see below
args['κατηγορία κλίσης'] = 'κτήτωρ'
-- τύπος, όπως -- see at voc.
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- αὐτοκράτ-ορ-ες ῥήτ-ορ-ες minus 4 letters from end
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- αὐτοκράτ-ωρ ῥήτ-ωρ minus 2 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- αὐτοκρατ ῥητ-ορ remove accent
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) -- ῥῆτ-ορ
-- check if problem with capital+spirit+tonos
-- all cases except κε
args['mod-οεθ'] = stem["θ"] .. "ωρ" args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ"] .. "ορ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "ορ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "ορ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
-- κε (δίχρ=)
args['mod-οπθ'] = stem["θ"] .. "ορ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ0"] .. "όρ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "ορ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "ορ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "ορ" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "ορ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ0"] .. "όρ" args['mod-γδ'] = "οιν"
-- voc.sg define prosody
if mw.ustring.find(stem["θ"], m_data.brachy_oxeia) -- brachy+okseia or vareia
then -- keep same as nom
args['mod-κεθ'] = stem["θ"] .. "ορ" args['mod-κε'] = "0"
args['τύπος'] = 'ἀλέκτωρ'
args['όπως'] = 'ἀλέκτωρ'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'ἀλέκτωρ' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'ἀλέκτωρ' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'ἀλέκτωρ' αρσενικά"
end
elseif mw.ustring.find(args['λήμμα'], m_data.macron_oxeia) -- marcon+okseia or vareia
or mw.ustring.find(args['λήμμα'], m_data.diphthong_tonos) -- diphthong+tonos (okseia, vareia, perispomeni) -- [[δαίωμν]]
then -- perispomeni
args['mod-κεθ'] = stem["θπ"] .. "ορ" args['mod-κε'] = "0"
args['τύπος'] = 'κτήτωρ'
args['όπως'] = 'κτήτωρ'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'κτήτωρ' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'κτήτωρ' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'κτήτωρ' αρσενικά"
end
-- dubious dichrona
elseif mw.ustring.find(args['λήμμα'], m_data.dichronon_oxeia) -- dichronon+okseia or vareia
then
-- NOT in diphtongs the ι υ
if mw.ustring.find(args['λήμμα'], m_data.diphthong_tonos) -- diphthong+tonos (okseia, vareia, perispomeni) NOT dialytics ΐῒῗΰῢῧ
then
args['mod-κεθ'] = stem["θπ"] .. "ορ" args['mod-κε'] = "0"
args['τύπος'] = 'κτήτωρ'
args['όπως'] = 'κτήτωρ'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'κτήτωρ' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'κτήτωρ' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'κτήτωρ' αρσενικά"
end
else -- editor must define
if args['δίχρ'] == 'β' then -- KEEP IT
args['mod-κεθ'] = stem["θ"] .. "ορ" args['mod-κε'] = "0"
if args['σημ'] == '-' then args['σημ'] = '' else
args['σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι βραχύ.'
end
args['τύπος'] = 'ἀλέκτωρ'
args['όπως'] = 'ἀλέκτωρ'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'ἀλέκτωρ' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'ἀλέκτωρ' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'ἀλέκτωρ' αρσενικά"
end
elseif args['δίχρ'] == 'μ' then -- perispomeni
args['mod-κεθ'] = stem["θπ"] .. "ορ" args['mod-κε'] = "0"
if args['σημ'] == '-' then args['σημ'] = '' else
args['σημ'] = 'Το δίχρονο φωνήεν της παραλήγουσας είναι μακρό.'
end
args['τύπος'] = 'κτήτωρ'
args['όπως'] = 'κτήτωρ'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'κτήτωρ' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'κτήτωρ' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ0'] = "που κλίνονται όπως το 'κτήτωρ' αρσενικά"
end
elseif args['δίχρ'] == '?' then
args['κεΛ'] = '...<span style="color:red;">?</span>...ορ' -- LOCKED for editors
args['σημ'] = '<span style="color:red;">Δεν</span> υπάρχουν πληροφορίες για την προσωδία<br>του δίχρονου φωνήεντος στην παραλήγουσα.<br>Δε γνωρίζουμε πώς θα τονιζόταν η κλητική ενικού.'
args['τύπος'] = '-'
args['όπως'] = '-'
args['κατηγ02'] = "Λέξεις με άγνωστη προσωδία"
-- [[Βίκτωρ]] [[πράκτωρ]]
args['cat-extra0'] = "Ουσιαστικά με κλίση όπως το 'κτήτωρ' με άγνωστη προσωδία (αρχαία ελληνικά)"
elseif args['δίχρ'] ~= 'β' and args['δίχρ'] ~= 'μ' and args['δίχρ'] ~= '?'
or (args['δίχρ'] == '' or args['δίχρ'] == nil)
then
return error_dichr(errordichrstring) -- cf error fucntions at Module
end -- close editor must define
end -- close if dichrono
end -- close if prosody
return decl(args)
end
-- Κ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'κυνόδους']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[κυνόδους]]-οντος =========== --
-- #[[ὀδούς]] compounds, τα περισσότερα αθ=1 σαν διγενή μονοκατάληκτα επίθετα
export['κυνόδους'] = function(frame) -- [[Πρότυπο:grc-κλίση-'κυνόδους']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-6) -- κυνόδ-ο-ντ-ες minus 5 letters from end
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- κυνόδ-ους minus 3 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- κυνοδ-όντ-ων remove accent
args['κλίση'] = '3'
-- gender
args['κατηγορία κλίσης'] = 'κυνόδους'
args['τύπος'] = 'κυνόδους'
args['όπως'] = 'κυνόδους'
if args['θηλ'] == '1' then
args['υποκατ03'] = "που κλίνονται όπως το 'κυνόδους' θηλυκά"
elseif args['αθ'] == '1' then
args['υποκατ03'] = "που κλίνονται όπως το 'κυνόδους' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ03'] = "που κλίνονται όπως το 'κυνόδους' αρσενικά"
end
args['mod-οεθ'] = stem["θ"] .. "ου" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "οντ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "οντ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "οντ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] .. "ου" args['mod-κε'] = "ς" -- same as nom
args['mod-οπθ'] = stem["θ"] .. "οντ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ0"] .. "όντ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "ου" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "οντ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "οντ" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "οντ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ0"] .. "όντ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Κ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'κώδων']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ???? Έχει και προπαροξύτονα?
-- ================= 3η κλίση [[κώδων]] [[Ἕλλην]] =========== --
-- ενρινόληκτα μονόθεμα ακατάληκτα σε -ων-ωνος, -ην-ηνος βαρύτονα (οξύτονα μήν, μηνός)
-- βλ και χειμών
export['κώδων'] = function(frame) -- [[Πρότυπο:grc-κλίση-'κώδων']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- κώδων-ες minus 2 letters from end
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
end
else -- singular
stem["θ"] = args['λήμμα'] -- [[κώδων]] [[Έλλην]]
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then -- ἡ [[ἅλων]]
args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- κωδων remove accent
stem["θ1"] = m_stems.word1(stem["θ0"]) -- κωδών accent on 1st syllable from the end
-- dative plural need κώδω WITHOUT last n
stem["θ_δοτ"] = mw.ustring.sub(stem["θ"],1,-2) -- minus last
args['κλίση'] = '3'
-- gender -- see above
if mw.ustring.find(args['λήμμα'], 'ην$') or mw.ustring.find(args['λήμμα'], 'ηνες$') then
args['κατηγορία κλίσης'] = 'Ἕλλην'
args['τύπος'] = 'Ἕλλην'
args['όπως'] = 'Ἕλλην'
if args['θηλ'] == '1' then -- example ??
args['υποκατ0'] = "που κλίνονται όπως το 'Ἕλλην' θηλυκά"
else args['υποκατ0'] = "που κλίνονται όπως το 'Ἕλλην' αρσενικά"
end
elseif mw.ustring.find(args['λήμμα'], 'ων$') or mw.ustring.find(args['λήμμα'], 'ωνες$') then
args['κατηγορία κλίσης'] = 'κώδων'
args['τύπος'] = 'κώδων'
args['όπως'] = 'κώδων'
if args['θηλ'] == '1' then
args['υποκατ0'] = "που κλίνονται όπως το 'κώδων' θηλυκά"
elseif args['αθ'] == '1' then -- [[μήκων]]?
args['υποκατ0'] = "που κλίνονται όπως το 'κώδων' κοινού γένους"
else args['υποκατ0'] = "που κλίνονται όπως το 'κώδων' αρσενικά"
end
end
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ"] args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0" -- same as nom
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ1"] args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ_δοτ"] args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ1"] args['mod-γδ'] = "οιν"
return decl(args)
end
-- Λ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'λάτρις']] @@@@@@@@@@@@@@@@@@@@@@@@
-- πού το βρήκα τη δεύτερη στήλη λάτριδες? NOT at LOGEIOn
-- Smyth http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D25
--## υπάρχει κάποιο θηλυκό για catchword?
-- ================= [[λάτρις]] 3η κλίση =========== -- βλ. @φύλαξ (έρις)
-- f.linkcontrol & f.create_link used here
-- λάτριες = Ησύχιος. λάτριδος = Χοιροβοσκός λάτρεις = ?
export['λάτρις'] = function(frame) -- [[Πρότυπο:grc-κλίση-'λάτρις']]
local args = frame:getParent().args
-- 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 -- different from default. All stems must be written.
local stem = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- λάτρι minus 2 letter from end
stem["θ0"] = m_stems.word0(stem["θ"]) -- λατρι
stem["θ1"] = m_stems.word1(stem["θ0"]) -- λατρί
args['κλίση'] = '3'
args['κατηγορία κλίσης'] = 'λάτρις'
args['τύπος'] = 'λάτρις'
args['όπως'] = 'λάτρις'
args['κατηγ0'] = 'Λέξεις παροξύτονες' -- are there προπερισπώμενα??
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'λάτρις' θηλυκά"
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'λάτρις' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'λάτρις' αρσενικά"
end
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] args['mod-γε'] = "ος"
-- with λάτριδ- see below + υπότιτλος-πλ2
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "ν"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0"
args['mod-κε2θ'] = stem["θ"] args['mod-κε2'] = "ς"
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ1"] args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] args['mod-δπ'] = "ι" args['mod-δπ+'] = "ῐ"
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "ες"
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ1"] args['mod-γδ'] = "οιν"
if args['υπότιτλος-πλ2'] == '1' then
-- add 2nd gen. too
args['mod-γε2θ'] = stem["θ"] .. "δ" args['mod-γε2'] = "ος"
args['υπότιτλος-πλ2'] = 'με θέμα λατριδ-'
args['οπΛ2'] = linkcontrol3((stem["θ"]), "δ", "ες")
args['γπΛ2'] = linkcontrol3((stem["θ1"]), "δ", "ων")
args['δπΛ2'] = create_link(stem["θ"] .. "σι", stem_color(stem["θ"]) .. ending_color("σῐ")) .. '(' .. create_link(stem["θ"] .. "σιν", ending_color("ν")) .. ')'
args['απΛ2'] = create_link(stem["θ"] .. "δ" .. "ας", stem_color(stem["θ"]) .. infix_color("δ") .. ending_color("ᾰς"))
args['κπΛ2'] = linkcontrol3((stem["θ"]), "δ", "ες")
end
return decl(args)
end
-- Ν @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'vαῦς']] @@@@@@@@@@@@@@@@@@@@@@@@
--####### epic needed
-- ================= 3η κλίση [[vαῦς]] =========== --
-- 3η κλίση αθ http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D26
-- ἡ ναῦς separately
export['ναῦς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'vαῦς']]
local args = frame:getParent().args
-- 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 -- different from default. All stems must be written.
local stem = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- ν -αῦς/ῆες minus 3 letters from end
args['κλίση'] = '3'
args['θηλ'] = '1'
args['κατηγορία κλίσης'] = 'vαῦς'
args['τύπος'] = 'vαῦς'
args['όπως'] = 'vαῦς'
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- νῆες
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
else -- vαῦς
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
args['υποκατ02'] = 'θηλυκά περισπώμενα'
end
args['mod-οεθ'] = stem["θ"] .. "αῦ" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "εώ" args['mod-γε'] = "ς"
args['mod-δεθ'] = stem["θ"] .. "η" args['mod-δε'] = "ΐ"
args['mod-αεθ'] = stem["θ"] .. "αῦ" args['mod-αε'] = "ν"
args['mod-κεθ'] = stem["θ"] .. "αῦ" args['mod-κε'] = "0"
args['mod-οπθ'] = stem["θ"] .. "ῆ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "εῶ" args['mod-γπ'] = "ν"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "αυ" args['mod-δπ'] = "σί" args['mod-δπ+'] = "σῐ́"
args['mod-απθ'] = stem["θ"] .. "αῦ" args['mod-απ'] = "ς"
args['mod-κπθ'] = args['mod-οπθ'] args['mod-κπ'] = args['mod-οπ'] -- as in nominative plural
args['mod-οδθ'] = stem["θ"] .. "ῆ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "ε" args['mod-γδ'] = "οῖν"
return decl(args)
end
-- Ν @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'νεοθήξ']] @@@@@@@@@@@@@@@@@@@@@@@@
-- # μπορούμε στο #κλητήρ να βάλουμε το 'ρ' ως χαρ=ρ για να εξυπηρετηθεί π.χ. [[ἀπορρώξ]] ἀπορρῶγος
-- ΟΧΙ μετακίνηση τόνου όταν η λήγουσα είναι βραχεία απόρρωγες. ΜΕΝΕΙ (LSJ) ἀπορρῶγες
-- ================= 3η κλίση -ήρ-ῆρος & -ώρ-ῶρος [[κλητήρ]] [[ἰχώρ]] =========== --
export['νεοθήξ'] = function(frame) -- [[Πρότυπο:grc-κλίση-'νεοθήξ']]
local args = frame:getParent().args
-- 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'
-- κατηγορία κλίσης, τύπος, όπως see below
-- stems
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- ἀπορρῶ-γ-ες νεοθῆγες minus 3 letters from end stemnumber = 4
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
else -- singular
-- stem["θ"] = args['λήμμα'] -- νεοθή-ξ, ἀπορρώ-ξ-
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- ἀπορρώ-ξ minus 1 letter from end stemnumber = 2
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά οξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους οξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- remove accent απορρω- ξ ή γ
-- are they all macra Ισ τηερε -έξ -εγες?
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"])
-- for genitive plural, need oksia IF in plurale tantum (stem is supposed κλητῆρ)
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- or okseia remains
-- stem["θ1"] = m_stems.word1(stem["θ0"]) -- put OKSEIA at the last syllable from end of atono
stem["θ2"] = m_stems.word2(stem["θ0"]) -- απόρρω-ξ/γ put OKSEIA at the 2nd form last syllable from end of atono
-- κατηγορίες
if mw.ustring.find(args['λήμμα'], 'ῆγες$') or mw.ustring.find(args['λήμμα'], 'ήξ$')
then
args['κατηγορία κλίσης'] = 'νεοθήξ'
args['τύπος'] = 'νεοθήξ'
args['όπως'] = 'νεοθήξ'
if args['θηλ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'νεοθήξ' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'νεοθήξ' κοινού γένους"
elseif args['αρσ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'νεοθήξ' αρσενικά" -- this is default
end
elseif mw.ustring.find(args['λήμμα'], 'ῶγες$') or mw.ustring.find(args['λήμμα'], 'ώξ$')
then
args['κατηγορία κλίσης'] = 'ἀπορρώξ'
args['τύπος'] = 'ἀπορρώξ'
args['όπως'] = 'ἀπορρώξ'
if args['θηλ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'ἀπορρώξ' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'ἀπορρώξ' κοινού γένους"
elseif args['αρσ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'ἀπορρώξ' αρσενικά" -- this is default
end
end
args['mod-οεθ'] = stem["θ"] .. "ξ" args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θπ"] .. "γ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θπ"] .. "γ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θπ"] .. "γ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] .. "ξ" args['mod-κε'] = "0"
args['mod-οπθ'] = stem["θπ"] .. 'γ' args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θοξ"] .. "γ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θπ"] .."ξ" args['mod-δπ'] = "ι" args['mod-δπ+'] = "ῐ"
args['mod-απθ'] = stem["θπ"] .. "γ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θπ"] .. "γ" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θπ"] .. "γ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θπ"] .. "γ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Ξ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'Ξενοφών']] @@@@@@@@@@@@@@@@@@@@@@@@
-- BUG capital+spirit το σύστημα δε βλέπει π.χ. [[Ἀντιφῶν]] δε μου βγάζει κατηγορίες
-- WRITE AGAIN |όνομα=1|λήμμα=Ἀντιφῶν
-- 99% κύρια, default κύρια, if not |όνομα=-
-- + Σολομών Σολομφῶντος
-- ================= 3η κλίση [[Ξενοφῶν]] =========== --
-- Οδοντικόληκτα καταληκτικά διπλόθεμα συνηρημένα σε -ῶν, -ῶντος από -άωντ- -άοντ- Κύρια ονόματα
-- βλ και οδούς
export['Ξενοφών'] = function(frame) -- [[Πρότυπο:grc-κλίση-'Ξενοφών']]
local args = frame:getParent().args
-- 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'
-- gender see below (are there any non masc??)
if mw.ustring.find(args['λήμμα'], 'ών$') then
args['κατηγορία κλίσης'] = 'Σολομών'
args['τύπος'] = 'Σολομών'
args['όπως'] = 'Σολομών'
else -- ῶν
args['κατηγορία κλίσης'] = 'Ξενοφῶν'
args['τύπος'] = 'Ξενοφῶν'
args['όπως'] = 'Ξενοφῶν'
end
if args['όνομα'] == '-' then -- as in lemma [[-φῶν]]
-- do nothing
else
args['όνομα'] = '1'
end
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-6) -- Ξενοφ-ῶντ-ες minus 5 letters from end
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους προπερισπώμενα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- Ξενοφ-ῶν Σολομ-ών minus 2 letters from end
if mw.ustring.find(args['λήμμα'], 'ών$') then
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά οξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους οξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
else -- ῶν
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά περισπώμενα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους περισπώμενα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά περισπώμενα'
end
end -- close if -ών Σολομών
end -- close numbers
if args['θηλ'] == '1' then
if mw.ustring.find(args['λήμμα'], 'ών$') then
args['υποκατ03'] = "που κλίνονται όπως το 'Σολομών' θηλυκά"
else
args['υποκατ03'] = "που κλίνονται όπως το 'Ξενοφῶν' θηλυκά"
end
elseif args['αθ'] == '1' then
if mw.ustring.find(args['λήμμα'], 'ών$') then
args['υποκατ03'] = "που κλίνονται όπως το 'Σολομών' κοινού γένους"
else
args['υποκατ03'] = "που κλίνονται όπως το 'Ξενοφῶν' κοινού γένους"
end
else
args['αρσ'] = '1'
if mw.ustring.find(args['λήμμα'], 'ών$') then
args['υποκατ03'] = "που κλίνονται όπως το 'Σολομών' αρσενικά"
else
args['υποκατ03'] = "που κλίνονται όπως το 'Ξενοφῶν' αρσενικά"
end
end
if mw.ustring.find(args['λήμμα'], 'ών$') then
args['mod-οεθ'] = stem["θ"] .. "ών" args['mod-οε'] = "0"
args['mod-κεθ'] = stem["θ"] .. "ών" args['mod-κε'] = "0" -- same as nom
else
args['mod-οεθ'] = stem["θ"] .. "ῶν" args['mod-οε'] = "0"
args['mod-κεθ'] = stem["θ"] .. "ῶν" args['mod-κε'] = "0" -- same as nom
end
-- οε see above
args['mod-γεθ'] = stem["θ"] .. "ῶντ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "ῶντ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "ῶντ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
-- ke = see above
args['mod-οπθ'] = stem["θ"] .. "ῶντ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "ώντ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "ῶ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "ῶντ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "ῶντ" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "ῶντ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "ώντ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Ο @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'οδούς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[ὀδούς]] =========== --
-- Οδοντικόληκτα καταληκτικά μονόθεμα σε -ούς, -ούντος
-- βλ τα σύνθετά του #μονόδους
-- βλ και συνηρημένα πλακοῦς, πλακοῦντος
export['οδούς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'οδούς']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-6) -- ὀδ όντ-ες minus 5 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- ὀδ-ούς minus 3 letters from end
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά οξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους οξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
end
args['κλίση'] = '3'
-- gender
args['κατηγορία κλίσης'] = 'ὀδούς'
args['τύπος'] = 'ὀδούς'
args['όπως'] = 'ὀδούς'
if args['θηλ'] == '1' then
args['υποκατ03'] = "που κλίνονται όπως το 'ὀδούς' θηλυκά"
elseif args['αθ'] == '1' then
args['υποκατ03'] = "που κλίνονται όπως το 'ὀδούς' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ03'] = "που κλίνονται όπως το 'ὀδούς' αρσενικά"
end
args['mod-οεθ'] = stem["θ"] .. "ού" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "όντ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "όντ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "όντ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] .. "ού" args['mod-κε'] = "ς" -- same as nom
args['mod-οπθ'] = stem["θ"] .. "όντ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "όντ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "οῦ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "όντ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "όντ" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "όντ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "όντ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Π @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'πατρίς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- δ1 οξύτονα [[:Κατηγορία:Ουσιαστικά που κλίνονται όπως η ομάδα 'δ1' (αρχαία ελληνικά)]]
-- βλ. φύλαξ = παροξύτονα όπως η [[ἔρις]], ο [[Πάρις]]
-- και αθ=1 ο/η [[φορβάς]], μιγάς κλπ
-- EXTERNAL_LINK
-- + -ίς -ῖδος MACRON [[σφραγίς]]
-- ================= 3η κλίση -ίς-ίδος, άς-άδος, ύς-ύδος [[πατρίς]]/[[σφραγίς]] [[δεκάς]] [[χλαμύς]]/[[δαγύς]] =========== --
-- 3η κλίση -'ς, -'δος οδοντικόληκτα με χαρακτήρα δ dentals with δ
-- [[Πρότυπο:grc-κλίση-'πατρίς']]
-- VOCATIVE SINGULAR for oxytones -ίς -ίδος
-- Smyth (see link below) gives ὦ ἐλπί / 249.a. The vocative is the same as the nominative: a. In stems ending in a stop (16) consonant (except those in ιτ, ιδ, ι_θ; ντ in nouns)
-- Stamatakos Grammar 57.4. says 'Usually they are taught with voc.sg = nom.sg'
-- Tzartzanos Grammar 82.2.a. says voc.sg = nom.sg except barytones and the oxytone [[τυραννίς]] and the [[παῖς]] (this is irregular anyway)
export['πατρίς'] = function(frame)
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
args['μείον'] = 3 -- override default stemnumber = 3 (μείον 2)
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4)
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
then
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
if args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπερισπώμενα'
else args['υποκατ02'] = 'θηλυκά προπερισπώμενα' end
else
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else args['υποκατ02'] = 'θηλυκά παροξύτονα' end
end
else -- singular
args['μείον'] = 1 -- override default stemnumber = 3 (μείον 2)
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2)
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους οξύτονα'
else args['υποκατ02'] = 'θηλυκά οξύτονα' end
end
stem["θ1π"] = m_stems.OxiaToPerispomeni(stem["θ"]) -- for macron ι, υ = -ῖδος, ῦδος (no -αδος found)
args['κλίση'] = '3'
-- κατηγορία κλίσης see below
-- plus note from Smyth's Grammar vocative singular -ί
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
args['SmythVocative'] = ''
else
args['SmythVocative'] = '<br>* Κατά τη [[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Smyth|Γραμματική του Smyth]]'
.. ', η [https://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D17 κλητική ενικού χωρίς το <b>-ς</b>]'
end
-- -ίς -ῖδος MACRON only a few words:
if args["λήμμα"] == 'σφραγίς' or args["λήμμα"] == 'σφραγῖδες'
or args["λήμμα"] == 'ἀψίς' or args["λήμμα"] == 'ἀψῖδες' -- with psile
or args["λήμμα"] == 'ἁψίς' or args["λήμμα"] == 'ἁψῖδες' -- with daseia
or args["λήμμα"] == 'βαλβίς' or args["λήμμα"] == 'βαλβῖδες'
or args["λήμμα"] == 'γελγίς' or args["λήμμα"] == 'γελγῖδες'
or args["λήμμα"] == 'εὐκρηπίς' or args["λήμμα"] == 'εὐκρηπῖδες'
or args["λήμμα"] == 'εὐπλοκαμίς' or args["λήμμα"] == 'εὐπλοκαμῖδες'
or args["λήμμα"] == 'ἐϋπλοκαμίς' or args["λήμμα"] == 'ἐϋπλοκαμῖδες'
or args["λήμμα"] == 'εὐψηφίς' or args["λήμμα"] == 'εὐψηφῖδες'
or args["λήμμα"] == 'θυΐς' or args["λήμμα"] == 'θυῗδες' -- add note for Cod. -ίδος
or args["λήμμα"] == 'κηκίς' or args["λήμμα"] == 'κηκῖδες'
or args["λήμμα"] == 'κηλίς' or args["λήμμα"] == 'κηλῖδες'
or args["λήμμα"] == 'κνηκίς' or args["λήμμα"] == 'κνηκῖδες'
or args["λήμμα"] == 'κνημίς' or args["λήμμα"] == 'κνημῖδες'
or args["λήμμα"] == 'κρηπίς' or args["λήμμα"] == 'κρηπῖδες'
or args["λήμμα"] == 'νησίς' or args["λήμμα"] == 'νησῖδες'
or args["λήμμα"] == 'οἰνοκηκίς' or args["λήμμα"] == 'οἰνοκηκῖδες'
or args["λήμμα"] == 'ὀπισθοκρηπίς' or args["λήμμα"] == 'ὀπισθοκρηπῖδες'
or args["λήμμα"] == 'περικνημίς' or args["λήμμα"] == 'περικνημῖδες'
or args["λήμμα"] == 'πλοκαμίς' or args["λήμμα"] == 'πλοκαμῖδες'
or args["λήμμα"] == 'προκνημίς' or args["λήμμα"] == 'προκνημῖδες'
or args["λήμμα"] == 'πυργίς' or args["λήμμα"] == 'πυργῖδες'
or args["λήμμα"] == 'ῥακίς' or args["λήμμα"] == 'ῥακῖδες'
or args["λήμμα"] == 'φαρκίς' or args["λήμμα"] == 'φαρκῖδες'
or args["λήμμα"] == 'χειροκνημίς' or args["λήμμα"] == 'χειροκνημῖδες'
or args["λήμμα"] == 'χειρίς' or args["λήμμα"] == 'χειρῖδες'
or args["λήμμα"] == 'ψαμαθίς' or args["λήμμα"] == 'ψαμαθῖδες'
or args["λήμμα"] == 'ψηφίς' or args["λήμμα"] == 'ψηφῖδες'
then
if args['αθ'] == '1' then args['αθ'] = '1' else args['θηλ'] = '1' end
args['κατηγορία κλίσης'] = "πατρίς"
args['τύπος'] = 'σφραγίς'
args['όπως'] = 'σφραγίς'
args['σημ'] = 'Με μακρό γιώτα στο θέμα -ίς -ῖδος.' .. args['SmythVocative']
-- LOCKED - no changes by editor
args['οεθ'] = stem["θ"] args['οε'] = "ς"
args['γεθ'] = stem["θ1π"] .. 'δ' args['γε'] = 'ος'
args['δεθ'] = stem["θ1π"] .. 'δ' args['δε'] = 'ι' args['δε+'] = 'ῐ'
args['αεθ'] = stem["θ1π"] .. 'δ' args['αε'] = "α" args['αε+'] = "ᾰ"
args['κεθ'] = stem["θ"] args['κε'] = "ς" args['κεΛκειμ'] = '*' -- or, as in nom
args['οπθ'] = stem["θ1π"] .. 'δ' args['οπ'] = "ες"
args['γπθ'] = stem["θ"] .. 'δ' args['γπ'] = "ων"
args['δπθ'] = stem["θ1π"] args['δπ'] = "σι" args['δπ+'] = "σῐ" args['ν'] = '1'
args['απθ'] = stem["θ1π"] .. 'δ' args['απ'] = "ας" args['απ+'] = "ᾰς"
args['κπθ'] = args['οπθ'] args['κπ'] = args['οπ'] -- as in nom
args['οδθ'] = stem["θ1π"] .. 'δ' args['οδ'] = "ε"
args['γδθ'] = stem["θ"] .. 'δ' args['γδ'] = "οιν"
elseif mw.ustring.find(args["λήμμα"], '[αΑεΕηΗοΟ]ίς') -- diphthong με ίς (okseia, vareia, perispomeni) NOT dialytics ΐῒῗΰῢῧ
then
-- add block σφραγίς
if args['αθ'] == '1' then args['αθ'] = '1' else args['θηλ'] = '1' end
args['κατηγορία κλίσης'] = "πατρίς"
args['τύπος'] = 'κατακλείς'
args['όπως'] = 'κατακλείς'
args['σημ'] = '' -- args['SmythVocative'] -- Ισχύει για το κλείς κατακλείς?
-- LOCKED - no changes by editor
-- ##?? εδώ? η κλητική?
args['οεθ'] = stem["θ"] args['οε'] = "ς"
args['γεθ'] = stem["θ1π"] .. 'δ' args['γε'] = 'ος'
args['δεθ'] = stem["θ1π"] .. 'δ' args['δε'] = 'ι' args['δε+'] = 'ῐ'
args['αεθ'] = stem["θ1π"] .. 'δ' args['αε'] = "α" args['αε+'] = "ᾰ"
args['κεθ'] = stem["θ"] args['κε'] = "ς"
args['οπθ'] = stem["θ1π"] .. 'δ' args['οπ'] = "ες"
args['γπθ'] = stem["θ"] .. 'δ' args['γπ'] = "ων"
args['δπθ'] = stem["θ1π"] args['δπ'] = "σι" args['δπ+'] = "σῐ" args['ν'] = '1'
args['απθ'] = stem["θ1π"] .. 'δ' args['απ'] = "ας" args['απ+'] = "ᾰς"
args['κπθ'] = args['οπθ'] args['κπ'] = args['οπ'] -- as in nom
args['οδθ'] = stem["θ1π"] .. 'δ' args['οδ'] = "ε"
args['γδθ'] = stem["θ"] .. 'δ' args['γδ'] = "οιν"
elseif args["λήμμα"] == 'δαγύς' or args["λήμμα"] == 'δαγῦδες'
then
args['θηλ'] = '1'
args['κατηγορία κλίσης'] = "χλαμύς"
args['τύπος'] = 'δαγύς'
args['όπως'] = 'δαγύς'
args['σημ'] = 'Με μακρό ύψιλον στο θέμα -ύς -ῦδος.' -- NOOOOOOO .. args['SmythVocative'] it is only for -ιτ, -ιδ, -ιθ
-- LOCKED: no changes by editor
args['οεθ'] = stem["θ"] args['οε'] = "ς"
args['γεθ'] = stem["θ1π"] .. 'δ' args['γε'] = 'ος'
args['δεθ'] = stem["θ1π"] .. 'δ' args['δε'] = 'ι' args['δε+'] = 'ῐ'
args['αεθ'] = stem["θ1π"] .. 'δ' args['αε'] = "α" args['αε+'] = "ᾰ"
args['κεθ'] = stem["θ"] args['κε'] = "ς" -- or, as in nom
args['οπθ'] = stem["θ1π"] .. 'δ' args['οπ'] = "ες"
args['γπθ'] = stem["θ"] .. 'δ' args['γπ'] = "ων"
args['δπθ'] = stem["θ1π"] args['δπ'] = "σι" args['δπ+'] = "σῐ" args['ν'] = '1'
args['απθ'] = stem["θ1π"] .. 'δ' args['απ'] = "ας" args['απ+'] = "ᾰς"
args['κπθ'] = args['οπθ'] .. 'δ' args['κπ'] = args['οπ'] -- as in nom
args['οδθ'] = stem["θ1π"] .. 'δ' args['οδ'] = "ε"
args['γδθ'] = stem["θ"] .. 'δ' args['γδ'] = "οιν"
elseif args["λήμμα"] == 'ἁρπίς' or args["λήμμα"] == 'ἁρπίδες'
then
args['θηλ'] = '1'
args['ανώμ+'] = '1'
args['κατηγορία κλίσης'] = "πατρίς"
args['τύπος'] = 'πατρίς'
args['όπως'] = 'πατρίς'
args['εξ'] = '1'
args['σημ'] = 'Εξαίρεση: Ιδιόκλιτο με μακρό γιώτα στη γενική ενικού, με βραχύ στον πληθυντικό.<br>Δοτική πληθυντικού -ίδεσσιν αντί του -ίσι(ν). <br>' .. args['SmythVocative']
-- LOCKED: no changes by editor
args['οεθ'] = stem["θ"] args['οε'] = "ς"
args['γεθ'] = stem["θ1π"] .. 'δ' args['γε'] = 'ος'
args['δεθ'] = stem["θ1π"] .. 'δ' args['δε'] = 'ι' args['δε+'] = 'ῐ'
args['αεθ'] = stem["θ1π"] .. 'δ' args['αε'] = "α" args['αε+'] = "ᾰ"
args['κεθ'] = stem["θ"] args['κε'] = "ς" args['κεΛκειμ'] = '*' -- or, as in nom
args['οπθ'] = stem["θ"] .. 'δ' args['οπ'] = "ες"
args['γπθ'] = stem["θ"] .. 'δ' args['γπ'] = "ων"
args['δπθ'] = stem["θ"] .. 'δ' args['δπ'] = "εσσι" args['δπ+'] = "εσσῐ" args['ν'] = '1'
args['απθ'] = stem["θ"] .. 'δ' args['απ'] = "ας" args['απ+'] = "ᾰς"
args['κπθ'] = args['οπθ'] args['κπ'] = args['οπ'] -- as in nom
args['οδθ'] = stem["θ"] .. 'δ' args['οδ'] = "ε" -- ????????? CHECK THIS
args['γδθ'] = stem["θ"] .. 'δ' args['γδ'] = "οιν"
-- -ίς, -ῖδες & -ίδες BOTH MACRON AND BRACHY [[καρίς]]
elseif args["λήμμα"] == 'καρίς' or args["λήμμα"] == 'καρῖδες' or args["λήμμα"] == 'καρίδες'
or args["λήμμα"] == 'κρηνίς' or args["λήμμα"] == 'κρηνῖδες' or args["λήμμα"] == 'κρηνίδες'
or args["λήμμα"] == 'στηλίς' or args["λήμμα"] == 'στηλῖδες' or args["λήμμα"] == 'στηλίδες'
or args["λήμμα"] == 'σχοινίς' or args["λήμμα"] == 'σχοινῖδες' or args["λήμμα"] == 'σχοινίδες'
or args["λήμμα"] == 'χυτρίς' or args["λήμμα"] == 'χυτρῖδες' or args["λήμμα"] == 'χυτρίδες'
then
args['θηλ'] = '1'
args['κατηγορία κλίσης'] = "πατρίς"
args['τύπος'] = 'καρίς'
args['όπως'] = 'καρίς'
args['σημ'] = 'Εξαίρεση: και με μακρό και με βραχύ γιώτα στο θέμα. <br>' .. args['SmythVocative']
-- LOCKED: no changes by editor
args['οεθ'] = stem["θ"] args['οε'] = "ς"
args['γεθ'] = stem["θ1π"] .. 'δ' args['γε'] = 'ος'
args['γε2θ'] = stem["θ"] .. 'δ' args['γε2'] = 'ος'
args['δεθ'] = stem["θ1π"] .. 'δ' args['δε'] = 'ι' args['δε+'] = 'ῐ'
args['δε2θ'] = stem["θ"] .. 'δ' args['δε2'] = 'ι' args['δε2+'] = 'ῐ'
args['αεθ'] = stem["θ1π"] .. 'δ' args['αε'] = "α" args['αε+'] = "ᾰ"
args['αε2θ'] = stem["θ"] .. 'δ' args['αε2'] = "α" args['αε2+'] = "ᾰ"
args['κεθ'] = stem["θ"] args['κε'] = "ς" args['κεΛκειμ'] = '*' -- or, as in nom
args['οπθ'] = stem["θ1π"] .. 'δ' args['οπ'] = "ες"
args['οπ2θ'] = stem["θ"] .. 'δ' args['οπ2'] = "ες"
args['γπθ'] = stem["θ"] .. 'δ' args['γπ'] = "ων"
args['δπθ'] = stem["θ1π"] args['δπ'] = "σι" args['δπ+'] = "σῐ" args['ν'] = '1'
args['δπ2θ'] = stem["θ"] args['δπ2'] = "σι" args['δπ2+'] = "σῐ" args['ν2'] = '1'
args['απθ'] = stem["θ1π"] .. 'δ' args['απ'] = "ας" args['απ+'] = "ᾰς"
args['απ2θ'] = stem["θ"] .. 'δ' args['απ2'] = "ας" args['απ2+'] = "ᾰς"
args['κπθ'] = stem["θ1π"] .. 'δ' args['κπ'] = "ες"
args['κπ2θ'] = stem["θ"] .. 'δ' args['κπ2'] = "ες"
args['οδθ'] = stem["θ1π"] .. 'δ' args['οδ'] = "ε"
args['οδ2θ'] = stem["θ"] .. 'δ' args['οδ2'] = "ε"
args['γδθ'] = stem["θ"] .. 'δ' args['γδ'] = "οιν"
-- -ίς, -ίδες & later -ῖδες BRACHY plus MACRON [[κεραμίς]]
elseif args["λήμμα"] == 'κεραμίς' or args["λήμμα"] == 'κεραμῖδες' or args["λήμμα"] == 'κεραμίδες'
then
args['θηλ'] = '1'
args['κατηγορία κλίσης'] = "πατρίς"
args['τύπος'] = 'κεραμίς'
args['όπως'] = 'κεραμίς'
args['σημ'] = 'Εξαίρεση: με βραχύ γιώτα στο θέμα και επιπλέον μακρό (μεταγενέστερο ή ιωνικό). <br>' .. args['SmythVocative']
-- LOCKED: no changes by editor
args['οεθ'] = stem["θ"] args['οε'] = "ς"
args['γεθ'] = stem["θ"] .. 'δ' args['γε'] = 'ος'
args['γε2θ'] = stem["θ1π"] .. 'δ' args['γε2'] = 'ος'
args['δεθ'] = stem["θ"] .. 'δ' args['δε'] = 'ι' args['δε+'] = 'ῐ'
args['δε2θ'] = stem["θ1π"] .. 'δ' args['δε2'] = 'ι' args['δε2+'] = 'ῐ'
args['αεθ'] = stem["θ"] .. 'δ' args['αε'] = "α" args['αε+'] = "ᾰ"
args['αε2θ'] = stem["θ1π"] .. 'δ' args['αε2'] = "α" args['αε2+'] = "ᾰ"
args['κεθ'] = stem["θ"] args['κε'] = "ς" args['κεΛκειμ'] = '*' -- or, as in nom
args['οπθ'] = stem["θ"] .. 'δ' args['οπ'] = "ες"
args['οπ2θ'] = stem["θ1π"] .. 'δ' args['οπ2'] = "ες"
args['γπθ'] = stem["θ"] .. 'δ' args['γπ'] = "ων"
args['δπθ'] = stem["θ"] args['δπ'] = "σι" args['δπ+'] = "σῐ" args['ν'] = '1'
args['δπ2θ'] = stem["θ1π"] args['δπ2'] = "σι" args['δπ2+'] = "σῐ" args['ν2'] = '1'
args['απθ'] = stem["θ"] .. 'δ' args['απ'] = "ας" args['απ+'] = "ᾰς"
args['απ2θ'] = stem["θ1π"] .. 'δ' args['απ2'] = "ας" args['απ2+'] = "ᾰς"
args['κπθ'] = stem["θ"] .. 'δ' args['κπ'] = "ες"
args['κπ2θ'] = stem["θ1π"] .. 'δ' args['κπ2'] = "ες"
args['οδθ'] = stem["θ"] .. 'δ' args['οδ'] = "ε"
args['οδ2θ'] = stem["θ1π"] .. 'δ' args['οδ2'] = "ε"
args['γδθ'] = stem["θ"] .. 'δ' args['γδ'] = "οιν"
else
-- start -ίς CHECK [[πατρίς]] [[Βρισηΐς]] for dialytics
if mw.ustring.find(args["λήμμα"], 'ίς$') or mw.ustring.find(args["λήμμα"], 'ίδες$')
or mw.ustring.find(args["λήμμα"], 'ΐς$') or mw.ustring.find(args["λήμμα"], 'ΐδες$')
then
args['θηλ'] = '1'
args['κατηγορία κλίσης'] = "πατρίς"
args['τύπος'] = 'πατρίς'
args['όπως'] = 'πατρίς'
if args["λήμμα"] == 'τυραννίς' then -- !!!!!!!!!!!!! according to Tzartzanos § 82.2.a.
args['σημ'] = 'Με βραχύ γιώτα στο θέμα -ίς -ίδος. <br><span style="color:#b22222;" title="Προσοχή! Εξαίρεση!"><b>!!</b></span> '
.. 'Εξαίρεση: η κλητική ενικού, όχι όπως η ονομαστική.' .. args['SmythVocative'] .. '<br>ισχύει ως γενικός κανόνας.'
else
args['σημ'] = 'Με βραχύ γιώτα στο θέμα -ίς -ίδος.' .. args['SmythVocative']
end
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "ς" args['κεΛκειμ'] = '*' -- as in nom # εξ=1 check [[τυραννίς]], voc τυραννί
elseif mw.ustring.find(args["λήμμα"], 'άς') or mw.ustring.find(args["λήμμα"], 'άδες')
then
if args["λήμμα"] == 'λογάς' or args["λήμμα"] == 'λογάδες'
or args["λήμμα"] == 'μιγάς' or args["λήμμα"] == 'μιγάδες'
or args["λήμμα"] == 'ῥωγάς' or args["λήμμα"] == 'ῥωγάδες'
or args["λήμμα"] == 'συμφυγάς' or args["λήμμα"] == 'συμφυγάδες'
or args["λήμμα"] == 'φυγάς' or args["λήμμα"] == 'φυγάδες'
or args['αθ'] == '1' -- αν υπάρχουν αθ και σε -ίς, τότε πρέπει να φύγει αυτό, και να προστεθεί το [[φορβάς]]
then
args['αθ'] = '1' -- ################################### [[μιγάς]], [[φυγάς]] is an adjective / [[Ἑλληνίς]] = only fem adj @Bailly f. adj.
args['κατηγορία κλίσης'] = "δεκάς"
args['τύπος'] = 'δεκάς'
args['υποκατ03'] = "που κλίνονται όπως το 'δεκάς' κοινού γένους"
args['όπως'] = 'φυγάς'
args['σημ'] = 'Με βραχύ άλφα στο θέμα -άς, -άδος.' -- NOOOOOOO .. args['SmythVocative'] it is only for -ιτ, -ιδ, -ιθ
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "ς" -- as in nom NO Smyth note here
else
args['θηλ'] = '1'
args['κατηγορία κλίσης'] = "δεκάς"
args['τύπος'] = 'δεκάς'
args['όπως'] = 'δεκάς'
-- ? όλα θηλυκά είναι?
-- args['υποκατ03'] = "που κλίνονται όπως το 'δεκάς' θηλυκά"
args['σημ'] = 'Με βραχύ άλφα στο θέμα -άς, -άδος.' -- NOOOOOOO .. args['SmythVocative'] it is only for -ιτ, -ιδ, -ιθ
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "ς" -- as in nom NO Smyth note here
end
elseif mw.ustring.find(args["λήμμα"], 'ύς$') or mw.ustring.find(args["λήμμα"], 'ύδες$')
or mw.ustring.find(args["λήμμα"], 'ΰς$') or mw.ustring.find(args["λήμμα"], 'ΰδες$') -- no example found
then
args['θηλ'] = '1'
args['κατηγορία κλίσης'] = "χλαμύς"
args['τύπος'] = 'χλαμύς'
args['όπως'] = 'χλαμύς'
args['σημ'] = 'Με βραχύ ύψιλον στο θέμα -ύς, -ύδος.' -- NOOOOOOO .. args['SmythVocative'] it is only for -ιτ, -ιδ, -ιθ
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "ς" -- as in nom NO Smyth note here
end -- close if -ίς, -άς, -ύς
-- for all types:
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. 'δ' args['mod-γε'] = 'ος'
args['mod-δεθ'] = stem["θ"] .. 'δ' args['mod-δε'] = 'ι' args['mod-δε+'] = 'ῐ'
args['mod-αεθ'] = stem["θ"] .. 'δ' args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
-- κεθ with asterisc only for -ίς
args['mod-οπθ'] = stem["θ"] .. 'δ' args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. 'δ' args['mod-γπ'] = "ων"
args['mod-δπθ'] = stem["θ"] args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ" args['ν'] = '1'
args['mod-απθ'] = stem["θ"] .. 'δ' args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. 'δ' args['mod-κπ'] = "ες" -- as in nom
args['mod-οδθ'] = stem["θ"] .. 'δ' args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. 'δ' args['mod-γδ'] = "οιν"
end -- close if lemma = specific words
return decl(args)
end
-- Π @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'πλακούς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- https://logeion.uchicago.edu/πλακοῦς
-- ================= 3η κλίση [[πλακοῦς]] =========== --
-- Οδοντικόληκτα καταληκτικά μονόθεμα συνηρημένα σε -οῦς, -οῦντος από -όεντ-ς
-- βλ και οδούς / κλητική πλακοῦ στο https://logeion.uchicago.edu/πλακοῦς
export['πλακούς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'πλακούς']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-7) -- πλακ-οῦντ-ες minus 6 letters from end
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους προπερισπώμενα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- πλακ-οῦς minus 3 letters from end
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά περισπώμενα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους περισπώμενα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά περισπώμενα'
end
end
args['κλίση'] = '3'
-- gender
args['κατηγορία κλίσης'] = 'πλακοῦς'
args['τύπος'] = 'πλακοῦς'
args['όπως'] = 'πλακοῦς'
if args['θηλ'] == '1' then
args['υποκατ03'] = "που κλίνονται όπως το 'πλακοῦς' θηλυκά"
elseif args['αθ'] == '1' then
args['υποκατ03'] = "που κλίνονται όπως το 'πλακοῦς' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ03'] = "που κλίνονται όπως το 'πλακοῦς' αρσενικά"
end
args['mod-οεθ'] = stem["θ"] .. "οῦ" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "οῦντ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "οῦντ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "οῦντ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] .. "οῦ" args['mod-κε'] = "ς" -- @LSJ ##?? does it ALSO has πλακοῦς? Yes if like ιμάς (voc=acc, πλοακοεντ-ς)
args['mod-οπθ'] = stem["θ"] .. "οῦντ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "ούντ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "οῦ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "οῦντ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "οῦντ" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "οῦντ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "ούντ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- ======================= 3η κλίση συνηρημένο! [[Περικλέης]]/[[Περικλῆς]] ===================================== --
-- f.linkcontrol & f.create_link used here
export['Περικλής'] = function(frame) -- [[Πρότυπο:grc-κλίση-'Περικλής']]
local args = frame:getParent().args
-- 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['αρσ'] = '1'
args['ομάδα'] = 'Περικλέης Περικλῆς'
-- args['δυ'] = '-' --no dual observed in Grammars, why not...
if args['ασυν'] == "-" then -- if uncontracted is omitted and we can view ONLY the contracted
args['δυ'] = '-'
end
-- all (almost) proper nouns. Do not let them enter the general cat_decl Κατηγορία:με κλίση όπως ...
if args['όνομα'] == '-' then -- rarely not proper noun like suffix -κλῆς
-- do nothing
else
args['όνομα'] = '1' -- default name gives Proper noun
end
-- stems
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
if mw.ustring.find(args['λήμμα'], 'έεις$') then -- $ = at the end
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- minus 4 letters from end, stemnumber = 5
args['κατηγορία κλίσης'] = 'Περικλέης'
args['όνομα'] = '1'
args['τύπος'] = 'Περικλέης'
args['όπως'] = 'Περικλέης'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
else -- (not -έεις but -εῖς)
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- minus 3 letters from end, stemnumber = 4
args['κατηγορία κλίσης'] = 'Περικλῆς'
args['τύπος'] = 'Περικλῆς'
args['όπως'] = 'Περικλῆς'
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
args['υποκατ02'] = 'αρσενικά περισπώμενα'
end
else --singular
if mw.ustring.find(args['λήμμα'], 'έης$') then -- $ = at the end
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- -έης
args['κατηγορία κλίσης'] = 'Περικλέης'
args['τύπος'] = 'Περικλέης'
args['όπως'] = 'Περικλέης'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
else -- (not -έης but -ῆς)
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- -ῆς
args['κατηγορία κλίσης'] = 'Περικλῆς'
args['τύπος'] = 'Περικλῆς'
args['όπως'] = 'Περικλῆς'
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
args['υποκατ02'] = 'αρσενικά περισπώμενα'
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- Περικλ- remove accent, need for θ1
stem["θ1"] = m_stems.word1(stem["θ0"]) -- Περίκλ- accent on 1st syllable from the end
-- only uncontracted, omit contracted
if args['σνρ'] == '-' or args ['ασυν'] == 'μόνο' then
if args ['ασυν'] == 'μόνο' then
args['υποκατ04'] = "που κλίνονται όπως η ομάδα 'Περικλέης Περικλῆς' μόνο ασυναίρετα"
args['mod-σημ'] = 'Μόνο ασυναίρετο.'
end
args['mod-οεΛ'] = linkcontrol3((stem["θ"]), "έ", "ης")
args['mod-γεΛ'] = linkcontrol3((stem["θ"]), "έ", "ους")
args['mod-δεΛ'] = linkcontrol3((stem["θ"]), "έε", "ι")
args['mod-αεΛ'] = create_link(stem["θ"] .."έ" .. "α", stem_color(stem["θ"]) .. infix_color("έ") .. ending_color("ᾱ"))
args['mod-κεΛ'] = linkcontrol2((stem["θ1"]), "εες")
args['mod-οπΛ'] = linkcontrol3((stem["θ"]), "έε", "ς")
args['mod-γπΛ'] = linkcontrol3((stem["θ"]), "έ", "ων")
args['ν'] = '1'
args['mod-δπΛ'] = create_link(stem["θ"] .."έεσ" .. "ι", stem_color(stem["θ"]) .. infix_color("έεσ") .. ending_color("ῐ"))
args['mod-απΛ'] = create_link(stem["θ"] .."έα" .. "ς", stem_color(stem["θ"]) .. infix_color("έᾱ") .. ending_color("ς"))
args['mod-κπΛ'] = linkcontrol3((stem["θ"]), "έε", "ς")
args['mod-οδΛ'] = linkcontrol2((stem["θ1"]), "εε")
args['mod-γδΛ'] = linkcontrol3((stem["θ"]), "έ", "οιν")
end
-- uncontracted & contracted follows >
if args['ασυν'] ~= '-' and args ['σνρ'] ~= '-' and args['ασυν'] ~= 'μόνο' and args ['σνρ'] ~= 'μόνο' then
args['mod-οεΛκειμ1'] = linkcontrol3((stem["θ"]), "έ", "ης") .. ' > '
-- for a note ONLY at lemma [[-κλῆς]]
if args['γεΛκειμ0'] ~= '' and args['γεΛκειμ0'] ~= nil then args['mod-γεΛκειμ1'] = args['γεΛκειμ0'] .. linkcontrol3((stem["θ"]), "έ", "ους") .. ' '
else
args['mod-γεΛκειμ1'] = linkcontrol3((stem["θ"]), "έ", "ους") .. ' '
end
args['mod-δεΛκειμ1'] = linkcontrol3((stem["θ"]), "έε", "ι") .. ' > '
args['mod-αεΛκειμ1'] = create_link(stem["θ"] .."έ" .. "α", stem_color(stem["θ"]) .. infix_color("έ") .. ending_color("ᾱ")) .. ' '
args['mod-κεΛκειμ1'] = linkcontrol2((stem["θ1"]), "εες") .. ' > '
args['mod-οπΛκειμ1'] = linkcontrol3((stem["θ"]), "έε", "ς") .. ' > '
args['mod-γπΛκειμ1'] = linkcontrol3((stem["θ"]), "έ", "ων") .. ' '
args['ν'] = '1'
args['mod-δπΛκειμ1'] = create_link(stem["θ"] .."έεσ" .. "ι", stem_color(stem["θ"]) .. infix_color("έεσ") .. ending_color("ῐ")) .. ' > '
args['mod-απΛκειμ1'] = create_link(stem["θ"] .."έα" .. "ς", stem_color(stem["θ"]) .. infix_color("έᾱ") .. ending_color("ς")) .. ' > '
args['mod-κπΛκειμ1'] = linkcontrol3((stem["θ"]), "έε", "ς") .. ' > '
args['mod-οδΛκειμ1'] = linkcontrol2((stem["θ1"]), "εε") .. ' > '
args['mod-γδΛκειμ1'] = linkcontrol3((stem["θ"]), "έ", "οιν") .. ' > '
end
-- contracted or both
if (args['ασυν'] == '-' or args ['σνρ'] == 'μόνο' or args['σνρ'] == '' or args['σνρ'] == nil) and args['ασυν'] ~= 'μόνο' then
if args ['σνρ'] == 'μόνο' then
args['υποκατ04'] = "που κλίνονται όπως η ομάδα 'Περικλέης Περικλῆς' μόνο συνηρημένα"
args['mod-σημ'] = 'Μόνο συνηρημένο.'
end
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ῆς"
args['mod-γεθ'] = stem["θ"] .. "έ" args['mod-γε'] = "ους"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "εῖ"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "έα"
args['mod-αε2Λ'] = "<br><small> & ''σπανίως'' > " .. linkcontrol2((stem["θ"]), "ῆ") .. "</small>"
args['mod-κεθ'] = stem["θ1"] args['mod-κε'] = "εις"
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "εῖς"
args['mod-γπθ'] = stem["θ"] .. "έ" args['mod-γπ'] = "ων"
args['mod-δπ'] = '-' -- no dative at schoolgrammars
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "εῖς" -- same as nom
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "εῖς" -- same as nom
-- no duals at Grammars
args['mod-οδ'] = '-'
args['mod-γδ'] = '-'
end
return decl(args)
end
-- Π @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'ποιμήν']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[ποιμήν]] =========== --
-- ενρινόληκτα Διπλόθεμα: ακατάληκτα σε -ην (γεν. -ενος) cf φρήν, φρενός στο Πρότυπο χθων
-- θ-α [[ἀδήν]]
export['ποιμήν'] = function(frame) -- [[Πρότυπο:grc-κλίση-'ποιμήν']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- ποιμ-έν-ες minus 4 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους παροξύτονα'
elseif args['θ-α'] == '1' then args['υποκατ02'] = 'θηλυκά ή αρσενικά παροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- ποιμ-ήν minus 2 letters from end (nom.sg, voc.sg)
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά οξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους οξύτονα'
elseif args['θ-α'] == '1' then args['υποκατ02'] = 'θηλυκά ή αρσενικά οξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
end
args['κλίση'] = '3'
-- gender -- see above
args['κατηγορία κλίσης'] = 'ποιμήν'
args['τύπος'] = 'ποιμήν'
args['όπως'] = 'ποιμήν'
if args['θηλ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'ποιμήν' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'ποιμήν' κοινού γένους"
elseif args['θ-α'] == '1' then args['υποκατ0'] = "που κλίνονται όπως το 'ποιμήν' θηλυκά ή αρσενικά"
else args['υποκατ0'] = "που κλίνονται όπως το 'ποιμήν' αρσενικά"
end
args['mod-οεθ'] = stem["θ"] .. "ήν" args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ"] .. "έν" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "έν" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "έν" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] .. "ήν" args['mod-κε'] = "0" -- same as nom
args['mod-οπθ'] = stem["θ"] .. "έν" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "έν" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "έ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "έν" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "έν" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "έν" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "έν" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Π @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'πόλις']] @@@@@@@@@@@@@@@@@@@@@@@@
-- EDITOR_MUST_DEFINE pluralia: τύπος= ([[Ἄλπεις]]is default πόλις)
-- βλ. και κλίση άστυ για ουδέτερα
-- PROLBEM capital+spirit+tonos like [[Ἄλπεις]] (plurale tantum)
-- ======================= 3η κλίση [[πόλις]] [[δύναμις]] [[πέλεκυς]] ===================================== --
-- + ὁ πῆχυς+IRREGULAR & LATE FORMS-εος-εως-έων-ῶν και ὁ πρέσβυς ++εως or εος
-- 3η κλίση φωνηεντόληκτα καταληκτικά διπλόθεμα αρσ. και θηλ. σε -ῐς (γεν. -εως) ή σε -ῠς (γεν. -εως) και ουδέτ. σε -ῠ (γεν. -εως)
-- 268 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D25
export['πόλις'] = function(frame) -- [[Πρότυπο:grc-κλίση-'πόλις']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- τύπος needs to be defined
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- πόλ-εις πράξ-εις δυνάμ-εις override default stemnumber = 4 (μείον 3)
else
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- πόλ-ις πρᾶξ-ις δύναμ-ις, πέλεκ-υς πῆχ-υς where ι, υ are characters of the STEM
end
-- ῐ ῠ
if mw.ustring.find(args['λήμμα'], 'ις$') then args['χαρ'] = "ι" args['χαρ+'] = "ῐ"
elseif mw.ustring.find(args['λήμμα'], 'υς$') then args['χαρ'] = "υ" args['χαρ+'] = "ῠ"
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- πολ πραξ δυναμ πελεκ
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- πήχ πράξ
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
-- PROLBEM capital+spirit+tonos like [[Ἄλπεις]] (plurale tantum)
then
stem["θ1οξ"] = stem["θοξ"] -- πηχ CHECK if any capital+spirit+tonos on first letter
else -- no perispomeni
if mw.ustring.find(stem['θ'], '[ἌᾌἊᾊᾊἍᾍἋᾋἜἚἝἛἬᾜἪᾚᾚἭᾝἫᾛἼἺἽἻὌὊὍὋὝὛὬᾬὪᾪᾭὫᾫ]') -- capital+spirit+okseia (varia nevermind)
then
stem["θ1οξ"] = stem["θ"] -- [[Ἄλπεις]]]] keep steady
else
stem["θ1οξ"] = m_stems.word1(stem["θοξ"]) -- δυνάμ αιρέσ- ([[αἵρεσις]]) accent at last syllbable
end
end
-- stem["θ2"] = m_stems.word2(stem["θ0"]) -- CANNOT CONTROL proparoxytones in singular if they have diphthong ἡμέρευσις
args['κλίση'] = '3'
-- gender see below
-- args['υπερομάδα'] = '-ς -εως'
-- args['ομάδα'] = 'πόλις' OR δύναμις, πρέσβυς, πέλεκυς
-- PLURAL define the proparoxytones
if (args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ")
then
-- πόλεις δυνάμεις πήχεις πελέκεις
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['αρσ'] == '1' then
args['υποκατ02'] = 'αρσενικά παροξύτονα'
-- !!! editor has to define type it is not obvious what the singular would be
if args['τύπος'] == 'πέλεκυς' or args['τύπος'] == 'πέλεκυς' or args['όπως'] == 'πέλεκυς' or args['όπως'] == 'πέλεκυς' then
args['κατηγορία κλίσης'] = 'πέλεκυς'
args['τύπος'] = 'πέλεκυς'
args['όπως'] = 'πέλεκυς'
args['υποκατ03'] = "που κλίνονται όπως το 'πέλεκυς' αρσενικά"
-- no cat όπως το πέλεκυς παροξύτονα
elseif args['τύπος'] == 'πρέσβυς' or args['τύπος'] == 'πρέσβυς' or args['όπως'] == 'πρέσβυς' or args['όπως'] == 'πρέσβυς' then
args['κατηγορία κλίσης'] = 'πρέσβυς'
args['τύπος'] = 'πρέσβυς'
args['όπως'] = 'πρέσβυς'
args['υποκατ03'] = "που κλίνονται όπως το 'πρέσβυς' αρσενικά"
else -- or a warning if empty??
args['κατηγορία κλίσης'] = 'πόλις'
args['τύπος'] = 'πόλις'
args['όπως'] = 'πόλις'
args['υποκατ03'] = "που κλίνονται όπως το 'πόλις' αρσενικά"
end
else -- default feminines in plural
args['θηλ'] = '1'
args['υποκατ02'] = 'θηλυκά παροξύτονα'
-- !!! editor has to define type it is not obvious what the singular would be
if args['τύπος'] == 'δύναμις' or args['τύπος'] == 'δύναμις' or args['όπως'] == 'δύναμις' or args['όπως'] == 'δύναμις' then
args['κατηγορία κλίσης'] = 'δύναμις'
args['τύπος'] = 'δύναμις'
args['όπως'] = 'δύναμις'
args['υποκατ03'] = "που κλίνονται όπως το 'δύναμις' θηλυκά"
-- ? else if πτῶσις = πτώσεις, no cat παροξύτονα
else -- or a warning if empty??
args['κατηγορία κλίσης'] = 'πόλις'
args['τύπος'] = 'πόλις'
args['όπως'] = 'πόλις'
args['υποκατ03'] = "που κλίνονται όπως το 'πόλις' θηλυκά"
end
end -- close if plural
else -- in singular
-- PROPERISPOMENA
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
then
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
if mw.ustring.find(args['λήμμα'], 'ις$') then
args['κατηγορία κλίσης'] = 'πόλις'
args['τύπος'] = 'πόλις'
args['όπως'] = 'πόλις'
if args['αρσ'] == '1' then
args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
args['υποκατ03'] = "που κλίνονται όπως το 'πόλις' αρσενικά"
args['υποκατ04'] = "που κλίνονται όπως το 'πόλις' προπερισπώμενα"
else -- πτῶσις
args['θηλ'] = '1'
args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
args['υποκατ03'] = "που κλίνονται όπως το 'πόλις' θηλυκά"
args['υποκατ04'] = "που κλίνονται όπως το 'πόλις' προπερισπώμενα"
end
elseif mw.ustring.find(args['λήμμα'], 'υς$') then
args['κατηγορία κλίσης'] = 'πρέσβυς'
args['τύπος'] = 'πρέσβυς'
args['όπως'] = 'πρέσβυς'
if args['αρσ'] == '1' then
args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
args['υποκατ03'] = "που κλίνονται όπως το 'πρέσβυς' αρσενικά"
args['υποκατ04'] = "που κλίνονται όπως το 'πρέσβυς' προπερισπώμενα"
else -- no example found
args['θηλ'] = '1'
args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
args['υποκατ03'] = "που κλίνονται όπως το 'πρέσβυς' θηλυκά"
args['υποκατ03'] = "που κλίνονται όπως το 'πρέσβυς' προπερισπώμενα"
end
end -- close properispomena
-- PAROXYTONES
elseif stem["θ"] == stem["θ1οξ"] then
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if mw.ustring.find(args['λήμμα'], 'ις$') then
args['κατηγορία κλίσης'] = 'πόλις'
args['τύπος'] = 'πόλις'
args['όπως'] = 'πόλις'
if args['αρσ'] == '1' then
args['υποκατ02'] = 'αρσενικά παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'πόλις' αρσενικά"
args['υποκατ04'] = "που κλίνονται όπως το 'πόλις' παροξύτονα"
else
args['θηλ'] = '1'
args['υποκατ02'] = 'θηλυκά παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'πόλις' θηλυκά"
args['υποκατ04'] = "που κλίνονται όπως το 'πόλις' παροξύτονα"
end
elseif mw.ustring.find(args['λήμμα'], 'υς$') then
args['κατηγορία κλίσης'] = 'πρέσβυς'
args['τύπος'] = 'πρέσβυς'
args['όπως'] = 'πρέσβυς'
if args['αρσ'] == '1' then
args['υποκατ02'] = 'αρσενικά παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'πρέσβυς' αρσενικά"
args['υποκατ04'] = "που κλίνονται όπως το 'πρέσβυς' παροξύτονα"
else -- no example found
args['θηλ'] = '1'
args['υποκατ02'] = 'θηλυκά παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'πρέσβυς' θηλυκά"
args['υποκατ04'] = "που κλίνονται όπως το 'πρέσβυς' παροξύτονα"
end
end
-- PROPAROXYTONES -- δύναμις, πέλεκυς CANNOT SEE diphthongs if stem["θ"] == stem["θ2"] then
else
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
if mw.ustring.find(args['λήμμα'], 'ις$') then
args['κατηγορία κλίσης'] = 'δύναμις'
args['τύπος'] = 'δύναμις'
args['όπως'] = 'δύναμις'
if args['αρσ'] == '1' then -- [[σάκχαρις]]
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'δύναμις' αρσενικά"
else
args['θηλ'] = '1'
args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'δύναμις' θηλυκά"
end
elseif mw.ustring.find(args['λήμμα'], 'υς$') then
args['κατηγορία κλίσης'] = 'πέλεκυς'
args['τύπος'] = 'πέλεκυς'
args['όπως'] = 'πέλεκυς'
if args['αρσ'] == '1' then
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'πέλεκυς' αρσενικά"
else -- no example found
args['θηλ'] = '1'
args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'πέλεκυς' θηλυκά"
end
end -- close if -ις -υς
end -- close paroxytones proparoxytones
end
args['mod-οεθ'] = stem["θ"] .. args['χαρ'] args['mod-οεθ+'] = stem["θ"] .. args['χαρ+'] args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ1οξ"] .. "ε" args['mod-γε'] = "ως"
args['mod-δεθ'] = stem["θ1οξ"] args['mod-δε'] = "ει"
args['mod-αεθ'] = stem["θ"] .. args['χαρ'] args['mod-αεθ+'] = stem["θ"] .. args['χαρ+'] args['mod-αε'] = "ν"
args['mod-κεθ'] = stem["θ"] .. args['χαρ'] args['mod-κεθ+'] = stem["θ"] .. args['χαρ+'] args['mod-κε'] = "0"
args['mod-οπθ'] = stem["θ1οξ"] args['mod-οπ'] = "εις"
args['mod-γπθ'] = stem["θ1οξ"] .. "ε" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ1οξ"] .. "ε" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ1οξ"] args['mod-απ'] = "εις" -- same as nom.
args['mod-κπθ'] = stem["θ1οξ"] args['mod-κπ'] = "εις" -- same as nom.
args['mod-οδθ'] = stem["θ1οξ"] args['mod-οδ'] = "ει"
args['mod-γδθ'] = stem["θ0"] .. "έ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- ##ΕΚΚΡΕΜΟΤΤΗΑ να βρθεί ένα που να μην έχει και διπλόθεμα
-- Π @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'πραίτωρ']] @@@@@@@@@@@@@@@@@@@@@@@@
-- πραίτωρ-ωρος (βλ και ουδέτερα) ἔαρ-ος, μονόθεμα ακατάληκτα
-- ================= 3η κλίση [[έαρ]] ===========
export['πραίτωρ'] = function(frame) -- [[Πρότυπο:grc-κλίση-'πραίτωρ']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- πραίτωρ-ες minus 2 letters from end
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
else
-- stem["θ"] = args['λήμμα'] -- πραίτωρ
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-1) -- πραίτωρ zero letters removed
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- παραιτωρ remove accent
stem["θ1"] = m_stems.word1(stem["θ0"]) -- πραιτώρ accent on 1st syllable from the end
args['κλίση'] = '3'
args['αρσ'] = '1'
args['κατηγορία κλίσης'] = 'πραίτωρ'
args['τύπος'] = 'πραίτωρ'
args['όπως'] = 'πραίτωρ'
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ"] args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "α" args['mod-αε'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0" -- same as nom
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ1"] args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ1"] args['mod-γδ'] = "οιν"
return decl(args)
end
-- Π @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'προβλής']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[προβλής]] =========== --
-- -ής -ῆτος // α-θ [[προβλής]]
export['προβλής'] = function(frame) -- [[Πρότυπο:grc-κλίση-'προβλής']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- προβλ-ῆτ-ες minus 4 letters from end
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπερισπώμενα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- προβλ-ής minus 2 letters from end
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά οξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους οξύτονα'
elseif args['α-θ'] == '1' then args['υποκατ02'] = 'αρσενικά ή θηλυκά οξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
end
args['κλίση'] = '3'
-- gender
args['κατηγορία κλίσης'] = 'προβλής'
args['τύπος'] = 'προβλής'
args['όπως'] = 'προβλής'
if args['θηλ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'προβλής' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'προβλής' κοινού γένους"
elseif args['α-θ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'προβλής' αρσενικά ή θηλυκά"
else
args['αρσ'] = '1'
args['υποκατ03'] = "που κλίνονται όπως το 'προβλής' αρσενικά"
end
args['mod-οεθ'] = stem["θ"] .. "ή" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "ῆτ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "ῆτ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "ῆτ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] .. "ή" args['mod-κε'] = "ς" -- same as nom
args['mod-οπθ'] = stem["θ"] .. "ῆτ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "ήτ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "ῆ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "ῆτ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "ῆτ" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "ῆτ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "ήτ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Π @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'πρόπους']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[πρόπους]] =========== --
-- -πους-ποδος
export['πρόπους'] = function(frame) -- [[Πρότυπο:grc-κλίση-'πρόπους']]
local args = frame:getParent().args
-- 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 -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- πρόπ-οδ-ες minus 4 letters from end
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- πρόπ-ους minus 3 letters from end
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then
args['υποκατ02'] = 'κοινού γένους παροξύτονα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- σκιμπ- remove accent
args['κλίση'] = '3'
-- gender
args['κατηγορία κλίσης'] = 'πρόπους'
args['τύπος'] = 'πρόπους'
args['όπως'] = 'πρόπους'
if args['θηλ'] == '1' then
args['υποκατ03'] = "που κλίνονται όπως το 'πρόπους' θηλυκά"
elseif args['αθ'] == '1' then
args['υποκατ03'] = "που κλίνονται όπως το 'πρόπους' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ03'] = "που κλίνονται όπως το 'πρόπους' αρσενικά"
end
args['mod-οεθ'] = stem["θ"] .. "ου" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "οδ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ"] .. "οδ" args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θ"] .. "οδ" args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] .. "ου" args['mod-κε'] = "ς" -- same as nom
args['mod-οπθ'] = stem["θ"] .. "οδ" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ0"] .. "όδ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "ο" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] .. "οδ" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. "οδ" args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. "οδ" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ0"] .. "όδ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Χ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'σίνατι']] @@@@@@@@@@@@@@@@@@@@@@@@
-- liκε [[ἄστυ]]
-- + εξαιρέσεις: [[ἄκαρι]] idiocliton
-- ======================= 3η κλίση [[σίναπι]] ===================================== --
-- 3η κλίση φωνηεντόληκτα καταληκτικά διπλόθεμα αρσ. και θηλ. σε -ῐς (γεν. -εως) ή σε -ῠς (γεν. -εως) και ουδέτ. σε -ῠ (γεν. -εως)
-- 268 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D25
export['σίναπι'] = function(frame) -- [[Πρότυπο:grc-κλίση-'σίναπι']]
local args = frame:getParent().args
-- 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['ουδ'] = '1'
args['κατηγορία κλίσης'] = 'σίναπι'
args['τύπος'] = 'σίναπι'
args['όπως'] = 'σίναπι'
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
if mw.ustring.find(args['λήμμα'], 'η$') then -- σινάπ-η
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- άστ-εα ακάρ-εα stemnumber = 2 (μείον 1)
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
elseif mw.ustring.find(args['λήμμα'], 'εα$') then -- σινάπ-εα
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- stemnumber = 3 (μείον 2)
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- σίναπ-ι, άκαρ-ι
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- σιναπ ακαρ
stem["θ1"] = m_stems.word1(stem["θ0"]) -- σινάπ ακάρ
args['mod-οεθ'] = stem["θ"] .. "ι" args['mod-οεθ+'] = stem["θ"] .. "ῐ" args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ1"] .. "ε" args['mod-γε'] = "ως"
args['mod-δεθ'] = stem["θ1"] args['mod-δε'] = "ει"
args['mod-αεθ'] = stem["θ"] .. "ι" args['mod-αεθ+'] = stem["θ"] .. "ῐ" args['mod-αε'] = "0"
args['mod-κεθ'] = stem["θ"] .. "ι" args['mod-κεθ+'] = stem["θ"] .. "ῐ" args['mod-κε'] = "0"
-- ?? add second plurals -εα in parenthesis
args['mod-οπθ'] = stem["θ1"] args['mod-οπ'] = "η"
args['mod-οπ2θ'] = stem["θ1"] .. "ε" args['mod-οπ2'] = "α" args['mod-οπ2+'] = "ᾰ"
args['mod-γπθ'] = stem["θ1"] .. "ε" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ1"] .. "ε" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ1"] args['mod-απ'] = "η" -- same as nom.
args['mod-απ2θ'] = stem["θ1"] .. "ε" args['mod-απ2'] = "α" args['mod-απ2+'] = "ᾰ"
args['mod-κπθ'] = stem["θ1"] args['mod-κπ'] = "η" -- same as nom.
args['mod-κπ2θ'] = stem["θ1"] .. "ε" args['mod-κπ2'] = "α" args['mod-κπ2+'] = "ᾰ"
args['mod-οδθ'] = stem["θ1"] args['mod-οδ'] = "ει"
args['mod-γδθ'] = stem["θ0"] .. "έ" args['mod-γδ'] = "οιν"
return decl(args)
end
--# ?? ΕΛΕΓΧΟΣ αν υπάρχουν αυτοί οι πληθυντικοί
-- Σ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'στίμμι']] @@@@@@@@@@@@@@@@@@@@@@@@
-- βλ και κόμμι-εως στο άστυ
-- στίμμι, -ιος ( ή -εως-ιδος)
-- ======================= 3η κλίση [[στίμμι]] [[στῖμι]] (ελνστ?)===================================== --
export['στίμμι'] = function(frame) -- [[Πρότυπο:grc-κλίση-'στίμμι']]
local args = frame:getParent().args
-- 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['br'] = 'dash'
args['κλίση'] = '3'
args['ουδ'] = '1'
args['κατηγορία κλίσης'] = 'στίμμι'
args['τύπος'] = 'στίμμι'
-- όπως = βλ. below
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
if mw.ustring.find(args['λήμμα'], 'η$') then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- στίμμ-η? stemnumber = 2 (μείον 1)
args['όπως'] = 'στίμμι'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
elseif mw.ustring.find(args['λήμμα'], 'εα$') then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- στίμμ-εα stemnumber = 3 (μείον 2)
args['όπως'] = 'στίμμι'
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
args['υποκατ02'] = 'ουδέτερα προπαροξύτονα'
end
else -- singular
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- στίμμι-ι (ΚΑΙ ΜΕ περισπωμένη υπάρχει στῖμι)
-- PERISPOMENA like [[στίμμι]]
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) then -- vowel+perispomeni
args['όπως'] = 'στῖμι'
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
args['υποκατ02'] = 'ουδέτερα προπερισπώμενα'
args['υποκατ03'] = "που κλίνονται όπως το 'στίμμι' περισπώμενα"
else -- NO persipomeni
args['όπως'] = 'στίμμι'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
args['υποκατ03'] = "που κλίνονται όπως το 'στίμμι' παροξύτονα"
end
end -- close numbers
stem["θ0"] = m_stems.word0(stem["θ"]) -- στιμμ στιμ-
-- stem["θ1"] = m_stems.word1(stem["θ0"]) -- CONTROL CHECK proparoxytones paroxytones
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- στίμμ, στίμ
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
then
stem["θ1οξ"] = stem["θοξ"] -- στίμ=
else -- no perispomeni
stem["θ1οξ"] = stem["θ"] -- στίμμ- (remains as is) ονόμ accent at last syllbable
end
args['mod-οεθ'] = stem["θ"] .. "ι" args['mod-οεθ+'] = stem["θ"] .. "ῐ" args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ1οξ"] .. "ι" args['mod-γεθ+'] = stem["θ1οξ"] .. "ῐ" args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ1οξ"] args['mod-δε'] = "ει"
args['mod-αεθ'] = args['mod-οεθ'] args['mod-αεθ+'] = args['mod-οεθ+'] args['mod-αε'] = args['mod-οε'] -- same as nom.
args['mod-κεθ'] = args['mod-οεθ'] args['mod-κεθ+'] = args['mod-οεθ+'] args['mod-κε'] = args['mod-οε'] -- same as nom.
-- ?? add second plurals -εα Do they exist?
args['mod-οπθ'] = stem["θ1οξ"] args['mod-οπ'] = "η"
args['mod-οπ2θ'] = stem["θ1οξ"] .. "ε" args['mod-οπ2'] = "α" args['mod-οπ2+'] = "ᾰ"
args['mod-γπθ'] = stem["θ0"] .. "έ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ1οξ"] .. "ε" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ1οξ"] args['mod-απ'] = "η" -- same as nom.
args['mod-απ2θ'] = stem["θ1οξ"] .. "ε" args['mod-απ2'] = "α" args['mod-απ2+'] = "ᾰ"
args['mod-κπθ'] = stem["θ1οξ"] args['mod-κπ'] = "η" -- same as nom.
args['mod-κπ2θ'] = stem["θ1οξ"] .. "ε" args['mod-κπ2'] = "α" args['mod-κπ2+'] = "ᾰ"
args['mod-οδθ'] = stem["θ1οξ"] args['mod-οδ'] = "ει"
args['mod-γδθ'] = stem["θ0"] .. "έ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Σ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'Σωκράτης']] @@@@@@@@@@@@@@@@@@@@@@@@
--##### το [[Σωκράτης]] έχει +editing, αλλά υπάρχει παντού ως παράδειγμα.
-- ================= 3η κλίση [[Σωκράτης]] ===========
-- BUG careful: if α=εν then υπότιτλος-πλ HAS to go
-- ο πληθυντικός (όταν υπάρχει, θεωρούμε ότι υπάρχει) κατά την 1η κλίση (άρα, όλα ετερόκλιτα?)
-- ! χρειάζεται δίχρ=μ αν υπάρχει περισπωμένη στον πληθυντικό (nom.pl, voc.pl. όπως στο 'στρατιώτης')
-- default |όνομα=1 Υπάρχουν δυο τρεις λέξεις όπως [[υπερσωκράτης]], φιλοσωκράτης με παράμετρο |όνομα=-
-- συναιρέσεις όπως στο http://ebooks.edu.gr/ebooks/v/html/8547/2340/Grammatiki-Archaias-Ellinikis_Gymnasiou-Lykeiou_html-apli/index_02_06.html
-- Smyth http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D22
-- Proper names in -γένης, -κράτης, -μένης, -φάνης, etc., may have an accus. in -ην derived from the first declension.
-- Thus, Σωκράτην, Ἀριστοφάνην, like Ἀτρείδην (222, 282 N.)
export['Σωκράτης'] = function(frame) -- [[Πρότυπο:grc-κλίση-'Σωκράτης']]
local args = frame:getParent().args
-- 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 = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- Σωκράτ-ης, Σωκράτ-αι minus 2 letters from end
stem["θ0"] = m_stems.word0(stem["θ"]) -- Σωκρατ- remove accent
-- stem["θ1"] = m_stems.word1(stem["θ0"]) -- Σώκρατ- accent on 1st syllable from the end
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) -- Διομήδαι
stem["θ2"] = m_stems.word2(stem["θ0"]) -- Σώκρατ- accent okseia on 2nd syllable from the end
args['κλίση'] = '3'
args['αρσ'] = '1'
args['δυ'] = '-' --no dual
if args['όνομα'] == '-' then
-- do nothing
else
args['όνομα'] = '1' -- default
end
args['κατηγορία κλίσης'] = 'Σωκράτης'
args['τύπος'] = 'Σωκράτης'
args['όπως'] = 'Σωκράτης'
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'αρσενικά παροξύτονα'
args['σημ'] = '<sup>1</sup>Κατά την 1η κλίση. Αν σχηματιστεί πληθυντικός, όλες οι πτώσεις<br>κατά την 1η κλίση, όπως «[[Παράρτημα:Ουσιαστικά (αρχαία ελληνικά)/1#στρατιώτης|στρατιώτης]]».'
.. '<br>Δε μαρτυρείται δυικός αριθμός.'
args['υπότιτλος-εν'] = '3η κλίση'
if args['α'] == 'εν' or args['α'] == 'ενδ' then
-- do nothing
else
args['υπότιτλος-πλ'] = 'ετερόκλιτο: κατά την 1η κλίση'
end
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ης"
args['mod-γεθ'] = stem["θ"] args['mod-γε'] = "ους" -- often γε2=εος not so often -ου (1st decl)
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "ει" -- sometimes δε2=εϊ
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "η" -- very often αε2=ην (1st decl)
if mw.ustring.find(args['λήμμα'], 'γένης$') or mw.ustring.find(args['λήμμα'], 'κράτης$')
or mw.ustring.find(args['λήμμα'], 'μένης$') or mw.ustring.find(args['λήμμα'], 'φάνης$')
then
args['mod-αε2θ'] = stem["θ"] args['mod-αε2'] = "ην" args['mod-αε2Λκειμ'] = '<sup>1</sup>'
end
args['mod-κεθ'] = stem["θ2"] .. "ες" args['mod-κε'] = "0"
-- nom.pl check περισπωμένες. δίχρ=μ [[Διομήδης]] Διομῆδαι
if mw.ustring.find(stem["θ"], m_data.macron_oxeia) -- macron+okseia (or vareia)
or args['δίχρ'] == 'μ'
then
args['mod-οπθ'] = stem["θπ"] args['mod-οπ'] = "αι" args['mod-οπΛκειμ'] = '<sup>1</sup>'
else
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "αι" args['mod-οπΛκειμ'] = '<sup>1</sup>'
end
args['mod-γπθ'] = stem["θ0"] args['mod-γπ'] = "ῶν"
args['mod-δπθ'] = stem["θ"] args['mod-δπ'] = "αις"
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "ας" args['mod-απ+'] = "ᾱς"
-- nom.pl check περισπωμένες. δίχρ=μ
if mw.ustring.find(stem["θ"], m_data.macron_oxeia) -- macron+okseia (or vareia)
or args['δίχρ'] == 'μ'
then
args['mod-κπθ'] = stem["θπ"] args['mod-κπ'] = "αι"
else
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "αι" -- as in nominative plural
end
-- ## duals not found in Grammars.
args['mod-οδΛ'] = ''
args['mod-γδΛ'] = ''
return decl(args)
end
-- Τ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'Τρως']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[Τρώς]] =========== --
-- φωνηεντόληκτα μονόθεμα καταληκτικά ουδέτερα οξύτονα μονοσύλλαβα σε -ώς -ωός
-- + ἡ ἅλς NO PLURAL found ++ ὁ ἅλς, οἱ ἅλες dat. pl. ἅλασιν -- DO SEPARATELY
-- Tzartzanos 86.Σημείωσις 2. ῾Υγρόληκτον μὲ χαρακτῆρα λεἶναι μόνον ὁ ἅλς ( τοῦ ἁλός , τῷ ἁλί , τὸν ἅλα , ὦ ἅλς - οἱ ἅλες , τῶν ἁλῶν , τοῖς ἁλσί , τοὺς ἅλαςκτλ.).
-- Smyth 267. Stems in ωϝ http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D24
-- Smtyh 252 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D15
--[=[ Tzartzanos says nothing about dative here
§ 101. Τὰ μονοσύλλαβα τριτόκλιτα ὀνόματα εἰς τὴν γενικὴν καὶ τὴν δοτικὴν
παντὸς ἀριθμοῦ τονίζονται ἐπὶ τῆς καταλήξεως (παρὰ τὸν κανόνα, § 16, 8) : ὁ θήρ, τοῦ θηρός, τῷ θηρὶ - τῶν θηρῶν, τοῖς θηρσὶ - ( τοῖν θηροῖν ).
Ἀλλὰ τὰ μονοσύλλαβα ὀνόματα ἡ δᾴς, ὁ θώς, τὸ οὗς, ὁ παῖς, ὁ Τρὼς καὶ τὸ φῶς
εἰς τὴν πληθυντικὴν γενικὴν τονίζονται κανονικῶς: τῶν δᾴδων, τῶν θώων, τῶν ὤτων, τῶν παίδων, τῶν Τρῴων, τῶν φώτων.
]=]--
-- gen. dual ALSO -οιν according to Smyth
export['Τρώς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'Τρως']]
local args = frame:getParent().args
-- 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['αρσ'] = '1'
args['κατηγορία κλίσης'] = 'Τρώς'
args['όπως'] = 'Τρώς'
args['τύπος'] = 'Τρώς'
args['cat-extra'] = "Ουσιαστικά μονοσύλλαβα με εξαιρέσεις (αρχαία ελληνικά)"
if args['σημ'] == "-" then
-- do nothing
else
args['σημ'] = "Εξαίρεση στον τονισμό γενικής πληθυντικού. [[:Κατηγορία:Ουσιαστικά μονοσύλλαβα με εξαιρέσεις (αρχαία ελληνικά)|''όπως το μονοσύλλαβα με εξαιρέσεις'']]."
end
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- Τρῶ-ες minus 2 letters from end
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
else
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- Τρώ-ς minus 1 letter from end
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- Τρω-ός remove accent
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) -- Τρῶ-ες convert okseia to perispomeni
stem["θ1"] = m_stems.word1(stem["θ0"]) -- ἡρώ-ων accent on 1st syllable from the end
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ0"] args['mod-γε'] = "ός"
args['mod-δεθ'] = stem["θ0"] args['mod-δε'] = "ΐ" -- check?? dialytics
args['mod-αεθ'] = stem["θπ"] args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "ς" -- same as nom
args['mod-οπθ'] = stem["θπ"] args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ0"] args['mod-δπ'] = "σί" args['mod-δπ+'] = "σῐ́"
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θπ"] args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θπ"] args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] args['mod-γδ'] = "οιν"
return decl(args)
end
-- Υ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'υιύς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ##? acc.sg. en.wikt gives υἱύν Dictionaries do not mention it. They mention
-- https://logeion.uchicago.edu/υἱός
-- ================= 3η [[υἱύς]] έoς=========== -- like πρέσβυς, οξύτονο
export['υιύς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'υιύς']] -- alias ἁλιεύς
local args = frame:getParent().args
-- 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
args['κλίση'] = '3'
args['αρσ'] = '1' -- chek if fem
args['κατηγορία κλίσης'] = 'υἱύς'
args['τύπος'] = 'υἱύς'
args['όπως'] = 'υἱύς'
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- υἱεῖς
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
args['υποκατ02'] = 'αρσενικά περισπώμενα'
else -- υἱύς
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
args['mod-οεθ'] = stem["θ"] .. "ύ" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "έ" args['mod-γε'] = "oς"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "εῖ"
-- See problem with acc.sg υἱύς is SUPPOSED to have υἱύν like πρέσβυς BUT, the specific word probably the proscibed υἱέα
args['mod-αεθ'] = stem["θ"] .. "ύ" args['mod-αε'] = "ν"
-- OPTIONAL: dash or
-- args['mod-αεθ'] = stem["θ"] .. "έ" args['mod-αε'] = "α" -- args['mod-αε+'] = "ᾱ" -- they do not mention prosodies at endings
-- voc.sg. not mentioned at dictionary
args['mod-κεθ'] = stem["θ"] .. "ύ" args['mod-κε'] = "0"
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "εῖς"
args['mod-γπθ'] = stem["θ"] .. "έ" args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "έ" args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "εῖς"
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "εῖς"
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "εῖ"
args['mod-γδθ'] = stem["θ"] .. "έ" args['mod-γδ'] = "οιν"
return decl(args)
end
-- Φ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'φύλαξ']] @@@@@@@@@@@@@@@@@@@@@@@@
-- EDITOR_MUST_DEFINE χαρ= possibly θέμα= and if capita+spirit+tonos προπαροξ=
-- ================= [[φύλαξ]] 3η κλίση ΒΑΡΥΤΟΝΑ αφωνόληκτα =========== --
-- -------------- κ-γ-χ =ξ, τ-δ-θ =ς, π-β-φ =ψ ------------- --
-- separate Template for Πάρις, του Πάριδος + Πάριος
-- separate #άπαις
-- BUG capital+pneuma+tonos does not convert well Like [[Ἶσις]] does not convert to Ἴσιδ (psile+okseia) but only to okseia. The other diacritic vanishes
-- for accusative -ν Smtyh.247 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D11
-- for vocative -ι Smyth.249 http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D12
-- κλίση έρις υπάρχει και το [[λάτρις]] με γεν. λάτριος, δηλαδή χαρακτήρα μηδέν -- το κάνω χωριστό πρότυτπο
-- Smtyh http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D17
-- Some stems in -ιδ are generally ι stems in Ionic, Doric, and Aeolic: Θέτις, Θέτιος (but Θέτιδος Θ 370), Πάρις, Πάριος.
-- θ-α [[φάρυγξ]]
export['φύλαξ'] = function(frame) -- [[Πρότυπο:grc-κλίση-'φύλαξ']]
local args = frame:getParent().args
-- 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
-- CAREFUL, all cats are used: υποκατ0, 1, 2 and κατηγ0, 1, 2
args['κλίση'] = '3'
-- args['υπερομάδα'] = 'αφωνόληκτα βαρύτονα' -- do manually for categories only
-- args['τύπος'] = '' --cf below
-- args['όπως'] cf below
-- gender -- see below AFTER τύπος is defined
-- stem -- different from default, different for singular/plural. All stems must be written.
-- stem variations found at genitive singular. Editor must define consonant args χαρ -- For exceptions, define stem θέμα=
local stem = {}
-- creating pseudo stem['θ'] = lemma (PAGENAME or args['λήμμα']) MINUS last letter PLUS args['χαρ'] character (the last letter of genitive minus -ος)
-- the real stem is stem['θ'] + args['χαρ'] by editor
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- hypothetical pl.tantum φύλα-κες ἰάσπι-δες
else -- in singular, paroxytones and proparoxtyones beginning with capital+spirit+tonos must be handled separately.
-- if editor forgets parameters:
char = args['χαρ'] or ''
if (args['χαρ'] == '' or args['χαρ'] == nil) and (args['θέμα'] == '' or args['θέμα'] == nil)
and (args['προπαροξ'] == '' or args['προπαροξ'] == nil)
then
return errorhere('<span style="color:#b22222; font-size:16px;">Γράψτε <b>|χαρ=</b> το τελευταίο γράμμα του θέματος της γενικής,'
.. '<br>ή <b>|θέμα=</b> όλο το θέμα της γενικής (χωρίς την κατάληξη -ος)'
.. '<br>Αν είναι θηλυκό, <b>|θηλ=1</b> Αν είναι κοινού γένους, <b>|αθ=1</b> Καλή επιτυχία!</span>')
end
-- bithematic e.g. [[ἀλώπηξ]] (stem ἀλώπη-) for nom.sg & voc.sg. All other cases: ἀλώπεκ- [[Οἴνωψ]] Οἴνοπος
-- args['θέμα'] is defined by editor
if args['θέμα'] ~= '' and args['θέμα'] ~= nil then
args['εξ'] = '1'
stem["θλήμμα"] = mw.ustring.sub(args['λήμμα'],1,-2) -- αλώπη only for nom.sg & voc.sg
stem["θ"] = mw.ustring.sub(args['θέμα'],1,-2) -- αλώπε
args['χαρ'] = mw.ustring.sub(args['θέμα'],-1,-1) -- κ from αλώπεκ
-- args['υποκατ0'] = "που κλίνονται όπως η ομάδα 'αφωνόληκτα βαρύτονα' μεταπλαστά"
else -- not bithematic
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2) -- [[φύλαξ|φύλα-ξ]] λαῖλα-ψ [[Ἄρτεμις|Ἄρτεμι-ς]] [[Ἶσις|Ἶσι-ς]] [[Ἴσις|Ἴσι-ς]] ἶρι-ς ἴασπι-ς minus one letter from end
end
end
stem["θ0"] = m_stems.word0(stem["θ"]) -- remove accent φυλα λαιλα
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- λαίλα [[Ἶσις]] to Ἴσι-
-- stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θοξ"]) -- not needed here
stem["θ1οξ"] = m_stems.word1(stem["θ0"]) -- put OKSEIA at the last syllable (1st from the end) of the stripped stem
-- FIX BUG
-- Because capital+spirit+tonos does NOT conevert to anything excpet capital+spirit, we need special handling.
-- for paroxytones [[Άραψ]] the identical stem['θ'] must be repeated
-- stem["θ2οξ"] = m_stems.word2(stem["θοξ"])-- φύλα λαίλα ἰάσπι -- proparoxytones need shift test hypothetical [[Ἴασπις]]
-- DO NOT CHANGE SEQUENCE HERE
if mw.ustring.find(stem['θ'], '[ἌᾌἊᾊᾊἍᾍἋᾋἜἚἝἛἬᾜἪᾚᾚἭᾝἫᾛἼἺἽἻὌὊὍὋὝὛὬᾬὪᾪᾭὫᾫ]') -- capital+spirit+okseia (varia nevermind)
then
-- for proparoxytones, USE θέμα= there is no other way
-- warning only if not plural
if args['α'] ~= "πλ" and args['α2'] ~= "πλ" and args['α'] ~= "πλδ" and args['α2'] ~= "πλδ"
and (args['προπαροξ'] == '' or args['προπαροξ'] == nil)
then
mw.addWarning('<span style="color:#b22222; font-size:16px;"><b>Αν είναι προπαροξύτονο</b> γράψτε |προπαροξ=το θέμα της γενικής ενικού με τον τόνο του (χωρίς την κατάληξη -ος)'
.. '<br>Αν είναι θηλυκό, <b>|θηλ=1</b> Αν είναι κοινού γένους, <b>|αθ=1</b> Καλή επιτυχία!</span>')
end -- close if no plural give warning
if args['προπαροξ'] ~= '' and args['προπαροξ'] ~= nil then
stem["θ2οξ"] = mw.ustring.sub(args['προπαροξ'],1,-2) -- minus last letter
args['χαρ'] = mw.ustring.sub(args['προπαροξ'],-1,-1) -- the last letter
else -- if paroxytone, keep steady -- for [[Άραψ]]
stem["θ2οξ"] = stem["θ"]
end
elseif mw.ustring.find(stem['θ'], '[ἎᾎἏᾏἮᾞἯᾟἾἿὟὮᾮὯᾯ]') -- capital+spirit+perispomeni
then
stem["θ2οξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- for [[Ἶσις]] need to SUBSTITUTE them with
else -- not capital
stem["θ2οξ"] = m_stems.word2(stem["θοξ"]) -- moves accent for proparoxytones, keeps accent at paroxytones
end
-- character of stem, typos, (char, args['χαρ']) is the last consonant of the stem
-- datpl is the consontant of dative plural
char = args['χαρ'] or '' --repeat it here, otherwise plurals do not work
datpl = ''
-- for singular (perhaps split parox, proparox etc)
if char == 'π' then datpl = 'ψ' args['κατηγορία κλίσης'] = 'κώνωψ' args['τύπος'] = 'κώνωψ' args['όπως'] = 'κώνωψ' end
if char == 'β' then datpl = 'ψ' args['κατηγορία κλίσης'] = 'Ἄραψ' args['τύπος'] = 'Ἄραψ' args['όπως'] = 'Ἄραψ' end
if char == 'φ' then datpl = 'ψ' args['κατηγορία κλίσης'] = '?' args['τύπος'] = '?' args['όπως'] = '?' end
if char == 'κτ' then datpl = 'ξ' args['κατηγορία κλίσης'] = 'ἄναξ' args['τύπος'] = 'ἄναξ' args['όπως'] = 'ἄναξ' end
if char == 'στ' then datpl = 'σ' args['κατηγορία κλίσης'] = 'Θέμις' args['τύπος'] = 'θέμις' args['όπως'] = 'θέμις' end
if char == 'τ' then
if mw.ustring.find(args['λήμμα'], 'ως$') then datpl = 'σ' args['κατηγορία κλίσης'] = 'ἔρως' args['τύπος'] = 'ἔρως' args['όπως'] = 'ἔρως'
elseif mw.ustring.find(args['λήμμα'], 'ις$') then datpl = 'σ' args['κατηγορία κλίσης'] = 'χάρις' args['τύπος'] = 'χάρις' args['όπως'] = 'χάρις'
else
datpl = 'σ' args['κατηγορία κλίσης'] = 'τάπης' args['τύπος'] = 'τάπης' args['όπως'] = 'τάπης'
end
end
if char == 'δ' then datpl = 'σ'
if mw.ustring.find(args['λήμμα'], 'παις$') -- [[ἄπαις]] acc ἄπαιδα -- also see #πρόπους
then
mw.addWarning('<b><span style="color:#b22222; font-size:14px;">'
.. "Για σύνθετα του [[παῖς]] χρησιμοποιούμε το πρότυπο {{grc-κλίση-'άπαις'}}</span></b>")
else args['κατηγορία κλίσης'] = 'ἔρις' args['τύπος'] = 'ἔρις' args['όπως'] = 'ἔρις' -- acc ιν
end
end
if char == 'θ' then datpl = 'σ'
-- ἡ κόρυς -ῠθος (κόρυθα also κόρυν), ἡ ἕλμινς -ινθος, ἡ πείρινς -ινθος, ἡ Τίρυνς -υνθος [[Πάρνης]]
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['όπως'] = 'Πάρνης'
elseif mw.ustring.find(args['λήμμα'], 'ινς$') or mw.ustring.find(args['λήμμα'], 'ης$') then
args['κατηγορία κλίσης'] = 'πείρινς' args['τύπος'] = 'πείρινς' args['όπως'] = 'πείρινς'
else
args['κατηγορία κλίσης'] = 'ὄρνις' args['τύπος'] = 'ὄρνις' args['όπως'] = 'ὄρνις'
end
end
if char == 'κ' then datpl = 'ξ' args['κατηγορία κλίσης'] = 'φύλαξ' args['τύπος'] = 'φύλαξ' args['όπως'] = 'φύλαξ' end -- plus see bithematic
if char == 'γ' then datpl = 'ξ'
if mw.ustring.find(args['λήμμα'], 'γξ$') or mw.ustring.find(args['λήμμα'], 'γγες$') then
args['κατηγορία κλίσης'] = 'φάλαγξ' args['τύπος'] = 'φάλαγξ' args['όπως'] = 'φάλαγξ'
else args['κατηγορία κλίσης'] = 'πτέρυξ' args['τύπος'] = 'πτέρυξ' args['όπως'] = 'πτέρυξ'
end
end
if char == 'χ' then datpl = 'ξ' args['κατηγορία κλίσης'] = 'ὄνυξ' args['τύπος'] = 'ὄνυξ' args['όπως'] = 'ὄνυξ' end
-- for pluralia tantum
if mw.ustring.find(args['λήμμα'], 'πες$') then char = 'π' datpl = 'ψ' args['κατηγορία κλίσης'] = 'κώνωψ' args['τύπος'] = 'κώνωψ' args['όπως'] = 'κώνωψ' end
if mw.ustring.find(args['λήμμα'], 'βες$') then char = 'β' datpl = 'ψ' args['κατηγορία κλίσης'] = 'Ἄραψ' args['τύπος'] = 'Ἄραψ' args['όπως'] = 'Ἄραψ' end
if mw.ustring.find(args['λήμμα'], 'φες$') then char = 'φ' datpl = 'ψ' args['κατηγορία κλίσης'] = '?' args['τύπος'] = '?' args['όπως'] = '?' end
if mw.ustring.find(args['λήμμα'], 'ωτες$') then char = 'τ' datpl = 'σ' args['κατηγορία κλίσης'] = 'ἔρως' args['τύπος'] = 'ἔρως' args['όπως'] = 'ἔρως' end
if mw.ustring.find(args['λήμμα'], 'ητες$') then char = 'τ' datpl = 'σ' args['κατηγορία κλίσης'] = 'τάπης' args['τύπος'] = 'τάπης' args['όπως'] = 'τάπης' end -- abd all -ότης, -ύτης feminines
if mw.ustring.find(args['λήμμα'], 'ιστες$') then char = 'στ' datpl = 'σ' args['κατηγορία κλίσης'] = 'Θέμις' args['τύπος'] = 'θέμις' args['όπως'] = 'θέμις' end
if mw.ustring.find(args['λήμμα'], 'ιτες$') then char = 'τ' datpl = 'σ' args['κατηγορία κλίσης'] = 'χάρις' args['τύπος'] = 'χάρις' args['όπως'] = 'χάρις' end
if mw.ustring.find(args['λήμμα'], 'δες$') then char = 'δ' datpl = 'σ'
if mw.ustring.find(args['λήμμα'], 'παιδες$') -- [[ἄπαις]] ἄπαιδ -- also see #πρόπους
then
mw.addWarning('<b><span style="color:#b22222; font-size:14px;">'
.. "Για σύνθετα του [[παῖς]] χρησιμοποιούμε το πρότυπο {{grc-κλίση-'άπαις'}}</span></b>")
else args['κατηγορία κλίσης'] = 'ἔρις' args['τύπος'] = 'ἔρις' args['όπως'] = 'ἔρις'
end
end
if mw.ustring.find(args['λήμμα'], 'θες$') then char = 'θ' datpl = 'σ'
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['όπως'] = 'Πάρνης'
elseif mw.ustring.find(args['λήμμα'], 'ινθες$') or mw.ustring.find(args['λήμμα'], 'ης$') then
args['κατηγορία κλίσης'] = 'πείρινς' args['τύπος'] = 'πείρινς' args['όπως'] = 'πείρινς'
else
args['κατηγορία κλίσης'] = 'ὄρνις' args['τύπος'] = 'ὄρνις' args['όπως'] = 'ὄρνις'
end
end
if mw.ustring.find(args['λήμμα'], 'κτες$') then char = 'κτ' datpl = 'ξ' args['τύπος'] = 'ἄναξ' args['όπως'] = 'ἄναξ' end
if mw.ustring.find(args['λήμμα'], 'κες$') then char = 'κ' datpl = 'ξ'
-- for bithematics (args['θέμα'] when singular) we might need a parameter τύπος= όπως=
args['κατηγορία κλίσης'] = 'φύλαξ' args['τύπος'] = 'φύλαξ' args['όπως'] = 'φύλαξ'
end
if mw.ustring.find(args['λήμμα'], 'γες$') then char = 'γ' datpl = 'ξ'
if mw.ustring.find(args['λήμμα'], 'γγες$') then args['κατηγορία κλίσης'] = 'φάλαγξ' args['τύπος'] = 'φάλαγξ' args['όπως'] = 'φάλαγξ'
else args['κατηγορία κλίσης'] = 'πτέρυξ' args['τύπος'] = 'πτέρυξ' args['όπως'] = 'πτέρυξ'
end
end
if mw.ustring.find(args['λήμμα'], 'χες$') then char = 'χ' datpl = 'ξ' args['κατηγορία κλίσης'] = 'ὄνυξ' args['τύπος'] = 'ὄνυξ' args['όπως'] = 'ὄνυξ' end
-- genders & Categories
if args['θηλ'] == '1' then
args['θηλ'] = '1'
args['υποκατ1'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' θηλυκά"
elseif args['αθ'] == '1' then
args['αθ'] = '1'
args['υποκατ1'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' κοινού γένους"
elseif args['θ-α'] == '1' then -- [[φάρυγξ]]
args['υποκατ1'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' θηλυκά ή αρσενικά"
else args['αρσ'] = '1'
args['υποκατ1'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' αρσενικά"
end
-- Categories: define the proparoxytones
-- pluralia are always proparoxytones
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
elseif args['θ-α'] == '1' then args['υποκατ02'] = 'θηλυκά ή αρσενικά προπαροξύτονα'
elseif args['αρσ'] == '1' then args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
end
args['υποκατ2'] = " που κλίνονται όπως το '" .. args['τύπος'] .. "' προπαροξύτονα"
if args['θέμα'] ~= '' and args['θέμα'] ~= nil then
args['εξ'] = '1'
end
-- else -- for singular
elseif args['α'] ~= "πλ" and args['α2'] ~= "πλ" and args['α'] ~= "πλδ" and args['α2'] ~= "πλδ" then
-- properispomena are no problem
if mw.ustring.find(stem["θ"], m_data.vowel_perispomeni) -- vowel+perispomeni
then -- [[Ἶσις]]
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπερισπώμενα'
elseif args['θ-α'] == '1' then args['υποκατ02'] = 'θηλυκά ή αρσενικά προπερισπώμενα' -- no example
elseif args['αρσ'] == '1' then args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
end
args['υποκατ2'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' προπερισπώμενα"
-- FIX BUG
-- capitals only
elseif mw.ustring.find(stem["θ"], '[ἌᾌἊᾊᾊἍᾍἋᾋἜἚἝἛἬᾜἪᾚᾚἭᾝἫᾛἼἺἽἻὌὊὍὋὝὛὬᾬὪᾪᾭὫᾫ]') -- arctic capital+spirit+okseia (never mind the vareia)
then
if args['προπαροξ'] ~= '' and args['προπαροξ'] ~= nil then
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
elseif args['θ-α'] == '1' then args['υποκατ02'] = 'θηλυκά ή αρσενικά προπαροξύτονα'
elseif args['αρσ'] == '1' then args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
end
args['υποκατ2'] = " που κλίνονται όπως το '" .. args['τύπος'] .. "' προπαροξύτονα"
else -- paroxytones
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους παροξύτονα'
elseif args['θ-α'] == '1' then args['υποκατ02'] = 'θηλυκά ή αρσενικά παροξύτονα'
elseif args['αρσ'] == '1' then args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
args['υποκατ2'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' παροξύτονα"
end -- close if προπαροξ=
else -- no capitals
if stem["θ"] == m_stems.word2(stem["θοξ"]) then -- else --if stem["θ"] == stem["θ2οξ"] then -- check [[κόραξ]]
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους παροξύτονα'
elseif args['θ-α'] == '1' then args['υποκατ02'] = 'θηλυκά ή αρσενικά παροξύτονα'
elseif args['αρσ'] == '1' then args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
args['υποκατ2'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' παροξύτονα"
elseif stem["θ"] ~= stem["θ2οξ"] and stem[""] ~= stem["θ1οξ"] then -- check [[κλαυσίγελως]]
if mw.ustring.find(args['λήμμα'], 'παις$') and char == 'δ' -- [[ἄπαις]] ἄπαιδ PROBLEM seen as ά-πα-ι
then
mw.addWarning('<b><span style="color:#b22222; font-size:14px;">'
.. "Για σύνθετα του [[παῖς]] χρησιμοποιούμε το πρότυπο {{grc-κλίση-'άπαις'}}</span></b>")
else -- NOT άπαις, normal accent
args['κατηγ0'] = 'Λέξεις προπαροξύτονες'
args['υποκατ01'] = 'προπαροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά προπαροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπαροξύτονα'
elseif args['θ-α'] == '1' then args['υποκατ02'] = 'θηλυκά ή αρσενικά προπαροξύτονα'
elseif args['αρσ'] == '1' then args['υποκατ02'] = 'αρσενικά προπαροξύτονα'
end
args['υποκατ2'] = "που κλίνονται όπως το '" .. args['τύπος'] .. "' προπαροξύτονα"
end -- close if άπαις
end
end -- close plural-singular
end
if args['θέμα'] ~= '' and args['θέμα'] ~= nil then
args['mod-οεθ'] = stem["θλήμμα"] args['mod-οε'] = mw.ustring.sub(args['λήμμα'],-1)
else
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = mw.ustring.sub(args['λήμμα'],-1) -- cannot read param last
end
args['mod-γεθ'] = stem["θ2οξ"] .. char args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θ2οξ"] .. char args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
-- acc.sg ν for all -ιτ, -ιδ, -ιθ words [[ἔρις]]-ἔριδος, [[χάρις]]-χάριτος [[κόρυς]]-κόρυθος, [[ἕλμινς]]-ἕλμινθος, [[Τίρυνς]]-Τίρυνθος, [[Πάρνης]]-Πάρνηθος
-- voc.sg έρις έρι!
if args['θέμα'] ~= '' and args['θέμα'] ~= nil then
args['mod-αεθ'] = stem["θ2οξ"] .. char args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θλήμμα"] args['mod-κε'] = mw.ustring.sub(args['λήμμα'],-1)
else
if mw.ustring.find(args['λήμμα'], 'ις$') or mw.ustring.find(args['λήμμα'], 'ϊς$') -- [[βάϊς]]
and not mw.ustring.find(args['λήμμα'], 'παις$')
and (char == 'τ' or char == 'δ' or char == 'θ')
or mw.ustring.find(args['λήμμα'], 'υς$')
and not mw.ustring.find(args['λήμμα'], 'υνς$')
and not mw.ustring.find(args['λήμμα'], 'ινς$') -- NOT possible [[Τίρυνς]] Τίρυνν
and not mw.ustring.find(args['λήμμα'], 'νης$') -- of args['λήμμα'] == and put here all exceptions
then
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "ν"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0"
else
args['mod-αεθ'] = stem["θ2οξ"] .. char args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = mw.ustring.sub(args['λήμμα'],-1)
end
end
args['mod-οπθ'] = stem["θ2οξ"] .. char args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ1οξ"] .. char args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ2οξ"] .. datpl args['mod-δπ'] = "ι" args['mod-δπ+'] = "ῐ"
args['mod-απθ'] = stem["θ2οξ"] .. char args['mod-απ'] = "ας" args['mod-απ'] = "ᾰς"
args['mod-κπθ'] = stem["θ2οξ"] .. char args['mod-κπ'] = "ες" -- same as nom.pl
args['mod-οδθ'] = stem["θ2οξ"] .. char args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ1οξ"] .. char args['mod-γδ'] = "οιν"
return decl(args)
end
-- Χ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'χειμών']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[παιάν]] [[σωλήν]] [[χειμών]] =========== --
-- ενρινόληκτα μονόθεμα ακατάληκτα σε -άν-ᾶνος, -ήν-ῆνος, -ών-ῶνος + [[Τυφῶν]]
-- http://ebooks.edu.gr/ebooks/v/html/8547/2340/Grammatiki-Archaias-Ellinikis_Gymnasiou-Lykeiou_html-apli/index_02_06.html
-- 128. 1) Τα φωνήεντα ι και α εμπρός από το χαρακτήρα ν των ονομάτων σε -ις (γεν. -ινος) και -αν (γεν. -ανος)
-- είναι μακρόχρονα: τῆς ἀκτῖν-ος, τῆς Σαλαμῖν-ος· τοῦ Τιτᾶν-ος, τοῦ πελεκᾶν-ος.
-- διαφορά με κλητήρ, μόνο dat.pl ΟΧΙ κλητηρ-σι αλλά χειμω-σι (χωρίς το ν)
-- α-θ [[αὐλών]]
export['χειμών'] = function(frame) -- [[Πρότυπο:grc-κλίση-'χειμών']]
local args = frame:getParent().args
-- 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'
-- gender κατηγορία κλίσης-- see below
-- args['υπερομάδα'] = '-νος μονόθεμα 1' -- το Τυφῶν είναι περισπώμενο
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- χειμ-ῶν-ες. -ν-ες etc minus 2 letters from end
args['κατηγ0'] = 'Λέξεις προπερισπώμενες'
args['υποκατ01'] = 'προπερισπώμενα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά προπερισπώμενα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους προπερισπώμενα'
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά προπερισπώμενα'
end
else -- singular
stem["θ"] = args['λήμμα'] -- χειμών Τυφῶν
if mw.ustring.find(args['λήμμα'], 'ῶν$') then
args['κατηγορία κλίσης'] = 'Τυφῶν' -- από Τυφάων (θα αναφερθεί στα συνηρημένα)
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά περισπώμενα'
else -- -ών -ήν -άν
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά οξύτονα' -- [[λεγεών]]
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους οξύτονα' -- ?
elseif args['α-θ'] == '1' then args['υποκατ02'] = 'αρσενικά ή θηλυκά οξύτονα' -- [[αὐλών]]
else
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά οξύτονα'
end
end -- close if perispomeni
end
-- are they all macra
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) -- χειμῶν-
-- for genitive plural, need oksia IF in plurale tantum (stem is supposed χειμῶν)
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- or okseia remains
-- dative plural need χειμῶ WITHOUT last n
stem["θπ_δοτ"] = mw.ustring.sub(stem["θπ"],1,-2) -- minus last
if mw.ustring.find(args['λήμμα'], 'άν$') or mw.ustring.find(args['λήμμα'], 'ᾶνες$') then
args['κατηγορία κλίσης'] = 'παιάν'
args['τύπος'] = 'παιάν'
args['όπως'] = 'παιάν'
if args['θηλ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'παιάν' θηλυκά" --?
else args['υποκατ03'] = "που κλίνονται όπως το 'παιάν' αρσενικά"
end
elseif mw.ustring.find(args['λήμμα'], 'ήν$') or mw.ustring.find(args['λήμμα'], 'ῆνες$') then
args['κατηγορία κλίσης'] = 'σωλήν'
args['τύπος'] = 'σωλήν'
args['όπως'] = 'σωλήν'
if args['θηλ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'σωλήν' θηλυκά" -- [[Τροιζήν]]
else args['υποκατ03'] = "που κλίνονται όπως το 'σωλήν' αρσενικά"
end
elseif mw.ustring.find(args['λήμμα'], 'ῶν$') then
args['κατηγορία κλίσης'] = 'Τυφῶν'
args['τύπος'] = 'Τυφῶν'
args['όπως'] = 'Τυφῶν'
args['υποκατ03'] = "που κλίνονται όπως το 'Τυφῶν' αρσενικά"
elseif mw.ustring.find(args['λήμμα'], 'ών$') or mw.ustring.find(args['λήμμα'], 'ῶνες$') then
args['κατηγορία κλίσης'] = 'χειμών'
args['τύπος'] = 'χειμών'
args['όπως'] = 'χειμών'
if args['θηλ'] == '1' then -- [[χελιδών]]
args['υποκατ03'] = "που κλίνονται όπως το 'χειμών' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'χειμών' κοινού γένους" --?
elseif args['α-θ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'χειμών' αρσενικά ή θηλυκά" -- [[αὐλών]]
else args['υποκατ03'] = "που κλίνονται όπως το 'χειμών' αρσενικά"
end
end
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θπ"] args['mod-γε'] = "ος"
args['mod-δεθ'] = stem["θπ"] args['mod-δε'] = "ι" args['mod-δε+'] = "ῐ"
args['mod-αεθ'] = stem["θπ"] args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "0" -- same as nom
args['mod-οπθ'] = stem["θπ"] args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θοξ"] args['mod-γπ'] = "ων"
args['ν'] = '1'
args['mod-δπθ'] = stem["θπ_δοτ"] args['mod-δπ'] = "σι" args['mod-δπ+'] = "σῐ"
args['mod-απθ'] = stem["θπ"] args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θπ"] args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θπ"] args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θοξ"] args['mod-γδ'] = "οιν"
return decl(args)
end
-- Χ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'χθων']] @@@@@@@@@@@@@@@@@@@@@@@@
--#?? έχει και μα μακρά παραλήγουσ και με δίχρονα?????
-- ================= 3η κλίση [[χθών]] χθονός =========== --
-- ΕΝΡΙΝΟΛΗΚΤΑ διπλόθεμα ακατάληκτα --ών-ονός, ήν-ενός
export['χθών'] = function(frame) -- [[Πρότυπο:grc-κλίση-'χθων']]
local args = frame:getParent().args
-- 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'
-- gender, see aleo below
if mw.ustring.find(args['λήμμα'], 'ών$') or mw.ustring.find(args['λήμμα'], 'όνες$') then
args['κατηγορία κλίσης'] = 'χθών'
args['όπως'] = 'χθών'
args['τύπος'] = 'χθών'
if args['θηλ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'χθών' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'χθών' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ03'] = "που κλίνονται όπως το 'χθών' αρσενικά"
end
elseif mw.ustring.find(args['λήμμα'], 'ήν$') or mw.ustring.find(args['λήμμα'], 'ένες$') and not mw.ustring.find(args['λήμμα'], 'τένες$') then
args['κατηγορία κλίσης'] = 'φρήν'
args['όπως'] = 'φρήν'
args['τύπος'] = 'φρήν'
if args['θηλ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'φρήν' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'φρήν' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ03'] = "που κλίνονται όπως το 'φρήν' αρσενικά"
end
elseif mw.ustring.find(args['λήμμα'], 'είς$') or mw.ustring.find(args['λήμμα'], 'τένες$') then -- ????? τένες for κτείς Is it OK
args['κατηγορία κλίσης'] = 'κτείς'
args['όπως'] = 'κτείς'
args['τύπος'] = 'κτείς'
if args['θηλ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'κτείς' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'κτείς' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ03'] = "που κλίνονται όπως το 'κτείς' αρσενικά"
end
elseif mw.ustring.find(args['λήμμα'], 'ούς$') -- ????? perhaps πούς?
or mw.ustring.find(args['λήμμα'], 'όδες$') then
args['κατηγορία κλίσης'] = 'πούς'
args['όπως'] = 'πούς'
args['τύπος'] = 'πούς'
if args['θηλ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'πούς' θηλυκά"
elseif args['αθ'] == '1' then args['υποκατ03'] = "που κλίνονται όπως το 'πούς' κοινού γένους"
else
args['αρσ'] = '1'
args['υποκατ03'] = "που κλίνονται όπως το 'πούς' αρσενικά"
end
end -- close kinds of stems
-- stem -- different from default, different for singular/plural. All stems must be written.
local stem = {}
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-5) -- χθ-όν-ες φρ-έν-ες κτ-έν-ες π-όδες minus 4 letters from end stemnumber = 5
args['κατηγ0'] = 'Λέξεις παοξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά παροξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους παροξύτονα'
elseif args['αρσ'] == '1' then args['υποκατ02'] = 'αρσενικά παροξύτονα'
end
else -- in singular
if mw.ustring.find(args['λήμμα'], 'είς$') -- [[κτείς]] < κτενς με αντέκατση
or mw.ustring.find(args['λήμμα'], 'ούς$') -- [[π-ούς]]
then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- κτ-είς π-ούς minus 3 letters from end, stemnumber = 4
else
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- χθ-ών φρ-ήν πο-ύς minus 2 letters from end, stemnumber = 3
end
args['κατηγ0'] = 'Λέξεις οξύτονες'
args['υποκατ01'] = 'οξύτονα'
if args['θηλ'] == '1' then args['υποκατ02'] = 'θηλυκά οξύτονα'
elseif args['αθ'] == '1' then args['υποκατ02'] = 'κοινού γένους οξύτονα'
elseif args['αρσ'] == '1' then args['υποκατ02'] = 'αρσενικά οξύτονα'
end
end
-- έχει και μα μακρό, και με δίχρονα?? 0h la la
if mw.ustring.find(args['λήμμα'], 'ών$') or mw.ustring.find(args['λήμμα'], 'όνες$') then
char = "ών" charB1= "όν" charB0 = "ον" charDatpl = "ο"
elseif mw.ustring.find(args['λήμμα'], 'ήν$') or mw.ustring.find(args['λήμμα'], 'ένες$') and not mw.ustring.find(args['λήμμα'], 'τένες$') then
char = "ήν" charB1= "έν" charB0 = "εν" charDatpl = "ε"
elseif mw.ustring.find(args['λήμμα'], 'είς$') or mw.ustring.find(args['λήμμα'], 'τένες$') then
char = "είς" charB1= "έν" charB0 = "εν" charDatpl = "ε"
elseif mw.ustring.find(args['λήμμα'], 'ούς$') or mw.ustring.find(args['λήμμα'], 'όδες$') then
char = "ούς" charB1= "όδ" charB0 = "οδ" charDatpl = "ο"
end
args['mod-οεθ'] = stem["θ"] .. char args['mod-οε'] = "0"
args['mod-γεθ'] = stem["θ"] .. charB0 args['mod-γε'] = "ός"
args['mod-δεθ'] = stem["θ"] .. charB0 args['mod-δε'] = "ί" args['mod-δε+'] = "ῐ́"
args['mod-αεθ'] = stem["θ"] .. charB1 args['mod-αε'] = "α" args['mod-αε+'] = "ᾰ"
args['mod-κεθ'] = stem["θ"] .. char args['mod-κε'] = "0" -- same as nom
args['mod-οπθ'] = stem["θ"] .. charB1 args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. charB0 args['mod-γπ'] = "ῶν"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. charDatpl args['mod-δπ'] = "σί" args['mod-δπ+'] = "σῐ́"
args['mod-απθ'] = stem["θ"] .. charB1 args['mod-απ'] = "ας" args['mod-απ+'] = "ᾰς"
args['mod-κπθ'] = stem["θ"] .. charB1 args['mod-κπ'] = "ες" -- same as nom
args['mod-οδθ'] = stem["θ"] .. charB1 args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. charB0 args['mod-γδ'] = "οῖν"
return decl(args)
end
-- Χ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'χοῦς']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[χοῦς]] UNIQUE =========== -- χους χούς similar to βοῦς except accusatives and gender
-- ##### ????? must be checked by philologist
-- crucial difference from [[bοῦς]], the accusative singular -τόν χόα
-- 3η κλίση αθ http://www.perseus.tufts.edu/hopper/text?doc=Perseus%3Atext%3A1999.04.0007%3Apart%3D2%3Achapter%3D13%3Asection%3D18%3Asubsection%3D26
-- dialectal forms, as mentioned in the lemma, outside the table
-- έχει και θηλυκό, also fem, but different meaning - fix different table if necessary
export['χοῦς'] = function(frame) -- [[Πρότυπο:grc-κλίση-'χοῦς']]
local args = frame:getParent().args
-- 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 -- different from default. All stems must be written.
local stem = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-4) -- β -οῦς/όες minus 3 letters from end
args['κλίση'] = '3'
-- gender, see below
args['κατηγορία κλίσης'] = 'χοῦς'
args['τύπος'] = 'χοῦς'
args['όπως'] = 'χοῦς'
args['σημ'] = 'Κλίνεται όπως το <b>[[βοῦς]]</b>, αλλά με ασυναίρετες αιτιατικές.'
if args['α'] == "πλ" or args['α2'] == "πλ" or args['α'] == "πλδ" or args['α2'] == "πλδ" then
-- χόες
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά'
args['υποκατ03'] = 'θηλυκά παροξύτονα'
args['υποκατ04'] = "που κλίνονται όπως το 'χοῦς' θηλυκά"
elseif args['αθ'] == '1' then -- hypothetical, it is NOT common, it is double gender.
args['υποκατ02'] = 'κονού γένους'
args['υποκατ03'] = 'κονού γένους παροξύτονα'
args['υποκατ04'] = "που κλίνονται όπως το 'χοῦς' κονού γένους"
else -- masculine default
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά'
args['υποκατ03'] = 'αρσενικά παροξύτονα'
args['υποκατ04'] = "που κλίνονται όπως το 'χοῦς' αρσενικά"
end
else -- singualr χοῦς
args['κατηγ0'] = 'Λέξεις περισπώμενες'
args['υποκατ01'] = 'περισπώμενα'
if args['θηλ'] == '1' then
args['υποκατ02'] = 'θηλυκά'
args['υποκατ03'] = 'θηλυκά περισπώμενα'
args['υποκατ04'] = "που κλίνονται όπως το 'χοῦς' θηλυκά"
elseif args['αθ'] == '1' then -- hypothetical, it is NOT common, it is double gender.
args['υποκατ02'] = 'κονού γένους'
args['υποκατ03'] = 'κονού γένους περισπώμενα'
args['υποκατ04'] = "που κλίνονται όπως το 'χοῦς' κονού γένους"
else -- masculine default
args['αρσ'] = '1'
args['υποκατ02'] = 'αρσενικά'
args['υποκατ03'] = 'αρσενικά περισπώμενα'
args['υποκατ04'] = "που κλίνονται όπως το 'χοῦς' αρσενικά"
end
end -- close numbers
args['mod-οεθ'] = stem["θ"] .. "οῦ" args['mod-οε'] = "ς"
args['mod-γεθ'] = stem["θ"] .. "ο" args['mod-γε'] = "ός"
args['mod-δεθ'] = stem["θ"] .. "ο" args['mod-δε'] = "ΐ"
args['mod-αεθ'] = stem["θ"] .. "ό" args['mod-αε'] = "α" args['mod-αε+'] = "ᾱ"
args['mod-κεθ'] = stem["θ"] .. "οῦ" args['mod-κε'] = "0"
args['mod-οπθ'] = stem["θ"] .. "ό" args['mod-οπ'] = "ες"
args['mod-γπθ'] = stem["θ"] .. "ο" args['mod-γπ'] = "ῶν"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "ου" args['mod-δπ'] = "σί" args['mod-δπ+'] = "σῐ́"
args['mod-απθ'] = stem["θ"] .. "ό" args['mod-απ'] = "ας" args['mod-απ+'] = "ᾱς"
args['mod-κπθ'] = args['mod-οπθ'] args['mod-κπ'] = args['mod-οπ'] -- as in nominative plural
args['mod-οδθ'] = stem["θ"] .. "ό" args['mod-οδ'] = "ε"
args['mod-γδθ'] = stem["θ"] .. "ο" args['mod-γδ'] = "οῖν"
return decl(args)
end
-- Χ @@@@@@@@@@@@@@@@@@@@@@@@ [[Πρότυπο:grc-κλίση-'χρέος']] @@@@@@@@@@@@@@@@@@@@@@@@
-- ================= 3η κλίση [[χρέος]] ===========
-- σιγμόληκτο χρεεσ- similar to βέλος, but plural χρέα
-- ΜΟΝΟ ουδέτερα, ΜΟΝΟ παροξύτονα
--[=[
αποβάλλουν όμως σ’ αυτές το χαρακτήρα σ ανάμεσα στα δύο φωνήεντα και έπειτα συναιρούν τα φωνήεντα αυτά,
δηλ. το ε+ο σε ου (βέλε-ος = βέλους), το ε+ι σε ει (τῷ βέλε-ι = βέλει), το ε+ε σε ει (δυϊκ. τὼ βέλε-ε = βέλει),
το ε+οι σε οι (δυϊκ. τοῖν βελέ-οιν = βελοῖν), το ε+ω σε ω (τῶν βελέων = βελῶν)
και το ε+α κανονικά σε η (τὰ βέλε-α = βέλη)·
αν όμως πριν από το ε προηγείται άλλο ε, τότε συναιρούν το ε+α σε ᾱ: τὰ χρέε-α=χρέᾱ, τὰ κλέε-α-κλέᾱ· βλ. § 64, 1.
]=]--
export['χρέος'] = function(frame) -- [[Πρότυπο:grc-κλίση-'χρέος']]
local args = frame:getParent().args
-- 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 = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- χρέ-ος, χρέ-η minus 2 letters from end
stem["θ0"] = m_stems.word0(stem["θ"]) -- χρε- remove accent
args['κλίση'] = '3'
args['ουδ'] = '1'
args['κατηγορία κλίσης'] = 'χρέος'
args['τύπος'] = 'χρέος'
args['όπως'] = 'χρέος'
args['σημ'] = "* Όταν προηγείται '''ε''' του ε+α > ᾱ (χρέα)<br>και όχι -η όπως στο [[βέλος#Αρχαία ελληνικά (grc)|βέλος]], βέλη."
args['κατηγ0'] = 'Λέξεις παροξύτονες'
args['υποκατ01'] = 'παροξύτονα'
args['υποκατ02'] = 'ουδέτερα παροξύτονα'
args['mod-οεθ'] = stem["θ"] args['mod-οε'] = "ος"
args['mod-γεθ'] = stem["θ"] args['mod-γε'] = "ους"
args['mod-δεθ'] = stem["θ"] args['mod-δε'] = "ει"
args['mod-αεθ'] = stem["θ"] args['mod-αε'] = "ος" -- same as nom.
args['mod-κεθ'] = stem["θ"] args['mod-κε'] = "ος" -- same as nom.
args['mod-οπθ'] = stem["θ"] args['mod-οπ'] = "α" args['mod-οπ+'] = "ᾰ" args['mod-οπΛκειμ'] = "(ᾱ)<sup>*</sup>"
args['mod-γπθ'] = stem["θ0"] args['mod-γπ'] = "ῶν"
args['ν'] = '1'
args['mod-δπθ'] = stem["θ"] .. "εσ" args['mod-δπ'] = "ι" args['mod-δπ+'] = "ῐ"
args['mod-απθ'] = stem["θ"] args['mod-απ'] = "α" args['mod-απ+'] = "ᾰ" --same as nom.
args['mod-κπθ'] = stem["θ"] args['mod-κπ'] = "α" args['mod-κπ+'] = "ᾰ" --same as nom.
args['mod-οδθ'] = stem["θ"] args['mod-οδ'] = "ει"
args['mod-γδθ'] = stem["θ0"] args['mod-γδ'] = "οῖν"
return decl(args)
end
return export