method
has_subsection name =
List
.mem_assoc name subsections