method add_subsection label item = subsections <- subsections@[label,item]