Return the options number.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(section), | intent(in) | :: | self | Section data. |
Options number.
elemental function options_number(self)
!< Return the options number.
class(section), intent(in) :: self !< Section data.
integer(I4P) :: options_number !< Options number.
options_number = 0
if (allocated(self%options)) options_number = size(self%options, dim=1)
endfunction options_number