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