Free all options.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(section), | intent(inout) | :: | self | Section data. |
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