-- Subfunctions for this module that are called from the style modules

local ppp = {}



function ppp.colhead(ttt,width,text)

	-- For individual column headers

	local head_string

	if width=='auto' then

		head_string = '! scope="col" |'..text..'\n'

	else

		head_string = '! scope="col" width='..width..'|'..text..'\n'

	end



	ttt.count = ttt.count+1

	table.insert(ttt.tab_text,head_string)

	

	return ttt

end



function ppp.hth(frame,Args,full_table,hth_id_list,hth_local,notes_exist,team_list,team_code_ii,ii_start,ii_end,rand_val)

	-- For head-to-head notes

	local hth_string,hth_local_num, hth_id

	

	-- Check whether there is a head-to-head note or not, if so get text ready for it the same way as for the notes

	if hth_local and full_table then

		-- Set global check for notes to true

		notes_exist = true

		if not Args'hth_'..hth_local then

			-- Option 1

			-- Now define the identifier for this

			hth_id = '"table_hth_'..team_code_ii..rand_val..'"' -- Add random end for unique ID if more tables are present on article (which might otherwise share an ID)

			hth_id_listteam_code_ii = hth_id

			-- Call refn template

			hth_string = frame:expandTemplate{ title = 'efn', args = { group='Table_notes',  name=hth_id, hth_local} }

		else 

			-- Option 2

			hth_local_num = team_listhth_local

			if hth_id_listhth_local or ((hth_local_num >= ii_start) and (hth_local_num <= ii_end)) then

				-- Option 2a

				hth_id = '"table_hth_'..hth_local..rand_val..'"'

				hth_string = frame:extensionTag{ name = 'ref', args = { group = 'lower-alpha', name = hth_id} }

			else

				-- Option 2b

				hth_id = '"table_hth_'..hth_local..rand_val..'"' -- Add random end for unique ID

				hth_id_listhth_local = hth_id

				-- Call refn template

				hth_string = frame:expandTemplate{ title = 'efn', args = { group='Table_notes',  name=hth_id, Args'hth_'..hth_local]} }

			end

		end

	else

		hth_string = '';

	end

	

	return {str=hth_string, list=hth_id_list, notes_exist=notes_exist}

end



return ppp