Module:grc-adj-decl/param
Μετάβαση στην πλοήγηση
Πήδηση στην αναζήτηση
Module:grc-adj-decl : param : 2κλιτα - 3κλιτα : τεκμηρίωση
Κατηγορία:Πρότυπα κλίσης επιθέτων και μετοχών (αρχαία ελληνικά) - Κατηγορία:Έλεγχος κλίσης
Παράρτημα:Επίθετα και μετοχές (αρχαία ελληνικά) : 2η : 3η - Κατηγορία:Επίθετα (αρχαία ελληνικά) - Κατηγορία:Μετοχές (αρχαία ελληνικά)
Βοήθεια:Πρότυπα κλίσης επιθέτων (αρχαία ελληνικά) - Module:grc-articles - Module:grk-stems
Κατηγορία:Σελίδες με σφάλματα δέσμης ενεργειών
Κατηγορία:Σελίδες με σφάλματα στο πρότυπο κλίσης επιθέτων (αρχαία ελληνικά)
Κατηγορία:Επίθετα που κλίνονται όπως το '' (αρχαία ελληνικά)
Κατηγορία:Μετοχές που κλίνονται όπως το '' (αρχαία ελληνικά)
Κατηγορία:Λήμματα χωρίς προσωδία σε δίχρονο φωνήεν (αρχαία ελληνικά)
Κατηγορία:Λέξεις με άγνωστη προσωδία (αρχαία ελληνικά)
Κατηγορία:Σελίδες με σφάλματα στο πρότυπο κλίσης επιθέτων (αρχαία ελληνικά)
Κατηγορία:Επίθετα που κλίνονται όπως το '' (αρχαία ελληνικά)
Κατηγορία:Μετοχές που κλίνονται όπως το '' (αρχαία ελληνικά)
Κατηγορία:Λήμματα χωρίς προσωδία σε δίχρονο φωνήεν (αρχαία ελληνικά)
Κατηγορία:Λέξεις με άγνωστη προσωδία (αρχαία ελληνικά)
-- αρχαία ελληνικά επίθετα-μετοχές - parameters for ancient greek adjectives & participles 2021.06. Sarri.greek
-- or any other 3-gender table (masculine, feminine, neuter) e.g. pronouns
-- INSTRUCTIONS & help at bottom of [[Module:grc-adj-decl]] - ΟΔΗΓΙΕΣ στο τέλος της κύριας σελίδας
--[=[ INSTRUCTIONS for this page:
Call it from the main page by placing EXACTLY where it is needed:
require ('Module:xxx/param').param (args)
DO NOT change anything else. DO NOT add at top of page a m_xxxx = require this and that.
USE: local for the functions of THIS module
]=]--
--[=[
Naming parameters for cases as in nouns ([[Module:grc-nouns-decl/param]], notes)
+ suffix for gender -αρσ, -θηλ, -ουδ added to them.
Unlike [[Module:grc-nouns-decl]] this module DOES NOT allow editors to change the stems and endings separately,
as defined from the module functions
-- they can change whole words
-- they can change the standard 'σημ' notes
-- they can add text, after or before the word and notes |παρατήρηση=
-- mod- (Prefix for parameters as defined in the module e.g. args['mod-someparam']
Without the prefix, is for the use of the editor. e.g. args['someparam']
The editor suppresses mod- and writes his own correction for whole words.
-- more EXPLANATIONS, see main page
STRUCTURE
a) copy from main page what is needed
b) MAIN FUNCTION: local function param (args)
1. Stems + some copypaste help
2. Languages (grc, gkm, kath) for categories and titles
3. title line
4. br (breaks of lines, spaces between words)
5. notes
... all parameters
c) close with: end return {param = param}
TO DO
* CORRECT θ2 with accent2syn_i (which recognizes diphthongs)
]=]--
--------------------------------------------------------------------------
-- COPY HERE what is needed from the Module
--------------------------------------------------------------------------
local languages = mw.loadData("Module:Languages") -- needed: grc (gkm, kath the articles are the same)
-- font colours
local c_ending = '#eb0000' -- is DeepPink. For wikitext, template [[Πρότυπο:χκ]], never bold
local c_stem = '#002000' -- For wikitext, template [[Πρότυπο:χθ]], never bold
-- ============== apply font colours - εφαρμογή χρωμάτων
local ending_color = function(suffix)
return '<span style="color:' .. c_ending ..'; font-weight:normal;">' .. suffix .. '</span>'
end
local stem_color = function(thema)
thema = thema or '' -- otherwise, it does not work
return '<span style="color:' .. c_stem ..'; font-weight:normal;">' .. thema .. '</span>'
end
local infix_color = function(infix) -- this is not exactly an inifix. It is extra letters of a 2nd stem.
return '<span style="color:' .. c_stem ..'; font-weight:normal;">' .. infix .. '</span>'
end
-- thanks to [[w:en:User talk:Trappist the monk]]
--[[--------------------------< I S _ S E T >------------
Returns true if argument is set; false otherwise. Argument is 'set' when it exists (not nil) or when it is not an empty string.
]]
--[=[ explanation:
The is_set() function may be added so that tests like this:
if args['ακε'] ~= '' and args['ακε'] ~= nil then args['ακε'] = args['ακε'] else args['ακε'] = '' end
can be reduced to:
if not is_set (args['ακε']) then args['ακε'] = '' end
]=]--
local function is_set (var)
return not (var == nil or var == '');
end
---------------------------------------------------------------------------
-- ========================MAIN FUNCTION================================ --
-- ancient greek adjective (3 gender) cases --
---------------------------------------------------------------------------
local function param (args)
local lemma = args['λήμμα'] or ''
PAGENAME = mw.title.getCurrentTitle().text
if lemma == '' or lemma == nil then args['λήμμα'] = PAGENAME:match( "^%s*(.-)%s*$" )
else lemma = args['λήμμα']
end
---------------------------------------------------------------------------
-- ============== START HERE ALL PARAMETERS ============== --
---------------------------------------------------------------------------
-- =============== STEMS - default stem = word minus 2 letters from end
-- stems
local stem = {} -- do not move
local minusletters = args['μείον'] or ''
-- If subfunctions have a defintion for lemma and stem of their own
-- we need to write there the stems for all cases.
if stemnumber == '' or stemnumber == nil then
if minusletters == 1 then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-2)
elseif minusletters == '0' then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-1)
elseif minusletters ~= '0' and minusletters ~= '' and minusletters ~= nil then
stemnumber = minusletters+1
else
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3) -- default stem
end
end
--[=[ INSTRUCTIONS for STEMS: application in functions
STEMS: default stem is minus 2 letters from the end (stemnumber 3) args['μείον'] = 2
- otherwise stems should be written out
If special features are needed (brackets, etc), then the full line should be written,
with create_link, as in /param page
local stem = {}
args["θ"] = stem["θ"] -- stem as found in lemma, default minus 2 letters from end, or defined at function
stem["θ0"] = m_stems.word0(stem["θ"]) -- remove accent
-- needed to created correct stem["θ2"] δανείζω δάνειζ- ΝΟΤ δανέιζ, and more καταπράυνσ- - καταπραΰνσ-
stem["θ0"] = m_stems.word2syn(stem["θ"]) -- to create correct e.g. [[δανείζω]], δάνειζ- ΝΟΤ δανέιζ-
stem["θοξ"] = m_stems.PerispomeniToOxia(stem["θ"]) -- convert oxia to perispomeni -- also named θ1ο
stem["θπ"] = m_stems.OxiaToPerispomeni(stem["θ"]) -- convert perispomeni to oxeia
stem["θ1"] = m_stems.word1(stem["θ0"]) -- accent on 1st syllable from the end (Accent is tonos or oksia. Used mainly for monotonic script)
stem["θ2"] = m_stems.word2(stem["θ0"]) -- accent on 2nd syllable from the end
Examples
local stem = {}
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)
if mw.ustring.find(args['λήμμα'], 'όοι$') then -- $ = at the end
]=]--
-- DO NOT use cat-extra in pages (needs lang_name). Use κατηγ or υποκατ
-- =============== LANGUAGES for categories and notes
-- for =1 (just titles) or =2 (create Categories for a language)
cat_pos = args['μέρος λόγου'] or 'Επίθετα' -- for participles also
lang_iso = lang_iso or 'grc'
lang_link = languages[lang_iso]['link'] or ''
lang_name = languages[lang_iso]['name'] or ''
-- ======= HELLENISTIC KOINE check [[θολός]] [[θεόφθογγος]]
-- 1 = only title and Κατηγορία:Λήμματα με κλίσεις (languagename)
-- 2 = all categories
-- used if ONLY hellenistic, exclusively
if args['grc-koi'] == '2' or args['ελνστ'] == '2' then
args['lang_title'] = '[[:Κατηγορία:Ελληνιστική κοινή|ελληνιστική κοινή]]<br><i><small>δε μαρτυρείται δυϊκός αριθμός</small></i>'
-- .. '[[Κατηγορία:' .. cat_pos .. ' με ελληνιστικές κλίσεις (ελληνιστική κοινή)]]'
lang_iso = 'grc-koi'
lang_name = languages['grc-koi']['name']
elseif args['grc-koi'] == '1' or args['ελνστ'] == '1' then -- but categories grc / 2022.03. test all categories = Koine
args['lang_title'] = "<i>[[:Κατηγορία:Ουσιαστικά (ελληνιστική κοινή)|ελληνιστική κοινή (αρχαία κλίση)]]</i><br><i><small>δε μαρτυρείται δυϊκός αριθμός</small></i>"
-- .. '[[Κατηγορία:' .. cat_pos .. ' με αρχαίες κλίσεις (ελληνιστική κοινή)]]'
-- like [[πολυπληθέστατος]]
lang_iso = 'grc-koi'
-- hellenistic words with classic declensions -- + category for statistical purpose
lang_name = languages['grc-koi']['name']
end
-- (no prosody for the following languages)
-- ======= learned MEDIAEVAL GREEK
-- for mediaeval greek -- only testing: we have no Grammar. Included, only attested forms.
-- for vulgar mediaeval greek see Modern Greek modules (it had no dative)
if args['gkm'] == '2' or args['μσν'] == '2' then
args['lang_title'] = '[[:Κατηγορία:Μεσαιωνικά ελληνικά|μεσαιωνικά ελληνικά]]'
lang_iso = 'gkm'
about = about_gkm -- withdrawn
c_extra= '#cfcfe2;'
c_3 = '#dfdfec;' -- title3, as in m2 at [[Πρότυπο:el-biblio/style.css]]
args['δυ'] = '-' -- no dual
-- NO prosody (see below)
elseif args['gkm'] == '1' or args['μσν'] == '1' then
args['lang_title'] = "''[[:Κατηγορία:Μεσαιωνικά ελληνικά|λόγια μεσαιωνική ελληνική με αρχαία κλίση]]''"
.. '[[Κατηγορία:' .. cat_pos .. ' με αρχαίες κλίσεις (μεσαιωνικά ελληνικά)]]'
lang_iso = 'gkm'
c_extra= '#cfcfe2;'
c_3 = '#dfdfec;'
args['δυ'] = '-' -- no dual
-- NO prosody (see below)
args['nocat'] = '1' -- do not create subcategories
-- for Katharevousa ========= check [[ἐθνοσωτήριος]] -- has no =2 declensions of its own
elseif args['kath'] == '2' or args['καθ'] == '2' then
args['lang_title'] = '[[:Κατηγορία:Καθαρεύουσα|καθαρεύουσα]] (κατά την αρχαία κλίση)'
lang_iso = 'kath'
about = about_kath -- withdrawn
c_3 = '#d5e2f6' -- title3, all the subtitles as in Modern Greek table-colours
args['δυ'] = '-' -- no dual
elseif args['kath'] == '1' or args['καθ'] == '1' then
args['lang_title'] = '<i>[[:Κατηγορία:Καθαρεύουσα|καθαρεύουσα]] (κατά την αρχαία κλίση)</i>'
.. '[[Κατηγορία:' .. cat_pos .. ' με αρχαίες κλίσεις (καθαρεύουσα)]]'
lang_iso = 'kath'
c_3 = '#d5e2f6'
args['δυ'] = '-' -- no dual
args['nocat'] = '1' -- do not create subcategories
-- NO prosody (see below)
else
-- args['τίτλος'] = '' -- no, otherwise all other titles vanish
about = about
lang_iso = 'grc'
c_3 = c_3
end
-- Place this UNDER LANGUAGES, not before!!!! -- test [[Λεβαδία]]
-- ====================== Links
-- create_link((args['οεθ'] .. args['οε']), (stem_color(args['οεθ']) .. ending_color(args['οε+'])))
function create_link (page, text)
if text then
return '[[' .. page .. '#' .. languages[lang_iso]['link'] .. '|' .. text .. ']]'
else
return '[[' .. page .. '#' .. languages[lang_iso]['link'] .. '|' .. page .. ']]'
end
end
-- ======================== άγνωστες λέξεις χωρίς πηγές ====================
-- unk=1 Κατηγορία:Επίθετα με κλίση χωρίς χρονολόγηση (αρχαία ελληνικά)
args['unk'] = args['unk'] or ''
args['rar'] = args['rar'] or ''
if args['unk'] == '1' then
args['nocat'] = '1'
args['σημ'] = args['σημ'] .. '[[Κατηγορία:Επίθετα με κλίση χωρίς χρονολόγηση (αρχαία ελληνικά)]]'
end
if args['rar'] == '1' then
args['nocat'] = '1'
args['σημ'] = args['σημ'] .. '[[Κατηγορία:Σπάνια επίθετα κατά την κλίση (αρχαία ελληνικά)]]'
end
-- ================================ TTILES =========== DO NOTTTT OMIT THIS SECTION
-- PLACE THIS UNDER LANGUAGES
-- args['lang_title'] see LANGUAGES
args['mod-τίτλος'] = args['mod-τίτλος'] or ''
args['τίτλος'] = args['τίτλος'] or ''
extratitle_str = args['mod-τίτλος'] or ''
editor_title = args['τίτλος'] or ''
if args['mod-τίτλος'] ~= '' and args['mod-τίτλος'] ~= nil then
if args['τίτλος'] ~= '' and args['τίτλος'] ~= nil then
args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος']
if args['τεστ'] == '1' then
args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>"
.. 'τεστ'
-- .. '[[:Κατηγορία:xxx (αρχαία ελληνικά)|xx]]'
elseif args['test'] == '1' then
args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>" .. args['τίτλος'] .. "<br>"
.. 'test'
-- .. '[[:Κατηγορία:xx (αρχαία ελληνικά)|xx]]'
end
else -- yes mod-τίτλος, no τίτλος
args['mod-τίτλος'] = args['mod-τίτλος']
if args['τεστ'] == '1' then
args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
.. 'τεστ'
-- .. '[[:Κατηγορία:xx (αρχαία ελληνικά)|xx]]'
elseif args['test'] == '1' then
args['mod-τίτλος'] = args['mod-τίτλος'] .. "<br>"
.. 'test'
-- .. '[[:Κατηγορία:xx (αρχαία ελληνικά)|xx]]'
end
end
else -- NO mod-τιτλος
if args['τίτλος'] ~= '' and args['τίτλος'] ~= nil then
args['mod-τίτλος'] = args['τίτλος']
if args['τεστ'] == '1' then
args['mod-τίτλος'] = args['τίτλος'] .. "<br>"
.. 'τεστ'
-- .. '[[:Κατηγορία:xx (αρχαία ελληνικά)xx]]'
elseif args['test'] == '1' then
args['mod-τίτλος'] = args['τίτλος'] .. "<br>"
.. 'test'
-- .. '[[:Κατηγορία:xx (αρχαία ελληνικά)|xx]]'
end
else -- no mod-τίτλος, no τίτλος, nothing
args['mod-τίτλος'] = ''
args['τίτλος'] = ''
if args['τεστ'] == '1' then -- [[αἰθήρ]]
args['mod-τίτλος'] = 'τεστ' -- '[[:Κατηγορία:xx (αρχαία ελληνικά)|xx]]'
elseif args['test'] == '1' then
args['mod-τίτλος'] = 'test' --'[[:Κατηγορία:xx (αρχαία ελληνικά)|xx]]'
end
end
end
-- ================================ BREAKS (not as often as in NOUNS)
-- optional no break line, no &, just a space with br=- for all second lines (TEST at voc.sg)
-- optional no break line, no &, just a space with br=- for all second lines (TEST at voc.sg)
br = args['br'] or ''
-- for dual (du), never change line. User brdu
if args['br'] == '&' then br = ' & ' brdu = ' & ' -- & at same line nobreak
elseif args['br'] == 'dash' then br = ' - ' brdu = ' - ' -- dash, same line nobreak
elseif args['br'] == '-' then br = ' ' brdu = ' ' -- just a space
elseif args['br'] == 'brtext' then
br = '<br />' .. args['br'] .. ' ' -- little text in new line
brdu = ' ' .. args['br'] .. ' '
elseif args['br'] == 'br' then
br = '<br />' -- change line, no &
brdu = ' ' -- just a space
elseif args['br'] == '' or args['br'] == nil then
br = '<br />& ' -- DEFAULT
brdu = ' & ' -- DEFAULT & at same line nobreak
else br = ' ' .. args['br'] .. ' ' -- a little text in between, like ή, και etc
brdu = ' ' .. args['br'] .. ' '
end
-- ================================ NOTES (mod-σημ from the Module, σημ by the editor)
-- check ?
-- see MAIN PAGE for note = args['mod-σημ']
-- if editor writes σημ= then the module-σημ changes
if args['σημ'] ~= '' and args['σημ'] ~= nil then args['mod-σημ'] = args['σημ'] end
-- if the editor does not want the mod-σημ of the Module
-- but if we write args['σημ'] ΙΝ module functions, then the editor cannot erase or edit it
-- For some notes, we do not want the editor to change anything
if args['σημ'] == '-' then
args['mod-σημ'] = ''
else
args['σημ'] = args['σημ']
end
-- ================================ common word for polylectics NOT USED HERE, see NOUNS
-- before the word
args['κοινό1'] = args['κοινό1'] or ''
if args['κοινό1'] ~= '' and args['κοινό1'] ~= nil then
args['κοινό1'] = args['κοινό1'] .. ' '
else
args['κοινό1'] = ''
end
-- after the word -- no example yet
-- add a repetitive term at the beginning or at the end of each cell:
args['κοινό'] = args['κοινό'] or ''
if args['κοινό'] ~= '' and args['κοινό'] ~= nil then
args['κοινό'] = ' ' .. args['κοινό']
else
args['κοινό'] = ''
end
-- ================================ NO PROSODY for some languages
-- languages with NO prosody
args['μσν'] = args['μσν'] or '' -- μεσαιωνικά ελληνικά -- test
args['gkm'] = args['gkm'] or '' -- Mediaeval Grek code
args['καθ'] = args['καθ'] or '' -- καθαρεύουσα -- test [[ἐθνοσωτήριος]]
args['kath'] = args['kath'] or '' -- Katharevousa code
if args['kath'] == '1' or args['καθ'] == '1' or args['gkm'] == '1' or args['μσν'] == '1' then
-- STEMS no prosdy
args['οεθ+-αρσ'] = args['οεθ-αρσ'] args['γεθ+-αρσ'] = args['γεθ-αρσ'] args['δεθ+-αρσ'] = args['δεθ-αρσ'] args['αεθ+-αρσ'] = args['αεθ-αρσ'] args['κεθ+-αρσ'] = args['κεθ-αρσ']
args['οπθ+-αρσ'] = args['οπθ-αρσ'] args['γπθ+-αρσ'] = args['γπθ-αρσ'] args['δπθ+-αρσ'] = args['δπθ-αρσ'] args['απθ+-αρσ'] = args['απθ-αρσ'] args['κπθ+-αρσ'] = args['κπθ-αρσ']
args['οεθ+-θηλ'] = args['οεθ-θηλ'] args['γεθ+-θηλ'] = args['γεθ-θηλ'] args['δεθ+-θηλ'] = args['δεθ-θηλ'] args['αεθ+-θηλ'] = args['αεθ-θηλ'] args['κεθ+-θηλ'] = args['κεθ-θηλ']
args['οπθ+-θηλ'] = args['οπθ-θηλ'] args['γπθ+-θηλ'] = args['γπθ-θηλ'] args['δπθ+-θηλ'] = args['δπθ-θηλ'] args['απθ+-θηλ'] = args['απθ-θηλ'] args['κπθ+-θηλ'] = args['κπθ-θηλ']
args['οεθ+-ουδ'] = args['οεθ-ουδ'] args['γεθ+-ουδ'] = args['γεθ-ουδ'] args['δεθ+-ουδ'] = args['δεθ-ουδ'] args['αεθ+-ουδ'] = args['αεθ-ουδ'] args['κεθ+-ουδ'] = args['κεθ-ουδ']
args['οπθ+-ουδ'] = args['οπθ-ουδ'] args['γπθ+-ουδ'] = args['γπθ-ουδ'] args['δπθ+-ουδ'] = args['δπθ-ουδ'] args['απθ+-ουδ'] = args['απθ-ουδ'] args['κπθ+-ουδ'] = args['κπθ-ουδ']
-- ENDINGS no prosody
args['οε+-αρσ'] = args['οε-αρσ'] args['γε+-αρσ'] = args['γε-αρσ'] args['δε+-αρσ'] = args['δε-αρσ'] args['αε+-αρσ'] = args['αε-αρσ'] args['κε+-αρσ'] = args['κε-αρσ']
args['οπ+-αρσ'] = args['οπ-αρσ'] args['γπ+-αρσ'] = args['γπ-αρσ'] args['δπ+-αρσ'] = args['δπ-αρσ'] args['απ+-αρσ'] = args['απ-αρσ'] args['κπ+-αρσ'] = args['κπ-αρσ']
args['οε+-θηλ'] = args['οε-θηλ'] args['γε+-θηλ'] = args['γε-θηλ'] args['δε+-θηλ'] = args['δε-θηλ'] args['αε+-θηλ'] = args['αε-θηλ'] args['κε+-θηλ'] = args['κε-θηλ']
args['οπ+-θηλ'] = args['οπ-θηλ'] args['γπ+-θηλ'] = args['γπ-θηλ'] args['δπ+-θηλ'] = args['δπ-θηλ'] args['απ+-θηλ'] = args['απ-θηλ'] args['κπ+-θηλ'] = args['κπ-θηλ']
args['οε+-ουδ'] = args['οε-ουδ'] args['γε+-ουδ'] = args['γε-ουδ'] args['δε+-ουδ'] = args['δε-ουδ'] args['αε+-ουδ'] = args['αε-ουδ'] args['κε+-ουδ'] = args['κε-ουδ']
args['οπ+-ουδ'] = args['οπ-ουδ'] args['γπ+-ουδ'] = args['γπ-ουδ'] args['δπ+-ουδ'] = args['δπ-ουδ'] args['απ+-ουδ'] = args['απ-ουδ'] args['κπ+-ουδ'] = args['κπ-ουδ']
end
-- ================================ START WORDS
-- whole words @modules ALSO NUMBERED
args['mod-οεΛ-αρσ'] = args['mod-οεΛ-αρσ'] or args['1'] or '' args['mod-γεΛ-αρσ'] = args['mod-γεΛ-αρσ'] or args['2'] or '' args['mod-δεΛ-αρσ'] = args['mod-δεΛ-αρσ'] or args['3'] or ''
args['mod-αεΛ-αρσ'] = args['mod-αεΛ-αρσ'] or args['4'] or '' args['mod-κεΛ-αρσ'] = args['mod-κεΛ-αρσ'] or args['5'] or ''
args['mod-οπΛ-αρσ'] = args['mod-οπΛ-αρσ'] or args['6'] or '' args['mod-γπΛ-αρσ'] = args['mod-γπΛ-αρσ'] or args['7'] or '' args['mod-δπΛ-αρσ'] = args['mod-δπΛ-αρσ'] or args['8'] or ''
args['mod-απΛ-αρσ'] = args['mod-απΛ-αρσ'] or args['9'] or '' args['mod-κπΛ-αρσ'] = args['mod-κπΛ-αρσ'] or args['10'] or ''
args['mod-οδΛ-αρσ'] = args['mod-οδΛ-αρσ'] or args['11'] or '' args['mod-γδΛ-αρσ'] = args['mod-γδΛ-αρσ'] or args['12'] or ''
args['mod-οεΛ-θηλ'] = args['mod-οεΛ-θηλ'] or args['12'] or '' args['mod-γεΛ-θηλ'] = args['mod-γεΛ-θηλ'] or args['14'] or '' args['mod-δεΛ-θηλ'] = args['mod-δεΛ-θηλ'] or args['15'] or ''
args['mod-αεΛ-θηλ'] = args['mod-αεΛ-θηλ'] or args['16'] or '' args['mod-κεΛ-θηλ'] = args['mod-κεΛ-θηλ'] or args['17'] or ''
args['mod-οπΛ-θηλ'] = args['mod-οπΛ-θηλ'] or args['18'] or '' args['mod-γπΛ-θηλ'] = args['mod-γπΛ-θηλ'] or args['19'] or '' args['mod-δπΛ-θηλ'] = args['mod-δπΛ-θηλ'] or args['20'] or ''
args['mod-απΛ-θηλ'] = args['mod-απΛ-θηλ'] or args['21'] or '' args['mod-κπΛ-θηλ'] = args['mod-κπΛ-θηλ'] or args['22'] or ''
args['mod-οδΛ-θηλ'] = args['mod-οδΛ-θηλ'] or args['23'] or '' args['mod-γδΛ-θηλ'] = args['mod-γδΛ-θηλ'] or args['24'] or ''
args['mod-οεΛ-ουδ'] = args['mod-οεΛ-ουδ'] or args['25'] or '' args['mod-γεΛ-ουδ'] = args['mod-γεΛ-ουδ'] or args['26'] or '' args['mod-δεΛ-ουδ'] = args['mod-δεΛ-ουδ'] or args['27'] or ''
args['mod-αεΛ-ουδ'] = args['mod-αεΛ-ουδ'] or args['28'] or '' args['mod-κεΛ-ουδ'] = args['mod-κεΛ-ουδ'] or args['29'] or ''
args['mod-οπΛ-ουδ'] = args['mod-οπΛ-ουδ'] or args['30'] or '' args['mod-γπΛ-ουδ'] = args['mod-γπΛ-ουδ'] or args['31'] or '' args['mod-δπΛ-ουδ'] = args['mod-δπΛ-ουδ'] or args['32'] or ''
args['mod-απΛ-ουδ'] = args['mod-απΛ-ουδ'] or args['33'] or '' args['mod-κπΛ-ουδ'] = args['mod-κπΛ-ουδ'] or args['34'] or ''
args['mod-οδΛ-ουδ'] = args['mod-οδΛ-ουδ'] or args['35'] or '' args['mod-γδΛ-ουδ'] = args['mod-γδΛ-ουδ'] or args['36'] or ''
-- second word
args['mod-οε2Λ-αρσ'] = args['mod-οε2Λ-αρσ'] or '' args['mod-γε2Λ-αρσ'] = args['mod-γε2Λ-αρσ'] or '' args['mod-δε2Λ-αρσ'] = args['mod-δε2Λ-αρσ'] or ''
args['mod-αε2Λ-αρσ'] = args['mod-αε2Λ-αρσ'] or '' args['mod-κε2Λ-αρσ'] = args['mod-κε2Λ-αρσ'] or ''
args['mod-οπ2Λ-αρσ'] = args['mod-οπ2Λ-αρσ'] or '' args['mod-γπ2Λ-αρσ'] = args['mod-γπ2Λ-αρσ'] or '' args['mod-δπ2Λ-αρσ'] = args['mod-δπ2Λ-αρσ'] or ''
args['mod-απ2Λ-αρσ'] = args['mod-απ2Λ-αρσ'] or '' args['mod-κπ2Λ-αρσ'] = args['mod-κπ2Λ-αρσ'] or ''
args['mod-οδ2Λ-αρσ'] = args['mod-οδ2Λ-αρσ'] or '' args['mod-γδ2Λ-αρσ'] = args['mod-γδ2Λ-αρσ'] or ''
args['mod-οε2Λ-θηλ'] = args['mod-οε2Λ-θηλ'] or '' args['mod-γε2Λ-θηλ'] = args['mod-γε2Λ-θηλ'] or '' args['mod-δε2Λ-θηλ'] = args['mod-δε2Λ-θηλ'] or ''
args['mod-αε2Λ-θηλ'] = args['mod-αε2Λ-θηλ'] or '' args['mod-κε2Λ-θηλ'] = args['mod-κε2Λ-θηλ'] or ''
args['mod-οπ2Λ-θηλ'] = args['mod-οπ2Λ-θηλ'] or '' args['mod-γπ2Λ-θηλ'] = args['mod-γπ2Λ-θηλ'] or '' args['mod-δπ2Λ-θηλ'] = args['mod-δπ2Λ-θηλ'] or ''
args['mod-απ2Λ-θηλ'] = args['mod-απ2Λ-θηλ'] or '' args['mod-κπ2Λ-θηλ'] = args['mod-κπ2Λ-θηλ'] or ''
args['mod-οδ2Λ-θηλ'] = args['mod-οδ2Λ-θηλ'] or '' args['mod-γδ2Λ-θηλ'] = args['mod-γδ2Λ-θηλ'] or ''
args['mod-οε2Λ-ουδ'] = args['mod-οε2Λ-ουδ'] or '' args['mod-γε2Λ-ουδ'] = args['mod-γε2Λ-ουδ'] or '' args['mod-δε2Λ-ουδ'] = args['mod-δε2Λ-ουδ'] or ''
args['mod-αε2Λ-ουδ'] = args['mod-αε2Λ-ουδ'] or '' args['mod-κε2Λ-ουδ'] = args['mod-κε2Λ-ουδ'] or ''
args['mod-οπ2Λ-ουδ'] = args['mod-οπ2Λ-ουδ'] or '' args['mod-γπ2Λ-ουδ'] = args['mod-γπ2Λ-ουδ'] or ''
args['mod-δπ2Λ-ουδ'] = args['mod-δπ2Λ-ουδ'] or '' args['mod-απ2Λ-ουδ'] = args['mod-απ2Λ-ουδ'] or '' args['mod-κπ2Λ-ουδ'] = args['mod-κπ2Λ-ουδ'] or ''
args['mod-οδ2Λ-ουδ'] = args['mod-οδ2Λ-ουδ'] or '' args['mod-γδ2Λ-ουδ'] = args['mod-γδ2Λ-ουδ'] or ''
-- -- whole words for editors
args['οεΛ-αρσ'] = args['οεΛ-αρσ'] or '' args['γεΛ-αρσ'] = args['γεΛ-αρσ'] or '' args['δεΛ-αρσ'] = args['δεΛ-αρσ'] or ''
args['αεΛ-αρσ'] = args['αεΛ-αρσ'] or '' args['κεΛ-αρσ'] = args['κεΛ-αρσ'] or ''
args['οπΛ-αρσ'] = args['οπΛ-αρσ'] or '' args['γπΛ-αρσ'] = args['γπΛ-αρσ'] or '' args['δπΛ-αρσ'] = args['δπΛ-αρσ'] or ''
args['απΛ-αρσ'] = args['απΛ-αρσ'] or '' args['κπΛ-αρσ'] = args['κπΛ-αρσ'] or ''
args['οδΛ-αρσ'] = args['οδΛ-αρσ'] or '' args['γδΛ-αρσ'] = args['γδΛ-αρσ'] or ''
args['οεΛ-θηλ'] = args['οεΛ-θηλ'] or '' args['γεΛ-θηλ'] = args['γεΛ-θηλ'] or '' args['δεΛ-θηλ'] = args['δεΛ-θηλ'] or ''
args['αεΛ-θηλ'] = args['αεΛ-θηλ'] or '' args['κεΛ-θηλ'] = args['κεΛ-θηλ'] or ''
args['οπΛ-θηλ'] = args['οπΛ-θηλ'] or '' args['γπΛ-θηλ'] = args['γπΛ-θηλ'] or '' args['δπΛ-θηλ'] = args['δπΛ-θηλ'] or ''
args['απΛ-θηλ'] = args['απΛ-θηλ'] or '' args['κπΛ-θηλ'] = args['κπΛ-θηλ'] or ''
args['οδΛ-θηλ'] = args['οδΛ-θηλ'] or '' args['γδΛ-θηλ'] = args['γδΛ-θηλ'] or ''
args['οεΛ-ουδ'] = args['οεΛ-ουδ'] or '' args['γεΛ-ουδ'] = args['γεΛ-ουδ'] or '' args['δεΛ-ουδ'] = args['δεΛ-ουδ'] or ''
args['αεΛ-ουδ'] = args['αεΛ-ουδ'] or '' args['κεΛ-ουδ'] = args['κεΛ-ουδ'] or ''
args['οπΛ-ουδ'] = args['οπΛ-ουδ'] or '' args['γπΛ-ουδ'] = args['γπΛ-ουδ'] or '' args['δπΛ-ουδ'] = args['δπΛ-ουδ'] or ''
args['απΛ-ουδ'] = args['απΛ-ουδ'] or '' args['κπΛ-ουδ'] = args['κπΛ-ουδ'] or ''
args['οδΛ-ουδ'] = args['οδΛ-ουδ'] or '' args['γδΛ-ουδ'] = args['γδΛ-ουδ'] or ''
-- second word
args['οε2Λ-αρσ'] = args['οε2Λ-αρσ'] or '' args['γε2Λ-αρσ'] = args['γε2Λ-αρσ'] or '' args['δε2Λ-αρσ'] = args['δε2Λ-αρσ'] or ''
args['αε2Λ-αρσ'] = args['αε2Λ-αρσ'] or '' args['κε2Λ-αρσ'] = args['κε2Λ-αρσ'] or ''
args['οπ2Λ-αρσ'] = args['οπ2Λ-αρσ'] or '' args['γπ2Λ-αρσ'] = args['γπ2Λ-αρσ'] or '' args['δπ2Λ-αρσ'] = args['δπ2Λ-αρσ'] or ''
args['απ2Λ-αρσ'] = args['απ2Λ-αρσ'] or '' args['κπ2Λ-αρσ'] = args['κπ2Λ-αρσ'] or ''
args['οδ2Λ-αρσ'] = args['οδ2Λ-αρσ'] or '' args['γδ2Λ-αρσ'] = args['γδ2Λ-αρσ'] or ''
args['οε2Λ-θηλ'] = args['οε2Λ-θηλ'] or '' args['γε2Λ-θηλ'] = args['γε2Λ-θηλ'] or '' args['δε2Λ-θηλ'] = args['δε2Λ-θηλ'] or ''
args['αε2Λ-θηλ'] = args['αε2Λ-θηλ'] or '' args['κε2Λ-θηλ'] = args['κε2Λ-θηλ'] or ''
args['οπ2Λ-θηλ'] = args['οπ2Λ-θηλ'] or '' args['γπ2Λ-θηλ'] = args['γπ2Λ-θηλ'] or '' args['δπ2Λ-θηλ'] = args['δπ2Λ-θηλ'] or ''
args['απ2Λ-θηλ'] = args['απ2Λ-θηλ'] or '' args['κπ2Λ-θηλ'] = args['κπ2Λ-θηλ'] or ''
args['οδ2Λ-θηλ'] = args['οδ2Λ-θηλ'] or '' args['γδ2Λ-θηλ'] = args['γδ2Λ-θηλ'] or ''
args['οε2Λ-ουδ'] = args['οε2Λ-ουδ'] or '' args['γε2Λ-ουδ'] = args['γε2Λ-ουδ'] or '' args['δε2Λ-ουδ'] = args['δε2Λ-ουδ'] or ''
args['αε2Λ-ουδ'] = args['αε2Λ-ουδ'] or '' args['κε2Λ-ουδ'] = args['κε2Λ-ουδ'] or ''
args['οπ2Λ-ουδ'] = args['οπ2Λ-ουδ'] or '' args['γπ2Λ-ουδ'] = args['γπ2Λ-ουδ'] or ''
args['δπ2Λ-ουδ'] = args['δπ2Λ-ουδ'] or '' args['απ2Λ-ουδ'] = args['απ2Λ-ουδ'] or '' args['κπ2Λ-ουδ'] = args['κπ2Λ-ουδ'] or ''
args['οδ2Λ-ουδ'] = args['οδ2Λ-ουδ'] or '' args['γδ2Λ-ουδ'] = args['γδ2Λ-ουδ'] or ''
-- if οεΛ-αρσ then mod-οεΛ-αρσ=οεΛ-αρσ
if args['οεΛ-αρσ'] ~= '' and args['οεΛ-αρσ'] ~= nil then args['mod-οεΛ-αρσ'] = args['οεΛ-αρσ'] end
if args['γεΛ-αρσ'] ~= '' and args['γεΛ-αρσ'] ~= nil then args['mod-γεΛ-αρσ'] = args['γεΛ-αρσ'] end
if args['δεΛ-αρσ'] ~= '' and args['δεΛ-αρσ'] ~= nil then args['mod-δεΛ-αρσ'] = args['δεΛ-αρσ'] end
if args['αεΛ-αρσ'] ~= '' and args['αεΛ-αρσ'] ~= nil then args['mod-αεΛ-αρσ'] = args['αεΛ-αρσ'] end
if args['κεΛ-αρσ'] ~= '' and args['κεΛ-αρσ'] ~= nil then args['mod-κεΛ-αρσ'] = args['κεΛ-αρσ'] end
if args['οπΛ-αρσ'] ~= '' and args['οπΛ-αρσ'] ~= nil then args['mod-οπΛ-αρσ'] = args['οπΛ-αρσ'] end
if args['γπΛ-αρσ'] ~= '' and args['γπΛ-αρσ'] ~= nil then args['mod-γπΛ-αρσ'] = args['γπΛ-αρσ'] end
if args['δπΛ-αρσ'] ~= '' and args['δπΛ-αρσ'] ~= nil then args['mod-δπΛ-αρσ'] = args['δπΛ-αρσ'] end
if args['απΛ-αρσ'] ~= '' and args['απΛ-αρσ'] ~= nil then args['mod-απΛ-αρσ'] = args['απΛ-αρσ'] end
if args['κπΛ-αρσ'] ~= '' and args['κπΛ-αρσ'] ~= nil then args['mod-κπΛ-αρσ'] = args['κπΛ-αρσ'] end
if args['οδΛ-αρσ'] ~= '' and args['οδΛ-αρσ'] ~= nil then args['mod-οδΛ-αρσ'] = args['οδΛ-αρσ'] end
if args['γδΛ-αρσ'] ~= '' and args['γδΛ-αρσ'] ~= nil then args['mod-γδΛ-αρσ'] = args['γδΛ-αρσ'] end
-- second word
if args['οε2Λ-αρσ'] ~= '' and args['οε2Λ-αρσ'] ~= nil then args['mod-οε2Λ-αρσ'] = args['οε2Λ-αρσ'] end
if args['γε2Λ-αρσ'] ~= '' and args['γε2Λ-αρσ'] ~= nil then args['mod-γε2Λ-αρσ'] = args['γε2Λ-αρσ'] end
if args['δε2Λ-αρσ'] ~= '' and args['δε2Λ-αρσ'] ~= nil then args['mod-δε2Λ-αρσ'] = args['δε2Λ-αρσ'] end
if args['αε2Λ-αρσ'] ~= '' and args['αε2Λ-αρσ'] ~= nil then args['mod-αε2Λ-αρσ'] = args['αε2Λ-αρσ'] end
if args['κε2Λ-αρσ'] ~= '' and args['κε2Λ-αρσ'] ~= nil then args['mod-κε2Λ-αρσ'] = args['κε2Λ-αρσ'] end
if args['οπ2Λ-αρσ'] ~= '' and args['οπ2Λ-αρσ'] ~= nil then args['mod-οπ2Λ-αρσ'] = args['οπ2Λ-αρσ'] end
if args['γπ2Λ-αρσ'] ~= '' and args['γπ2Λ-αρσ'] ~= nil then args['mod-γπ2Λ-αρσ'] = args['γπ2Λ-αρσ'] end
if args['δπ2Λ-αρσ'] ~= '' and args['δπ2Λ-αρσ'] ~= nil then args['mod-δπ2Λ-αρσ'] = args['δπ2Λ-αρσ'] end
if args['απ2Λ-αρσ'] ~= '' and args['απ2Λ-αρσ'] ~= nil then args['mod-απ2Λ-αρσ'] = args['απ2Λ-αρσ'] end
if args['κπ2Λ-αρσ'] ~= '' and args['κπ2Λ-αρσ'] ~= nil then args['mod-κπ2Λ-αρσ'] = args['κπ2Λ-αρσ'] end
if args['οδ2Λ-αρσ'] ~= '' and args['οδ2Λ-αρσ'] ~= nil then args['mod-οδ2Λ-αρσ'] = args['οδ2Λ-αρσ'] end
if args['γδ2Λ-αρσ'] ~= '' and args['γδ2Λ-αρσ'] ~= nil then args['mod-γδ2Λ-αρσ'] = args['γδ2Λ-αρσ'] end
-- if οεΛ-θηλ then mod-οεΛ-θηλ=οεΛ-θηλ
if args['οεΛ-θηλ'] ~= '' and args['οεΛ-θηλ'] ~= nil then args['mod-οεΛ-θηλ'] = args['οεΛ-θηλ'] end
if args['γεΛ-θηλ'] ~= '' and args['γεΛ-θηλ'] ~= nil then args['mod-γεΛ-θηλ'] = args['γεΛ-θηλ'] end
if args['δεΛ-θηλ'] ~= '' and args['δεΛ-θηλ'] ~= nil then args['mod-δεΛ-θηλ'] = args['δεΛ-θηλ'] end
if args['αεΛ-θηλ'] ~= '' and args['αεΛ-θηλ'] ~= nil then args['mod-αεΛ-θηλ'] = args['αεΛ-θηλ'] end
if args['κεΛ-θηλ'] ~= '' and args['κεΛ-θηλ'] ~= nil then args['mod-κεΛ-θηλ'] = args['κεΛ-θηλ'] end
if args['οπΛ-θηλ'] ~= '' and args['οπΛ-θηλ'] ~= nil then args['mod-οπΛ-θηλ'] = args['οπΛ-θηλ'] end
if args['γπΛ-θηλ'] ~= '' and args['γπΛ-θηλ'] ~= nil then args['mod-γπΛ-θηλ'] = args['γπΛ-θηλ'] end
if args['δπΛ-θηλ'] ~= '' and args['δπΛ-θηλ'] ~= nil then args['mod-δπΛ-θηλ'] = args['δπΛ-θηλ'] end
if args['απΛ-θηλ'] ~= '' and args['απΛ-θηλ'] ~= nil then args['mod-απΛ-θηλ'] = args['απΛ-θηλ'] end
if args['κπΛ-θηλ'] ~= '' and args['κπΛ-θηλ'] ~= nil then args['mod-κπΛ-θηλ'] = args['κπΛ-θηλ'] end
if args['οδΛ-θηλ'] ~= '' and args['οδΛ-θηλ'] ~= nil then args['mod-οδΛ-θηλ'] = args['οδΛ-θηλ'] end
if args['γδΛ-θηλ'] ~= '' and args['γδΛ-θηλ'] ~= nil then args['mod-γδΛ-θηλ'] = args['γδΛ-θηλ'] end
-- second word
if args['οε2Λ-θηλ'] ~= '' and args['οε2Λ-θηλ'] ~= nil then args['mod-οε2Λ-θηλ'] = args['οε2Λ-θηλ'] end
if args['γε2Λ-θηλ'] ~= '' and args['γε2Λ-θηλ'] ~= nil then args['mod-γε2Λ-θηλ'] = args['γε2Λ-θηλ'] end
if args['δε2Λ-θηλ'] ~= '' and args['δε2Λ-θηλ'] ~= nil then args['mod-δε2Λ-θηλ'] = args['δε2Λ-θηλ'] end
if args['αε2Λ-θηλ'] ~= '' and args['αε2Λ-θηλ'] ~= nil then args['mod-αε2Λ-θηλ'] = args['αε2Λ-θηλ'] end
if args['κε2Λ-θηλ'] ~= '' and args['κε2Λ-θηλ'] ~= nil then args['mod-κε2Λ-θηλ'] = args['κε2Λ-θηλ'] end
if args['οπ2Λ-θηλ'] ~= '' and args['οπ2Λ-θηλ'] ~= nil then args['mod-οπ2Λ-θηλ'] = args['οπ2Λ-θηλ'] end
if args['γπ2Λ-θηλ'] ~= '' and args['γπ2Λ-θηλ'] ~= nil then args['mod-γπ2Λ-θηλ'] = args['γπ2Λ-θηλ'] end
if args['δπ2Λ-θηλ'] ~= '' and args['δπ2Λ-θηλ'] ~= nil then args['mod-δπ2Λ-θηλ'] = args['δπ2Λ-θηλ'] end
if args['απ2Λ-θηλ'] ~= '' and args['απ2Λ-θηλ'] ~= nil then args['mod-απ2Λ-θηλ'] = args['απ2Λ-θηλ'] end
if args['κπ2Λ-θηλ'] ~= '' and args['κπ2Λ-θηλ'] ~= nil then args['mod-κπ2Λ-θηλ'] = args['κπ2Λ-θηλ'] end
if args['οδ2Λ-θηλ'] ~= '' and args['οδ2Λ-θηλ'] ~= nil then args['mod-οδ2Λ-θηλ'] = args['οδ2Λ-θηλ'] end
if args['γδ2Λ-θηλ'] ~= '' and args['γδ2Λ-θηλ'] ~= nil then args['mod-γδ2Λ-θηλ'] = args['γδ2Λ-θηλ'] end
-- if οεΛ-ουδ then mod-οεΛ-ουδ=οεΛ-ουδ
if args['οεΛ-ουδ'] ~= '' and args['οεΛ-ουδ'] ~= nil then args['mod-οεΛ-ουδ'] = args['οεΛ-ουδ'] end
if args['γεΛ-ουδ'] ~= '' and args['γεΛ-ουδ'] ~= nil then args['mod-γεΛ-ουδ'] = args['γεΛ-ουδ'] end
if args['δεΛ-ουδ'] ~= '' and args['δεΛ-ουδ'] ~= nil then args['mod-δεΛ-ουδ'] = args['δεΛ-ουδ'] end
if args['αεΛ-ουδ'] ~= '' and args['αεΛ-ουδ'] ~= nil then args['mod-αεΛ-ουδ'] = args['αεΛ-ουδ'] end
if args['κεΛ-ουδ'] ~= '' and args['κεΛ-ουδ'] ~= nil then args['mod-κεΛ-ουδ'] = args['κεΛ-ουδ'] end
if args['οπΛ-ουδ'] ~= '' and args['οπΛ-ουδ'] ~= nil then args['mod-οπΛ-ουδ'] = args['οπΛ-ουδ'] end
if args['γπΛ-ουδ'] ~= '' and args['γπΛ-ουδ'] ~= nil then args['mod-γπΛ-ουδ'] = args['γπΛ-ουδ'] end
if args['δπΛ-ουδ'] ~= '' and args['δπΛ-ουδ'] ~= nil then args['mod-δπΛ-ουδ'] = args['δπΛ-ουδ'] end
if args['απΛ-ουδ'] ~= '' and args['απΛ-ουδ'] ~= nil then args['mod-απΛ-ουδ'] = args['απΛ-ουδ'] end
if args['κπΛ-ουδ'] ~= '' and args['κπΛ-ουδ'] ~= nil then args['mod-κπΛ-ουδ'] = args['κπΛ-ουδ'] end
if args['οδΛ-ουδ'] ~= '' and args['οδΛ-ουδ'] ~= nil then args['mod-οδΛ-ουδ'] = args['οδΛ-ουδ'] end
if args['γδΛ-ουδ'] ~= '' and args['γδΛ-ουδ'] ~= nil then args['mod-γδΛ-ουδ'] = args['γδΛ-ουδ'] end
-- second word
if args['οε2Λ-ουδ'] ~= '' and args['οε2Λ-ουδ'] ~= nil then args['mod-οε2Λ-ουδ'] = args['οε2Λ-ουδ'] end
if args['γε2Λ-ουδ'] ~= '' and args['γε2Λ-ουδ'] ~= nil then args['mod-γε2Λ-ουδ'] = args['γε2Λ-ουδ'] end
if args['δε2Λ-ουδ'] ~= '' and args['δε2Λ-ουδ'] ~= nil then args['mod-δε2Λ-ουδ'] = args['δε2Λ-ουδ'] end
if args['αε2Λ-ουδ'] ~= '' and args['αε2Λ-ουδ'] ~= nil then args['mod-αε2Λ-ουδ'] = args['αε2Λ-ουδ'] end
if args['κε2Λ-ουδ'] ~= '' and args['κε2Λ-ουδ'] ~= nil then args['mod-κε2Λ-ουδ'] = args['κε2Λ-ουδ'] end
if args['οπ2Λ-ουδ'] ~= '' and args['οπ2Λ-ουδ'] ~= nil then args['mod-οπ2Λ-ουδ'] = args['οπ2Λ-ουδ'] end
if args['γπ2Λ-ουδ'] ~= '' and args['γπ2Λ-ουδ'] ~= nil then args['mod-γπ2Λ-ουδ'] = args['γπ2Λ-ουδ'] end
if args['δπ2Λ-ουδ'] ~= '' and args['δπ2Λ-ουδ'] ~= nil then args['mod-δπ2Λ-ουδ'] = args['δπ2Λ-ουδ'] end
if args['απ2Λ-ουδ'] ~= '' and args['απ2Λ-ουδ'] ~= nil then args['mod-απ2Λ-ουδ'] = args['απ2Λ-ουδ'] end
if args['κπ2Λ-ουδ'] ~= '' and args['κπ2Λ-ουδ'] ~= nil then args['mod-κπ2Λ-ουδ'] = args['κπ2Λ-ουδ'] end
if args['οδ2Λ-ουδ'] ~= '' and args['οδ2Λ-ουδ'] ~= nil then args['mod-οδ2Λ-ουδ'] = args['οδ2Λ-ουδ'] end
if args['γδ2Λ-ουδ'] ~= '' and args['γδ2Λ-ουδ'] ~= nil then args['mod-γδ2Λ-ουδ'] = args['γδ2Λ-ουδ'] end
-- ========== DEFAULT STEMS auto -- place this here, ABOVE the stems, otherwise it shows nothing
-- editor cannot change these module stems
-- masc stem
if args['οεθ-αρσ'] == '' or args['οεθ-αρσ'] == nil then args['οεθ-αρσ'] = stem["θ"] else args['οεθ-αρσ'] = args['οεθ-αρσ'] end
if args['γεθ-αρσ'] == '' or args['γεθ-αρσ'] == nil then args['γεθ-αρσ'] = stem["θ"] else args['γεθ-αρσ'] = args['γεθ-αρσ'] end
if args['δεθ-αρσ'] == '' or args['δεθ-αρσ'] == nil then args['δεθ-αρσ'] = stem["θ"] else args['δεθ-αρσ'] = args['δεθ-αρσ'] end
if args['αεθ-αρσ'] == '' or args['αεθ-αρσ'] == nil then args['αεθ-αρσ'] = stem["θ"] else args['αεθ-αρσ'] = args['αεθ-αρσ'] end
if args['κεθ-αρσ'] == '' or args['κεθ-αρσ'] == nil then args['κεθ-αρσ'] = stem["θ"] else args['κεθ-αρσ'] = args['κεθ-αρσ'] end
if args['οπθ-αρσ'] == '' or args['οπθ-αρσ'] == nil then args['οπθ-αρσ'] = stem["θ"] else args['οπθ-αρσ'] = args['οπθ-αρσ'] end
if args['γπθ-αρσ'] == '' or args['γπθ-αρσ'] == nil then args['γπθ-αρσ'] = stem["θ"] else args['γπθ-αρσ'] = args['γπθ-αρσ'] end
if args['δπθ-αρσ'] == '' or args['δπθ-αρσ'] == nil then args['δπθ-αρσ'] = stem["θ"] else args['δπθ-αρσ'] = args['δπθ-αρσ'] end
if args['απθ-αρσ'] == '' or args['απθ-αρσ'] == nil then args['απθ-αρσ'] = stem["θ"] else args['απθ-αρσ'] = args['απθ-αρσ'] end
if args['κπθ-αρσ'] == '' or args['κπθ-αρσ'] == nil then args['κπθ-αρσ'] = stem["θ"] else args['κπθ-αρσ'] = args['κπθ-αρσ'] end
if args['οδθ-αρσ'] == '' or args['οδθ-αρσ'] == nil then args['οδθ-αρσ'] = stem["θ"] else args['οδθ-αρσ'] = args['οδθ-αρσ'] end
if args['γδθ-αρσ'] == '' or args['γδθ-αρσ'] == nil then args['γδθ-αρσ'] = stem["θ"] else args['γδθ-αρσ'] = args['γδθ-αρσ'] end
-- fem stem
if args['οεθ-θηλ'] == '' or args['οεθ-θηλ'] == nil then args['οεθ-θηλ'] = stem["θ"] else args['οεθ-θηλ'] = args['οεθ-θηλ'] end
if args['γεθ-θηλ'] == '' or args['γεθ-θηλ'] == nil then args['γεθ-θηλ'] = stem["θ"] else args['γεθ-θηλ'] = args['γεθ-θηλ'] end
if args['δεθ-θηλ'] == '' or args['δεθ-θηλ'] == nil then args['δεθ-θηλ'] = stem["θ"] else args['δεθ-θηλ'] = args['δεθ-θηλ'] end
if args['αεθ-θηλ'] == '' or args['αεθ-θηλ'] == nil then args['αεθ-θηλ'] = stem["θ"] else args['αεθ-θηλ'] = args['αεθ-θηλ'] end
if args['κεθ-θηλ'] == '' or args['κεθ-θηλ'] == nil then args['κεθ-θηλ'] = stem["θ"] else args['κεθ-θηλ'] = args['κεθ-θηλ'] end
if args['οπθ-θηλ'] == '' or args['οπθ-θηλ'] == nil then args['οπθ-θηλ'] = stem["θ"] else args['οπθ-θηλ'] = args['οπθ-θηλ'] end
if args['γπθ-θηλ'] == '' or args['γπθ-θηλ'] == nil then args['γπθ-θηλ'] = stem["θ"] else args['γπθ-θηλ'] = args['γπθ-θηλ'] end
if args['δπθ-θηλ'] == '' or args['δπθ-θηλ'] == nil then args['δπθ-θηλ'] = stem["θ"] else args['δπθ-θηλ'] = args['δπθ-θηλ'] end
if args['απθ-θηλ'] == '' or args['απθ-θηλ'] == nil then args['απθ-θηλ'] = stem["θ"] else args['απθ-θηλ'] = args['απθ-θηλ'] end
if args['κπθ-θηλ'] == '' or args['κπθ-θηλ'] == nil then args['κπθ-θηλ'] = stem["θ"] else args['κπθ-θηλ'] = args['κπθ-θηλ'] end
if args['οδθ-θηλ'] == '' or args['οδθ-θηλ'] == nil then args['οδθ-θηλ'] = stem["θ"] else args['οδθ-θηλ'] = args['οδθ-θηλ'] end
if args['γδθ-θηλ'] == '' or args['γδθ-θηλ'] == nil then args['γδθ-θηλ'] = stem["θ"] else args['γδθ-θηλ'] = args['γδθ-θηλ'] end
-- neu stem
if args['οεθ-ουδ'] == '' or args['οεθ-ουδ'] == nil then args['οεθ-ουδ'] = stem["θ"] else args['οεθ-ουδ'] = args['οεθ-ουδ'] end
if args['γεθ-ουδ'] == '' or args['γεθ-ουδ'] == nil then args['γεθ-ουδ'] = stem["θ"] else args['γεθ-ουδ'] = args['γεθ-ουδ'] end
if args['δεθ-ουδ'] == '' or args['δεθ-ουδ'] == nil then args['δεθ-ουδ'] = stem["θ"] else args['δεθ-ουδ'] = args['δεθ-ουδ'] end
if args['αεθ-ουδ'] == '' or args['αεθ-ουδ'] == nil then args['αεθ-ουδ'] = stem["θ"] else args['αεθ-ουδ'] = args['αεθ-ουδ'] end
if args['κεθ-ουδ'] == '' or args['κεθ-ουδ'] == nil then args['κεθ-ουδ'] = stem["θ"] else args['κεθ-ουδ'] = args['κεθ-ουδ'] end
if args['οπθ-ουδ'] == '' or args['οπθ-ουδ'] == nil then args['οπθ-ουδ'] = stem["θ"] else args['οπθ-ουδ'] = args['οπθ-ουδ'] end
if args['γπθ-ουδ'] == '' or args['γπθ-ουδ'] == nil then args['γπθ-ουδ'] = stem["θ"] else args['γπθ-ουδ'] = args['γπθ-ουδ'] end
if args['δπθ-ουδ'] == '' or args['δπθ-ουδ'] == nil then args['δπθ-ουδ'] = stem["θ"] else args['δπθ-ουδ'] = args['δπθ-ουδ'] end
if args['απθ-ουδ'] == '' or args['απθ-ουδ'] == nil then args['απθ-ουδ'] = stem["θ"] else args['απθ-ουδ'] = args['απθ-ουδ'] end
if args['κπθ-ουδ'] == '' or args['κπθ-ουδ'] == nil then args['κπθ-ουδ'] = stem["θ"] else args['κπθ-ουδ'] = args['κπθ-ουδ'] end
if args['οδθ-ουδ'] == '' or args['οδθ-ουδ'] == nil then args['οδθ-ουδ'] = stem["θ"] else args['οδθ-ουδ'] = args['οδθ-ουδ'] end
if args['γδθ-ουδ'] == '' or args['γδθ-ουδ'] == nil then args['γδθ-ουδ'] = stem["θ"] else args['γδθ-ουδ'] = args['γδθ-ουδ'] end
-- masc2 stem
if args['οε2θ-αρσ'] == '' or args['οε2θ-αρσ'] == nil then args['οε2θ-αρσ'] = stem["θ"] else args['οε2θ-αρσ'] = args['οε2θ-αρσ'] end
if args['γε2θ-αρσ'] == '' or args['γε2θ-αρσ'] == nil then args['γε2θ-αρσ'] = stem["θ"] else args['γε2θ-αρσ'] = args['γε2θ-αρσ'] end
if args['δε2θ-αρσ'] == '' or args['δε2θ-αρσ'] == nil then args['δε2θ-αρσ'] = stem["θ"] else args['δε2θ-αρσ'] = args['δε2θ-αρσ'] end
if args['αε2θ-αρσ'] == '' or args['αε2θ-αρσ'] == nil then args['αε2θ-αρσ'] = stem["θ"] else args['αε2θ-αρσ'] = args['αε2θ-αρσ'] end
if args['κε2θ-αρσ'] == '' or args['κε2θ-αρσ'] == nil then args['κε2θ-αρσ'] = stem["θ"] else args['κε2θ-αρσ'] = args['κε2θ-αρσ'] end
if args['οπ2θ-αρσ'] == '' or args['οπ2θ-αρσ'] == nil then args['οπ2θ-αρσ'] = stem["θ"] else args['οπ2θ-αρσ'] = args['οπ2θ-αρσ'] end
if args['γπ2θ-αρσ'] == '' or args['γπ2θ-αρσ'] == nil then args['γπ2θ-αρσ'] = stem["θ"] else args['γπ2θ-αρσ'] = args['γπ2θ-αρσ'] end
if args['δπ2θ-αρσ'] == '' or args['δπ2θ-αρσ'] == nil then args['δπ2θ-αρσ'] = stem["θ"] else args['δπ2θ-αρσ'] = args['δπ2θ-αρσ'] end
if args['απ2θ-αρσ'] == '' or args['απ2θ-αρσ'] == nil then args['απ2θ-αρσ'] = stem["θ"] else args['απ2θ-αρσ'] = args['απ2θ-αρσ'] end
if args['κπ2θ-αρσ'] == '' or args['κπ2θ-αρσ'] == nil then args['κπ2θ-αρσ'] = stem["θ"] else args['κπ2θ-αρσ'] = args['κπ2θ-αρσ'] end
if args['οδ2θ-αρσ'] == '' or args['οδ2θ-αρσ'] == nil then args['οδ2θ-αρσ'] = stem["θ"] else args['οδ2θ-αρσ'] = args['οδ2θ-αρσ'] end
if args['γδ2θ-αρσ'] == '' or args['γδ2θ-αρσ'] == nil then args['γδ2θ-αρσ'] = stem["θ"] else args['γδ2θ-αρσ'] = args['γδ2θ-αρσ'] end
-- fem2 stem
if args['οε2θ-θηλ'] == '' or args['οε2θ-θηλ'] == nil then args['οε2θ-θηλ'] = stem["θ"] else args['οε2θ-θηλ'] = args['οε2θ-θηλ'] end
if args['γε2θ-θηλ'] == '' or args['γε2θ-θηλ'] == nil then args['γε2θ-θηλ'] = stem["θ"] else args['γε2θ-θηλ'] = args['γε2θ-θηλ'] end
if args['δε2θ-θηλ'] == '' or args['δε2θ-θηλ'] == nil then args['δε2θ-θηλ'] = stem["θ"] else args['δε2θ-θηλ'] = args['δε2θ-θηλ'] end
if args['αε2θ-θηλ'] == '' or args['αε2θ-θηλ'] == nil then args['αε2θ-θηλ'] = stem["θ"] else args['αε2θ-θηλ'] = args['αε2θ-θηλ'] end
if args['κε2θ-θηλ'] == '' or args['κε2θ-θηλ'] == nil then args['κε2θ-θηλ'] = stem["θ"] else args['κε2θ-θηλ'] = args['κε2θ-θηλ'] end
if args['οπ2θ-θηλ'] == '' or args['οπ2θ-θηλ'] == nil then args['οπ2θ-θηλ'] = stem["θ"] else args['οπ2θ-θηλ'] = args['οπ2θ-θηλ'] end
if args['γπ2θ-θηλ'] == '' or args['γπ2θ-θηλ'] == nil then args['γπ2θ-θηλ'] = stem["θ"] else args['γπ2θ-θηλ'] = args['γπ2θ-θηλ'] end
if args['δπ2θ-θηλ'] == '' or args['δπ2θ-θηλ'] == nil then args['δπ2θ-θηλ'] = stem["θ"] else args['δπ2θ-θηλ'] = args['δπ2θ-θηλ'] end
if args['απ2θ-θηλ'] == '' or args['απ2θ-θηλ'] == nil then args['απ2θ-θηλ'] = stem["θ"] else args['απ2θ-θηλ'] = args['απ2θ-θηλ'] end
if args['κπ2θ-θηλ'] == '' or args['κπ2θ-θηλ'] == nil then args['κπ2θ-θηλ'] = stem["θ"] else args['κπ2θ-θηλ'] = args['κπ2θ-θηλ'] end
if args['οδ2θ-θηλ'] == '' or args['οδ2θ-θηλ'] == nil then args['οδ2θ-θηλ'] = stem["θ"] else args['οδ2θ-θηλ'] = args['οδ2θ-θηλ'] end
if args['γδ2θ-θηλ'] == '' or args['γδ2θ-θηλ'] == nil then args['γδ2θ-θηλ'] = stem["θ"] else args['γδ2θ-θηλ'] = args['γδ2θ-θηλ'] end
-- neu2 stem
if args['οε2θ-ουδ'] == '' or args['οε2θ-ουδ'] == nil then args['οε2θ-ουδ'] = stem["θ"] else args['οε2θ-ουδ'] = args['οε2θ-ουδ'] end
if args['γε2θ-ουδ'] == '' or args['γε2θ-ουδ'] == nil then args['γε2θ-ουδ'] = stem["θ"] else args['γε2θ-ουδ'] = args['γε2θ-ουδ'] end
if args['δε2θ-ουδ'] == '' or args['δε2θ-ουδ'] == nil then args['δε2θ-ουδ'] = stem["θ"] else args['δε2θ-ουδ'] = args['δε2θ-ουδ'] end
if args['αε2θ-ουδ'] == '' or args['αε2θ-ουδ'] == nil then args['αε2θ-ουδ'] = stem["θ"] else args['αε2θ-ουδ'] = args['αε2θ-ουδ'] end
if args['κε2θ-ουδ'] == '' or args['κε2θ-ουδ'] == nil then args['κε2θ-ουδ'] = stem["θ"] else args['κε2θ-ουδ'] = args['κε2θ-ουδ'] end
if args['οπ2θ-ουδ'] == '' or args['οπ2θ-ουδ'] == nil then args['οπ2θ-ουδ'] = stem["θ"] else args['οπ2θ-ουδ'] = args['οπ2θ-ουδ'] end
if args['γπ2θ-ουδ'] == '' or args['γπ2θ-ουδ'] == nil then args['γπ2θ-ουδ'] = stem["θ"] else args['γπ2θ-ουδ'] = args['γπ2θ-ουδ'] end
if args['δπ2θ-ουδ'] == '' or args['δπ2θ-ουδ'] == nil then args['δπ2θ-ουδ'] = stem["θ"] else args['δπ2θ-ουδ'] = args['δπ2θ-ουδ'] end
if args['απ2θ-ουδ'] == '' or args['απ2θ-ουδ'] == nil then args['απ2θ-ουδ'] = stem["θ"] else args['απ2θ-ουδ'] = args['απ2θ-ουδ'] end
if args['κπ2θ-ουδ'] == '' or args['κπ2θ-ουδ'] == nil then args['κπ2θ-ουδ'] = stem["θ"] else args['κπ2θ-ουδ'] = args['κπ2θ-ουδ'] end
if args['οδ2θ-ουδ'] == '' or args['οδ2θ-ουδ'] == nil then args['οδ2θ-ουδ'] = stem["θ"] else args['οδ2θ-ουδ'] = args['οδ2θ-ουδ'] end
if args['γδ2θ-ουδ'] == '' or args['γδ2θ-ουδ'] == nil then args['γδ2θ-ουδ'] = stem["θ"] else args['γδ2θ-ουδ'] = args['γδ2θ-ουδ'] end
-- ==================== STEMS parameters + PROSODY
-- STEMS masc
args['οεθ-αρσ'] = args['οεθ-αρσ'] or '' if args['οεθ+-αρσ'] == '' or args['οεθ+-αρσ'] == nil then args['οεθ+-αρσ'] = args['οεθ-αρσ'] end
args['γεθ-αρσ'] = args['γεθ-αρσ'] or '' if args['γεθ+-αρσ'] == '' or args['γεθ+-αρσ'] == nil then args['γεθ+-αρσ'] = args['γεθ-αρσ'] end
args['δεθ-αρσ'] = args['δεθ-αρσ'] or '' if args['δεθ+-αρσ'] == '' or args['δεθ+-αρσ'] == nil then args['δεθ+-αρσ'] = args['δεθ-αρσ'] end
args['αεθ-αρσ'] = args['αεθ-αρσ'] or '' if args['αεθ+-αρσ'] == '' or args['αεθ+-αρσ'] == nil then args['αεθ+-αρσ'] = args['αεθ-αρσ'] end
args['κεθ-αρσ'] = args['κεθ-αρσ'] or '' if args['κεθ+-αρσ'] == '' or args['κεθ+-αρσ'] == nil then args['κεθ+-αρσ'] = args['κεθ-αρσ'] end
args['οπθ-αρσ'] = args['οπθ-αρσ'] or '' if args['οπθ+-αρσ'] == '' or args['οπθ+-αρσ'] == nil then args['οπθ+-αρσ'] = args['οπθ-αρσ'] end
args['γπθ-αρσ'] = args['γπθ-αρσ'] or '' if args['γπθ+-αρσ'] == '' or args['γπθ+-αρσ'] == nil then args['γπθ+-αρσ'] = args['γπθ-αρσ'] end
args['δπθ-αρσ'] = args['δπθ-αρσ'] or '' if args['δπθ+-αρσ'] == '' or args['δπθ+-αρσ'] == nil then args['δπθ+-αρσ'] = args['δπθ-αρσ'] end
args['απθ-αρσ'] = args['απθ-αρσ'] or '' if args['απθ+-αρσ'] == '' or args['απθ+-αρσ'] == nil then args['απθ+-αρσ'] = args['απθ-αρσ'] end
args['κπθ-αρσ'] = args['κπθ-αρσ'] or '' if args['κπθ+-αρσ'] == '' or args['κπθ+-αρσ'] == nil then args['κπθ+-αρσ'] = args['κπθ-αρσ'] end
args['οδθ-αρσ'] = args['οδθ-αρσ'] or '' if args['οδθ+-αρσ'] == '' or args['οδθ+-αρσ'] == nil then args['οδθ+-αρσ'] = args['οδθ-αρσ'] end
args['γδθ-αρσ'] = args['γδθ-αρσ'] or '' if args['γδθ+-αρσ'] == '' or args['γδθ+-αρσ'] == nil then args['γδθ+-αρσ'] = args['γδθ-αρσ'] end
-- STEMS fem
args['οεθ-θηλ'] = args['οεθ-θηλ'] or '' if args['οεθ+-θηλ'] == '' or args['οεθ+-θηλ'] == nil then args['οεθ+-θηλ'] = args['οεθ-θηλ'] end
args['γεθ-θηλ'] = args['γεθ-θηλ'] or '' if args['γεθ+-θηλ'] == '' or args['γεθ+-θηλ'] == nil then args['γεθ+-θηλ'] = args['γεθ-θηλ'] end
args['δεθ-θηλ'] = args['δεθ-θηλ'] or '' if args['δεθ+-θηλ'] == '' or args['δεθ+-θηλ'] == nil then args['δεθ+-θηλ'] = args['δεθ-θηλ'] end
args['αεθ-θηλ'] = args['αεθ-θηλ'] or '' if args['αεθ+-θηλ'] == '' or args['αεθ+-θηλ'] == nil then args['αεθ+-θηλ'] = args['αεθ-θηλ'] end
args['κεθ-θηλ'] = args['κεθ-θηλ'] or '' if args['κεθ+-θηλ'] == '' or args['κεθ+-θηλ'] == nil then args['κεθ+-θηλ'] = args['κεθ-θηλ'] end
args['οπθ-θηλ'] = args['οπθ-θηλ'] or '' if args['οπθ+-θηλ'] == '' or args['οπθ+-θηλ'] == nil then args['οπθ+-θηλ'] = args['οπθ-θηλ'] end
args['γπθ-θηλ'] = args['γπθ-θηλ'] or '' if args['γπθ+-θηλ'] == '' or args['γπθ+-θηλ'] == nil then args['γπθ+-θηλ'] = args['γπθ-θηλ'] end
args['δπθ-θηλ'] = args['δπθ-θηλ'] or '' if args['δπθ+-θηλ'] == '' or args['δπθ+-θηλ'] == nil then args['δπθ+-θηλ'] = args['δπθ-θηλ'] end
args['απθ-θηλ'] = args['απθ-θηλ'] or '' if args['απθ+-θηλ'] == '' or args['απθ+-θηλ'] == nil then args['απθ+-θηλ'] = args['απθ-θηλ'] end
args['κπθ-θηλ'] = args['κπθ-θηλ'] or '' if args['κπθ+-θηλ'] == '' or args['κπθ+-θηλ'] == nil then args['κπθ+-θηλ'] = args['κπθ-θηλ'] end
args['οδθ-θηλ'] = args['οδθ-θηλ'] or '' if args['οδθ+-θηλ'] == '' or args['οδθ+-θηλ'] == nil then args['οδθ+-θηλ'] = args['οδθ-θηλ'] end
args['γδθ-θηλ'] = args['γδθ-θηλ'] or '' if args['γδθ+-θηλ'] == '' or args['γδθ+-θηλ'] == nil then args['γδθ+-θηλ'] = args['γδθ-θηλ'] end
-- STEMS neu
args['οεθ-ουδ'] = args['οεθ-ουδ'] or '' if args['οεθ+-ουδ'] == '' or args['οεθ+-ουδ'] == nil then args['οεθ+-ουδ'] = args['οεθ-ουδ'] end
args['γεθ-ουδ'] = args['γεθ-ουδ'] or '' if args['γεθ+-ουδ'] == '' or args['γεθ+-ουδ'] == nil then args['γεθ+-ουδ'] = args['γεθ-ουδ'] end
args['δεθ-ουδ'] = args['δεθ-ουδ'] or '' if args['δεθ+-ουδ'] == '' or args['δεθ+-ουδ'] == nil then args['δεθ+-ουδ'] = args['δεθ-ουδ'] end
args['αεθ-ουδ'] = args['αεθ-ουδ'] or '' if args['αεθ+-ουδ'] == '' or args['αεθ+-ουδ'] == nil then args['αεθ+-ουδ'] = args['αεθ-ουδ'] end
args['κεθ-ουδ'] = args['κεθ-ουδ'] or '' if args['κεθ+-ουδ'] == '' or args['κεθ+-ουδ'] == nil then args['κεθ+-ουδ'] = args['κεθ-ουδ'] end
args['οπθ-ουδ'] = args['οπθ-ουδ'] or '' if args['οπθ+-ουδ'] == '' or args['οπθ+-ουδ'] == nil then args['οπθ+-ουδ'] = args['οπθ-ουδ'] end
args['γπθ-ουδ'] = args['γπθ-ουδ'] or '' if args['γπθ+-ουδ'] == '' or args['γπθ+-ουδ'] == nil then args['γπθ+-ουδ'] = args['γπθ-ουδ'] end
args['δπθ-ουδ'] = args['δπθ-ουδ'] or '' if args['δπθ+-ουδ'] == '' or args['δπθ+-ουδ'] == nil then args['δπθ+-ουδ'] = args['δπθ-ουδ'] end
args['απθ-ουδ'] = args['απθ-ουδ'] or '' if args['απθ+-ουδ'] == '' or args['απθ+-ουδ'] == nil then args['απθ+-ουδ'] = args['απθ-ουδ'] end
args['κπθ-ουδ'] = args['κπθ-ουδ'] or '' if args['κπθ+-ουδ'] == '' or args['κπθ+-ουδ'] == nil then args['κπθ+-ουδ'] = args['κπθ-ουδ'] end
args['οδθ-ουδ'] = args['οδθ-ουδ'] or '' if args['οδθ+-ουδ'] == '' or args['οδθ+-ουδ'] == nil then args['οδθ+-ουδ'] = args['οδθ-ουδ'] end
args['γδθ-ουδ'] = args['γδθ-ουδ'] or '' if args['γδθ+-ουδ'] == '' or args['γδθ+-ουδ'] == nil then args['γδθ+-ουδ'] = args['γδθ-ουδ'] end
-- STEMS masc2
args['οε2θ-αρσ'] = args['οε2θ-αρσ'] or '' if args['οε2θ+-αρσ'] == '' or args['οε2θ+-αρσ'] == nil then args['οε2θ+-αρσ'] = args['οε2θ-αρσ'] end
args['γε2θ-αρσ'] = args['γε2θ-αρσ'] or '' if args['γε2θ+-αρσ'] == '' or args['γε2θ+-αρσ'] == nil then args['γε2θ+-αρσ'] = args['γε2θ-αρσ'] end
args['δε2θ-αρσ'] = args['δε2θ-αρσ'] or '' if args['δε2θ+-αρσ'] == '' or args['δε2θ+-αρσ'] == nil then args['δε2θ+-αρσ'] = args['δε2θ-αρσ'] end
args['αε2θ-αρσ'] = args['αε2θ-αρσ'] or '' if args['αε2θ+-αρσ'] == '' or args['αε2θ+-αρσ'] == nil then args['αε2θ+-αρσ'] = args['αε2θ-αρσ'] end
args['κε2θ-αρσ'] = args['κε2θ-αρσ'] or '' if args['κε2θ+-αρσ'] == '' or args['κε2θ+-αρσ'] == nil then args['κε2θ+-αρσ'] = args['κε2θ-αρσ'] end
args['οπ2θ-αρσ'] = args['οπ2θ-αρσ'] or '' if args['οπ2θ+-αρσ'] == '' or args['οπ2θ+-αρσ'] == nil then args['οπ2θ+-αρσ'] = args['οπ2θ-αρσ'] end
args['γπ2θ-αρσ'] = args['γπ2θ-αρσ'] or '' if args['γπ2θ+-αρσ'] == '' or args['γπ2θ+-αρσ'] == nil then args['γπ2θ+-αρσ'] = args['γπ2θ-αρσ'] end
args['δπ2θ-αρσ'] = args['δπ2θ-αρσ'] or '' if args['δπ2θ+-αρσ'] == '' or args['δπ2θ+-αρσ'] == nil then args['δπ2θ+-αρσ'] = args['δπ2θ-αρσ'] end
args['απ2θ-αρσ'] = args['απ2θ-αρσ'] or '' if args['απ2θ+-αρσ'] == '' or args['απ2θ+-αρσ'] == nil then args['απ2θ+-αρσ'] = args['απ2θ-αρσ'] end
args['κπ2θ-αρσ'] = args['κπ2θ-αρσ'] or '' if args['κπ2θ+-αρσ'] == '' or args['κπ2θ+-αρσ'] == nil then args['κπ2θ+-αρσ'] = args['κπ2θ-αρσ'] end
args['οδ2θ-αρσ'] = args['οδ2θ-αρσ'] or '' if args['οδ2θ+-αρσ'] == '' or args['οδ2θ+-αρσ'] == nil then args['οδ2θ+-αρσ'] = args['οδ2θ-αρσ'] end
args['γδ2θ-αρσ'] = args['γδ2θ-αρσ'] or '' if args['γδ2θ+-αρσ'] == '' or args['γδ2θ+-αρσ'] == nil then args['γδ2θ+-αρσ'] = args['γδ2θ-αρσ'] end
-- STEMS fem2
args['οε2θ-θηλ'] = args['οε2θ-θηλ'] or '' if args['οε2θ+-θηλ'] == '' or args['οε2θ+-θηλ'] == nil then args['οε2θ+-θηλ'] = args['οε2θ-θηλ'] end
args['γε2θ-θηλ'] = args['γε2θ-θηλ'] or '' if args['γε2θ+-θηλ'] == '' or args['γε2θ+-θηλ'] == nil then args['γε2θ+-θηλ'] = args['γε2θ-θηλ'] end
args['δε2θ-θηλ'] = args['δε2θ-θηλ'] or '' if args['δε2θ+-θηλ'] == '' or args['δε2θ+-θηλ'] == nil then args['δε2θ+-θηλ'] = args['δε2θ-θηλ'] end
args['αε2θ-θηλ'] = args['αε2θ-θηλ'] or '' if args['αε2θ+-θηλ'] == '' or args['αε2θ+-θηλ'] == nil then args['αε2θ+-θηλ'] = args['αε2θ-θηλ'] end
args['κε2θ-θηλ'] = args['κε2θ-θηλ'] or '' if args['κε2θ+-θηλ'] == '' or args['κε2θ+-θηλ'] == nil then args['κε2θ+-θηλ'] = args['κε2θ-θηλ'] end
args['οπ2θ-θηλ'] = args['οπ2θ-θηλ'] or '' if args['οπ2θ+-θηλ'] == '' or args['οπ2θ+-θηλ'] == nil then args['οπ2θ+-θηλ'] = args['οπ2θ-θηλ'] end
args['γπ2θ-θηλ'] = args['γπ2θ-θηλ'] or '' if args['γπ2θ+-θηλ'] == '' or args['γπ2θ+-θηλ'] == nil then args['γπ2θ+-θηλ'] = args['γπ2θ-θηλ'] end
args['δπ2θ-θηλ'] = args['δπ2θ-θηλ'] or '' if args['δπ2θ+-θηλ'] == '' or args['δπ2θ+-θηλ'] == nil then args['δπ2θ+-θηλ'] = args['δπ2θ-θηλ'] end
args['απ2θ-θηλ'] = args['απ2θ-θηλ'] or '' if args['απ2θ+-θηλ'] == '' or args['απ2θ+-θηλ'] == nil then args['απ2θ+-θηλ'] = args['απ2θ-θηλ'] end
args['κπ2θ-θηλ'] = args['κπ2θ-θηλ'] or '' if args['κπ2θ+-θηλ'] == '' or args['κπ2θ+-θηλ'] == nil then args['κπ2θ+-θηλ'] = args['κπ2θ-θηλ'] end
args['οδ2θ-θηλ'] = args['οδ2θ-θηλ'] or '' if args['οδ2θ+-θηλ'] == '' or args['οδ2θ+-θηλ'] == nil then args['οδ2θ+-θηλ'] = args['οδ2θ-θηλ'] end
args['γδ2θ-θηλ'] = args['γδ2θ-θηλ'] or '' if args['γδ2θ+-θηλ'] == '' or args['γδ2θ+-θηλ'] == nil then args['γδ2θ+-θηλ'] = args['γδ2θ-θηλ'] end
-- STEMS neu2
args['οε2θ-ουδ'] = args['οε2θ-ουδ'] or '' if args['οε2θ+-ουδ'] == '' or args['οε2θ+-ουδ'] == nil then args['οε2θ+-ουδ'] = args['οε2θ-ουδ'] end
args['γε2θ-ουδ'] = args['γε2θ-ουδ'] or '' if args['γε2θ+-ουδ'] == '' or args['γε2θ+-ουδ'] == nil then args['γε2θ+-ουδ'] = args['γε2θ-ουδ'] end
args['δε2θ-ουδ'] = args['δε2θ-ουδ'] or '' if args['δε2θ+-ουδ'] == '' or args['δε2θ+-ουδ'] == nil then args['δε2θ+-ουδ'] = args['δε2θ-ουδ'] end
args['αε2θ-ουδ'] = args['αε2θ-ουδ'] or '' if args['αε2θ+-ουδ'] == '' or args['αε2θ+-ουδ'] == nil then args['αε2θ+-ουδ'] = args['αε2θ-ουδ'] end
args['κε2θ-ουδ'] = args['κε2θ-ουδ'] or '' if args['κε2θ+-ουδ'] == '' or args['κε2θ+-ουδ'] == nil then args['κε2θ+-ουδ'] = args['κε2θ-ουδ'] end
args['οπ2θ-ουδ'] = args['οπ2θ-ουδ'] or '' if args['οπ2θ+-ουδ'] == '' or args['οπ2θ+-ουδ'] == nil then args['οπ2θ+-ουδ'] = args['οπ2θ-ουδ'] end
args['γπ2θ-ουδ'] = args['γπ2θ-ουδ'] or '' if args['γπ2θ+-ουδ'] == '' or args['γπ2θ+-ουδ'] == nil then args['γπ2θ+-ουδ'] = args['γπ2θ-ουδ'] end
args['δπ2θ-ουδ'] = args['δπ2θ-ουδ'] or '' if args['δπ2θ+-ουδ'] == '' or args['δπ2θ+-ουδ'] == nil then args['δπ2θ+-ουδ'] = args['δπ2θ-ουδ'] end
args['απ2θ-ουδ'] = args['απ2θ-ουδ'] or '' if args['απ2θ+-ουδ'] == '' or args['απ2θ+-ουδ'] == nil then args['απ2θ+-ουδ'] = args['απ2θ-ουδ'] end
args['κπ2θ-ουδ'] = args['κπ2θ-ουδ'] or '' if args['κπ2θ+-ουδ'] == '' or args['κπ2θ+-ουδ'] == nil then args['κπ2θ+-ουδ'] = args['κπ2θ-ουδ'] end
args['οδ2θ-ουδ'] = args['οδ2θ-ουδ'] or '' if args['οδ2θ+-ουδ'] == '' or args['οδ2θ+-ουδ'] == nil then args['οδ2θ+-ουδ'] = args['οδ2θ-ουδ'] end
args['γδ2θ-ουδ'] = args['γδ2θ-ουδ'] or '' if args['γδ2θ+-ουδ'] == '' or args['γδ2θ+-ουδ'] == nil then args['γδ2θ+-ουδ'] = args['γδ2θ-ουδ'] end
-- ================= ENDINGS parameters
-- editor cannot change these module stems
-- ENDINGS masc
args['οε-αρσ'] = args['οε-αρσ'] or '' if args['οε+-αρσ'] == '' or args['οε+-αρσ'] == nil then args['οε+-αρσ'] = args['οε-αρσ'] end
args['γε-αρσ'] = args['γε-αρσ'] or '' if args['γε+-αρσ'] == '' or args['γε+-αρσ'] == nil then args['γε+-αρσ'] = args['γε-αρσ'] end
args['δε-αρσ'] = args['δε-αρσ'] or '' if args['δε+-αρσ'] == '' or args['δε+-αρσ'] == nil then args['δε+-αρσ'] = args['δε-αρσ'] end
args['αε-αρσ'] = args['αε-αρσ'] or '' if args['αε+-αρσ'] == '' or args['αε+-αρσ'] == nil then args['αε+-αρσ'] = args['αε-αρσ'] end
args['κε-αρσ'] = args['κε-αρσ'] or '' if args['κε+-αρσ'] == '' or args['κε+-αρσ'] == nil then args['κε+-αρσ'] = args['κε-αρσ'] end
args['οπ-αρσ'] = args['οπ-αρσ'] or '' if args['οπ+-αρσ'] == '' or args['οπ+-αρσ'] == nil then args['οπ+-αρσ'] = args['οπ-αρσ'] end
args['γπ-αρσ'] = args['γπ-αρσ'] or '' if args['γπ+-αρσ'] == '' or args['γπ+-αρσ'] == nil then args['γπ+-αρσ'] = args['γπ-αρσ'] end
args['δπ-αρσ'] = args['δπ-αρσ'] or '' if args['δπ+-αρσ'] == '' or args['δπ+-αρσ'] == nil then args['δπ+-αρσ'] = args['δπ-αρσ'] end
args['απ-αρσ'] = args['απ-αρσ'] or '' if args['απ+-αρσ'] == '' or args['απ+-αρσ'] == nil then args['απ+-αρσ'] = args['απ-αρσ'] end
args['κπ-αρσ'] = args['κπ-αρσ'] or '' if args['κπ+-αρσ'] == '' or args['κπ+-αρσ'] == nil then args['κπ+-αρσ'] = args['κπ-αρσ'] end
args['οδ-αρσ'] = args['οδ-αρσ'] or '' if args['οδ+-αρσ'] == '' or args['οδ+-αρσ'] == nil then args['οδ+-αρσ'] = args['οδ-αρσ'] end
args['γδ-αρσ'] = args['γδ-αρσ'] or '' if args['γδ+-αρσ'] == '' or args['γδ+-αρσ'] == nil then args['γδ+-αρσ'] = args['γδ-αρσ'] end
-- ENDINGS fem
args['οε-θηλ'] = args['οε-θηλ'] or '' if args['οε+-θηλ'] == '' or args['οε+-θηλ'] == nil then args['οε+-θηλ'] = args['οε-θηλ'] end
args['γε-θηλ'] = args['γε-θηλ'] or '' if args['γε+-θηλ'] == '' or args['γε+-θηλ'] == nil then args['γε+-θηλ'] = args['γε-θηλ'] end
args['δε-θηλ'] = args['δε-θηλ'] or '' if args['δε+-θηλ'] == '' or args['δε+-θηλ'] == nil then args['δε+-θηλ'] = args['δε-θηλ'] end
args['αε-θηλ'] = args['αε-θηλ'] or '' if args['αε+-θηλ'] == '' or args['αε+-θηλ'] == nil then args['αε+-θηλ'] = args['αε-θηλ'] end
args['κε-θηλ'] = args['κε-θηλ'] or '' if args['κε+-θηλ'] == '' or args['κε+-θηλ'] == nil then args['κε+-θηλ'] = args['κε-θηλ'] end
args['οπ-θηλ'] = args['οπ-θηλ'] or '' if args['οπ+-θηλ'] == '' or args['οπ+-θηλ'] == nil then args['οπ+-θηλ'] = args['οπ-θηλ'] end
args['γπ-θηλ'] = args['γπ-θηλ'] or '' if args['γπ+-θηλ'] == '' or args['γπ+-θηλ'] == nil then args['γπ+-θηλ'] = args['γπ-θηλ'] end
args['δπ-θηλ'] = args['δπ-θηλ'] or '' if args['δπ+-θηλ'] == '' or args['δπ+-θηλ'] == nil then args['δπ+-θηλ'] = args['δπ-θηλ'] end
args['απ-θηλ'] = args['απ-θηλ'] or '' if args['απ+-θηλ'] == '' or args['απ+-θηλ'] == nil then args['απ+-θηλ'] = args['απ-θηλ'] end
args['κπ-θηλ'] = args['κπ-θηλ'] or '' if args['κπ+-θηλ'] == '' or args['κπ+-θηλ'] == nil then args['κπ+-θηλ'] = args['κπ-θηλ'] end
args['οδ-θηλ'] = args['οδ-θηλ'] or '' if args['οδ+-θηλ'] == '' or args['οδ+-θηλ'] == nil then args['οδ+-θηλ'] = args['οδ-θηλ'] end
args['γδ-θηλ'] = args['γδ-θηλ'] or '' if args['γδ+-θηλ'] == '' or args['γδ+-θηλ'] == nil then args['γδ+-θηλ'] = args['γδ-θηλ'] end
-- ENDINGS neu
args['οε-ουδ'] = args['οε-ουδ'] or '' if args['οε+-ουδ'] == '' or args['οε+-ουδ'] == nil then args['οε+-ουδ'] = args['οε-ουδ'] end
args['γε-ουδ'] = args['γε-ουδ'] or '' if args['γε+-ουδ'] == '' or args['γε+-ουδ'] == nil then args['γε+-ουδ'] = args['γε-ουδ'] end
args['δε-ουδ'] = args['δε-ουδ'] or '' if args['δε+-ουδ'] == '' or args['δε+-ουδ'] == nil then args['δε+-ουδ'] = args['δε-ουδ'] end
args['αε-ουδ'] = args['αε-ουδ'] or '' if args['αε+-ουδ'] == '' or args['αε+-ουδ'] == nil then args['αε+-ουδ'] = args['αε-ουδ'] end
args['κε-ουδ'] = args['κε-ουδ'] or '' if args['κε+-ουδ'] == '' or args['κε+-ουδ'] == nil then args['κε+-ουδ'] = args['κε-ουδ'] end
args['οπ-ουδ'] = args['οπ-ουδ'] or '' if args['οπ+-ουδ'] == '' or args['οπ+-ουδ'] == nil then args['οπ+-ουδ'] = args['οπ-ουδ'] end
args['γπ-ουδ'] = args['γπ-ουδ'] or '' if args['γπ+-ουδ'] == '' or args['γπ+-ουδ'] == nil then args['γπ+-ουδ'] = args['γπ-ουδ'] end
args['δπ-ουδ'] = args['δπ-ουδ'] or '' if args['δπ+-ουδ'] == '' or args['δπ+-ουδ'] == nil then args['δπ+-ουδ'] = args['δπ-ουδ'] end
args['απ-ουδ'] = args['απ-ουδ'] or '' if args['απ+-ουδ'] == '' or args['απ+-ουδ'] == nil then args['απ+-ουδ'] = args['απ-ουδ'] end
args['κπ-ουδ'] = args['κπ-ουδ'] or '' if args['κπ+-ουδ'] == '' or args['κπ+-ουδ'] == nil then args['κπ+-ουδ'] = args['κπ-ουδ'] end
args['οδ-ουδ'] = args['οδ-ουδ'] or '' if args['οδ+-ουδ'] == '' or args['οδ+-ουδ'] == nil then args['οδ+-ουδ'] = args['οδ-ουδ'] end
args['γδ-ουδ'] = args['γδ-ουδ'] or '' if args['γδ+-ουδ'] == '' or args['γδ+-ουδ'] == nil then args['γδ+-ουδ'] = args['γδ-ουδ'] end
-- ENDINGS2 masc
args['οε2-αρσ'] = args['οε2-αρσ'] or '' if args['οε2+-αρσ'] == '' or args['οε2+-αρσ'] == nil then args['οε2+-αρσ'] = args['οε2-αρσ'] end
args['γε2-αρσ'] = args['γε2-αρσ'] or '' if args['γε2+-αρσ'] == '' or args['γε2+-αρσ'] == nil then args['γε2+-αρσ'] = args['γε2-αρσ'] end
args['δε2-αρσ'] = args['δε2-αρσ'] or '' if args['δε2+-αρσ'] == '' or args['δε2+-αρσ'] == nil then args['δε2+-αρσ'] = args['δε2-αρσ'] end
args['αε2-αρσ'] = args['αε2-αρσ'] or '' if args['αε2+-αρσ'] == '' or args['αε2+-αρσ'] == nil then args['αε2+-αρσ'] = args['αε2-αρσ'] end
args['κε2-αρσ'] = args['κε2-αρσ'] or '' if args['κε2+-αρσ'] == '' or args['κε2+-αρσ'] == nil then args['κε2+-αρσ'] = args['κε2-αρσ'] end
args['οπ2-αρσ'] = args['οπ2-αρσ'] or '' if args['οπ2+-αρσ'] == '' or args['οπ2+-αρσ'] == nil then args['οπ2+-αρσ'] = args['οπ2-αρσ'] end
args['γπ2-αρσ'] = args['γπ2-αρσ'] or '' if args['γπ2+-αρσ'] == '' or args['γπ2+-αρσ'] == nil then args['γπ2+-αρσ'] = args['γπ2-αρσ'] end
args['δπ2-αρσ'] = args['δπ2-αρσ'] or '' if args['δπ2+-αρσ'] == '' or args['δπ2+-αρσ'] == nil then args['δπ2+-αρσ'] = args['δπ2-αρσ'] end
args['απ2-αρσ'] = args['απ2-αρσ'] or '' if args['απ2+-αρσ'] == '' or args['απ2+-αρσ'] == nil then args['απ2+-αρσ'] = args['απ2-αρσ'] end
args['κπ2-αρσ'] = args['κπ2-αρσ'] or '' if args['κπ2+-αρσ'] == '' or args['κπ2+-αρσ'] == nil then args['κπ2+-αρσ'] = args['κπ2-αρσ'] end
args['οδ2-αρσ'] = args['οδ2-αρσ'] or '' if args['οδ2+-αρσ'] == '' or args['οδ2+-αρσ'] == nil then args['οδ2+-αρσ'] = args['οδ2-αρσ'] end
args['γδ2-αρσ'] = args['γδ2-αρσ'] or '' if args['γδ2+-αρσ'] == '' or args['γδ2+-αρσ'] == nil then args['γδ2+-αρσ'] = args['γδ2-αρσ'] end
-- ENDINGS2 fem
args['οε2-θηλ'] = args['οε2-θηλ'] or '' if args['οε2+-θηλ'] == '' or args['οε2+-θηλ'] == nil then args['οε2+-θηλ'] = args['οε2-θηλ'] end
args['γε2-θηλ'] = args['γε2-θηλ'] or '' if args['γε2+-θηλ'] == '' or args['γε2+-θηλ'] == nil then args['γε2+-θηλ'] = args['γε2-θηλ'] end
args['δε2-θηλ'] = args['δε2-θηλ'] or '' if args['δε2+-θηλ'] == '' or args['δε2+-θηλ'] == nil then args['δε2+-θηλ'] = args['δε2-θηλ'] end
args['αε2-θηλ'] = args['αε2-θηλ'] or '' if args['αε2+-θηλ'] == '' or args['αε2+-θηλ'] == nil then args['αε2+-θηλ'] = args['αε2-θηλ'] end
args['κε2-θηλ'] = args['κε2-θηλ'] or '' if args['κε2+-θηλ'] == '' or args['κε2+-θηλ'] == nil then args['κε2+-θηλ'] = args['κε2-θηλ'] end
args['οπ2-θηλ'] = args['οπ2-θηλ'] or '' if args['οπ2+-θηλ'] == '' or args['οπ2+-θηλ'] == nil then args['οπ2+-θηλ'] = args['οπ2-θηλ'] end
args['γπ2-θηλ'] = args['γπ2-θηλ'] or '' if args['γπ2+-θηλ'] == '' or args['γπ2+-θηλ'] == nil then args['γπ2+-θηλ'] = args['γπ2-θηλ'] end
args['δπ2-θηλ'] = args['δπ2-θηλ'] or '' if args['δπ2+-θηλ'] == '' or args['δπ2+-θηλ'] == nil then args['δπ2+-θηλ'] = args['δπ2-θηλ'] end
args['απ2-θηλ'] = args['απ2-θηλ'] or '' if args['απ2+-θηλ'] == '' or args['απ2+-θηλ'] == nil then args['απ2+-θηλ'] = args['απ2-θηλ'] end
args['κπ2-θηλ'] = args['κπ2-θηλ'] or '' if args['κπ2+-θηλ'] == '' or args['κπ2+-θηλ'] == nil then args['κπ2+-θηλ'] = args['κπ2-θηλ'] end
args['οδ2-θηλ'] = args['οδ2-θηλ'] or '' if args['οδ2+-θηλ'] == '' or args['οδ2+-θηλ'] == nil then args['οδ2+-θηλ'] = args['οδ2-θηλ'] end
args['γδ2-θηλ'] = args['γδ2-θηλ'] or '' if args['γδ2+-θηλ'] == '' or args['γδ2+-θηλ'] == nil then args['γδ2+-θηλ'] = args['γδ2-θηλ'] end
-- ENDINGS2 neu
args['οε2-ουδ'] = args['οε2-ουδ'] or '' if args['οε2+-ουδ'] == '' or args['οε2+-ουδ'] == nil then args['οε2+-ουδ'] = args['οε2-ουδ'] end
args['γε2-ουδ'] = args['γε2-ουδ'] or '' if args['γε2+-ουδ'] == '' or args['γε2+-ουδ'] == nil then args['γε2+-ουδ'] = args['γε2-ουδ'] end
args['δε2-ουδ'] = args['δε2-ουδ'] or '' if args['δε2+-ουδ'] == '' or args['δε2+-ουδ'] == nil then args['δε2+-ουδ'] = args['δε2-ουδ'] end
args['αε2-ουδ'] = args['αε2-ουδ'] or '' if args['αε2+-ουδ'] == '' or args['αε2+-ουδ'] == nil then args['αε2+-ουδ'] = args['αε2-ουδ'] end
args['κε2-ουδ'] = args['κε2-ουδ'] or '' if args['κε2+-ουδ'] == '' or args['κε2+-ουδ'] == nil then args['κε2+-ουδ'] = args['κε2-ουδ'] end
args['οπ2-ουδ'] = args['οπ2-ουδ'] or '' if args['οπ2+-ουδ'] == '' or args['οπ2+-ουδ'] == nil then args['οπ2+-ουδ'] = args['οπ2-ουδ'] end
args['γπ2-ουδ'] = args['γπ2-ουδ'] or '' if args['γπ2+-ουδ'] == '' or args['γπ2+-ουδ'] == nil then args['γπ2+-ουδ'] = args['γπ2-ουδ'] end
args['δπ2-ουδ'] = args['δπ2-ουδ'] or '' if args['δπ2+-ουδ'] == '' or args['δπ2+-ουδ'] == nil then args['δπ2+-ουδ'] = args['δπ2-ουδ'] end
args['απ2-ουδ'] = args['απ2-ουδ'] or '' if args['απ2+-ουδ'] == '' or args['απ2+-ουδ'] == nil then args['απ2+-ουδ'] = args['απ2-ουδ'] end
args['κπ2-ουδ'] = args['κπ2-ουδ'] or '' if args['κπ2+-ουδ'] == '' or args['κπ2+-ουδ'] == nil then args['κπ2+-ουδ'] = args['κπ2-ουδ'] end
args['οδ2-ουδ'] = args['οδ2-ουδ'] or '' if args['οδ2+-ουδ'] == '' or args['οδ2+-ουδ'] == nil then args['οδ2+-ουδ'] = args['οδ2-ουδ'] end
args['γδ2-ουδ'] = args['γδ2-ουδ'] or '' if args['γδ2+-ουδ'] == '' or args['γδ2+-ουδ'] == nil then args['γδ2+-ουδ'] = args['γδ2-ουδ'] end
-- add text at the end of each cell -- κείμενο μετά τη λέξη οεΛκειμ
args['οεΛκειμ-αρσ'] = args['οεΛκειμ-αρσ'] or '' args['γεΛκειμ-αρσ'] = args['γεΛκειμ-αρσ'] or '' args['δεΛκειμ-αρσ'] = args['δεΛκειμ-αρσ'] or ''
args['αεΛκειμ-αρσ'] = args['αεΛκειμ-αρσ'] or '' args['κεΛκειμ-αρσ'] = args['κεΛκειμ-αρσ'] or ''
args['οπΛκειμ-αρσ'] = args['οπΛκειμ-αρσ'] or '' args['γπΛκειμ-αρσ'] = args['γπΛκειμ-αρσ'] or '' args['δπΛκειμ-αρσ'] = args['δπΛκειμ-αρσ'] or ''
args['απΛκειμ-αρσ'] = args['απΛκειμ-αρσ'] or '' args['κπΛκειμ-αρσ'] = args['κπΛκειμ-αρσ'] or ''
args['οδΛκειμ-αρσ'] = args['οδΛκειμ-αρσ'] or '' args['γδΛκειμ-αρσ'] = args['γδΛκειμ-αρσ'] or ''
args['οεΛκειμ-θηλ'] = args['οεΛκειμ-θηλ'] or '' args['γεΛκειμ-θηλ'] = args['γεΛκειμ-θηλ'] or '' args['δεΛκειμ-θηλ'] = args['δεΛκειμ-θηλ'] or ''
args['αεΛκειμ-θηλ'] = args['αεΛκειμ-θηλ'] or '' args['κεΛκειμ-θηλ'] = args['κεΛκειμ-θηλ'] or ''
args['οπΛκειμ-θηλ'] = args['οπΛκειμ-θηλ'] or '' args['γπΛκειμ-θηλ'] = args['γπΛκειμ-θηλ'] or '' args['δπΛκειμ-θηλ'] = args['δπΛκειμ-θηλ'] or ''
args['απΛκειμ-θηλ'] = args['απΛκειμ-θηλ'] or '' args['κπΛκειμ-θηλ'] = args['κπΛκειμ-θηλ'] or ''
args['οδΛκειμ-θηλ'] = args['οδΛκειμ-θηλ'] or '' args['γδΛκειμ-θηλ'] = args['γδΛκειμ-θηλ'] or ''
args['οεΛκειμ-ουδ'] = args['οεΛκειμ-ουδ'] or '' args['γεΛκειμ-ουδ'] = args['γεΛκειμ-ουδ'] or '' args['δεΛκειμ-ουδ'] = args['δεΛκειμ-ουδ'] or ''
args['αεΛκειμ-ουδ'] = args['αεΛκειμ-ουδ'] or '' args['κεΛκειμ-ουδ'] = args['κεΛκειμ-ουδ'] or ''
args['οπΛκειμ-ουδ'] = args['οπΛκειμ-ουδ'] or '' args['γπΛκειμ-ουδ'] = args['γπΛκειμ-ουδ'] or '' args['δπΛκειμ-ουδ'] = args['δπΛκειμ-ουδ'] or ''
args['απΛκειμ-ουδ'] = args['απΛκειμ-ουδ'] or '' args['κπΛκειμ-ουδ'] = args['κπΛκειμ-ουδ'] or ''
args['οδΛκειμ-ουδ'] = args['οδΛκειμ-ουδ'] or '' args['γδΛκειμ-ουδ'] = args['γδΛκειμ-ουδ'] or ''
-- for second word
args['οε2Λκειμ-αρσ'] = args['οε2Λκειμ-αρσ'] or '' args['γε2Λκειμ-αρσ'] = args['γε2Λκειμ-αρσ'] or '' args['δε2Λκειμ-αρσ'] = args['δε2Λκειμ-αρσ'] or ''
args['αε2Λκειμ-αρσ'] = args['αε2Λκειμ-αρσ'] or '' args['κε2Λκειμ-αρσ'] = args['κε2Λκειμ-αρσ'] or ''
args['οπ2Λκειμ-αρσ'] = args['οπ2Λκειμ-αρσ'] or '' args['γπ2Λκειμ-αρσ'] = args['γπ2Λκειμ-αρσ'] or '' args['δπ2Λκειμ-αρσ'] = args['δπ2Λκειμ-αρσ'] or ''
args['απ2Λκειμ-αρσ'] = args['απ2Λκειμ-αρσ'] or '' args['κπ2Λκειμ-αρσ'] = args['κπ2Λκειμ-αρσ'] or ''
args['οδ2Λκειμ-αρσ'] = args['οδ2Λκειμ-αρσ'] or '' args['γδ2Λκειμ-αρσ'] = args['γδ2Λκειμ-αρσ'] or ''
args['οε2Λκειμ-θηλ'] = args['οε2Λκειμ-θηλ'] or '' args['γε2Λκειμ-θηλ'] = args['γε2Λκειμ-θηλ'] or '' args['δε2Λκειμ-θηλ'] = args['δε2Λκειμ-θηλ'] or ''
args['αε2Λκειμ-θηλ'] = args['αε2Λκειμ-θηλ'] or '' args['κε2Λκειμ-θηλ'] = args['κε2Λκειμ-θηλ'] or ''
args['οπ2Λκειμ-θηλ'] = args['οπ2Λκειμ-θηλ'] or '' args['γπ2Λκειμ-θηλ'] = args['γπ2Λκειμ-θηλ'] or '' args['δπ2Λκειμ-θηλ'] = args['δπ2Λκειμ-θηλ'] or ''
args['απ2Λκειμ-θηλ'] = args['απ2Λκειμ-θηλ'] or '' args['κπ2Λκειμ-θηλ'] = args['κπ2Λκειμ-θηλ'] or ''
args['οδ2Λκειμ-θηλ'] = args['οδ2Λκειμ-θηλ'] or '' args['γδ2Λκειμ-θηλ'] = args['γδ2Λκειμ-θηλ'] or ''
args['οε2Λκειμ-ουδ'] = args['οε2Λκειμ-ουδ'] or '' args['γε2Λκειμ-ουδ'] = args['γε2Λκειμ-ουδ'] or '' args['δε2Λκειμ-ουδ'] = args['δε2Λκειμ-ουδ'] or ''
args['αε2Λκειμ-ουδ'] = args['αε2Λκειμ-ουδ'] or '' args['κε2Λκειμ-ουδ'] = args['κε2Λκειμ-ουδ'] or ''
args['οπ2Λκειμ-ουδ'] = args['οπ2Λκειμ-ουδ'] or '' args['γπ2Λκειμ-ουδ'] = args['γπ2Λκειμ-ουδ'] or '' args['δπ2Λκειμ-ουδ'] = args['δπ2Λκειμ-ουδ'] or ''
args['απ2Λκειμ-ουδ'] = args['απ2Λκειμ-ουδ'] or '' args['κπ2Λκειμ-ουδ'] = args['κπ2Λκειμ-ουδ'] or ''
args['οδ2Λκειμ-ουδ'] = args['οδ2Λκειμ-ουδ'] or '' args['γδ2Λκειμ-ουδ'] = args['γδ2Λκειμ-ουδ'] or ''
-- add text at the beginning of each cell -- κείμενο ΠΡΙΝ τη λέξη οεΛκειμ1
args['οεΛκειμ1-αρσ'] = args['οεΛκειμ1-αρσ'] or '' args['γεΛκειμ1-αρσ'] = args['γεΛκειμ1-αρσ'] or '' args['δεΛκειμ1-αρσ'] = args['δεΛκειμ1-αρσ'] or ''
args['αεΛκειμ1-αρσ'] = args['αεΛκειμ1-αρσ'] or '' args['κεΛκειμ1-αρσ'] = args['κεΛκειμ1-αρσ'] or ''
args['οπΛκειμ1-αρσ'] = args['οπΛκειμ1-αρσ'] or '' args['γπΛκειμ1-αρσ'] = args['γπΛκειμ1-αρσ'] or '' args['δπΛκειμ1-αρσ'] = args['δπΛκειμ1-αρσ'] or ''
args['απΛκειμ1-αρσ'] = args['απΛκειμ1-αρσ'] or '' args['κπΛκειμ1-αρσ'] = args['κπΛκειμ1-αρσ'] or ''
args['οδΛκειμ1-αρσ'] = args['οδΛκειμ1-αρσ'] or '' args['γδΛκειμ1-αρσ'] = args['γδΛκειμ1-αρσ'] or ''
args['οεΛκειμ1-θηλ'] = args['οεΛκειμ1-θηλ'] or '' args['γεΛκειμ1-θηλ'] = args['γεΛκειμ1-θηλ'] or '' args['δεΛκειμ1-θηλ'] = args['δεΛκειμ1-θηλ'] or ''
args['αεΛκειμ1-θηλ'] = args['αεΛκειμ1-θηλ'] or '' args['κεΛκειμ1-θηλ'] = args['κεΛκειμ1-θηλ'] or ''
args['οπΛκειμ1-θηλ'] = args['οπΛκειμ1-θηλ'] or '' args['γπΛκειμ1-θηλ'] = args['γπΛκειμ1-θηλ'] or '' args['δπΛκειμ1-θηλ'] = args['δπΛκειμ1-θηλ'] or ''
args['απΛκειμ1-θηλ'] = args['απΛκειμ1-θηλ'] or '' args['κπΛκειμ1-θηλ'] = args['κπΛκειμ1-θηλ'] or ''
args['οδΛκειμ1-θηλ'] = args['οδΛκειμ1-θηλ'] or '' args['γδΛκειμ1-θηλ'] = args['γδΛκειμ1-θηλ'] or ''
args['οεΛκειμ1-ουδ'] = args['οεΛκειμ1-ουδ'] or '' args['γεΛκειμ1-ουδ'] = args['γεΛκειμ1-ουδ'] or '' args['δεΛκειμ1-ουδ'] = args['δεΛκειμ1-ουδ'] or ''
args['αεΛκειμ1-ουδ'] = args['αεΛκειμ1-ουδ'] or '' args['κεΛκειμ1-ουδ'] = args['κεΛκειμ1-ουδ'] or ''
args['οπΛκειμ1-ουδ'] = args['οπΛκειμ1-ουδ'] or '' args['γπΛκειμ1-ουδ'] = args['γπΛκειμ1-ουδ'] or '' args['δπΛκειμ1-ουδ'] = args['δπΛκειμ1-ουδ'] or ''
args['απΛκειμ1-ουδ'] = args['απΛκειμ1-ουδ'] or '' args['κπΛκειμ1-ουδ'] = args['κπΛκειμ1-ουδ'] or ''
args['οδΛκειμ1-ουδ'] = args['οδΛκειμ1-ουδ'] or '' args['γδΛκειμ1-ουδ'] = args['γδΛκειμ1-ουδ'] or ''
-- for second word
args['οε2Λκειμ1-αρσ'] = args['οε2Λκειμ1-αρσ'] or '' args['γε2Λκειμ1-αρσ'] = args['γε2Λκειμ1-αρσ'] or '' args['δε2Λκειμ1-αρσ'] = args['δε2Λκειμ1-αρσ'] or ''
args['αε2Λκειμ1-αρσ'] = args['αε2Λκειμ1-αρσ'] or '' args['κε2Λκειμ1-αρσ'] = args['κε2Λκειμ1-αρσ'] or ''
args['οπ2Λκειμ1-αρσ'] = args['οπ2Λκειμ1-αρσ'] or '' args['γπ2Λκειμ1-αρσ'] = args['γπ2Λκειμ1-αρσ'] or '' args['δπ2Λκειμ1-αρσ'] = args['δπ2Λκειμ1-αρσ'] or ''
args['απ2Λκειμ1-αρσ'] = args['απ2Λκειμ1-αρσ'] or '' args['κπ2Λκειμ1-αρσ'] = args['κπ2Λκειμ1-αρσ'] or ''
args['οδ2Λκειμ1-αρσ'] = args['οδ2Λκειμ1-αρσ'] or '' args['γδ2Λκειμ1-αρσ'] = args['γδ2Λκειμ1-αρσ'] or ''
args['οε2Λκειμ1-θηλ'] = args['οε2Λκειμ1-θηλ'] or '' args['γε2Λκειμ1-θηλ'] = args['γε2Λκειμ1-θηλ'] or '' args['δε2Λκειμ1-θηλ'] = args['δε2Λκειμ1-θηλ'] or ''
args['αε2Λκειμ1-θηλ'] = args['αε2Λκειμ1-θηλ'] or '' args['κε2Λκειμ1-θηλ'] = args['κε2Λκειμ1-θηλ'] or ''
args['οπ2Λκειμ1-θηλ'] = args['οπ2Λκειμ1-θηλ'] or '' args['γπ2Λκειμ1-θηλ'] = args['γπ2Λκειμ1-θηλ'] or '' args['δπ2Λκειμ1-θηλ'] = args['δπ2Λκειμ1-θηλ'] or ''
args['απ2Λκειμ1-θηλ'] = args['απ2Λκειμ1-θηλ'] or '' args['κπ2Λκειμ1-θηλ'] = args['κπ2Λκειμ1-θηλ'] or ''
args['οδ2Λκειμ1-θηλ'] = args['οδ2Λκειμ1-θηλ'] or '' args['γδ2Λκειμ1-θηλ'] = args['γδ2Λκειμ1-θηλ'] or ''
args['οε2Λκειμ1-ουδ'] = args['οε2Λκειμ1-ουδ'] or '' args['γε2Λκειμ1-ουδ'] = args['γε2Λκειμ1-ουδ'] or '' args['δε2Λκειμ1-ουδ'] = args['δε2Λκειμ1-ουδ'] or ''
args['αε2Λκειμ1-ουδ'] = args['αε2Λκειμ1-ουδ'] or '' args['κε2Λκειμ1-ουδ'] = args['κε2Λκειμ1-ουδ'] or ''
args['οπ2Λκειμ1-ουδ'] = args['οπ2Λκειμ1-ουδ'] or '' args['γπ2Λκειμ1-ουδ'] = args['γπ2Λκειμ1-ουδ'] or '' args['δπ2Λκειμ1-ουδ'] = args['δπ2Λκειμ1-ουδ'] or ''
args['απ2Λκειμ1-ουδ'] = args['απ2Λκειμ1-ουδ'] or '' args['κπ2Λκειμ1-ουδ'] = args['κπ2Λκειμ1-ουδ'] or ''
args['οδ2Λκειμ1-ουδ'] = args['οδ2Λκειμ1-ουδ'] or '' args['γδ2Λκειμ1-ουδ'] = args['γδ2Λκειμ1-ουδ'] or ''
-- ΑΝΤΩΝΥΜΙΕΣ - PRONOUNS like [[ἑκάτερος]] [[ἔνιοι]]
if args['μέρος λόγου'] == 'Αντωνυμίες' then
args['άρθρα'] = '-' -- ?? perhaps decide this in modules
args['όπως'] = args['κατ']
args['παράρτημα'] = '[[Παράρτημα:Γραμματική (αρχαία ελληνικά)#Αντωνυμίες|Παράρτημα#Αντωνυμίες]]'
args['κε-αρσ'] = '-' args['κπ-αρσ'] = '-'
args['κε-θηλ'] = '-' args['κπ-θηλ'] = '-'
args['κε-ουδ'] = '-' args['κπ-ουδ'] = '-'
if args['α'] == 'πλ' then -- ?? is there one? ([[ἀμφότερος]] has sing
args['οε-αρσ'] = '' args['γε-αρσ'] = '' args['δε-αρσ'] = '' args['αε-αρσ'] = '' args['κε-αρσ'] = ''
args['οε-θηλ'] = '' args['γε-θηλ'] = '' args['δε-θηλ'] = '' args['αε-θηλ'] = '' args['κε-θηλ'] = ''
args['οε-ουδ'] = '' args['γε-ουδ'] = '' args['δε-ουδ'] = '' args['αε-ουδ'] = '' args['κε-ουδ'] = ''
args['κατηγ2'] = 'Αντωνυμίες χωρίς ενικό'
end
-- ?? is there something singular only?
end
-- MASC =============================================
-- masc nom sg
-- zero ending
if args['οε-αρσ'] == '0' then
args['mod-οεΛ-αρσ'] = args['οεΛκειμ1-αρσ']
.. create_link(args['οεθ-αρσ'], stem_color(args['οεθ+-αρσ'])) .. args['οεΛκειμ-αρσ']
end
if args['οε2-αρσ'] == '0' then
args['οε2Λ-αρσ'] = br .. args['οε2Λκειμ1-αρσ']
.. create_link(args['οε2θ-αρσ'], stem_color(args['οε2θ+-αρσ'])) .. args['οε2Λκειμ-αρσ']
end
-- first word
if args['οε-αρσ'] ~= '-' and args['οε-αρσ'] ~= '0' and args['οε-αρσ'] ~= '' and args['οε-αρσ'] ~= nil then
args['mod-οεΛ-αρσ'] = args['οεΛκειμ1-αρσ']
.. create_link(args['οεθ-αρσ'] .. args['οε-αρσ'], stem_color(args['οεθ+-αρσ']) .. ending_color(args['οε+-αρσ'])) .. args['οεΛκειμ-αρσ']
elseif args['οε-αρσ'] == '-' then
args['mod-οεΛ-αρσ'] = args['οεΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οεΛκειμ-αρσ']
end
-- second word
if args['οε2-αρσ'] ~= '-' and args['οε2-αρσ'] ~= '0' and args['οε2-αρσ'] ~= '' and args['οε2-αρσ'] ~= nil then
args['οε2Λ-αρσ'] = br .. args['οε2Λκειμ1-αρσ']
.. create_link(args['οε2θ-αρσ'] .. args['οε2-αρσ'], stem_color(args['οε2θ+-αρσ']) .. ending_color(args['οε2+-αρσ'])) .. args['οε2Λκειμ-αρσ']
elseif args['οε2-αρσ'] == '-' then
args['οε2Λ-αρσ'] = br .. args['οε2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οε2Λκειμ-αρσ']
end
-- option
if args['οεΛ-αρσ'] ~= '' and args['οεΛ-αρσ'] ~= nil then
args['οεΛ-αρσ'] = args['οεΛ-αρσ'] .. args['οε2Λ-αρσ']
else
if args['οε2-αρσ'] ~= '' and args['οε2-αρσ'] ~= nil then
args['οεΛ-αρσ'] = args['mod-οεΛ-αρσ'] .. args['οε2Λ-αρσ']
else
args['οεΛ-αρσ'] = args['mod-οεΛ-αρσ'] .. args['οε2Λ-αρσ']
end
end
-- masc gen sg
-- zero ending
if args['γε-αρσ'] == '0' then
args['mod-γεΛ-αρσ'] = args['γεΛκειμ1-αρσ']
.. create_link(args['γεθ-αρσ'], stem_color(args['γεθ+-αρσ'])) .. args['γεΛκειμ-αρσ']
end
if args['γε2-αρσ'] == '0' then
args['γε2Λ-αρσ'] = br .. args['γε2Λκειμ1-αρσ']
.. create_link(args['γε2θ-αρσ'], stem_color(args['γε2θ+-αρσ'])) .. args['γε2Λκειμ-αρσ']
end
-- first word
if args['γε-αρσ'] ~= '-' and args['γε-αρσ'] ~= '0' and args['γε-αρσ'] ~= '' and args['γε-αρσ'] ~= nil then
args['mod-γεΛ-αρσ'] = args['γεΛκειμ1-αρσ']
.. create_link(args['γεθ-αρσ'] .. args['γε-αρσ'], stem_color(args['γεθ+-αρσ']) .. ending_color(args['γε+-αρσ'])) .. args['γεΛκειμ-αρσ']
elseif args['γε-αρσ'] == '-' then
args['mod-γεΛ-αρσ'] = args['γεΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γεΛκειμ-αρσ']
end
-- second word
if args['γε2-αρσ'] ~= '-' and args['γε2-αρσ'] ~= '0' and args['γε2-αρσ'] ~= '' and args['γε2-αρσ'] ~= nil then
args['γε2Λ-αρσ'] = br .. args['γε2Λκειμ1-αρσ']
.. create_link(args['γε2θ-αρσ'] .. args['γε2-αρσ'], stem_color(args['γε2θ+-αρσ']) .. ending_color(args['γε2+-αρσ'])) .. args['γε2Λκειμ-αρσ']
elseif args['γε2-αρσ'] == '-' then
args['γε2Λ-αρσ'] = br .. args['γε2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γε2Λκειμ-αρσ']
end
-- option
if args['γεΛ-αρσ'] ~= '' and args['γεΛ-αρσ'] ~= nil then
args['γεΛ-αρσ'] = args['γεΛ-αρσ'] .. args['γε2Λ-αρσ']
else
if args['γε2-αρσ'] ~= '' and args['γε2-αρσ'] ~= nil then
args['γεΛ-αρσ'] = args['mod-γεΛ-αρσ'] .. args['γε2Λ-αρσ']
else
args['γεΛ-αρσ'] = args['mod-γεΛ-αρσ'] .. args['γε2Λ-αρσ']
end
end
-- masc dat sg
-- zero ending
if args['δε-αρσ'] == '0' then
args['mod-δεΛ-αρσ'] = args['δεΛκειμ1-αρσ']
.. create_link(args['δεθ-αρσ'], stem_color(args['δεθ+-αρσ'])) .. args['δεΛκειμ-αρσ']
end
if args['δε2-αρσ'] == '0' then
args['δε2Λ-αρσ'] = br .. args['δε2Λκειμ1-αρσ']
.. create_link(args['δε2θ-αρσ'], stem_color(args['δε2θ+-αρσ'])) .. args['δε2Λκειμ-αρσ']
end
-- first word
if args['δε-αρσ'] ~= '-' and args['δε-αρσ'] ~= '0' and args['δε-αρσ'] ~= '' and args['δε-αρσ'] ~= nil then
args['mod-δεΛ-αρσ'] = args['δεΛκειμ1-αρσ']
.. create_link(args['δεθ-αρσ'] .. args['δε-αρσ'], stem_color(args['δεθ+-αρσ']) .. ending_color(args['δε+-αρσ'])) .. args['δεΛκειμ-αρσ']
elseif args['δε-αρσ'] == '-' then
args['mod-δεΛ-αρσ'] = args['δεΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δεΛκειμ-αρσ']
end
-- second word
if args['δε2-αρσ'] ~= '-' and args['δε2-αρσ'] ~= '0' and args['δε2-αρσ'] ~= '' and args['δε2-αρσ'] ~= nil then
args['δε2Λ-αρσ'] = br .. args['δε2Λκειμ1-αρσ']
.. create_link(args['δε2θ-αρσ'] .. args['δε2-αρσ'], stem_color(args['δε2θ+-αρσ']) .. ending_color(args['δε2+-αρσ'])) .. args['δε2Λκειμ-αρσ']
elseif args['δε2-αρσ'] == '-' then
args['δε2Λ-αρσ'] = br .. args['δε2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δε2Λκειμ-αρσ']
end
-- option
if args['δεΛ-αρσ'] ~= '' and args['δεΛ-αρσ'] ~= nil then
args['δεΛ-αρσ'] = args['δεΛ-αρσ'] .. args['δε2Λ-αρσ']
else
if args['δε2-αρσ'] ~= '' and args['δε2-αρσ'] ~= nil then
args['δεΛ-αρσ'] = args['mod-δεΛ-αρσ'] .. args['δε2Λ-αρσ']
else
args['δεΛ-αρσ'] = args['mod-δεΛ-αρσ'] .. args['δε2Λ-αρσ']
end
end
-- masc acc sg
-- zero ending
if args['αε-αρσ'] == '0' then
args['mod-αεΛ-αρσ'] = args['αεΛκειμ1-αρσ']
.. create_link(args['αεθ-αρσ'], stem_color(args['αεθ+-αρσ'])) .. args['αεΛκειμ-αρσ']
end
if args['αε2-αρσ'] == '0' then
args['αε2Λ-αρσ'] = br .. args['αε2Λκειμ1-αρσ']
.. create_link(args['αε2θ-αρσ'], stem_color(args['αε2θ+-αρσ'])) .. args['αε2Λκειμ-αρσ']
end
-- first word
if args['αε-αρσ'] ~= '-' and args['αε-αρσ'] ~= '0' and args['αε-αρσ'] ~= '' and args['αε-αρσ'] ~= nil then
args['mod-αεΛ-αρσ'] = args['αεΛκειμ1-αρσ']
.. create_link(args['αεθ-αρσ'] .. args['αε-αρσ'], stem_color(args['αεθ+-αρσ']) .. ending_color(args['αε+-αρσ'])) .. args['αεΛκειμ-αρσ']
elseif args['αε-αρσ'] == '-' then
args['mod-αεΛ-αρσ'] = args['αεΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['αεΛκειμ-αρσ']
end
-- second word
if args['αε2-αρσ'] ~= '-' and args['αε2-αρσ'] ~= '0' and args['αε2-αρσ'] ~= '' and args['αε2-αρσ'] ~= nil then
args['αε2Λ-αρσ'] = br .. args['αε2Λκειμ1-αρσ']
.. create_link(args['αε2θ-αρσ'] .. args['αε2-αρσ'], stem_color(args['αε2θ+-αρσ']) .. ending_color(args['αε2+-αρσ'])) .. args['αε2Λκειμ-αρσ']
elseif args['αε2-αρσ'] == '-' then
args['αε2Λ-αρσ'] = br .. args['αε2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['αε2Λκειμ-αρσ']
end
-- option
if args['αεΛ-αρσ'] ~= '' and args['αεΛ-αρσ'] ~= nil then
args['αεΛ-αρσ'] = args['αεΛ-αρσ'] .. args['αε2Λ-αρσ']
else
if args['αε2-αρσ'] ~= '' and args['αε2-αρσ'] ~= nil then
args['αεΛ-αρσ'] = args['mod-αεΛ-αρσ'] .. args['αε2Λ-αρσ']
else
args['αεΛ-αρσ'] = args['mod-αεΛ-αρσ'] .. args['αε2Λ-αρσ']
end
end
-- masc voc sg
-- zero ending
if args['κε-αρσ'] == '0' then
args['mod-κεΛ-αρσ'] = args['κεΛκειμ1-αρσ']
.. create_link(args['κεθ-αρσ'], stem_color(args['κεθ+-αρσ'])) .. args['κεΛκειμ-αρσ']
end
if args['κε2-αρσ'] == '0' then
args['κε2Λ-αρσ'] = br .. args['κε2Λκειμ1-αρσ']
.. create_link(args['κε2θ-αρσ'], stem_color(args['κε2θ+-αρσ'])) .. args['κε2Λκειμ-αρσ']
end
-- first word
if args['κε-αρσ'] ~= '-' and args['κε-αρσ'] ~= '0' and args['κε-αρσ'] ~= '' and args['κε-αρσ'] ~= nil then
args['mod-κεΛ-αρσ'] = args['κεΛκειμ1-αρσ']
.. create_link(args['κεθ-αρσ'] .. args['κε-αρσ'], stem_color(args['κεθ+-αρσ']) .. ending_color(args['κε+-αρσ'])) .. args['κεΛκειμ-αρσ']
elseif args['κε-αρσ'] == '-' then
args['mod-κεΛ-αρσ'] = args['κεΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κεΛκειμ-αρσ']
end
-- second word
if args['κε2-αρσ'] ~= '-' and args['κε2-αρσ'] ~= '0' and args['κε2-αρσ'] ~= '' and args['κε2-αρσ'] ~= nil then
args['κε2Λ-αρσ'] = br .. args['κε2Λκειμ1-αρσ']
.. create_link(args['κε2θ-αρσ'] .. args['κε2-αρσ'], stem_color(args['κε2θ+-αρσ']) .. ending_color(args['κε2+-αρσ'])) .. args['κε2Λκειμ-αρσ']
elseif args['κε2-αρσ'] == '-' then
args['κε2Λ-αρσ'] = br .. args['κε2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κε2Λκειμ-αρσ']
end
-- option
if args['κεΛ-αρσ'] ~= '' and args['κεΛ-αρσ'] ~= nil then
args['κεΛ-αρσ'] = args['κεΛ-αρσ'] .. args['κε2Λ-αρσ']
else
if args['κε2-αρσ'] ~= '' and args['κε2-αρσ'] ~= nil then
args['κεΛ-αρσ'] = args['mod-κεΛ-αρσ'] .. args['κε2Λ-αρσ']
else
args['κεΛ-αρσ'] = args['mod-κεΛ-αρσ'] .. args['κε2Λ-αρσ']
end
end
-- MASC PLURAL +n movable at dative
-- masc nom pl
-- zero ending
if args['οπ-αρσ'] == '0' then
args['mod-οπΛ-αρσ'] = args['οπΛκειμ1-αρσ']
.. create_link(args['οπθ-αρσ'], stem_color(args['οπθ+-αρσ'])) .. args['οπΛκειμ-αρσ']
end
if args['οπ2-αρσ'] == '0' then
args['οπ2Λ-αρσ'] = br .. args['οπ2Λκειμ1-αρσ']
.. create_link(args['οπ2θ-αρσ'], stem_color(args['οπ2θ+-αρσ'])) .. args['οπ2Λκειμ-αρσ']
end
-- first word
if args['οπ-αρσ'] ~= '-' and args['οπ-αρσ'] ~= '0' and args['οπ-αρσ'] ~= '' and args['οπ-αρσ'] ~= nil then
args['mod-οπΛ-αρσ'] = args['οπΛκειμ1-αρσ']
.. create_link(args['οπθ-αρσ'] .. args['οπ-αρσ'], stem_color(args['οπθ+-αρσ']) .. ending_color(args['οπ+-αρσ'])) .. args['οπΛκειμ-αρσ']
elseif args['οπ-αρσ'] == '-' then
args['mod-οπΛ-αρσ'] = args['οπΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οπΛκειμ-αρσ']
end
-- second word
if args['οπ2-αρσ'] ~= '-' and args['οπ2-αρσ'] ~= '0' and args['οπ2-αρσ'] ~= '' and args['οπ2-αρσ'] ~= nil then
args['οπ2Λ-αρσ'] = br .. args['οπ2Λκειμ1-αρσ']
.. create_link(args['οπ2θ-αρσ'] .. args['οπ2-αρσ'], stem_color(args['οπ2θ+-αρσ']) .. ending_color(args['οπ2+-αρσ'])) .. args['οπ2Λκειμ-αρσ']
elseif args['οπ2-αρσ'] == '-' then
args['οπ2Λ-αρσ'] = br .. args['οπ2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οπ2Λκειμ-αρσ']
end
-- option
if args['οπΛ-αρσ'] ~= '' and args['οπΛ-αρσ'] ~= nil then
args['οπΛ-αρσ'] = args['οπΛ-αρσ'] .. args['οπ2Λ-αρσ']
else
if args['οπ2-αρσ'] ~= '' and args['οπ2-αρσ'] ~= nil then
args['οπΛ-αρσ'] = args['mod-οπΛ-αρσ'] .. args['οπ2Λ-αρσ']
else
args['οπΛ-αρσ'] = args['mod-οπΛ-αρσ'] .. args['οπ2Λ-αρσ']
end
end
-- masc gen pl
-- zero ending
if args['γπ-αρσ'] == '0' then
args['mod-γπΛ-αρσ'] = args['γπΛκειμ1-αρσ']
.. create_link(args['γπθ-αρσ'], stem_color(args['γπθ+-αρσ'])) .. args['γπΛκειμ-αρσ']
end
if args['γπ2-αρσ'] == '0' then
args['γπ2Λ-αρσ'] = br .. args['γπ2Λκειμ1-αρσ']
.. create_link(args['γπ2θ-αρσ'], stem_color(args['γπ2θ+-αρσ'])) .. args['γπ2Λκειμ-αρσ']
end
-- first word
if args['γπ-αρσ'] ~= '-' and args['γπ-αρσ'] ~= '0' and args['γπ-αρσ'] ~= '' and args['γπ-αρσ'] ~= nil then
args['mod-γπΛ-αρσ'] = args['γπΛκειμ1-αρσ']
.. create_link(args['γπθ-αρσ'] .. args['γπ-αρσ'], stem_color(args['γπθ+-αρσ']) .. ending_color(args['γπ+-αρσ'])) .. args['γπΛκειμ-αρσ']
elseif args['γπ-αρσ'] == '-' then
args['mod-γπΛ-αρσ'] = args['γπΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γπΛκειμ-αρσ']
end
-- second word
if args['γπ2-αρσ'] ~= '-' and args['γπ2-αρσ'] ~= '0' and args['γπ2-αρσ'] ~= '' and args['γπ2-αρσ'] ~= nil then
args['γπ2Λ-αρσ'] = br .. args['γπ2Λκειμ1-αρσ']
.. create_link(args['γπ2θ-αρσ'] .. args['γπ2-αρσ'], stem_color(args['γπ2θ+-αρσ']) .. ending_color(args['γπ2+-αρσ'])) .. args['γπ2Λκειμ-αρσ']
elseif args['γπ2-αρσ'] == '-' then
args['γπ2Λ-αρσ'] = br .. args['γπ2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γπ2Λκειμ-αρσ']
end
-- option
if args['γπΛ-αρσ'] ~= '' and args['γπΛ-αρσ'] ~= nil then
args['γπΛ-αρσ'] = args['γπΛ-αρσ'] .. args['γπ2Λ-αρσ']
else
if args['γπ2-αρσ'] ~= '' and args['γπ2-αρσ'] ~= nil then
args['γπΛ-αρσ'] = args['mod-γπΛ-αρσ'] .. args['γπ2Λ-αρσ']
else
args['γπΛ-αρσ'] = args['mod-γπΛ-αρσ'] .. args['γπ2Λ-αρσ']
end
end
-- masc dat pl + plus novable nu - νυ εφελκυστικόν e.g. [[στάς]]
-- zero ending
if args['δπ-αρσ'] == '0' then
args['mod-δπΛ-αρσ'] = args['δπΛκειμ1-αρσ']
.. create_link(args['δπθ-αρσ'], stem_color(args['δπθ+-αρσ'])) .. args['δπΛκειμ-αρσ']
end
if args['δπ2-αρσ'] == '0' then
args['δπ2Λ-αρσ'] = br .. args['δπ2Λκειμ1-αρσ']
.. create_link(args['δπ2θ-αρσ'], stem_color(args['δπ2θ+-αρσ'])) .. args['δπ2Λκειμ-αρσ']
end
-- first word + movable nu option
if args['δπ-αρσ'] ~= '-' and args['δπ-αρσ'] ~= '0' and args['δπ-αρσ'] ~= '' and args['δπ-αρσ'] ~= nil then
if args['ν'] == '1' then
args['mod-δπΛ-αρσ'] = args['δπΛκειμ1-αρσ']
.. create_link(args['δπθ-αρσ'] .. args['δπ-αρσ'], stem_color(args['δπθ+-αρσ']) .. ending_color(args['δπ+-αρσ']))
.. create_link(args['δπθ-αρσ'] .. args['δπ-αρσ'] .. "ν", stem_color("(") .. ending_color("ν") .. stem_color(")"))
.. args['δπΛκειμ-αρσ']
else -- NO movable n
args['mod-δπΛ-αρσ'] = args['δπΛκειμ1-αρσ'] .. create_link(args['δπθ-αρσ'] .. args['δπ-αρσ'], stem_color(args['δπθ+-αρσ']) .. ending_color(args['δπ+-αρσ'])) .. args['δπΛκειμ-αρσ']
end -- close movable nu
elseif args['δπ-αρσ'] == '-' then
args['mod-δπΛ-αρσ'] = args['δπΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δπΛκειμ-αρσ']
end
-- second word at new line + movable nu2 option
if args['δπ2-αρσ'] ~= '-' and args['δπ2-αρσ'] ~= '0' and args['δπ2-αρσ'] ~= '' and args['δπ2-αρσ'] ~= nil then
if args['ν2'] == '1' then
args['δπ2Λ-αρσ'] = br .. args['δπ2Λκειμ1-αρσ']
.. create_link(args['δπ2θ-αρσ'] .. args['δπ2-αρσ'], stem_color(args['δπ2θ+-αρσ']) .. ending_color(args['δπ2+-αρσ']))
.. create_link(args['δπ2θ-αρσ'] .. args['δπ2-αρσ'] .. "ν", stem_color("(") .. ending_color("ν") .. stem_color(")"))
.. args['δπ2Λκειμ-αρσ']
else -- NO movable n2
args['δπ2Λ-αρσ'] = br .. args['δπ2Λκειμ1-αρσ'] .. create_link(args['δπ2θ-αρσ'] .. args['δπ2-αρσ'], stem_color(args['δπ2θ+-αρσ']) .. ending_color(args['δπ2+-αρσ'])) .. args['δπ2Λκειμ-αρσ']
end -- close movable nu2
elseif args['δπ2-αρσ'] == '-' then
args['δπ2Λ-αρσ'] = br .. args['δπ2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δπ2Λκειμ-αρσ']
end
-- option
if args['δπΛ-αρσ'] ~= '' and args['δπΛ-αρσ'] ~= nil then
args['δπΛ-αρσ'] = args['δπΛ-αρσ'] .. args['δπ2Λ-αρσ']
else
if args['δπ2-αρσ'] ~= '' and args['δπ2-αρσ'] ~= nil then
args['δπΛ-αρσ'] = args['mod-δπΛ-αρσ'] .. args['δπ2Λ-αρσ']
else
args['δπΛ-αρσ'] = args['mod-δπΛ-αρσ'] .. args['δπ2Λ-αρσ']
end
end
-- masc acc pl
-- zero ending
if args['απ-αρσ'] == '0' then
args['mod-απΛ-αρσ'] = args['απΛκειμ1-αρσ']
.. create_link(args['απθ-αρσ'], stem_color(args['απθ+-αρσ'])) .. args['απΛκειμ-αρσ']
end
if args['απ2-αρσ'] == '0' then
args['απ2Λ-αρσ'] = br .. args['απ2Λκειμ1-αρσ']
.. create_link(args['απ2θ-αρσ'], stem_color(args['απ2θ+-αρσ'])) .. args['απ2Λκειμ-αρσ']
end
-- first word
if args['απ-αρσ'] ~= '-' and args['απ-αρσ'] ~= '0' and args['απ-αρσ'] ~= '' and args['απ-αρσ'] ~= nil then
args['mod-απΛ-αρσ'] = args['απΛκειμ1-αρσ']
.. create_link(args['απθ-αρσ'] .. args['απ-αρσ'], stem_color(args['απθ+-αρσ']) .. ending_color(args['απ+-αρσ'])) .. args['απΛκειμ-αρσ']
elseif args['απ-αρσ'] == '-' then
args['mod-απΛ-αρσ'] = args['απΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['απΛκειμ-αρσ']
end
-- second word
if args['απ2-αρσ'] ~= '-' and args['απ2-αρσ'] ~= '0' and args['απ2-αρσ'] ~= '' and args['απ2-αρσ'] ~= nil then
args['απ2Λ-αρσ'] = br .. args['απ2Λκειμ1-αρσ']
.. create_link(args['απ2θ-αρσ'] .. args['απ2-αρσ'], stem_color(args['απ2θ+-αρσ']) .. ending_color(args['απ2+-αρσ'])) .. args['απ2Λκειμ-αρσ']
elseif args['απ2-αρσ'] == '-' then
args['απ2Λ-αρσ'] = br .. args['απ2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['απ2Λκειμ-αρσ']
end
-- option
if args['απΛ-αρσ'] ~= '' and args['απΛ-αρσ'] ~= nil then
args['απΛ-αρσ'] = args['απΛ-αρσ'] .. args['απ2Λ-αρσ']
else
if args['απ2-αρσ'] ~= '' and args['απ2-αρσ'] ~= nil then
args['απΛ-αρσ'] = args['mod-απΛ-αρσ'] .. args['απ2Λ-αρσ']
else
args['απΛ-αρσ'] = args['mod-απΛ-αρσ'] .. args['απ2Λ-αρσ']
end
end
-- masc voc pl
-- zero ending
if args['κπ-αρσ'] == '0' then
args['mod-κπΛ-αρσ'] = args['κπΛκειμ1-αρσ']
.. create_link(args['κπθ-αρσ'], stem_color(args['κπθ+-αρσ'])) .. args['κπΛκειμ-αρσ']
end
if args['κπ2-αρσ'] == '0' then
args['κπ2Λ-αρσ'] = br .. args['κπ2Λκειμ1-αρσ']
.. create_link(args['κπ2θ-αρσ'], stem_color(args['κπ2θ+-αρσ'])) .. args['κπ2Λκειμ-αρσ']
end
-- first word
if args['κπ-αρσ'] ~= '-' and args['κπ-αρσ'] ~= '0' and args['κπ-αρσ'] ~= '' and args['κπ-αρσ'] ~= nil then
args['mod-κπΛ-αρσ'] = args['κπΛκειμ1-αρσ']
.. create_link(args['κπθ-αρσ'] .. args['κπ-αρσ'], stem_color(args['κπθ+-αρσ']) .. ending_color(args['κπ+-αρσ'])) .. args['κπΛκειμ-αρσ']
elseif args['κπ-αρσ'] == '-' then
args['mod-κπΛ-αρσ'] = args['κπΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κπΛκειμ-αρσ']
end
-- second word
if args['κπ2-αρσ'] ~= '-' and args['κπ2-αρσ'] ~= '0' and args['κπ2-αρσ'] ~= '' and args['κπ2-αρσ'] ~= nil then
args['κπ2Λ-αρσ'] = br .. args['κπ2Λκειμ1-αρσ']
.. create_link(args['κπ2θ-αρσ'] .. args['κπ2-αρσ'], stem_color(args['κπ2θ+-αρσ']) .. ending_color(args['κπ2+-αρσ'])) .. args['κπ2Λκειμ-αρσ']
elseif args['κπ2-αρσ'] == '-' then
args['κπ2Λ-αρσ'] = br .. args['κπ2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κπ2Λκειμ-αρσ']
end
-- option
if args['κπΛ-αρσ'] ~= '' and args['κπΛ-αρσ'] ~= nil then
args['κπΛ-αρσ'] = args['κπΛ-αρσ'] .. args['κπ2Λ-αρσ']
else
if args['κπ2-αρσ'] ~= '' and args['κπ2-αρσ'] ~= nil then
args['κπΛ-αρσ'] = args['mod-κπΛ-αρσ'] .. args['κπ2Λ-αρσ']
else
args['κπΛ-αρσ'] = args['mod-κπΛ-αρσ'] .. args['κπ2Λ-αρσ']
end
end
-- MASC dual
-- masc nom.acc.voc du
-- zero ending
if args['οδ-αρσ'] == '0' then
args['mod-οδΛ-αρσ'] = args['οδΛκειμ1-αρσ']
.. create_link(args['οδθ-αρσ'], stem_color(args['οδθ+-αρσ'])) .. args['οδΛκειμ-αρσ']
end
if args['οδ2-αρσ'] == '0' then
args['οδ2Λ-αρσ'] = br .. args['οδ2Λκειμ1-αρσ']
.. create_link(args['οδ2θ-αρσ'], stem_color(args['οδ2θ+-αρσ'])) .. args['οδ2Λκειμ-αρσ']
end
-- first word
if args['οδ-αρσ'] ~= '-' and args['οδ-αρσ'] ~= '0' and args['οδ-αρσ'] ~= '' and args['οδ-αρσ'] ~= nil then
args['mod-οδΛ-αρσ'] = args['οδΛκειμ1-αρσ']
.. create_link(args['οδθ-αρσ'] .. args['οδ-αρσ'], stem_color(args['οδθ+-αρσ']) .. ending_color(args['οδ+-αρσ'])) .. args['οδΛκειμ-αρσ']
elseif args['οδ-αρσ'] == '-' then
args['mod-οδΛ-αρσ'] = args['οδΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οδΛκειμ-αρσ']
end
-- second word
if args['οδ2-αρσ'] ~= '-' and args['οδ2-αρσ'] ~= '0' and args['οδ2-αρσ'] ~= '' and args['οδ2-αρσ'] ~= nil then
args['οδ2Λ-αρσ'] = br .. args['οδ2Λκειμ1-αρσ']
.. create_link(args['οδ2θ-αρσ'] .. args['οδ2-αρσ'], stem_color(args['οδ2θ+-αρσ']) .. ending_color(args['οδ2+-αρσ'])) .. args['οδ2Λκειμ-αρσ']
elseif args['οδ2-αρσ'] == '-' then
args['οδ2Λ-αρσ'] = br .. args['οδ2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οδ2Λκειμ-αρσ']
end
-- option
if args['οδΛ-αρσ'] ~= '' and args['οδΛ-αρσ'] ~= nil then
args['οδΛ-αρσ'] = args['οδΛ-αρσ'] .. args['οδ2Λ-αρσ']
else
if args['οδ2-αρσ'] ~= '' and args['οδ2-αρσ'] ~= nil then
args['οδΛ-αρσ'] = args['mod-οδΛ-αρσ'] .. args['οδ2Λ-αρσ']
else
args['οδΛ-αρσ'] = args['mod-οδΛ-αρσ'] .. args['οδ2Λ-αρσ']
end
end
-- masc gen.dat du
-- zero ending
if args['γδ-αρσ'] == '0' then
args['mod-γδΛ-αρσ'] = args['γδΛκειμ1-αρσ']
.. create_link(args['γδθ-αρσ'], stem_color(args['γδθ+-αρσ'])) .. args['γδΛκειμ-αρσ']
end
if args['γδ2-αρσ'] == '0' then
args['γδ2Λ-αρσ'] = br .. args['γδ2Λκειμ1-αρσ']
.. create_link(args['γδ2θ-αρσ'], stem_color(args['γδ2θ+-αρσ'])) .. args['γδ2Λκειμ-αρσ']
end
-- first word
if args['γδ-αρσ'] ~= '-' and args['γδ-αρσ'] ~= '0' and args['γδ-αρσ'] ~= '' and args['γδ-αρσ'] ~= nil then
args['mod-γδΛ-αρσ'] = args['γδΛκειμ1-αρσ']
.. create_link(args['γδθ-αρσ'] .. args['γδ-αρσ'], stem_color(args['γδθ+-αρσ']) .. ending_color(args['γδ+-αρσ'])) .. args['γδΛκειμ-αρσ']
elseif args['γδ-αρσ'] == '-' then
args['mod-γδΛ-αρσ'] = args['γδΛκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γδΛκειμ-αρσ']
end
-- second word
if args['γδ2-αρσ'] ~= '-' and args['γδ2-αρσ'] ~= '0' and args['γδ2-αρσ'] ~= '' and args['γδ2-αρσ'] ~= nil then
args['γδ2Λ-αρσ'] = br .. args['γδ2Λκειμ1-αρσ']
.. create_link(args['γδ2θ-αρσ'] .. args['γδ2-αρσ'], stem_color(args['γδ2θ+-αρσ']) .. ending_color(args['γδ2+-αρσ'])) .. args['γδ2Λκειμ-αρσ']
elseif args['γδ2-αρσ'] == '-' then
args['γδ2Λ-αρσ'] = br .. args['γδ2Λκειμ1-αρσ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γδ2Λκειμ-αρσ']
end
-- option
if args['γδΛ-αρσ'] ~= '' and args['γδΛ-αρσ'] ~= nil then
args['γδΛ-αρσ'] = args['γδΛ-αρσ'] .. args['γδ2Λ-αρσ']
else
if args['γδ2-αρσ'] ~= '' and args['γδ2-αρσ'] ~= nil then
args['γδΛ-αρσ'] = args['mod-γδΛ-αρσ'] .. args['γδ2Λ-αρσ']
else
args['γδΛ-αρσ'] = args['mod-γδΛ-αρσ'] .. args['γδ2Λ-αρσ']
end
end
-- FEM ===================================
-- fem nom sg
-- zero ending
if args['οε-θηλ'] == '0' then
args['mod-οεΛ-θηλ'] = args['οεΛκειμ1-θηλ']
.. create_link(args['οεθ-θηλ'], stem_color(args['οεθ+-θηλ'])) .. args['οεΛκειμ-θηλ']
end
if args['οε2-θηλ'] == '0' then
args['οε2Λ-θηλ'] = br .. args['οε2Λκειμ1-θηλ']
.. create_link(args['οε2θ-θηλ'], stem_color(args['οε2θ+-θηλ'])) .. args['οε2Λκειμ-θηλ']
end
-- first word
if args['οε-θηλ'] ~= '-' and args['οε-θηλ'] ~= '0' and args['οε-θηλ'] ~= '' and args['οε-θηλ'] ~= nil then
args['mod-οεΛ-θηλ'] = args['οεΛκειμ1-θηλ']
.. create_link(args['οεθ-θηλ'] .. args['οε-θηλ'], stem_color(args['οεθ+-θηλ']) .. ending_color(args['οε+-θηλ'])) .. args['οεΛκειμ-θηλ']
elseif args['οε-θηλ'] == '-' then
args['mod-οεΛ-θηλ'] = args['οεΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οεΛκειμ-θηλ']
end
-- second word
if args['οε2-θηλ'] ~= '-' and args['οε2-θηλ'] ~= '0' and args['οε2-θηλ'] ~= '' and args['οε2-θηλ'] ~= nil then
args['οε2Λ-θηλ'] = br .. args['οε2Λκειμ1-θηλ']
.. create_link(args['οε2θ-θηλ'] .. args['οε2-θηλ'], stem_color(args['οε2θ+-θηλ']) .. ending_color(args['οε2+-θηλ'])) .. args['οε2Λκειμ-θηλ']
elseif args['οε2-θηλ'] == '-' then
args['οε2Λ-θηλ'] = br .. args['οε2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οε2Λκειμ-θηλ']
end
-- option
if args['οεΛ-θηλ'] ~= '' and args['οεΛ-θηλ'] ~= nil then
args['οεΛ-θηλ'] = args['οεΛ-θηλ'] .. args['οε2Λ-θηλ']
else
if args['οε2-θηλ'] ~= '' and args['οε2-θηλ'] ~= nil then
args['οεΛ-θηλ'] = args['mod-οεΛ-θηλ'] .. args['οε2Λ-θηλ']
else
args['οεΛ-θηλ'] = args['mod-οεΛ-θηλ'] .. args['οε2Λ-θηλ']
end
end
-- fem gen sg
-- zero ending
if args['γε-θηλ'] == '0' then
args['mod-γεΛ-θηλ'] = args['γεΛκειμ1-θηλ']
.. create_link(args['γεθ-θηλ'], stem_color(args['γεθ+-θηλ'])) .. args['γεΛκειμ-θηλ']
end
if args['γε2-θηλ'] == '0' then
args['γε2Λ-θηλ'] = br .. args['γε2Λκειμ1-θηλ']
.. create_link(args['γε2θ-θηλ'], stem_color(args['γε2θ+-θηλ'])) .. args['γε2Λκειμ-θηλ']
end
-- first word
if args['γε-θηλ'] ~= '-' and args['γε-θηλ'] ~= '0' and args['γε-θηλ'] ~= '' and args['γε-θηλ'] ~= nil then
args['mod-γεΛ-θηλ'] = args['γεΛκειμ1-θηλ']
.. create_link(args['γεθ-θηλ'] .. args['γε-θηλ'], stem_color(args['γεθ+-θηλ']) .. ending_color(args['γε+-θηλ'])) .. args['γεΛκειμ-θηλ']
elseif args['γε-θηλ'] == '-' then
args['mod-γεΛ-θηλ'] = args['γεΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γεΛκειμ-θηλ']
end
-- second word
if args['γε2-θηλ'] ~= '-' and args['γε2-θηλ'] ~= '0' and args['γε2-θηλ'] ~= '' and args['γε2-θηλ'] ~= nil then
args['γε2Λ-θηλ'] = br .. args['γε2Λκειμ1-θηλ']
.. create_link(args['γε2θ-θηλ'] .. args['γε2-θηλ'], stem_color(args['γε2θ+-θηλ']) .. ending_color(args['γε2+-θηλ'])) .. args['γε2Λκειμ-θηλ']
elseif args['γε2-θηλ'] == '-' then
args['γε2Λ-θηλ'] = br .. args['γε2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γε2Λκειμ-θηλ']
end
-- option
if args['γεΛ-θηλ'] ~= '' and args['γεΛ-θηλ'] ~= nil then
args['γεΛ-θηλ'] = args['γεΛ-θηλ'] .. args['γε2Λ-θηλ']
else
if args['γε2-θηλ'] ~= '' and args['γε2-θηλ'] ~= nil then
args['γεΛ-θηλ'] = args['mod-γεΛ-θηλ'] .. args['γε2Λ-θηλ']
else
args['γεΛ-θηλ'] = args['mod-γεΛ-θηλ'] .. args['γε2Λ-θηλ']
end
end
-- fem dat sg
-- zero ending
if args['δε-θηλ'] == '0' then
args['mod-δεΛ-θηλ'] = args['δεΛκειμ1-θηλ']
.. create_link(args['δεθ-θηλ'], stem_color(args['δεθ+-θηλ'])) .. args['δεΛκειμ-θηλ']
end
if args['δε2-θηλ'] == '0' then
args['δε2Λ-θηλ'] = br .. args['δε2Λκειμ1-θηλ']
.. create_link(args['δε2θ-θηλ'], stem_color(args['δε2θ+-θηλ'])) .. args['δε2Λκειμ-θηλ']
end
-- first word
if args['δε-θηλ'] ~= '-' and args['δε-θηλ'] ~= '0' and args['δε-θηλ'] ~= '' and args['δε-θηλ'] ~= nil then
args['mod-δεΛ-θηλ'] = args['δεΛκειμ1-θηλ']
.. create_link(args['δεθ-θηλ'] .. args['δε-θηλ'], stem_color(args['δεθ+-θηλ']) .. ending_color(args['δε+-θηλ'])) .. args['δεΛκειμ-θηλ']
elseif args['δε-θηλ'] == '-' then
args['mod-δεΛ-θηλ'] = args['δεΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δεΛκειμ-θηλ']
end
-- second word
if args['δε2-θηλ'] ~= '-' and args['δε2-θηλ'] ~= '0' and args['δε2-θηλ'] ~= '' and args['δε2-θηλ'] ~= nil then
args['δε2Λ-θηλ'] = br .. args['δε2Λκειμ1-θηλ']
.. create_link(args['δε2θ-θηλ'] .. args['δε2-θηλ'], stem_color(args['δε2θ+-θηλ']) .. ending_color(args['δε2+-θηλ'])) .. args['δε2Λκειμ-θηλ']
elseif args['δε2-θηλ'] == '-' then
args['δε2Λ-θηλ'] = br .. args['δε2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δε2Λκειμ-θηλ']
end
-- option
if args['δεΛ-θηλ'] ~= '' and args['δεΛ-θηλ'] ~= nil then
args['δεΛ-θηλ'] = args['δεΛ-θηλ'] .. args['δε2Λ-θηλ']
else
if args['δε2-θηλ'] ~= '' and args['δε2-θηλ'] ~= nil then
args['δεΛ-θηλ'] = args['mod-δεΛ-θηλ'] .. args['δε2Λ-θηλ']
else
args['δεΛ-θηλ'] = args['mod-δεΛ-θηλ'] .. args['δε2Λ-θηλ']
end
end
-- fem acc sg
-- zero ending
if args['αε-θηλ'] == '0' then
args['mod-αεΛ-θηλ'] = args['αεΛκειμ1-θηλ']
.. create_link(args['αεθ-θηλ'], stem_color(args['αεθ+-θηλ'])) .. args['αεΛκειμ-θηλ']
end
if args['αε2-θηλ'] == '0' then
args['αε2Λ-θηλ'] = br .. args['αε2Λκειμ1-θηλ']
.. create_link(args['αε2θ-θηλ'], stem_color(args['αε2θ+-θηλ'])) .. args['αε2Λκειμ-θηλ']
end
-- first word
if args['αε-θηλ'] ~= '-' and args['αε-θηλ'] ~= '0' and args['αε-θηλ'] ~= '' and args['αε-θηλ'] ~= nil then
args['mod-αεΛ-θηλ'] = args['αεΛκειμ1-θηλ']
.. create_link(args['αεθ-θηλ'] .. args['αε-θηλ'], stem_color(args['αεθ+-θηλ']) .. ending_color(args['αε+-θηλ'])) .. args['αεΛκειμ-θηλ']
elseif args['αε-θηλ'] == '-' then
args['mod-αεΛ-θηλ'] = args['αεΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['αεΛκειμ-θηλ']
end
-- second word
if args['αε2-θηλ'] ~= '-' and args['αε2-θηλ'] ~= '0' and args['αε2-θηλ'] ~= '' and args['αε2-θηλ'] ~= nil then
args['αε2Λ-θηλ'] = br .. args['αε2Λκειμ1-θηλ']
.. create_link(args['αε2θ-θηλ'] .. args['αε2-θηλ'], stem_color(args['αε2θ+-θηλ']) .. ending_color(args['αε2+-θηλ'])) .. args['αε2Λκειμ-θηλ']
elseif args['αε2-θηλ'] == '-' then
args['αε2Λ-θηλ'] = br .. args['αε2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['αε2Λκειμ-θηλ']
end
-- option
if args['αεΛ-θηλ'] ~= '' and args['αεΛ-θηλ'] ~= nil then
args['αεΛ-θηλ'] = args['αεΛ-θηλ'] .. args['αε2Λ-θηλ']
else
if args['αε2-θηλ'] ~= '' and args['αε2-θηλ'] ~= nil then
args['αεΛ-θηλ'] = args['mod-αεΛ-θηλ'] .. args['αε2Λ-θηλ']
else
args['αεΛ-θηλ'] = args['mod-αεΛ-θηλ'] .. args['αε2Λ-θηλ']
end
end
-- fem voc sg
-- zero ending
if args['κε-θηλ'] == '0' then
args['mod-κεΛ-θηλ'] = args['κεΛκειμ1-θηλ']
.. create_link(args['κεθ-θηλ'], stem_color(args['κεθ+-θηλ'])) .. args['κεΛκειμ-θηλ']
end
if args['κε2-θηλ'] == '0' then
args['κε2Λ-θηλ'] = br .. args['κε2Λκειμ1-θηλ']
.. create_link(args['κε2θ-θηλ'], stem_color(args['κε2θ+-θηλ'])) .. args['κε2Λκειμ-θηλ']
end
-- first word
if args['κε-θηλ'] ~= '-' and args['κε-θηλ'] ~= '0' and args['κε-θηλ'] ~= '' and args['κε-θηλ'] ~= nil then
args['mod-κεΛ-θηλ'] = args['κεΛκειμ1-θηλ']
.. create_link(args['κεθ-θηλ'] .. args['κε-θηλ'], stem_color(args['κεθ+-θηλ']) .. ending_color(args['κε+-θηλ'])) .. args['κεΛκειμ-θηλ']
elseif args['κε-θηλ'] == '-' then
args['mod-κεΛ-θηλ'] = args['κεΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κεΛκειμ-θηλ']
end
-- second word
if args['κε2-θηλ'] ~= '-' and args['κε2-θηλ'] ~= '0' and args['κε2-θηλ'] ~= '' and args['κε2-θηλ'] ~= nil then
args['κε2Λ-θηλ'] = br .. args['κε2Λκειμ1-θηλ']
.. create_link(args['κε2θ-θηλ'] .. args['κε2-θηλ'], stem_color(args['κε2θ+-θηλ']) .. ending_color(args['κε2+-θηλ'])) .. args['κε2Λκειμ-θηλ']
elseif args['κε2-θηλ'] == '-' then
args['κε2Λ-θηλ'] = br .. args['κε2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κε2Λκειμ-θηλ']
end
-- option
if args['κεΛ-θηλ'] ~= '' and args['κεΛ-θηλ'] ~= nil then
args['κεΛ-θηλ'] = args['κεΛ-θηλ'] .. args['κε2Λ-θηλ']
else
if args['κε2-θηλ'] ~= '' and args['κε2-θηλ'] ~= nil then
args['κεΛ-θηλ'] = args['mod-κεΛ-θηλ'] .. args['κε2Λ-θηλ']
else
args['κεΛ-θηλ'] = args['mod-κεΛ-θηλ'] .. args['κε2Λ-θηλ']
end
end
-- FEM PLURAL ΝΟ n movable at dative
-- fem nom pl
-- zero ending
if args['οπ-θηλ'] == '0' then
args['mod-οπΛ-θηλ'] = args['οπΛκειμ1-θηλ']
.. create_link(args['οπθ-θηλ'], stem_color(args['οπθ+-θηλ'])) .. args['οπΛκειμ-θηλ']
end
if args['οπ2-θηλ'] == '0' then
args['οπ2Λ-θηλ'] = br .. args['οπ2Λκειμ1-θηλ']
.. create_link(args['οπ2θ-θηλ'], stem_color(args['οπ2θ+-θηλ'])) .. args['οπ2Λκειμ-θηλ']
end
-- first word
if args['οπ-θηλ'] ~= '-' and args['οπ-θηλ'] ~= '0' and args['οπ-θηλ'] ~= '' and args['οπ-θηλ'] ~= nil then
args['mod-οπΛ-θηλ'] = args['οπΛκειμ1-θηλ']
.. create_link(args['οπθ-θηλ'] .. args['οπ-θηλ'], stem_color(args['οπθ+-θηλ']) .. ending_color(args['οπ+-θηλ'])) .. args['οπΛκειμ-θηλ']
elseif args['οπ-θηλ'] == '-' then
args['mod-οπΛ-θηλ'] = args['οπΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οπΛκειμ-θηλ']
end
-- second word
if args['οπ2-θηλ'] ~= '-' and args['οπ2-θηλ'] ~= '0' and args['οπ2-θηλ'] ~= '' and args['οπ2-θηλ'] ~= nil then
args['οπ2Λ-θηλ'] = br .. args['οπ2Λκειμ1-θηλ']
.. create_link(args['οπ2θ-θηλ'] .. args['οπ2-θηλ'], stem_color(args['οπ2θ+-θηλ']) .. ending_color(args['οπ2+-θηλ'])) .. args['οπ2Λκειμ-θηλ']
elseif args['οπ2-θηλ'] == '-' then
args['οπ2Λ-θηλ'] = br .. args['οπ2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οπ2Λκειμ-θηλ']
end
-- option
if args['οπΛ-θηλ'] ~= '' and args['οπΛ-θηλ'] ~= nil then
args['οπΛ-θηλ'] = args['οπΛ-θηλ'] .. args['οπ2Λ-θηλ']
else
if args['οπ2-θηλ'] ~= '' and args['οπ2-θηλ'] ~= nil then
args['οπΛ-θηλ'] = args['mod-οπΛ-θηλ'] .. args['οπ2Λ-θηλ']
else
args['οπΛ-θηλ'] = args['mod-οπΛ-θηλ'] .. args['οπ2Λ-θηλ']
end
end
-- fem gen pl
-- zero ending
if args['γπ-θηλ'] == '0' then
args['mod-γπΛ-θηλ'] = args['γπΛκειμ1-θηλ']
.. create_link(args['γπθ-θηλ'], stem_color(args['γπθ+-θηλ'])) .. args['γπΛκειμ-θηλ']
end
if args['γπ2-θηλ'] == '0' then
args['γπ2Λ-θηλ'] = br .. args['γπ2Λκειμ1-θηλ']
.. create_link(args['γπ2θ-θηλ'], stem_color(args['γπ2θ+-θηλ'])) .. args['γπ2Λκειμ-θηλ']
end
-- first word
if args['γπ-θηλ'] ~= '-' and args['γπ-θηλ'] ~= '0' and args['γπ-θηλ'] ~= '' and args['γπ-θηλ'] ~= nil then
args['mod-γπΛ-θηλ'] = args['γπΛκειμ1-θηλ']
.. create_link(args['γπθ-θηλ'] .. args['γπ-θηλ'], stem_color(args['γπθ+-θηλ']) .. ending_color(args['γπ+-θηλ'])) .. args['γπΛκειμ-θηλ']
elseif args['γπ-θηλ'] == '-' then
args['mod-γπΛ-θηλ'] = args['γπΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γπΛκειμ-θηλ']
end
-- second word
if args['γπ2-θηλ'] ~= '-' and args['γπ2-θηλ'] ~= '0' and args['γπ2-θηλ'] ~= '' and args['γπ2-θηλ'] ~= nil then
args['γπ2Λ-θηλ'] = br .. args['γπ2Λκειμ1-θηλ']
.. create_link(args['γπ2θ-θηλ'] .. args['γπ2-θηλ'], stem_color(args['γπ2θ+-θηλ']) .. ending_color(args['γπ2+-θηλ'])) .. args['γπ2Λκειμ-θηλ']
elseif args['γπ2-θηλ'] == '-' then
args['γπ2Λ-θηλ'] = br .. args['γπ2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γπ2Λκειμ-θηλ']
end
-- option
if args['γπΛ-θηλ'] ~= '' and args['γπΛ-θηλ'] ~= nil then
args['γπΛ-θηλ'] = args['γπΛ-θηλ'] .. args['γπ2Λ-θηλ']
else
if args['γπ2-θηλ'] ~= '' and args['γπ2-θηλ'] ~= nil then
args['γπΛ-θηλ'] = args['mod-γπΛ-θηλ'] .. args['γπ2Λ-θηλ']
else
args['γπΛ-θηλ'] = args['mod-γπΛ-θηλ'] .. args['γπ2Λ-θηλ']
end
end
-- fem dat pl (like the other cases, NO movable n here)
-- zero ending
if args['δπ-θηλ'] == '0' then
args['mod-δπΛ-θηλ'] = args['δπΛκειμ1-θηλ']
.. create_link(args['δπθ-θηλ'], stem_color(args['δπθ+-θηλ'])) .. args['δπΛκειμ-θηλ']
end
if args['δπ2-θηλ'] == '0' then
args['δπ2Λ-θηλ'] = br .. args['δπ2Λκειμ1-θηλ']
.. create_link(args['δπ2θ-θηλ'], stem_color(args['δπ2θ+-θηλ'])) .. args['δπ2Λκειμ-θηλ']
end
-- first word
if args['δπ-θηλ'] ~= '-' and args['δπ-θηλ'] ~= '0' and args['δπ-θηλ'] ~= '' and args['δπ-θηλ'] ~= nil then
args['mod-δπΛ-θηλ'] = args['δπΛκειμ1-θηλ']
.. create_link(args['δπθ-θηλ'] .. args['δπ-θηλ'], stem_color(args['δπθ+-θηλ']) .. ending_color(args['δπ+-θηλ'])) .. args['δπΛκειμ-θηλ']
elseif args['δπ-θηλ'] == '-' then
args['mod-δπΛ-θηλ'] = args['δπΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δπΛκειμ-θηλ']
end
-- second word
if args['δπ2-θηλ'] ~= '-' and args['δπ2-θηλ'] ~= '0' and args['δπ2-θηλ'] ~= '' and args['δπ2-θηλ'] ~= nil then
args['δπ2Λ-θηλ'] = br .. args['δπ2Λκειμ1-θηλ']
.. create_link(args['δπ2θ-θηλ'] .. args['δπ2-θηλ'], stem_color(args['δπ2θ+-θηλ']) .. ending_color(args['δπ2+-θηλ'])) .. args['δπ2Λκειμ-θηλ']
elseif args['δπ2-θηλ'] == '-' then
args['δπ2Λ-θηλ'] = br .. args['δπ2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δπ2Λκειμ-θηλ']
end
-- option
if args['δπΛ-θηλ'] ~= '' and args['δπΛ-θηλ'] ~= nil then
args['δπΛ-θηλ'] = args['δπΛ-θηλ'] .. args['δπ2Λ-θηλ']
else
if args['δπ2-θηλ'] ~= '' and args['δπ2-θηλ'] ~= nil then
args['δπΛ-θηλ'] = args['mod-δπΛ-θηλ'] .. args['δπ2Λ-θηλ']
else
args['δπΛ-θηλ'] = args['mod-δπΛ-θηλ'] .. args['δπ2Λ-θηλ']
end
end
-- fem acc pl
-- zero ending
if args['απ-θηλ'] == '0' then
args['mod-απΛ-θηλ'] = args['απΛκειμ1-θηλ']
.. create_link(args['απθ-θηλ'], stem_color(args['απθ+-θηλ'])) .. args['απΛκειμ-θηλ']
end
if args['απ2-θηλ'] == '0' then
args['απ2Λ-θηλ'] = br .. args['απ2Λκειμ1-θηλ']
.. create_link(args['απ2θ-θηλ'], stem_color(args['απ2θ+-θηλ'])) .. args['απ2Λκειμ-θηλ']
end
-- first word
if args['απ-θηλ'] ~= '-' and args['απ-θηλ'] ~= '0' and args['απ-θηλ'] ~= '' and args['απ-θηλ'] ~= nil then
args['mod-απΛ-θηλ'] = args['απΛκειμ1-θηλ']
.. create_link(args['απθ-θηλ'] .. args['απ-θηλ'], stem_color(args['απθ+-θηλ']) .. ending_color(args['απ+-θηλ'])) .. args['απΛκειμ-θηλ']
elseif args['απ-θηλ'] == '-' then
args['mod-απΛ-θηλ'] = args['απΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['απΛκειμ-θηλ']
end
-- second word
if args['απ2-θηλ'] ~= '-' and args['απ2-θηλ'] ~= '0' and args['απ2-θηλ'] ~= '' and args['απ2-θηλ'] ~= nil then
args['απ2Λ-θηλ'] = br .. args['απ2Λκειμ1-θηλ']
.. create_link(args['απ2θ-θηλ'] .. args['απ2-θηλ'], stem_color(args['απ2θ+-θηλ']) .. ending_color(args['απ2+-θηλ'])) .. args['απ2Λκειμ-θηλ']
elseif args['απ2-θηλ'] == '-' then
args['απ2Λ-θηλ'] = br .. args['απ2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['απ2Λκειμ-θηλ']
end
-- option
if args['απΛ-θηλ'] ~= '' and args['απΛ-θηλ'] ~= nil then
args['απΛ-θηλ'] = args['απΛ-θηλ'] .. args['απ2Λ-θηλ']
else
if args['απ2-θηλ'] ~= '' and args['απ2-θηλ'] ~= nil then
args['απΛ-θηλ'] = args['mod-απΛ-θηλ'] .. args['απ2Λ-θηλ']
else
args['απΛ-θηλ'] = args['mod-απΛ-θηλ'] .. args['απ2Λ-θηλ']
end
end
-- fem voc pl
-- zero ending
if args['κπ-θηλ'] == '0' then
args['mod-κπΛ-θηλ'] = args['κπΛκειμ1-θηλ']
.. create_link(args['κπθ-θηλ'], stem_color(args['κπθ+-θηλ'])) .. args['κπΛκειμ-θηλ']
end
if args['κπ2-θηλ'] == '0' then
args['κπ2Λ-θηλ'] = br .. args['κπ2Λκειμ1-θηλ']
.. create_link(args['κπ2θ-θηλ'], stem_color(args['κπ2θ+-θηλ'])) .. args['κπ2Λκειμ-θηλ']
end
-- first word
if args['κπ-θηλ'] ~= '-' and args['κπ-θηλ'] ~= '0' and args['κπ-θηλ'] ~= '' and args['κπ-θηλ'] ~= nil then
args['mod-κπΛ-θηλ'] = args['κπΛκειμ1-θηλ']
.. create_link(args['κπθ-θηλ'] .. args['κπ-θηλ'], stem_color(args['κπθ+-θηλ']) .. ending_color(args['κπ+-θηλ'])) .. args['κπΛκειμ-θηλ']
elseif args['κπ-θηλ'] == '-' then
args['mod-κπΛ-θηλ'] = args['κπΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κπΛκειμ-θηλ']
end
-- second word
if args['κπ2-θηλ'] ~= '-' and args['κπ2-θηλ'] ~= '0' and args['κπ2-θηλ'] ~= '' and args['κπ2-θηλ'] ~= nil then
args['κπ2Λ-θηλ'] = br .. args['κπ2Λκειμ1-θηλ']
.. create_link(args['κπ2θ-θηλ'] .. args['κπ2-θηλ'], stem_color(args['κπ2θ+-θηλ']) .. ending_color(args['κπ2+-θηλ'])) .. args['κπ2Λκειμ-θηλ']
elseif args['κπ2-θηλ'] == '-' then
args['κπ2Λ-θηλ'] = br .. args['κπ2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κπ2Λκειμ-θηλ']
end
-- option
if args['κπΛ-θηλ'] ~= '' and args['κπΛ-θηλ'] ~= nil then
args['κπΛ-θηλ'] = args['κπΛ-θηλ'] .. args['κπ2Λ-θηλ']
else
if args['κπ2-θηλ'] ~= '' and args['κπ2-θηλ'] ~= nil then
args['κπΛ-θηλ'] = args['mod-κπΛ-θηλ'] .. args['κπ2Λ-θηλ']
else
args['κπΛ-θηλ'] = args['mod-κπΛ-θηλ'] .. args['κπ2Λ-θηλ']
end
end
-- FEM DUAL
-- fem nom.acc.voc du
-- zero ending
if args['οδ-θηλ'] == '0' then
args['mod-οδΛ-θηλ'] = args['οδΛκειμ1-θηλ']
.. create_link(args['οδθ-θηλ'], stem_color(args['οδθ+-θηλ'])) .. args['οδΛκειμ-θηλ']
end
if args['οδ2-θηλ'] == '0' then
args['οδ2Λ-θηλ'] = br .. args['οδ2Λκειμ1-θηλ']
.. create_link(args['οδ2θ-θηλ'], stem_color(args['οδ2θ+-θηλ'])) .. args['οδ2Λκειμ-θηλ']
end
-- first word
if args['οδ-θηλ'] ~= '-' and args['οδ-θηλ'] ~= '0' and args['οδ-θηλ'] ~= '' and args['οδ-θηλ'] ~= nil then
args['mod-οδΛ-θηλ'] = args['οδΛκειμ1-θηλ']
.. create_link(args['οδθ-θηλ'] .. args['οδ-θηλ'], stem_color(args['οδθ+-θηλ']) .. ending_color(args['οδ+-θηλ'])) .. args['οδΛκειμ-θηλ']
elseif args['οδ-θηλ'] == '-' then
args['mod-οδΛ-θηλ'] = args['οδΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οδΛκειμ-θηλ']
end
-- second word
if args['οδ2-θηλ'] ~= '-' and args['οδ2-θηλ'] ~= '0' and args['οδ2-θηλ'] ~= '' and args['οδ2-θηλ'] ~= nil then
args['οδ2Λ-θηλ'] = br .. args['οδ2Λκειμ1-θηλ']
.. create_link(args['οδ2θ-θηλ'] .. args['οδ2-θηλ'], stem_color(args['οδ2θ+-θηλ']) .. ending_color(args['οδ2+-θηλ'])) .. args['οδ2Λκειμ-θηλ']
elseif args['οδ2-θηλ'] == '-' then
args['οδ2Λ-θηλ'] = br .. args['οδ2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οδ2Λκειμ-θηλ']
end
-- option
if args['οδΛ-θηλ'] ~= '' and args['οδΛ-θηλ'] ~= nil then
args['οδΛ-θηλ'] = args['οδΛ-θηλ'] .. args['οδ2Λ-θηλ']
else
if args['οδ2-θηλ'] ~= '' and args['οδ2-θηλ'] ~= nil then
args['οδΛ-θηλ'] = args['mod-οδΛ-θηλ'] .. args['οδ2Λ-θηλ']
else
args['οδΛ-θηλ'] = args['mod-οδΛ-θηλ'] .. args['οδ2Λ-θηλ']
end
end
-- fem gen.dat du
-- zero ending
if args['γδ-θηλ'] == '0' then
args['mod-γδΛ-θηλ'] = args['γδΛκειμ1-θηλ']
.. create_link(args['γδθ-θηλ'], stem_color(args['γδθ+-θηλ'])) .. args['γδΛκειμ-θηλ']
end
if args['γδ2-θηλ'] == '0' then
args['γδ2Λ-θηλ'] = br .. args['γδ2Λκειμ1-θηλ']
.. create_link(args['γδ2θ-θηλ'], stem_color(args['γδ2θ+-θηλ'])) .. args['γδ2Λκειμ-θηλ']
end
-- first word
if args['γδ-θηλ'] ~= '-' and args['γδ-θηλ'] ~= '0' and args['γδ-θηλ'] ~= '' and args['γδ-θηλ'] ~= nil then
args['mod-γδΛ-θηλ'] = args['γδΛκειμ1-θηλ']
.. create_link(args['γδθ-θηλ'] .. args['γδ-θηλ'], stem_color(args['γδθ+-θηλ']) .. ending_color(args['γδ+-θηλ'])) .. args['γδΛκειμ-θηλ']
elseif args['γδ-θηλ'] == '-' then
args['mod-γδΛ-θηλ'] = args['γδΛκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γδΛκειμ-θηλ']
end
-- second word
if args['γδ2-θηλ'] ~= '-' and args['γδ2-θηλ'] ~= '0' and args['γδ2-θηλ'] ~= '' and args['γδ2-θηλ'] ~= nil then
args['γδ2Λ-θηλ'] = br .. args['γδ2Λκειμ1-θηλ']
.. create_link(args['γδ2θ-θηλ'] .. args['γδ2-θηλ'], stem_color(args['γδ2θ+-θηλ']) .. ending_color(args['γδ2+-θηλ'])) .. args['γδ2Λκειμ-θηλ']
elseif args['γδ2-θηλ'] == '-' then
args['γδ2Λ-θηλ'] = br .. args['γδ2Λκειμ1-θηλ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γδ2Λκειμ-θηλ']
end
-- option
if args['γδΛ-θηλ'] ~= '' and args['γδΛ-θηλ'] ~= nil then
args['γδΛ-θηλ'] = args['γδΛ-θηλ'] .. args['γδ2Λ-θηλ']
else
if args['γδ2-θηλ'] ~= '' and args['γδ2-θηλ'] ~= nil then
args['γδΛ-θηλ'] = args['mod-γδΛ-θηλ'] .. args['γδ2Λ-θηλ']
else
args['γδΛ-θηλ'] = args['mod-γδΛ-θηλ'] .. args['γδ2Λ-θηλ']
end
end
-- NEU ======================================================
-- neu nom sg
-- zero ending
if args['οε-ουδ'] == '0' then
args['mod-οεΛ-ουδ'] = args['οεΛκειμ1-ουδ']
.. create_link(args['οεθ-ουδ'], stem_color(args['οεθ+-ουδ'])) .. args['οεΛκειμ-ουδ']
end
if args['οε2-ουδ'] == '0' then
args['οε2Λ-ουδ'] = br .. args['οε2Λκειμ1-ουδ']
.. create_link(args['οε2θ-ουδ'], stem_color(args['οε2θ+-ουδ'])) .. args['οε2Λκειμ-ουδ']
end
-- first word
if args['οε-ουδ'] ~= '-' and args['οε-ουδ'] ~= '0' and args['οε-ουδ'] ~= '' and args['οε-ουδ'] ~= nil then
args['mod-οεΛ-ουδ'] = args['οεΛκειμ1-ουδ']
.. create_link(args['οεθ-ουδ'] .. args['οε-ουδ'], stem_color(args['οεθ+-ουδ']) .. ending_color(args['οε+-ουδ'])) .. args['οεΛκειμ-ουδ']
elseif args['οε-ουδ'] == '-' then
args['mod-οεΛ-ουδ'] = args['οεΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οεΛκειμ-ουδ']
end
-- second word
if args['οε2-ουδ'] ~= '-' and args['οε2-ουδ'] ~= '0' and args['οε2-ουδ'] ~= '' and args['οε2-ουδ'] ~= nil then
args['οε2Λ-ουδ'] = br .. args['οε2Λκειμ1-ουδ']
.. create_link(args['οε2θ-ουδ'] .. args['οε2-ουδ'], stem_color(args['οε2θ+-ουδ']) .. ending_color(args['οε2+-ουδ'])) .. args['οε2Λκειμ-ουδ']
elseif args['οε2-ουδ'] == '-' then
args['οε2Λ-ουδ'] = br .. args['οε2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οε2Λκειμ-ουδ']
end
-- option
if args['οεΛ-ουδ'] ~= '' and args['οεΛ-ουδ'] ~= nil then
args['οεΛ-ουδ'] = args['οεΛ-ουδ'] .. args['οε2Λ-ουδ']
else
if args['οε2-ουδ'] ~= '' and args['οε2-ουδ'] ~= nil then
args['οεΛ-ουδ'] = args['mod-οεΛ-ουδ'] .. args['οε2Λ-ουδ']
else
args['οεΛ-ουδ'] = args['mod-οεΛ-ουδ'] .. args['οε2Λ-ουδ']
end
end
-- neu gen sg
-- zero ending
if args['γε-ουδ'] == '0' then
args['mod-γεΛ-ουδ'] = args['γεΛκειμ1-ουδ']
.. create_link(args['γεθ-ουδ'], stem_color(args['γεθ+-ουδ'])) .. args['γεΛκειμ-ουδ']
end
if args['γε2-ουδ'] == '0' then
args['γε2Λ-ουδ'] = br .. args['γε2Λκειμ1-ουδ']
.. create_link(args['γε2θ-ουδ'], stem_color(args['γε2θ+-ουδ'])) .. args['γε2Λκειμ-ουδ']
end
-- first word
if args['γε-ουδ'] ~= '-' and args['γε-ουδ'] ~= '0' and args['γε-ουδ'] ~= '' and args['γε-ουδ'] ~= nil then
args['mod-γεΛ-ουδ'] = args['γεΛκειμ1-ουδ']
.. create_link(args['γεθ-ουδ'] .. args['γε-ουδ'], stem_color(args['γεθ+-ουδ']) .. ending_color(args['γε+-ουδ'])) .. args['γεΛκειμ-ουδ']
elseif args['γε-ουδ'] == '-' then
args['mod-γεΛ-ουδ'] = args['γεΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γεΛκειμ-ουδ']
end
-- second word
if args['γε2-ουδ'] ~= '-' and args['γε2-ουδ'] ~= '0' and args['γε2-ουδ'] ~= '' and args['γε2-ουδ'] ~= nil then
args['γε2Λ-ουδ'] = br .. args['γε2Λκειμ1-ουδ']
.. create_link(args['γε2θ-ουδ'] .. args['γε2-ουδ'], stem_color(args['γε2θ+-ουδ']) .. ending_color(args['γε2+-ουδ'])) .. args['γε2Λκειμ-ουδ']
elseif args['γε2-ουδ'] == '-' then
args['γε2Λ-ουδ'] = br .. args['γε2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γε2Λκειμ-ουδ']
end
-- option
if args['γεΛ-ουδ'] ~= '' and args['γεΛ-ουδ'] ~= nil then
args['γεΛ-ουδ'] = args['γεΛ-ουδ'] .. args['γε2Λ-ουδ']
else
if args['γε2-ουδ'] ~= '' and args['γε2-ουδ'] ~= nil then
args['γεΛ-ουδ'] = args['mod-γεΛ-ουδ'] .. args['γε2Λ-ουδ']
else
args['γεΛ-ουδ'] = args['mod-γεΛ-ουδ'] .. args['γε2Λ-ουδ']
end
end
-- neu dat sg
-- zero ending
if args['δε-ουδ'] == '0' then
args['mod-δεΛ-ουδ'] = args['δεΛκειμ1-ουδ']
.. create_link(args['δεθ-ουδ'], stem_color(args['δεθ+-ουδ'])) .. args['δεΛκειμ-ουδ']
end
if args['δε2-ουδ'] == '0' then
args['δε2Λ-ουδ'] = br .. args['δε2Λκειμ1-ουδ']
.. create_link(args['δε2θ-ουδ'], stem_color(args['δε2θ+-ουδ'])) .. args['δε2Λκειμ-ουδ']
end
-- first word
if args['δε-ουδ'] ~= '-' and args['δε-ουδ'] ~= '0' and args['δε-ουδ'] ~= '' and args['δε-ουδ'] ~= nil then
args['mod-δεΛ-ουδ'] = args['δεΛκειμ1-ουδ']
.. create_link(args['δεθ-ουδ'] .. args['δε-ουδ'], stem_color(args['δεθ+-ουδ']) .. ending_color(args['δε+-ουδ'])) .. args['δεΛκειμ-ουδ']
elseif args['δε-ουδ'] == '-' then
args['mod-δεΛ-ουδ'] = args['δεΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δεΛκειμ-ουδ']
end
-- second word
if args['δε2-ουδ'] ~= '-' and args['δε2-ουδ'] ~= '0' and args['δε2-ουδ'] ~= '' and args['δε2-ουδ'] ~= nil then
args['δε2Λ-ουδ'] = br .. args['δε2Λκειμ1-ουδ']
.. create_link(args['δε2θ-ουδ'] .. args['δε2-ουδ'], stem_color(args['δε2θ+-ουδ']) .. ending_color(args['δε2+-ουδ'])) .. args['δε2Λκειμ-ουδ']
elseif args['δε2-ουδ'] == '-' then
args['δε2Λ-ουδ'] = br .. args['δε2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δε2Λκειμ-ουδ']
end
-- option
if args['δεΛ-ουδ'] ~= '' and args['δεΛ-ουδ'] ~= nil then
args['δεΛ-ουδ'] = args['δεΛ-ουδ'] .. args['δε2Λ-ουδ']
else
if args['δε2-ουδ'] ~= '' and args['δε2-ουδ'] ~= nil then
args['δεΛ-ουδ'] = args['mod-δεΛ-ουδ'] .. args['δε2Λ-ουδ']
else
args['δεΛ-ουδ'] = args['mod-δεΛ-ουδ'] .. args['δε2Λ-ουδ']
end
end
-- neu acc sg
-- zero ending
if args['αε-ουδ'] == '0' then
args['mod-αεΛ-ουδ'] = args['αεΛκειμ1-ουδ']
.. create_link(args['αεθ-ουδ'], stem_color(args['αεθ+-ουδ'])) .. args['αεΛκειμ-ουδ']
end
if args['αε2-ουδ'] == '0' then
args['αε2Λ-ουδ'] = br .. args['αε2Λκειμ1-ουδ']
.. create_link(args['αε2θ-ουδ'], stem_color(args['αε2θ+-ουδ'])) .. args['αε2Λκειμ-ουδ']
end
-- first word
if args['αε-ουδ'] ~= '-' and args['αε-ουδ'] ~= '0' and args['αε-ουδ'] ~= '' and args['αε-ουδ'] ~= nil then
args['mod-αεΛ-ουδ'] = args['αεΛκειμ1-ουδ']
.. create_link(args['αεθ-ουδ'] .. args['αε-ουδ'], stem_color(args['αεθ+-ουδ']) .. ending_color(args['αε+-ουδ'])) .. args['αεΛκειμ-ουδ']
elseif args['αε-ουδ'] == '-' then
args['mod-αεΛ-ουδ'] = args['αεΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['αεΛκειμ-ουδ']
end
-- second word
if args['αε2-ουδ'] ~= '-' and args['αε2-ουδ'] ~= '0' and args['αε2-ουδ'] ~= '' and args['αε2-ουδ'] ~= nil then
args['αε2Λ-ουδ'] = br .. args['αε2Λκειμ1-ουδ']
.. create_link(args['αε2θ-ουδ'] .. args['αε2-ουδ'], stem_color(args['αε2θ+-ουδ']) .. ending_color(args['αε2+-ουδ'])) .. args['αε2Λκειμ-ουδ']
elseif args['αε2-ουδ'] == '-' then
args['αε2Λ-ουδ'] = br .. args['αε2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['αε2Λκειμ-ουδ']
end
-- option
if args['αεΛ-ουδ'] ~= '' and args['αεΛ-ουδ'] ~= nil then
args['αεΛ-ουδ'] = args['αεΛ-ουδ'] .. args['αε2Λ-ουδ']
else
if args['αε2-ουδ'] ~= '' and args['αε2-ουδ'] ~= nil then
args['αεΛ-ουδ'] = args['mod-αεΛ-ουδ'] .. args['αε2Λ-ουδ']
else
args['αεΛ-ουδ'] = args['mod-αεΛ-ουδ'] .. args['αε2Λ-ουδ']
end
end
-- neu voc sg
-- zero ending
if args['κε-ουδ'] == '0' then
args['mod-κεΛ-ουδ'] = args['κεΛκειμ1-ουδ']
.. create_link(args['κεθ-ουδ'], stem_color(args['κεθ+-ουδ'])) .. args['κεΛκειμ-ουδ']
end
if args['κε2-ουδ'] == '0' then
args['κε2Λ-ουδ'] = br .. args['κε2Λκειμ1-ουδ']
.. create_link(args['κε2θ-ουδ'], stem_color(args['κε2θ+-ουδ'])) .. args['κε2Λκειμ-ουδ']
end
-- first word
if args['κε-ουδ'] ~= '-' and args['κε-ουδ'] ~= '0' and args['κε-ουδ'] ~= '' and args['κε-ουδ'] ~= nil then
args['mod-κεΛ-ουδ'] = args['κεΛκειμ1-ουδ']
.. create_link(args['κεθ-ουδ'] .. args['κε-ουδ'], stem_color(args['κεθ+-ουδ']) .. ending_color(args['κε+-ουδ'])) .. args['κεΛκειμ-ουδ']
elseif args['κε-ουδ'] == '-' then
args['mod-κεΛ-ουδ'] = args['κεΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κεΛκειμ-ουδ']
end
-- second word
if args['κε2-ουδ'] ~= '-' and args['κε2-ουδ'] ~= '0' and args['κε2-ουδ'] ~= '' and args['κε2-ουδ'] ~= nil then
args['κε2Λ-ουδ'] = br .. args['κε2Λκειμ1-ουδ']
.. create_link(args['κε2θ-ουδ'] .. args['κε2-ουδ'], stem_color(args['κε2θ+-ουδ']) .. ending_color(args['κε2+-ουδ'])) .. args['κε2Λκειμ-ουδ']
elseif args['κε2-ουδ'] == '-' then
args['κε2Λ-ουδ'] = br .. args['κε2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κε2Λκειμ-ουδ']
end
-- option
if args['κεΛ-ουδ'] ~= '' and args['κεΛ-ουδ'] ~= nil then
args['κεΛ-ουδ'] = args['κεΛ-ουδ'] .. args['κε2Λ-ουδ']
else
if args['κε2-ουδ'] ~= '' and args['κε2-ουδ'] ~= nil then
args['κεΛ-ουδ'] = args['mod-κεΛ-ουδ'] .. args['κε2Λ-ουδ']
else
args['κεΛ-ουδ'] = args['mod-κεΛ-ουδ'] .. args['κε2Λ-ουδ']
end
end
-- NEU PLURAL +n movable at dative
-- neu nom pl
-- zero ending
if args['οπ-ουδ'] == '0' then
args['mod-οπΛ-ουδ'] = args['οπΛκειμ1-ουδ']
.. create_link(args['οπθ-ουδ'], stem_color(args['οπθ+-ουδ'])) .. args['οπΛκειμ-ουδ']
end
if args['οπ2-ουδ'] == '0' then
args['οπ2Λ-ουδ'] = br .. args['οπ2Λκειμ1-ουδ']
.. create_link(args['οπ2θ-ουδ'], stem_color(args['οπ2θ+-ουδ'])) .. args['οπ2Λκειμ-ουδ']
end
-- first word
if args['οπ-ουδ'] ~= '-' and args['οπ-ουδ'] ~= '0' and args['οπ-ουδ'] ~= '' and args['οπ-ουδ'] ~= nil then
args['mod-οπΛ-ουδ'] = args['οπΛκειμ1-ουδ']
.. create_link(args['οπθ-ουδ'] .. args['οπ-ουδ'], stem_color(args['οπθ+-ουδ']) .. ending_color(args['οπ+-ουδ'])) .. args['οπΛκειμ-ουδ']
elseif args['οπ-ουδ'] == '-' then
args['mod-οπΛ-ουδ'] = args['οπΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οπΛκειμ-ουδ']
end
-- second word
if args['οπ2-ουδ'] ~= '-' and args['οπ2-ουδ'] ~= '0' and args['οπ2-ουδ'] ~= '' and args['οπ2-ουδ'] ~= nil then
args['οπ2Λ-ουδ'] = br .. args['οπ2Λκειμ1-ουδ']
.. create_link(args['οπ2θ-ουδ'] .. args['οπ2-ουδ'], stem_color(args['οπ2θ+-ουδ']) .. ending_color(args['οπ2+-ουδ'])) .. args['οπ2Λκειμ-ουδ']
elseif args['οπ2-ουδ'] == '-' then
args['οπ2Λ-ουδ'] = br .. args['οπ2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οπ2Λκειμ-ουδ']
end
-- option
if args['οπΛ-ουδ'] ~= '' and args['οπΛ-ουδ'] ~= nil then
args['οπΛ-ουδ'] = args['οπΛ-ουδ'] .. args['οπ2Λ-ουδ']
else
if args['οπ2-ουδ'] ~= '' and args['οπ2-ουδ'] ~= nil then
args['οπΛ-ουδ'] = args['mod-οπΛ-ουδ'] .. args['οπ2Λ-ουδ']
else
args['οπΛ-ουδ'] = args['mod-οπΛ-ουδ'] .. args['οπ2Λ-ουδ']
end
end
-- neu gen pl
-- zero ending
if args['γπ-ουδ'] == '0' then
args['mod-γπΛ-ουδ'] = args['γπΛκειμ1-ουδ']
.. create_link(args['γπθ-ουδ'], stem_color(args['γπθ+-ουδ'])) .. args['γπΛκειμ-ουδ']
end
if args['γπ2-ουδ'] == '0' then
args['γπ2Λ-ουδ'] = br .. args['γπ2Λκειμ1-ουδ']
.. create_link(args['γπ2θ-ουδ'], stem_color(args['γπ2θ+-ουδ'])) .. args['γπ2Λκειμ-ουδ']
end
-- first word
if args['γπ-ουδ'] ~= '-' and args['γπ-ουδ'] ~= '0' and args['γπ-ουδ'] ~= '' and args['γπ-ουδ'] ~= nil then
args['mod-γπΛ-ουδ'] = args['γπΛκειμ1-ουδ']
.. create_link(args['γπθ-ουδ'] .. args['γπ-ουδ'], stem_color(args['γπθ+-ουδ']) .. ending_color(args['γπ+-ουδ'])) .. args['γπΛκειμ-ουδ']
elseif args['γπ-ουδ'] == '-' then
args['mod-γπΛ-ουδ'] = args['γπΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γπΛκειμ-ουδ']
end
-- second word
if args['γπ2-ουδ'] ~= '-' and args['γπ2-ουδ'] ~= '0' and args['γπ2-ουδ'] ~= '' and args['γπ2-ουδ'] ~= nil then
args['γπ2Λ-ουδ'] = br .. args['γπ2Λκειμ1-ουδ']
.. create_link(args['γπ2θ-ουδ'] .. args['γπ2-ουδ'], stem_color(args['γπ2θ+-ουδ']) .. ending_color(args['γπ2+-ουδ'])) .. args['γπ2Λκειμ-ουδ']
elseif args['γπ2-ουδ'] == '-' then
args['γπ2Λ-ουδ'] = br .. args['γπ2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γπ2Λκειμ-ουδ']
end
-- option
if args['γπΛ-ουδ'] ~= '' and args['γπΛ-ουδ'] ~= nil then
args['γπΛ-ουδ'] = args['γπΛ-ουδ'] .. args['γπ2Λ-ουδ']
else
if args['γπ2-ουδ'] ~= '' and args['γπ2-ουδ'] ~= nil then
args['γπΛ-ουδ'] = args['mod-γπΛ-ουδ'] .. args['γπ2Λ-ουδ']
else
args['γπΛ-ουδ'] = args['mod-γπΛ-ουδ'] .. args['γπ2Λ-ουδ']
end
end
-- neu dat pl + plus novable nu - νυ εφελκυστικόν
-- zero ending
if args['δπ-ουδ'] == '0' then
args['mod-δπΛ-ουδ'] = args['δπΛκειμ1-ουδ']
.. create_link(args['δπθ-ουδ'], stem_color(args['δπθ+-ουδ'])) .. args['δπΛκειμ-ουδ']
end
if args['δπ2-ουδ'] == '0' then
args['δπ2Λ-ουδ'] = br .. args['δπ2Λκειμ1-ουδ']
.. create_link(args['δπ2θ-ουδ'], stem_color(args['δπ2θ+-ουδ'])) .. args['δπ2Λκειμ-ουδ']
end
-- first word + movable nu option
if args['δπ-ουδ'] ~= '-' and args['δπ-ουδ'] ~= '0' and args['δπ-ουδ'] ~= '' and args['δπ-ουδ'] ~= nil then
if args['ν'] == '1' then
args['mod-δπΛ-ουδ'] = args['δπΛκειμ1-ουδ']
.. create_link(args['δπθ-ουδ'] .. args['δπ-ουδ'], stem_color(args['δπθ+-ουδ']) .. ending_color(args['δπ+-ουδ']))
.. create_link(args['δπθ-ουδ'] .. args['δπ-ουδ'] .. "ν", stem_color("(") .. ending_color("ν") .. stem_color(")"))
.. args['δπΛκειμ-ουδ']
else -- NO movable n
args['mod-δπΛ-ουδ'] = args['δπΛκειμ1-ουδ'] .. create_link(args['δπθ-ουδ'] .. args['δπ-ουδ'], stem_color(args['δπθ+-ουδ']) .. ending_color(args['δπ+-ουδ'])) .. args['δπΛκειμ-ουδ']
end -- close movable nu
elseif args['δπ-ουδ'] == '-' then
args['mod-δπΛ-ουδ'] = args['δπΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δπΛκειμ-ουδ']
end
-- second word at new line + movable nu2 option
if args['δπ2-ουδ'] ~= '-' and args['δπ2-ουδ'] ~= '0' and args['δπ2-ουδ'] ~= '' and args['δπ2-ουδ'] ~= nil then
if args['ν2'] == '1' then
args['δπ2Λ-ουδ'] = br .. args['δπ2Λκειμ1-ουδ']
.. create_link(args['δπ2θ-ουδ'] .. args['δπ2-ουδ'], stem_color(args['δπ2θ+-ουδ']) .. ending_color(args['δπ2+-ουδ']))
.. create_link(args['δπ2θ-ουδ'] .. args['δπ2-ουδ'] .. "ν", stem_color("(") .. ending_color("ν") .. stem_color(")"))
.. args['δπ2Λκειμ-ουδ']
else -- NO movable n2
args['δπ2Λ-ουδ'] = br .. args['δπ2Λκειμ1-ουδ'] .. create_link(args['δπ2θ-ουδ'] .. args['δπ2-ουδ'], stem_color(args['δπ2θ+-ουδ']) .. ending_color(args['δπ2+-ουδ'])) .. args['δπ2Λκειμ-ουδ']
end -- close movable nu2
elseif args['δπ2-ουδ'] == '-' then
args['δπ2Λ-ουδ'] = br .. args['δπ2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['δπ2Λκειμ-ουδ']
end
-- option
if args['δπΛ-ουδ'] ~= '' and args['δπΛ-ουδ'] ~= nil then
args['δπΛ-ουδ'] = args['δπΛ-ουδ'] .. args['δπ2Λ-ουδ']
else
if args['δπ2-ουδ'] ~= '' and args['δπ2-ουδ'] ~= nil then
args['δπΛ-ουδ'] = args['mod-δπΛ-ουδ'] .. args['δπ2Λ-ουδ']
else
args['δπΛ-ουδ'] = args['mod-δπΛ-ουδ'] .. args['δπ2Λ-ουδ']
end
end
-- neu acc pl
-- zero ending
if args['απ-ουδ'] == '0' then
args['mod-απΛ-ουδ'] = args['απΛκειμ1-ουδ']
.. create_link(args['απθ-ουδ'], stem_color(args['απθ+-ουδ'])) .. args['απΛκειμ-ουδ']
end
if args['απ2-ουδ'] == '0' then
args['απ2Λ-ουδ'] = br .. args['απ2Λκειμ1-ουδ']
.. create_link(args['απ2θ-ουδ'], stem_color(args['απ2θ+-ουδ'])) .. args['απ2Λκειμ-ουδ']
end
-- first word
if args['απ-ουδ'] ~= '-' and args['απ-ουδ'] ~= '0' and args['απ-ουδ'] ~= '' and args['απ-ουδ'] ~= nil then
args['mod-απΛ-ουδ'] = args['απΛκειμ1-ουδ']
.. create_link(args['απθ-ουδ'] .. args['απ-ουδ'], stem_color(args['απθ+-ουδ']) .. ending_color(args['απ+-ουδ'])) .. args['απΛκειμ-ουδ']
elseif args['απ-ουδ'] == '-' then
args['mod-απΛ-ουδ'] = args['απΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['απΛκειμ-ουδ']
end
-- second word
if args['απ2-ουδ'] ~= '-' and args['απ2-ουδ'] ~= '0' and args['απ2-ουδ'] ~= '' and args['απ2-ουδ'] ~= nil then
args['απ2Λ-ουδ'] = br .. args['απ2Λκειμ1-ουδ']
.. create_link(args['απ2θ-ουδ'] .. args['απ2-ουδ'], stem_color(args['απ2θ+-ουδ']) .. ending_color(args['απ2+-ουδ'])) .. args['απ2Λκειμ-ουδ']
elseif args['απ2-ουδ'] == '-' then
args['απ2Λ-ουδ'] = br .. args['απ2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['απ2Λκειμ-ουδ']
end
-- option
if args['απΛ-ουδ'] ~= '' and args['απΛ-ουδ'] ~= nil then
args['απΛ-ουδ'] = args['απΛ-ουδ'] .. args['απ2Λ-ουδ']
else
if args['απ2-ουδ'] ~= '' and args['απ2-ουδ'] ~= nil then
args['απΛ-ουδ'] = args['mod-απΛ-ουδ'] .. args['απ2Λ-ουδ']
else
args['απΛ-ουδ'] = args['mod-απΛ-ουδ'] .. args['απ2Λ-ουδ']
end
end
-- neu voc pl
-- zero ending
if args['κπ-ουδ'] == '0' then
args['mod-κπΛ-ουδ'] = args['κπΛκειμ1-ουδ']
.. create_link(args['κπθ-ουδ'], stem_color(args['κπθ+-ουδ'])) .. args['κπΛκειμ-ουδ']
end
if args['κπ2-ουδ'] == '0' then
args['κπ2Λ-ουδ'] = br .. args['κπ2Λκειμ1-ουδ']
.. create_link(args['κπ2θ-ουδ'], stem_color(args['κπ2θ+-ουδ'])) .. args['κπ2Λκειμ-ουδ']
end
-- first word
if args['κπ-ουδ'] ~= '-' and args['κπ-ουδ'] ~= '0' and args['κπ-ουδ'] ~= '' and args['κπ-ουδ'] ~= nil then
args['mod-κπΛ-ουδ'] = args['κπΛκειμ1-ουδ']
.. create_link(args['κπθ-ουδ'] .. args['κπ-ουδ'], stem_color(args['κπθ+-ουδ']) .. ending_color(args['κπ+-ουδ'])) .. args['κπΛκειμ-ουδ']
elseif args['κπ-ουδ'] == '-' then
args['mod-κπΛ-ουδ'] = args['κπΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κπΛκειμ-ουδ']
end
-- second word
if args['κπ2-ουδ'] ~= '-' and args['κπ2-ουδ'] ~= '0' and args['κπ2-ουδ'] ~= '' and args['κπ2-ουδ'] ~= nil then
args['κπ2Λ-ουδ'] = br .. args['κπ2Λκειμ1-ουδ']
.. create_link(args['κπ2θ-ουδ'] .. args['κπ2-ουδ'], stem_color(args['κπ2θ+-ουδ']) .. ending_color(args['κπ2+-ουδ'])) .. args['κπ2Λκειμ-ουδ']
elseif args['κπ2-ουδ'] == '-' then
args['κπ2Λ-ουδ'] = br .. args['κπ2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['κπ2Λκειμ-ουδ']
end
-- option
if args['κπΛ-ουδ'] ~= '' and args['κπΛ-ουδ'] ~= nil then
args['κπΛ-ουδ'] = args['κπΛ-ουδ'] .. args['κπ2Λ-ουδ']
else
if args['κπ2-ουδ'] ~= '' and args['κπ2-ουδ'] ~= nil then
args['κπΛ-ουδ'] = args['mod-κπΛ-ουδ'] .. args['κπ2Λ-ουδ']
else
args['κπΛ-ουδ'] = args['mod-κπΛ-ουδ'] .. args['κπ2Λ-ουδ']
end
end
-- NEU DUAL
-- neu nom.acc.voc du
-- zero ending
if args['οδ-ουδ'] == '0' then
args['mod-οδΛ-ουδ'] = args['οδΛκειμ1-ουδ']
.. create_link(args['οδθ-ουδ'], stem_color(args['οδθ+-ουδ'])) .. args['οδΛκειμ-ουδ']
end
if args['οδ2-ουδ'] == '0' then
args['οδ2Λ-ουδ'] = br .. args['οδ2Λκειμ1-ουδ']
.. create_link(args['οδ2θ-ουδ'], stem_color(args['οδ2θ+-ουδ'])) .. args['οδ2Λκειμ-ουδ']
end
-- first word
if args['οδ-ουδ'] ~= '-' and args['οδ-ουδ'] ~= '0' and args['οδ-ουδ'] ~= '' and args['οδ-ουδ'] ~= nil then
args['mod-οδΛ-ουδ'] = args['οδΛκειμ1-ουδ']
.. create_link(args['οδθ-ουδ'] .. args['οδ-ουδ'], stem_color(args['οδθ+-ουδ']) .. ending_color(args['οδ+-ουδ'])) .. args['οδΛκειμ-ουδ']
elseif args['οδ-ουδ'] == '-' then
args['mod-οδΛ-ουδ'] = args['οδΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οδΛκειμ-ουδ']
end
-- second word
if args['οδ2-ουδ'] ~= '-' and args['οδ2-ουδ'] ~= '0' and args['οδ2-ουδ'] ~= '' and args['οδ2-ουδ'] ~= nil then
args['οδ2Λ-ουδ'] = br .. args['οδ2Λκειμ1-ουδ']
.. create_link(args['οδ2θ-ουδ'] .. args['οδ2-ουδ'], stem_color(args['οδ2θ+-ουδ']) .. ending_color(args['οδ2+-ουδ'])) .. args['οδ2Λκειμ-ουδ']
elseif args['οδ2-ουδ'] == '-' then
args['οδ2Λ-ουδ'] = br .. args['οδ2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['οδ2Λκειμ-ουδ']
end
-- option
if args['οδΛ-ουδ'] ~= '' and args['οδΛ-ουδ'] ~= nil then
args['οδΛ-ουδ'] = args['οδΛ-ουδ'] .. args['οδ2Λ-ουδ']
else
if args['οδ2-ουδ'] ~= '' and args['οδ2-ουδ'] ~= nil then
args['οδΛ-ουδ'] = args['mod-οδΛ-ουδ'] .. args['οδ2Λ-ουδ']
else
args['οδΛ-ουδ'] = args['mod-οδΛ-ουδ'] .. args['οδ2Λ-ουδ']
end
end
-- neu gen.dat du
-- zero ending
if args['γδ-ουδ'] == '0' then
args['mod-γδΛ-ουδ'] = args['γδΛκειμ1-ουδ']
.. create_link(args['γδθ-ουδ'], stem_color(args['γδθ+-ουδ'])) .. args['γδΛκειμ-ουδ']
end
if args['γδ2-ουδ'] == '0' then
args['γδ2Λ-ουδ'] = br .. args['γδ2Λκειμ1-ουδ']
.. create_link(args['γδ2θ-ουδ'], stem_color(args['γδ2θ+-ουδ'])) .. args['γδ2Λκειμ-ουδ']
end
-- first word
if args['γδ-ουδ'] ~= '-' and args['γδ-ουδ'] ~= '0' and args['γδ-ουδ'] ~= '' and args['γδ-ουδ'] ~= nil then
args['mod-γδΛ-ουδ'] = args['γδΛκειμ1-ουδ']
.. create_link(args['γδθ-ουδ'] .. args['γδ-ουδ'], stem_color(args['γδθ+-ουδ']) .. ending_color(args['γδ+-ουδ'])) .. args['γδΛκειμ-ουδ']
elseif args['γδ-ουδ'] == '-' then
args['mod-γδΛ-ουδ'] = args['γδΛκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γδΛκειμ-ουδ']
end
-- second word
if args['γδ2-ουδ'] ~= '-' and args['γδ2-ουδ'] ~= '0' and args['γδ2-ουδ'] ~= '' and args['γδ2-ουδ'] ~= nil then
args['γδ2Λ-ουδ'] = br .. args['γδ2Λκειμ1-ουδ']
.. create_link(args['γδ2θ-ουδ'] .. args['γδ2-ουδ'], stem_color(args['γδ2θ+-ουδ']) .. ending_color(args['γδ2+-ουδ'])) .. args['γδ2Λκειμ-ουδ']
elseif args['γδ2-ουδ'] == '-' then
args['γδ2Λ-ουδ'] = br .. args['γδ2Λκειμ1-ουδ'] .. '<span style="text-align:center; color:#dddddd;">—</span>' .. args['γδ2Λκειμ-ουδ']
end
-- option
if args['γδΛ-ουδ'] ~= '' and args['γδΛ-ουδ'] ~= nil then
args['γδΛ-ουδ'] = args['γδΛ-ουδ'] .. args['γδ2Λ-ουδ']
else
if args['γδ2-ουδ'] ~= '' and args['γδ2-ουδ'] ~= nil then
args['γδΛ-ουδ'] = args['mod-γδΛ-ουδ'] .. args['γδ2Λ-ουδ']
else
args['γδΛ-ουδ'] = args['mod-γδΛ-ουδ'] .. args['γδ2Λ-ουδ']
end
end
end -- close function param
return {param = param}