Module:vv/param
Μετάβαση στην πλοήγηση
Πήδηση στην αναζήτηση
Documentation for this module may be created at Module:vv/param/τεκμηρίωση
-- modern greek adjectives/participles 2021.06. Sarri.greek
--------------------------------------------------------------------------
-- all parameters and functions for Modern Greek ADJECTIVES
--------------------------------------------------------------------------
-- INSTRUCTIONS:
-- Call if from a declension module 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_param = require ...
-- USE: local for the functions of THIS module
--#################################################### add zero endings see οε-ουδ
--------------------------------------------------------------------------
-- COPY HERE what is needed from the Module
--------------------------------------------------------------------------
-- 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)
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
--------------------------------------------------------------------------
-- ARRANGE the functions needed from the Module adding: local... and adding local args = {}
--------------------------------------------------------------------------
local function create_link (page, text)
local args = {}
if text then
return '[[' .. page .. '|' .. text .. ']]'
else
return '[[' .. page .. ']]'
end
end
--[[--------------------------< I S _ S E T >------------ By Trappist the monk at wikipedia.
Returns true if argument is set; false otherwise. Argument is 'set' when it exists (not nil) or when it is not an empty string.
]]
local function is_set (var)
return not (var == nil or var == '');
end
--------------------------------------------------------------------------
-- ========================MAIN FUNCTION================================ --
--------------------------------------------------------------------------
local function param (args)
-- lemma. is defined at subfunctions of specific declensions
-- stems in param function
local stemnumber
local stem = {}
if stemnumber == '' or stemnumber == nil then
stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-3)
else
stem["θ"] = stem["θ"]
end
local minusletters = args['μείον'] or ''
if args['μείον'] == '0' then stem["θ"] = mw.ustring.sub(args['λήμμα'],1,-1)
elseif args['μείον'] ~= '0' and args['μείον'] ~= '' and args['μείον'] ~= nil then
stemnumber = minusletters+1
end
-- ============== ALL PARAMETERS ============== --
-- various
args['float'] = args['float'] or ''
args['όπως'] = args['όπως'] or ''
args['ομάδα'] = args['ομάδα'] or ''
args['τύπος'] = args['τύπος'] or ''
-- STEMS masc
args['οεθ-αρσ'] = args['οεθ-αρσ'] or ''
args['γεθ-αρσ'] = args['γεθ-αρσ'] or ''
args['αεθ-αρσ'] = args['αεθ-αρσ'] or ''
args['κεθ-αρσ'] = args['κεθ-αρσ'] or ''
args['οπθ-αρσ'] = args['οπθ-αρσ'] or ''
args['γπθ-αρσ'] = args['γπθ-αρσ'] or ''
args['απθ-αρσ'] = args['απθ-αρσ'] or ''
args['κπθ-αρσ'] = args['κπθ-αρσ'] or ''
-- STEMS fem
args['οεθ-θηλ'] = args['οεθ-θηλ'] or ''
args['γεθ-θηλ'] = args['γεθ-θηλ'] or ''
args['αεθ-θηλ'] = args['αεθ-θηλ'] or ''
args['κεθ-θηλ'] = args['κεθ-θηλ'] or ''
args['οπθ-θηλ'] = args['οπθ-θηλ'] or ''
args['γπθ-θηλ'] = args['γπθ-θηλ'] or ''
args['απθ-θηλ'] = args['απθ-θηλ'] or ''
args['κπθ-θηλ'] = args['κπθ-θηλ'] or ''
-- STEMS neu
args['οεθ-ουδ'] = args['οεθ-ουδ'] or ''
args['γεθ-ουδ'] = args['γεθ-ουδ'] or ''
args['αεθ-ουδ'] = args['αεθ-ουδ'] or ''
args['κεθ-ουδ'] = args['κεθ-ουδ'] or ''
args['οπθ-ουδ'] = args['οπθ-ουδ'] or ''
args['γπθ-ουδ'] = args['γπθ-ουδ'] or ''
args['απθ-ουδ'] = args['απθ-ουδ'] or ''
args['κπθ-ουδ'] = args['κπθ-ουδ'] or ''
-- STEMS masc2
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 ''
-- STEMS fem2
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 ''
-- STEMS neu2
args['οε2θ-ουδ'] = args['οε2θ-ουδ'] or ''
args['γε2θ-ουδ'] = args['γε2θ-ουδ'] or ''
args['αε2θ-ουδ'] = args['αε2θ-ουδ'] or ''
args['κε2θ-ουδ'] = args['κε2θ-ουδ'] or ''
args['οπ2θ-ουδ'] = args['οπ2θ-ουδ'] or ''
args['γπ2θ-ουδ'] = args['γπ2θ-ουδ'] or ''
args['απ2θ-ουδ'] = args['απ2θ-ουδ'] or ''
args['κπ2θ-ουδ'] = args['κπ2θ-ουδ'] or ''
-- ENDINGS masc
args['οε-αρσ'] = args['οε-αρσ'] or ''
args['γε-αρσ'] = args['γε-αρσ'] or ''
args['αε-αρσ'] = args['αε-αρσ'] or ''
args['κε-αρσ'] = args['κε-αρσ'] or ''
args['οπ-αρσ'] = args['οπ-αρσ'] or ''
args['γπ-αρσ'] = args['γπ-αρσ'] or ''
args['απ-αρσ'] = args['απ-αρσ'] or ''
args['κπ-αρσ'] = args['κπ-αρσ'] or ''
-- ENDINGS fem
args['οε-θηλ'] = args['οε-θηλ'] or ''
args['γε-θηλ'] = args['γε-θηλ'] or ''
args['αε-θηλ'] = args['αε-θηλ'] or ''
args['κε-θηλ'] = args['κε-θηλ'] or ''
args['οπ-θηλ'] = args['οπ-θηλ'] or ''
args['γπ-θηλ'] = args['γπ-θηλ'] or ''
args['απ-θηλ'] = args['απ-θηλ'] or ''
args['κπ-θηλ'] = args['κπ-θηλ'] or ''
-- ENDINGS neu
args['οε-ουδ'] = args['οε-ουδ'] or ''
args['γε-ουδ'] = args['γε-ουδ'] or ''
args['αε-ουδ'] = args['αε-ουδ'] or ''
args['κε-ουδ'] = args['κε-ουδ'] or ''
args['οπ-ουδ'] = args['οπ-ουδ'] or ''
args['γπ-ουδ'] = args['γπ-ουδ'] or ''
args['απ-ουδ'] = args['απ-ουδ'] or ''
args['κπ-ουδ'] = args['κπ-ουδ'] or ''
-- ENDINGS2 masc
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 ''
-- ENDINGS2 fem
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 ''
-- ENDINGS2 neu
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 stem needs extra letters
args['πρόσφ'] = args['πρόσφ'] or ''
args['πρόσφ2'] = args['πρόσφ2'] or ''
-- first word
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 ''
-- add a repetitive term at the beginning or at the end of each cell:
args['κοινό1'] = args['κοινό1'] or ''
args['κοινό'] = args['κοινό'] or ''
-- 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 ''
-- 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 ''
-- STEMS auto default
-- 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
-- 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
-- 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
-- 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
-- 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
-- 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
-- MASC infix for gen-sg, acc-sg
if args['οε-αρσ'] ~= '-' and args['οε-αρσ'] ~= '0' and args['οε-αρσ'] ~= '' and args['οε-αρσ'] ~= nil then
args['οεΛαρσ'] = create_link((args['οεθ-αρσ'] .. args['οε-αρσ']), (stem_color(args['οεθ-αρσ']) .. ending_color(args['οε-αρσ']))) .. ' ' .. args['οεΛαρσ+']
elseif args['οε-αρσ'] == '0' then -- zero ending e.g. [[τρέχων]]
args['οεΛαρσ'] = create_link((args['οεθ-αρσ']), (stem_color(args['οεθ-αρσ']))) .. ' ' .. args['οεΛαρσ+']
elseif args['οε-αρσ'] == '-' then
args['οεΛαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οεΛαρσ+']
end
if args['γε-αρσ'] ~= '-' and args['γε-αρσ'] ~= '0' and args['γε-αρσ'] ~= '' and args['γε-αρσ'] ~= nil then
args['γεΛαρσ'] = create_link((args['γεθ-αρσ'] .. args['πρόσφ'] .. args['γε-αρσ']), (stem_color(args['γεθ-αρσ']) .. infix_color(args['πρόσφ']) .. ending_color(args['γε-αρσ']))) .. ' ' .. args['γεΛαρσ+']
elseif args['γε-αρσ'] == '0' then -- zero ending hyphothetical
args['γεΛαρσ'] = create_link((args['γεθ-αρσ'] .. args['πρόσφ']), (stem_color(args['γεθ-αρσ']) .. infix_color(args['πρόσφ']))) .. ' ' .. args['γεΛαρσ+']
elseif args['γε-αρσ'] == '-' then
args['γεΛαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γεΛαρσ+']
end
if args['αε-αρσ'] ~= '-' and args['αε-αρσ'] ~= '0' and args['αε-αρσ'] ~= '' and args['αε-αρσ'] ~= nil then
args['αεΛαρσ'] = create_link((args['αεθ-αρσ'] .. args['πρόσφ'] .. args['αε-αρσ']), (stem_color(args['αεθ-αρσ']) .. infix_color(args['πρόσφ']) .. ending_color(args['αε-αρσ']))) .. ' ' .. args['αεΛαρσ+']
elseif args['αε-αρσ'] == '0' then -- zero ending hyphothetical
args['αεΛαρσ'] = create_link((args['αεθ-αρσ'] .. args['πρόσφ']), (stem_color(args['αεθ-αρσ']) .. infix_color(args['πρόσφ']))) .. ' ' .. args['αεΛαρσ+']
elseif args['αε-αρσ'] == '-' then
args['αεΛαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['αεΛαρσ+']
end
if args['κε-αρσ'] ~= '-' and args['κε-αρσ'] ~= '0' and args['κε-αρσ'] ~= '' and args['κε-αρσ'] ~= nil then
args['κεΛαρσ'] = create_link((args['κεθ-αρσ'] .. args['κε-αρσ']), (stem_color(args['κεθ-αρσ']) .. ending_color(args['κε-αρσ']))) .. ' ' .. args['κεΛαρσ+']
elseif args['κε-αρσ'] == '0' then -- zero ending e.g. [[τρέχων]]
args['κεΛαρσ'] = create_link((args['κεθ-αρσ']), (stem_color(args['κεθ-αρσ']))) .. ' ' .. args['κεΛαρσ+']
elseif args['κε-αρσ'] == '-' then
args['κεΛαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κεΛαρσ+']
end
-- infix for gen-pl, acc-pl
if args['οπ-αρσ'] ~= '-' and args['οπ-αρσ'] ~= '' and args['οπ-αρσ'] ~= nil then
args['οπΛαρσ'] = create_link((args['οπθ-αρσ'] .. args['οπ-αρσ']), (stem_color(args['οπθ-αρσ']) .. ending_color(args['οπ-αρσ']))) .. ' ' .. args['οπΛαρσ+']
elseif args['οπ-αρσ'] == '-' then
args['οπΛαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οπΛαρσ+']
end
if args['γπ-αρσ'] ~= '-' and args['γπ-αρσ'] ~= '' and args['γπ-αρσ'] ~= nil then
args['γπΛαρσ'] = create_link((args['γπθ-αρσ'] .. args['πρόσφ'] .. args['γπ-αρσ']), (stem_color(args['γπθ-αρσ']) .. infix_color(args['πρόσφ']) .. ending_color(args['γπ-αρσ']))) .. ' ' .. args['γπΛαρσ+']
elseif args['γπ-αρσ'] == '-' then
args['γπΛαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γπΛαρσ+']
end
if args['απ-αρσ'] ~= '-' and args['απ-αρσ'] ~= '' and args['απ-αρσ'] ~= nil then
args['απΛαρσ'] = create_link((args['απθ-αρσ'] .. args['πρόσφ'] .. args['απ-αρσ']), (stem_color(args['απθ-αρσ']) .. infix_color(args['πρόσφ']) .. ending_color(args['απ-αρσ']))) .. ' ' .. args['απΛαρσ+']
elseif args['απ-αρσ'] == '-' then
args['απΛαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['απΛαρσ+']
end
if args['κπ-αρσ'] ~= '-' and args['κπ-αρσ'] ~= '' and args['κπ-αρσ'] ~= nil then
args['κπΛαρσ'] = create_link((args['κπθ-αρσ'] .. args['κπ-αρσ']), (stem_color(args['κπθ-αρσ']) .. ending_color(args['κπ-αρσ']))) .. ' ' .. args['κπΛαρσ+']
elseif args['κπ-αρσ'] == '-' then
args['κπΛαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κπΛαρσ+']
end
-- FEM infix for gen-sg, acc-sg
if args['οε-θηλ'] ~= '-' and args['οε-θηλ'] ~= '' and args['οε-θηλ'] ~= nil then
args['οεΛθηλ'] = create_link((args['οεθ-θηλ'] .. args['οε-θηλ']), (stem_color(args['οεθ-θηλ']) .. ending_color(args['οε-θηλ']))) .. ' ' .. args['οεΛθηλ+']
elseif args['οε-θηλ'] == '-' then
args['οεΛθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οεΛθηλ+']
end
if args['γε-θηλ'] ~= '-' and args['γε-θηλ'] ~= '' and args['γε-θηλ'] ~= nil then
args['γεΛθηλ'] = create_link((args['γεθ-θηλ'] .. args['πρόσφ'] .. args['γε-θηλ']), (stem_color(args['γεθ-θηλ']) .. infix_color(args['πρόσφ']) .. ending_color(args['γε-θηλ']))) .. ' ' .. args['γεΛθηλ+']
elseif args['γε-θηλ'] == '-' then
args['γεΛθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γεΛθηλ+']
end
if args['αε-θηλ'] ~= '-' and args['αε-θηλ'] ~= '' and args['αε-θηλ'] ~= nil then
args['αεΛθηλ'] = create_link((args['αεθ-θηλ'] .. args['πρόσφ'] .. args['αε-θηλ']), (stem_color(args['αεθ-θηλ']) .. infix_color(args['πρόσφ']) .. ending_color(args['αε-θηλ']))) .. ' ' .. args['αεΛθηλ+']
elseif args['αε-θηλ'] == '-' then
args['αεΛθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['αεΛθηλ+']
end
if args['κε-θηλ'] ~= '-' and args['κε-θηλ'] ~= '' and args['κε-θηλ'] ~= nil then
args['κεΛθηλ'] = create_link((args['κεθ-θηλ'] .. args['κε-θηλ']), (stem_color(args['κεθ-θηλ']) .. ending_color(args['κε-θηλ']))) .. ' ' .. args['κεΛθηλ+']
elseif args['κε-θηλ'] == '-' then
args['κεΛθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κεΛθηλ+']
end
-- infix for gen-pl, acc-pl
if args['οπ-θηλ'] ~= '-' and args['οπ-θηλ'] ~= '' and args['οπ-θηλ'] ~= nil then
args['οπΛθηλ'] = create_link((args['οπθ-θηλ'] .. args['οπ-θηλ']), (stem_color(args['οπθ-θηλ']) .. ending_color(args['οπ-θηλ']))) .. ' ' .. args['οπΛθηλ+']
elseif args['οπ-θηλ'] == '-' then
args['οπΛθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οπΛθηλ+']
end
if args['γπ-θηλ'] ~= '-' and args['γπ-θηλ'] ~= '' and args['γπ-θηλ'] ~= nil then
args['γπΛθηλ'] = create_link((args['γπθ-θηλ'] .. args['πρόσφ'] .. args['γπ-θηλ']), (stem_color(args['γπθ-θηλ']) .. infix_color(args['πρόσφ']) .. ending_color(args['γπ-θηλ']))) .. ' ' .. args['γπΛθηλ+']
elseif args['γπ-θηλ'] == '-' then
args['γπΛθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γπΛθηλ+']
end
if args['απ-θηλ'] ~= '-' and args['απ-θηλ'] ~= '' and args['απ-θηλ'] ~= nil then
args['απΛθηλ'] = create_link((args['απθ-θηλ'] .. args['πρόσφ'] .. args['απ-θηλ']), (stem_color(args['απθ-θηλ']) .. infix_color(args['πρόσφ']) .. ending_color(args['απ-θηλ']))) .. ' ' .. args['απΛθηλ+']
elseif args['απ-θηλ'] == '-' then
args['απΛθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['απΛθηλ+']
end
if args['κπ-θηλ'] ~= '-' and args['κπ-θηλ'] ~= '' and args['κπ-θηλ'] ~= nil then
args['κπΛθηλ'] = create_link((args['κπθ-θηλ'] .. args['κπ-θηλ']), (stem_color(args['κπθ-θηλ']) .. ending_color(args['κπ-θηλ']))) .. ' ' .. args['κπΛθηλ+']
elseif args['κπ-θηλ'] == '-' then
args['κπΛθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κπΛθηλ+']
end
-- NEU infix for gen-sg, acc-sg
if args['οε-ουδ'] ~= '-' and args['οε-ουδ'] ~= '0' and args['οε-ουδ'] ~= '' and args['οε-ουδ'] ~= nil then
args['οεΛουδ'] = create_link((args['οεθ-ουδ'] .. args['οε-ουδ']), (stem_color(args['οεθ-ουδ']) .. ending_color(args['οε-ουδ']))) .. ' ' .. args['οεΛουδ+']
elseif args['οε-ουδ'] == '0' then -- zero ending e.g. [[τρέχων]]
args['οεΛουδ'] = create_link((args['οεθ-ουδ']), (stem_color(args['οεθ-ουδ']))) .. ' ' .. args['οεΛουδ+']
elseif args['οε-ουδ'] == '-' then
args['οεΛουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οεΛουδ+']
end
if args['γε-ουδ'] ~= '-' and args['γε-ουδ'] ~= '0' and args['γε-ουδ'] ~= '' and args['γε-ουδ'] ~= nil then
args['γεΛουδ'] = create_link((args['γεθ-ουδ'] .. args['πρόσφ'] .. args['γε-ουδ']), (stem_color(args['γεθ-ουδ']) .. infix_color(args['πρόσφ']) .. ending_color(args['γε-ουδ']))) .. ' ' .. args['γεΛουδ+']
elseif args['γε-ουδ'] == '0' then -- zero ending hyphothetical
args['γεΛουδ'] = create_link((args['γεθ-ουδ'] .. args['πρόσφ']), (stem_color(args['γεθ-ουδ']) .. infix_color(args['πρόσφ']))) .. ' ' .. args['γεΛουδ+']
elseif args['γε-ουδ'] == '-' then
args['γεΛουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γεΛουδ+']
end
if args['αε-ουδ'] ~= '-' and args['αε-ουδ'] ~= '0' and args['αε-ουδ'] ~= '' and args['αε-ουδ'] ~= nil then
args['αεΛουδ'] = create_link((args['αεθ-ουδ'] .. args['πρόσφ'] .. args['αε-ουδ']), (stem_color(args['αεθ-ουδ']) .. infix_color(args['πρόσφ']) .. ending_color(args['αε-ουδ']))) .. ' ' .. args['αεΛουδ+']
elseif args['αε-ουδ'] == '0' then -- zero ending e.g. [[τρέχων]]
args['αεΛουδ'] = create_link((args['αεθ-ουδ'] .. args['πρόσφ']), (stem_color(args['αεθ-ουδ']) .. infix_color(args['πρόσφ']))) .. ' ' .. args['αεΛουδ+']
elseif args['αε-ουδ'] == '-' then
args['αεΛουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['αεΛουδ+']
end
if args['κε-ουδ'] ~= '-' and args['κε-ουδ'] ~= '0' and args['κε-ουδ'] ~= '' and args['κε-ουδ'] ~= nil then
args['κεΛουδ'] = create_link((args['κεθ-ουδ'] .. args['κε-ουδ']), (stem_color(args['κεθ-ουδ']) .. ending_color(args['κε-ουδ']))) .. ' ' .. args['κεΛουδ+']
elseif args['κε-ουδ'] == '0' then -- zero ending e.g. [[τρέχων]]
args['κεΛουδ'] = create_link((args['κεθ-ουδ']), (stem_color(args['κεθ-ουδ']))) .. ' ' .. args['κεΛουδ+']
elseif args['κε-ουδ'] == '-' then
args['κεΛουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κεΛουδ+']
end
-- infix for nom-pl, gen-pl, acc-pl, voc pl
if args['οπ-ουδ'] ~= '-' and args['οπ-ουδ'] ~= '' and args['οπ-ουδ'] ~= nil then
args['οπΛουδ'] = create_link((args['οπθ-ουδ'] .. args['πρόσφ'] .. args['οπ-ουδ']), (stem_color(args['οπθ-ουδ']) .. infix_color(args['πρόσφ']) .. ending_color(args['οπ-ουδ']))) .. ' ' .. args['οπΛουδ+']
elseif args['οπ-ουδ'] == '-' then
args['οπΛουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οπΛουδ+']
end
if args['γπ-ουδ'] ~= '-' and args['γπ-ουδ'] ~= '' and args['γπ-ουδ'] ~= nil then
args['γπΛουδ'] = create_link((args['γπθ-ουδ'] .. args['πρόσφ'] .. args['γπ-ουδ']), (stem_color(args['γπθ-ουδ']) .. infix_color(args['πρόσφ']) .. ending_color(args['γπ-ουδ']))) .. ' ' .. args['γπΛουδ+']
elseif args['γπ-ουδ'] == '-' then
args['γπΛουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γπΛουδ+']
end
if args['απ-ουδ'] ~= '-' and args['απ-ουδ'] ~= '' and args['απ-ουδ'] ~= nil then
args['απΛουδ'] = create_link((args['απθ-ουδ'] .. args['πρόσφ'] .. args['απ-ουδ']), (stem_color(args['απθ-ουδ']) .. infix_color(args['πρόσφ']) .. ending_color(args['απ-ουδ']))) .. ' ' .. args['απΛουδ+']
elseif args['απ-ουδ'] == '-' then
args['απΛουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['απΛουδ+']
end
if args['κπ-ουδ'] ~= '-' and args['κπ-ουδ'] ~= '' and args['κπ-ουδ'] ~= nil then
args['κπΛουδ'] = create_link((args['κπθ-ουδ'] .. args['πρόσφ'] .. args['κπ-ουδ']), (stem_color(args['κπθ-ουδ']) .. infix_color(args['πρόσφ']) .. ending_color(args['κπ-ουδ']))) .. ' ' .. args['κπΛουδ+']
elseif args['κπ-ουδ'] == '-' then
args['κπΛουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κπΛουδ+']
end
-- second words different line
-- με πρόσφ2, δεύτερο θέμα, σε άλλη γραμμή.
-- MASC2 infix for gen-sg, acc-sg
if args['οε2-αρσ'] ~= '-' and args['οε2-αρσ'] ~= '' and args['οε2-αρσ'] ~= nil then
args['οε2Λαρσ'] = '<br />& ' .. create_link((args['οε2θ-αρσ'] .. args['οε2-αρσ']), (stem_color(args['οε2θ-αρσ']) .. ending_color(args['οε2-αρσ']))) .. ' ' .. args['οε2Λαρσ+']
elseif args['οε2-αρσ'] == '-' then
args['οε2Λαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οε2Λαρσ+']
end
if args['γε2-αρσ'] ~= '-' and args['γε2-αρσ'] ~= '' and args['γε2-αρσ'] ~= nil then
args['γε2Λαρσ'] = '<br />& ' .. create_link((args['γε2θ-αρσ'] .. args['πρόσφ2'] .. args['γε2-αρσ']), (stem_color(args['γε2θ-αρσ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['γε2-αρσ']))) .. ' ' .. args['γε2Λαρσ+']
elseif args['γε2-αρσ'] == '-' then
args['γε2Λαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γε2Λαρσ+']
end
if args['αε2-αρσ'] ~= '-' and args['αε2-αρσ'] ~= '' and args['αε2-αρσ'] ~= nil then
args['αε2Λαρσ'] = '<br />& ' .. create_link((args['αε2θ-αρσ'] .. args['πρόσφ2'] .. args['αε2-αρσ']), (stem_color(args['αε2θ-αρσ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['αε2-αρσ']))) .. ' ' .. args['αε2Λαρσ+']
elseif args['αε2-αρσ'] == '-' then
args['αε2Λαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['αε2Λαρσ+']
end
if args['κε2-αρσ'] ~= '-' and args['κε2-αρσ'] ~= '' and args['κε2-αρσ'] ~= nil then
args['κε2Λαρσ'] = '<br />& ' .. create_link((args['κε2θ-αρσ'] .. args['κε2-αρσ']), (stem_color(args['κε2θ-αρσ']) .. ending_color(args['κε2-αρσ']))) .. ' ' .. args['κε2Λαρσ+']
elseif args['κε2-αρσ'] == '-' then
args['κε2Λαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κε2Λαρσ+']
end
-- infix for gen-pl, acc-pl
if args['οπ2-αρσ'] ~= '-' and args['οπ2-αρσ'] ~= '' and args['οπ2-αρσ'] ~= nil then
args['οπ2Λαρσ'] = '<br />& ' .. create_link((args['οπ2θ-αρσ'] .. args['οπ2-αρσ']), (stem_color(args['οπ2θ-αρσ']) .. ending_color(args['οπ2-αρσ']))) .. ' ' .. args['οπ2Λαρσ+']
elseif args['οπ2-αρσ'] == '-' then
args['οπ2Λαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οπ2Λαρσ+']
end
if args['γπ2-αρσ'] ~= '-' and args['γπ2-αρσ'] ~= '' and args['γπ2-αρσ'] ~= nil then
args['γπ2Λαρσ'] = '<br />& ' .. create_link((args['γπ2θ-αρσ'] .. args['πρόσφ2'] .. args['γπ2-αρσ']), (stem_color(args['γπ2θ-αρσ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['γπ2-αρσ']))) .. ' ' .. args['γπ2Λαρσ+']
elseif args['γπ2-αρσ'] == '-' then
args['γπ2Λαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γπ2Λαρσ+']
end
if args['απ2-αρσ'] ~= '-' and args['απ2-αρσ'] ~= '' and args['απ2-αρσ'] ~= nil then
args['απ2Λαρσ'] = '<br />& ' .. create_link((args['απ2θ-αρσ'] .. args['πρόσφ2'] .. args['απ2-αρσ']), (stem_color(args['απ2θ-αρσ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['απ2-αρσ']))) .. ' ' .. args['απ2Λαρσ+']
elseif args['απ2-αρσ'] == '-' then
args['απ2Λαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['απ2Λαρσ+']
end
if args['κπ2-αρσ'] ~= '-' and args['κπ2-αρσ'] ~= '' and args['κπ2-αρσ'] ~= nil then
args['κπ2Λαρσ'] = '<br />& ' .. create_link((args['κπ2θ-αρσ'] .. args['κπ2-αρσ']), (stem_color(args['κπ2θ-αρσ']) .. ending_color(args['κπ2-αρσ']))) .. ' ' .. args['κπ2Λαρσ+']
elseif args['κπ2-αρσ'] == '-' then
args['κπ2Λαρσ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κπ2Λαρσ+']
end
-- FEM2 infix for gen-sg, acc-sg
if args['οε2-θηλ'] ~= '-' and args['οε2-θηλ'] ~= '' and args['οε2-θηλ'] ~= nil then
args['οε2Λθηλ'] = '<br />& ' .. create_link((args['οε2θ-θηλ'] .. args['οε2-θηλ']), (stem_color(args['οε2θ-θηλ']) .. ending_color(args['οε2-θηλ']))) .. ' ' .. args['οε2Λθηλ+']
elseif args['οε2-θηλ'] == '-' then
args['οε2Λθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οε2Λθηλ+']
end
if args['γε2-θηλ'] ~= '-' and args['γε2-θηλ'] ~= '' and args['γε2-θηλ'] ~= nil then
args['γε2Λθηλ'] = '<br />& ' .. create_link((args['γε2θ-θηλ'] .. args['πρόσφ2'] .. args['γε2-θηλ']), (stem_color(args['γε2θ-θηλ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['γε2-θηλ']))) .. ' ' .. args['γε2Λθηλ+']
elseif args['γε2-θηλ'] == '-' then
args['γε2Λθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γε2Λθηλ+']
end
if args['αε2-θηλ'] ~= '-' and args['αε2-θηλ'] ~= '' and args['αε2-θηλ'] ~= nil then
args['αε2Λθηλ'] = '<br />& ' .. create_link((args['αε2θ-θηλ'] .. args['πρόσφ2'] .. args['αε2-θηλ']), (stem_color(args['αε2θ-θηλ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['αε2-θηλ']))) .. ' ' .. args['αε2Λθηλ+']
elseif args['αε2-θηλ'] == '-' then
args['αε2Λθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['αε2Λθηλ+']
end
if args['κε2-θηλ'] ~= '-' and args['κε2-θηλ'] ~= '' and args['κε2-θηλ'] ~= nil then
args['κε2Λθηλ'] = '<br />& ' .. create_link((args['κε2θ-θηλ'] .. args['κε2-θηλ']), (stem_color(args['κε2θ-θηλ']) .. ending_color(args['κε2-θηλ']))) .. ' ' .. args['κε2Λθηλ+']
elseif args['κε2-θηλ'] == '-' then
args['κε2Λθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κε2Λθηλ+']
end
-- infix for gen-pl, acc-pl
if args['οπ2-θηλ'] ~= '-' and args['οπ2-θηλ'] ~= '' and args['οπ2-θηλ'] ~= nil then
args['οπ2Λθηλ'] = '<br />& ' .. create_link((args['οπ2θ-θηλ'] .. args['οπ2-θηλ']), (stem_color(args['οπ2θ-θηλ']) .. ending_color(args['οπ2-θηλ']))) .. ' ' .. args['οπ2Λθηλ+']
elseif args['οπ2-θηλ'] == '-' then
args['οπ2Λθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οπ2Λθηλ+']
end
if args['γπ2-θηλ'] ~= '-' and args['γπ2-θηλ'] ~= '' and args['γπ2-θηλ'] ~= nil then
args['γπ2Λθηλ'] = '<br />& ' .. create_link((args['γπ2θ-θηλ'] .. args['πρόσφ2'] .. args['γπ2-θηλ']), (stem_color(args['γπ2θ-θηλ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['γπ2-θηλ']))) .. ' ' .. args['γπ2Λθηλ+']
elseif args['γπ2-θηλ'] == '-' then
args['γπ2Λθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γπ2Λθηλ+']
end
if args['απ2-θηλ'] ~= '-' and args['απ2-θηλ'] ~= '' and args['απ2-θηλ'] ~= nil then
args['απ2Λθηλ'] = '<br />& ' .. create_link((args['απ2θ-θηλ'] .. args['πρόσφ2'] .. args['απ2-θηλ']), (stem_color(args['απ2θ-θηλ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['απ2-θηλ']))) .. ' ' .. args['απ2Λθηλ+']
elseif args['απ2-θηλ'] == '-' then
args['απ2Λθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['απ2Λθηλ+']
end
if args['κπ2-θηλ'] ~= '-' and args['κπ2-θηλ'] ~= '' and args['κπ2-θηλ'] ~= nil then
args['κπ2Λθηλ'] = '<br />& ' .. create_link((args['κπ2θ-θηλ'] .. args['κπ2-θηλ']), (stem_color(args['κπ2θ-θηλ']) .. ending_color(args['κπ2-θηλ']))) .. ' ' .. args['κπ2Λθηλ+']
elseif args['κπ2-θηλ'] == '-' then
args['κπ2Λθηλ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κπ2Λθηλ+']
end
-- NEU2 infix for gen-sg, acc-sg
if args['οε2-ουδ'] ~= '-' and args['οε2-ουδ'] ~= '' and args['οε2-ουδ'] ~= nil then
args['οε2Λουδ'] = '<br />& ' .. create_link((args['οε2θ-ουδ'] .. args['οε2-ουδ']), (stem_color(args['οε2θ-ουδ']) .. ending_color(args['οε2-ουδ']))) .. ' ' .. args['οε2Λουδ+']
elseif args['οε2-ουδ'] == '-' then
args['οε2Λουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οε2Λουδ+']
end
if args['γε2-ουδ'] ~= '-' and args['γε2-ουδ'] ~= '' and args['γε2-ουδ'] ~= nil then
args['γε2Λουδ'] = '<br />& ' .. create_link((args['γε2θ-ουδ'] .. args['πρόσφ2'] .. args['γε2-ουδ']), (stem_color(args['γε2θ-ουδ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['γε2-ουδ']))) .. ' ' .. args['γε2Λουδ+']
elseif args['γε2-ουδ'] == '-' then
args['γε2Λουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γε2Λουδ+']
end
if args['αε2-ουδ'] ~= '-' and args['αε2-ουδ'] ~= '' and args['αε2-ουδ'] ~= nil then
args['αε2Λουδ'] = '<br />& ' .. create_link((args['αε2θ-ουδ'] .. args['πρόσφ2'] .. args['αε2-ουδ']), (stem_color(args['αε2θ-ουδ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['αε2-ουδ']))) .. ' ' .. args['αε2Λουδ+']
elseif args['αε2-ουδ'] == '-' then
args['αε2Λουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['αε2Λουδ+']
end
if args['κε2-ουδ'] ~= '-' and args['κε2-ουδ'] ~= '' and args['κε2-ουδ'] ~= nil then
args['κε2Λουδ'] = '<br />& ' .. create_link((args['κε2θ-ουδ'] .. args['κε2-ουδ']), (stem_color(args['κε2θ-ουδ']) .. ending_color(args['κε2-ουδ']))) .. ' ' .. args['κε2Λουδ+']
elseif args['κε2-ουδ'] == '-' then
args['κε2Λουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κε2Λουδ+']
end
-- infix for nom-pl, gen-pl, acc-pl, voc pl
if args['οπ2-ουδ'] ~= '-' and args['οπ2-ουδ'] ~= '' and args['οπ2-ουδ'] ~= nil then
args['οπ2Λουδ'] = '<br />& ' .. create_link((args['οπ2θ-ουδ'] .. args['πρόσφ2'] .. args['οπ2-ουδ']), (stem_color(args['οπ2θ-ουδ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['οπ2-ουδ']))) .. ' ' .. args['οπ2Λουδ+']
elseif args['οπ2-ουδ'] == '-' then
args['οπ2Λουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['οπ2Λουδ+']
end
if args['γπ2-ουδ'] ~= '-' and args['γπ2-ουδ'] ~= '' and args['γπ2-ουδ'] ~= nil then
args['γπ2Λουδ'] = '<br />& ' .. create_link((args['γπ2θ-ουδ'] .. args['πρόσφ2'] .. args['γπ2-ουδ']), (stem_color(args['γπ2θ-ουδ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['γπ2-ουδ']))) .. ' ' .. args['γπ2Λουδ+']
elseif args['γπ2-ουδ'] == '-' then
args['γπ2Λουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['γπ2Λουδ+']
end
if args['απ2-ουδ'] ~= '-' and args['απ2-ουδ'] ~= '' and args['απ2-ουδ'] ~= nil then
args['απ2Λουδ'] = '<br />& ' .. create_link((args['απ2θ-ουδ'] .. args['πρόσφ2'] .. args['απ2-ουδ']), (stem_color(args['απ2θ-ουδ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['απ2-ουδ']))) .. ' ' .. args['απ2Λουδ+']
elseif args['απ2-ουδ'] == '-' then
args['απ2Λουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['απ2Λουδ+']
end
if args['κπ2-ουδ'] ~= '-' and args['κπ2-ουδ'] ~= '' and args['κπ2-ουδ'] ~= nil then
args['κπ2Λουδ'] = '<br />& ' .. create_link((args['κπ2θ-ουδ'] .. args['πρόσφ2'] .. args['κπ2-ουδ']), (stem_color(args['κπ2θ-ουδ']) .. infix_color(args['πρόσφ2']) .. ending_color(args['κπ2-ουδ']))) .. ' ' .. args['κπ2Λουδ+']
elseif args['κπ2-ουδ'] == '-' then
args['κπ2Λουδ'] = '<span style="text-align:center; color:#dddddd;">—</span>' .. ' ' .. args['κπ2Λουδ+']
end
-- TOGETHER
-- m
args['οεΛαρσ'] = args['οεΛαρσ'] .. args['οε2Λαρσ']
args['γεΛαρσ'] = args['γεΛαρσ'] .. args['γε2Λαρσ']
args['αεΛαρσ'] = args['αεΛαρσ'] .. args['αε2Λαρσ']
args['κεΛαρσ'] = args['κεΛαρσ'] .. args['κε2Λαρσ']
args['οπΛαρσ'] = args['οπΛαρσ'] .. args['οπ2Λαρσ']
args['γπΛαρσ'] = args['γπΛαρσ'] .. args['γπ2Λαρσ']
args['απΛαρσ'] = args['απΛαρσ'] .. args['απ2Λαρσ']
args['κπΛαρσ'] = args['κπΛαρσ'] .. args['κπ2Λαρσ']
-- f
args['οεΛθηλ'] = args['οεΛθηλ'] .. args['οε2Λθηλ']
args['γεΛθηλ'] = args['γεΛθηλ'] .. args['γε2Λθηλ']
args['αεΛθηλ'] = args['αεΛθηλ'] .. args['αε2Λθηλ']
args['κεΛθηλ'] = args['κεΛθηλ'] .. args['κε2Λθηλ']
args['οπΛθηλ'] = args['οπΛθηλ'] .. args['οπ2Λθηλ']
args['γπΛθηλ'] = args['γπΛθηλ'] .. args['γπ2Λθηλ']
args['απΛθηλ'] = args['απΛθηλ'] .. args['απ2Λθηλ']
args['κπΛθηλ'] = args['κπΛθηλ'] .. args['κπ2Λθηλ']
-- n
args['οεΛουδ'] = args['οεΛουδ'] .. args['οε2Λουδ']
args['γεΛουδ'] = args['γεΛουδ'] .. args['γε2Λουδ']
args['αεΛουδ'] = args['αεΛουδ'] .. args['αε2Λουδ']
args['κεΛουδ'] = args['κεΛουδ'] .. args['κε2Λουδ']
args['οπΛουδ'] = args['οπΛουδ'] .. args['οπ2Λουδ']
args['γπΛουδ'] = args['γπΛουδ'] .. args['γπ2Λουδ']
args['απΛουδ'] = args['απΛουδ'] .. args['απ2Λουδ']
args['κπΛουδ'] = args['κπΛουδ'] .. args['κπ2Λουδ']
end -- close function param
return {param = param}