is_invalid_gmsh_msh1_file Function

private elemental function is_invalid_gmsh_msh1_file(mesh_data)

Checks if the read gmsh_msh1_data_type is invalid.

Arguments

Type IntentOptional Attributes Name
type(gmsh_msh1_data_type), intent(in) :: mesh_data

Return Value logical


Calls

proc~~is_invalid_gmsh_msh1_file~~CallsGraph proc~is_invalid_gmsh_msh1_file is_invalid_gmsh_msh1_file proc~all_flag all_flag proc~is_invalid_gmsh_msh1_file->proc~all_flag proc~is_iostat_failure is_iostat_failure proc~is_invalid_gmsh_msh1_file->proc~is_iostat_failure proc~is_stat_failure is_stat_failure proc~is_invalid_gmsh_msh1_file->proc~is_stat_failure

Called by

proc~~is_invalid_gmsh_msh1_file~~CalledByGraph proc~is_invalid_gmsh_msh1_file is_invalid_gmsh_msh1_file interface~is_invalid is_invalid interface~is_invalid->proc~is_invalid_gmsh_msh1_file

Source Code

    elemental function is_invalid_gmsh_msh1_file(mesh_data)

        type(gmsh_msh1_data_type), intent(in) :: mesh_data

        logical :: is_invalid_gmsh_msh1_file



        is_invalid_gmsh_msh1_file = &!
            &              is_stat_failure   ( mesh_data%status )   &!
            & .or.         is_iostat_failure ( mesh_data%status )   &!
            & .or. ( .not. all_flag          ( mesh_data        ) )

    end function  is_invalid_gmsh_msh1_file