DisplayMeshInfo

Inheritence

This method is inherited from the AbstractMesh class.

DisplayMeshInfo

Displays concise summary information about the mesh.

Interfac

INTERFACE
  MODULE SUBROUTINE DisplayMeshInfo(obj, msg, unitno)
    CLASS(AbstractMesh_), INTENT(INOUT) :: obj
    CHARACTER(*), INTENT(IN) :: msg
    INTEGER(I4B), OPTIONAL, INTENT(IN) :: unitno
  END SUBROUTINE DisplayMeshInfo
END INTERFACE

Arguments

• obj: The AbstractMesh_ object to display information about
• msg: A message to display at the beginning of the output
• unitno: Optional output unit number (defaults to stdout if not provided)

Description

This method provides a brief summary of the mesh's key statistics, including:

• Total number of nodes
• Total number of elements
• Total number of edges
• Total number of faces

The output is formatted with equal lines before and after the statistics for better readability. This method is useful for quickly getting an overview of the mesh size without the detailed information provided by other display methods.

Example 1

Display method of FEMesh.

!> author: Vikas Sharma, Ph. D.
! date: 2025-06-01
! summary:  DisplayMeshInfo method is tested  in this example.

PROGRAM main
USE FEMesh_Class, only: FEMesh_
USE HDF5File_Class, only: HDF5File_
USE GlobalData, ONLY: I4B
USE Test_Method, ONLY: OK

IMPLICIT NONE

TYPE(FEMesh_) :: obj
TYPE(HDF5File_) :: meshfile
CHARACTER(LEN=*), PARAMETER :: filename = "./meshdata/small_tri6_mesh.h5"

INTEGER(I4B), PARAMETER :: nsd = 2

CALL meshfile%Initiate(FileName=filename, MODE="READ")
CALL meshfile%OPEN()
CALL obj%Initiate(hdf5=meshfile, dim=nsd)
CALL obj%DisplayMeshInfo("FEMesh")

CALL obj%DEALLOCATE()
CALL meshfile%DEALLOCATE()
END PROGRAM main

The result of this example is given below.

results

FEMesh
==============================
total nodes: 37
total elements: 14
tEdges: 0
tFaces: 25
==============================