Recognize structural tables, rejecting unknown empty groups.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | path |
logical function grouped_layout_table(path) result(known) character(len=*), intent(in) :: path select case (path) case ('') known = .true. case ('fields') known = .true. case ('fields.external') known = .true. case ('fields.periodic') known = .true. case ('fields.periodic.reference') known = .true. case ('fields.periodic.upper_fourier') known = .true. case ('fields.solver') known = .true. case ('fields.solver.tree') known = .true. case ('mesh') known = .true. case ('output') known = .true. case ('output.checkpoint') known = .true. case ('output.diagnostics') known = .true. case ('output.final') known = .true. case ('output.history') known = .true. case ('particles') known = .true. case ('particles.boundary') known = .true. case ('particles.raycast') known = .true. case ('particles.reservoir') known = .true. case ('particles.secondary_emission') known = .true. case ('particles.species') known = .true. case ('particles.species.charging') known = .true. case ('particles.species.distribution') known = .true. case ('particles.species.sampling') known = .true. case ('particles.species.source') known = .true. case ('particles.species.surface_interaction') known = .true. case ('particles.species.surface_interaction.secondary_emission') known = .true. case ('particles.tracking') known = .true. case ('particles.tracking.events') known = .true. case ('run') known = .true. case ('run.batch') known = .true. case ('run.batch.adaptive') known = .true. case ('run.restart') known = .true. case ('sheath') known = .true. case ('sheath.coupling') known = .true. case ('sheath.photoelectrons') known = .true. case ('sheath.species') known = .true. case ('sheath.zhao') known = .true. case default known = .false. end select end function grouped_layout_table