free_options Subroutine

private elemental subroutine free_options(self)

Free all options.

Arguments

TypeIntentOptionalAttributesName
class(section), intent(inout) :: self

Section data.


Contents

Source Code


Source Code

  elemental subroutine free_options(self)
  !< Free all options.
  class(section), intent(inout) :: self !< Section data.

  if (allocated(self%options)) then
    call self%options%free
    deallocate(self%options)
  endif
  endsubroutine free_options