main Program

Uses

- FEMDomainClass
- DiffusionEquationClass

Variables

Type	Attributes		Name		Initial
type(DiffusionEq_)		::	solver
type(FEMDomain_)		::	cube(4)
real(kind=real64),	allocatable	::	c(:)
real(kind=real64),	allocatable	::	DiffusionCoeff(:)
real(kind=real64),	allocatable	::	Reaction(:)
real(kind=real64),	allocatable	::	FixValue(:)
real(kind=real64),	allocatable	::	C_n(:)
integer(kind=int32),	allocatable	::	FixBoundary(:)
integer(kind=int32)		::	itr
integer(kind=int32)		::	offset
type(Random_)		::	random
real(kind=real64)		::	Length
real(kind=real64)		::	epsi
type(IO_)		::	f

Functions

function sin_function(x, params) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	x(:)
real(kind=real64),	intent(in),	optional		::	params(:)

Return Value real(kind=real64)

function analytical_solution(x, params) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	x(:)
real(kind=real64),	intent(in),	optional		::	params(:)

Return Value real(kind=real64)