Initiate

This method initiates an instance of domain by reading the mesh-file in HDF5File_ format.

Interface

Interface

INTERFACE
  MODULE SUBROUTINE Initiate(obj, hdf5, group)
    CLASS(FEDomain_), INTENT(INOUT) :: obj
    !! DomainData object
    TYPE(HDF5File_), INTENT(INOUT) :: hdf5
    !! HDF5 file
    CHARACTER(*), INTENT(IN) :: group
    !! Group name (directory name)
  END SUBROUTINE Initiate
END INTERFACE

example

PROGRAM main
USE easifemBase
USE easifemClasses
USE FEDomain_Class
IMPLICIT NONE
TYPE(FEDomain_) :: dom
TYPE(HDF5File_) :: meshfile
CHARACTER(*), PARAMETER :: filename = &
  & "../../Mesh/examples/meshdata/small_mesh.h5"

CALL meshfile%Initiate(filename, mode="READ")
CALL meshfile%OPEN()
CALL dom%Initiate(meshfile, '')
CALL dom%Display("domain:")

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

↢ close