validate_gmsh_msh1_reg_phys Function

private elemental function validate_gmsh_msh1_reg_phys(reg_phys) result(is_valid)

Checks if the derived type is valid.

Warning

The expression must be a positive integer, or zero.

Note

If expression is equal to zero, the element is considered not to belong to any physical entity.

Arguments

Type IntentOptional Attributes Name
type(gmsh_msh1_reg_phys_type), intent(in) :: reg_phys

Return Value logical


Called by

proc~~validate_gmsh_msh1_reg_phys~~CalledByGraph proc~validate_gmsh_msh1_reg_phys validate_gmsh_msh1_reg_phys interface~validate validate interface~validate->proc~validate_gmsh_msh1_reg_phys proc~validate_gmsh_msh1_data validate_gmsh_msh1_data interface~validate->proc~validate_gmsh_msh1_data proc~validate_gmsh_msh1_element_without_mesh_data validate_gmsh_msh1_element_without_mesh_data interface~validate->proc~validate_gmsh_msh1_element_without_mesh_data proc~validate_gmsh_msh1_node validate_gmsh_msh1_node interface~validate->proc~validate_gmsh_msh1_node proc~validate_gmsh_msh1_element_with_mesh_data_public validate_gmsh_msh1_element_with_mesh_data_public interface~validate->proc~validate_gmsh_msh1_element_with_mesh_data_public proc~validate_gmsh_msh1_data->interface~validate proc~validate_gmsh_msh1_element_with_mesh_data_private validate_gmsh_msh1_element_with_mesh_data_private proc~validate_gmsh_msh1_data->proc~validate_gmsh_msh1_element_with_mesh_data_private proc~validate_gmsh_msh1_element_with_mesh_data_private->interface~validate proc~validate_gmsh_msh1_element_without_mesh_data->interface~validate proc~validate_gmsh_msh1_node->interface~validate proc~validate_gmsh_msh1_element_with_mesh_data_public->proc~validate_gmsh_msh1_element_with_mesh_data_private

Source Code

    elemental function validate_gmsh_msh1_reg_phys(reg_phys) result(is_valid)

        type(gmsh_msh1_reg_phys_type), intent(in) :: reg_phys

        logical :: is_valid



        is_valid = reg_phys%expression .ge. 0

    end function validate_gmsh_msh1_reg_phys