ImportFEMDomain Subroutine

public subroutine ImportFEMDomain(obj, OptionalFileFormat, OptionalProjectName, FileHandle, Mesh, Boundaries, Boundary, Materials, Material, NumberOfBoundaries, BoundaryID, NumberOfMaterials, MaterialID, node, element, materialinfo, dirichlet, neumann, file)

print , "Project : ",ProjectName print , "is Exported as : ",FileFormat," format" print *, "File Name is : ",FileName

print ,obj%Boundary%DBoundNodID(j,i) print ,obj%Boundary%DBoundVal(j,i) print *, "ERROR :: ExportFEMDomain >> only .scf file can be exported."

Arguments

Type IntentOptional AttributesName
class(FEMDomain_), intent(inout) :: obj
character(len=4), intent(in), optional :: OptionalFileFormat
character(len=*), intent(in), optional :: OptionalProjectName
integer, intent(in), optional :: FileHandle
type(Mesh_), intent(in), optional :: Mesh
logical, intent(in), optional :: Boundaries
type(Boundary_), intent(in), optional :: Boundary
logical, intent(in), optional :: Materials
type(MaterialProp_), intent(in), optional :: Material
integer, intent(in), optional :: NumberOfBoundaries
integer, intent(in), optional :: BoundaryID
integer, intent(in), optional :: NumberOfMaterials
integer, intent(in), optional :: MaterialID
logical, intent(in), optional :: node
logical, intent(in), optional :: element
logical, intent(in), optional :: materialinfo
logical, intent(in), optional :: dirichlet
logical, intent(in), optional :: neumann
character(len=*), intent(in), optional :: file

Contents

None