main Program

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(:)
real(kind=real64), allocatable :: x(:)
integer(kind=int32), allocatable :: FixBoundary(:)
integer(kind=int32) :: itr
integer(kind=int32) :: offset
integer(kind=int32) :: max_itr
real(kind=real64) :: Length
real(kind=real64) :: epsi
real(kind=real64) :: dt
real(kind=real64) :: penalty
real(kind=real64) :: d
real(kind=real64) :: AL_lambda
real(kind=real64) :: AL_tol
real(kind=real64) :: AL_alpha
type(IO_) :: f
logical :: passed
type(Scene_) :: scene
type(Factory_) :: factory
type(COO_) :: coo
type(CRS_) :: crs
real(kind=real64) :: test(2,3)

Functions

function sin_function(x, params) result(ret)

Arguments

Type IntentOptional 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 IntentOptional Attributes Name
real(kind=real64), intent(in) :: x(:)
real(kind=real64), intent(in), optional :: params(:)

Return Value real(kind=real64)