Checks if the derived type is valid.
Warning
The number must be a positive (non-zero) integer.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(gmsh_msh1_number_type), | intent(in) | :: | number |
elemental function validate_gmsh_msh1_number(number) result(is_valid) class(gmsh_msh1_number_type), intent(in) :: number logical :: is_valid is_valid = number%number .gt. 0 end function validate_gmsh_msh1_number