MaterialProp_ Derived Type

type, public :: MaterialProp_

Components

Type	Visibility	Attributes		Name		Initial
type(Mesh_),	public		::	Mesh
real(kind=real64),	public,	allocatable	::	meshPara(:,:)
real(kind=real64),	public		::	x_max
real(kind=real64),	public		::	x_min
real(kind=real64),	public		::	y_max
real(kind=real64),	public		::	y_min
real(kind=real64),	public		::	z_max
real(kind=real64),	public		::	z_min
real(kind=real64),	public		::	t_max
real(kind=real64),	public		::	t_min
integer(kind=int32),	public		::	Mcount
integer(kind=int32),	public		::	layer
character(len=200),	public		::	Name	=	" "
real(kind=real64),	public,	allocatable	::	MatPara(:,:)
integer(kind=int32),	public		::	NumOfMatPara
integer(kind=int32),	public		::	NumOfMaterial
character(len=40),	public		::	MaterialType	=	" "
character(len=70),	public		::	ErrorMsg	=	" "

Type-Bound Procedures

procedure, public :: Init => initializeMaterial

public subroutine initializeMaterial(obj, MaterialParameters)

Arguments

Type	Intent	Optional	Attributes		Name
class(MaterialProp_),	intent(inout)			::	obj
real(kind=real64),	intent(inout),	optional	allocatable	::	MaterialParameters(:,:)

procedure, public :: export => exportMaterialProp

public subroutine exportMaterialProp(obj, restart, path)

Arguments

Type	Intent	Optional	Attributes		Name
class(MaterialProp_),	intent(inout)			::	obj
logical,	intent(in),	optional		::	restart
character(len=*),	intent(in)			::	path

procedure, public :: save => saveMaterialProp

public subroutine saveMaterialProp(obj, path, name)

Arguments

Type	Intent	Optional	Attributes		Name
class(MaterialProp_),	intent(inout)			::	obj
character(len=*),	intent(in)			::	path
character(len=*),	intent(in),	optional		::	name

procedure, public :: Delete => DeallocateMaterialProp

public subroutine DeallocateMaterialProp(obj)

Arguments

Type Intent Optional Attributes Name

class(MaterialProp_), intent(inout) :: obj

procedure, public :: create => createMaterialProp

public subroutine createMaterialProp(obj, Name, x_max, x_min, y_max, y_min, z_max, z_min, t_max, t_min, ParaValue, Layer)

Arguments

Type	Intent	Optional	Attributes		Name
class(MaterialProp_),	intent(inout)			::	obj
character(len=*),	intent(in),	optional		::	Name
real(kind=real64),	intent(in),	optional		::	x_max
real(kind=real64),	intent(in),	optional		::	x_min
real(kind=real64),	intent(in),	optional		::	y_max
real(kind=real64),	intent(in),	optional		::	y_min
real(kind=real64),	intent(in),	optional		::	z_max
real(kind=real64),	intent(in),	optional		::	z_min
real(kind=real64),	intent(in),	optional		::	t_max
real(kind=real64),	intent(in),	optional		::	t_min
real(kind=real64),	intent(in),	optional		::	ParaValue
integer(kind=int32),	intent(in),	optional		::	Layer

procedure, public :: set => setMaterialProp

public subroutine setMaterialProp(obj, x_max, x_min, y_max, y_min, z_max, z_min, t_max, t_min, ParaValue, Layer)

Arguments

Type	Intent	Optional	Attributes		Name
class(MaterialProp_),	intent(inout)			::	obj
real(kind=real64),	intent(in),	optional		::	x_max
real(kind=real64),	intent(in),	optional		::	x_min
real(kind=real64),	intent(in),	optional		::	y_max
real(kind=real64),	intent(in),	optional		::	y_min
real(kind=real64),	intent(in),	optional		::	z_max
real(kind=real64),	intent(in),	optional		::	z_min
real(kind=real64),	intent(in),	optional		::	t_max
real(kind=real64),	intent(in),	optional		::	t_min
real(kind=real64),	intent(in),	optional		::	ParaValue
integer(kind=int32),	intent(in),	optional		::	Layer

procedure, public :: gmsh => gmshMaterialProp

public subroutine gmshMaterialProp(obj, Name, Tag)

Arguments

Type	Intent	Optional	Attributes		Name
class(MaterialProp_),	intent(inout)			::	obj
character(len=*),	intent(in),	optional		::	Name
character(len=*),	intent(in),	optional		::	Tag

procedure, public :: show => showMaterialProp

public subroutine showMaterialProp(obj)

Arguments

Type Intent Optional Attributes Name

class(MaterialProp_), intent(inout) :: obj

procedure, public :: getValues => getValuesMaterialProp

public subroutine getValuesMaterialProp(obj, mesh, Values)

Arguments

Type	Intent	Optional	Attributes		Name
class(MaterialProp_),	intent(in)			::	obj
type(Mesh_),	intent(in)			::	mesh
real(kind=real64),	intent(inout),		allocatable	::	Values(:)

procedure, public :: remove => removeMaterialProp

public subroutine removeMaterialProp(obj)

Arguments

Type Intent Optional Attributes Name

class(MaterialProp_), intent(inout) :: obj

procedure, public :: open => openMaterialProp

public subroutine openMaterialProp(obj, path, name)

Arguments

Type	Intent	Optional	Attributes		Name
class(MaterialProp_),	intent(inout)			::	obj
character(len=*),	intent(in)			::	path
character(len=*),	intent(in),	optional		::	name