See element sect
subsect
(subhead , (routinelist | (p | table | figure | mdefs) * ) , subsubsubsect * )
subsubsect |_(subhead, |__(routinelist | |___(p | |____table | |____figure | |____mdefs)*), |__subsubsubsect*)