DCRComplexSolve.src File Reference

Functions/Subroutines
subroutine	dcrcomplexsolver (Model, Solver, dt, TransientSimulation)
subroutine	inputtensor (Tensor, IsScalar, Name, Material, n, NodeIndexes)
subroutine	inputvector (Tensor, IsScalar, Name, Material, n, NodeIndexes)
subroutine	localmatrix (StiffMatrix, Force, Load, Bubbles, Element, n, Nodes, Amatrix, AvectorReal, AvectorImag, AscalarReal, AscalarImag)
subroutine	localmatrixboundary (StiffMatrix, Force, Load, Element, n, Nodes, Amatrix, AvectorReal, AvectorImag, AscalarReal, AscalarImag, Bvector, BscalarReal, BscalarImag)
subroutine	lcondensate (n, K, F)
real(kind=dp) function, dimension(2)	dcrboundaryresidual (Model, Edge, Mesh, Quant, Perm, Gnorm)
real(kind=dp) function, dimension(2)	dcredgeresidual (Model, Edge, Mesh, Quant, Perm)
real(kind=dp) function, dimension(2)	dcrinsideresidual (Model, Element, Mesh, Quant, Perm, Fnorm)

Function/Subroutine Documentation

real(kind=dp) function, dimension(2) dcrboundaryresidual	(	type(model_t)	Model,
		type( element_t ), pointer	Edge,
		type( mesh_t ), pointer	Mesh,
		real(kind=dp), dimension(:)	Quant,
		integer, dimension(:)	Perm,
		real(kind=dp)	Gnorm
	)

References coordinatesystems::coordinatesystemdimension(), coordinatesystems::coordinatesysteminfo(), coordinatesystems::currentcoordinatesystem(), elementdescription::elementinfo(), integration::gausspoints(), inputvector(), lists::listgetinteger(), lists::listgetreal(), lists::listgetrealarray(), normal(), and elementdescription::normalvector().

Referenced by dcrcomplexsolver().

Here is the call graph for this function:

Here is the caller graph for this function:

real(kind=dp) function, dimension(2) dcredgeresidual	(	type(model_t)	Model,
		type( element_t ), pointer	Edge,
		type( mesh_t ), pointer	Mesh,
		real(kind=dp), dimension(:)	Quant,
		integer, dimension(:)	Perm
	)

References coordinatesystems::coordinatesystemdimension(), coordinatesystems::coordinatesysteminfo(), coordinatesystems::currentcoordinatesystem(), elementdescription::elementinfo(), integration::gausspoints(), inputtensor(), inputvector(), lists::listgetinteger(), lists::listgetreal(), lists::listgetrealarray(), normal(), and elementdescription::normalvector().

Referenced by dcrcomplexsolver().

Here is the call graph for this function:

Here is the caller graph for this function:

real(kind=dp) function, dimension(2) dcrinsideresidual	(	type(model_t)	Model,
		type( element_t ), pointer	Element,
		type( mesh_t ), pointer	Mesh,
		real(kind=dp), dimension(:)	Quant,
		integer, dimension(:)	Perm,
		real(kind=dp)	Fnorm
	)

References coordinatesystems::coordinatesystemdimension(), coordinatesystems::coordinatesysteminfo(), coordinatesystems::currentcoordinatesystem(), elementdescription::elementinfo(), integration::gausspoints(), inputtensor(), inputvector(), lists::listgetinteger(), lists::listgetreal(), and lists::listgetrealarray().

Referenced by dcrcomplexsolver().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine inputtensor	(	real(kind=dp), dimension(:,:,:)	Tensor,
		logical	IsScalar,
		character(len=*)	Name,
		type(valuelist_t), pointer	Material,
		integer	n,
		integer, dimension(:)	NodeIndexes
	)

References lists::listgetrealarray().

Referenced by bulkassembly(), computestress(), computestressandstrain(), dcrcomplexsolver(), dcredgeresidual(), dcrinsideresidual(), elasticsolver(), localmatrix(), stressboundaryresidual(), stressedgeresidual(), and stressinsideresidual().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine inputvector	(	real(kind=dp), dimension(:,:)	Tensor,
		logical	IsScalar,
		character(len=*)	Name,
		type(valuelist_t), pointer	Material,
		integer	n,
		integer, dimension(:)	NodeIndexes
	)

References lists::listgetrealarray().

Referenced by dcrboundaryresidual(), dcrcomplexsolver(), dcredgeresidual(), and dcrinsideresidual().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine dcrcomplexsolver::lcondensate	(	integer	n,
		complex(kind=dp), dimension(:,:)	K,
		complex(kind=dp), dimension(:)	F
	)

References linearalgebra::complexinvertmatrix().

Here is the call graph for this function:

subroutine dcrcomplexsolver::localmatrix	(	real(kind=dp), dimension(:,:)	StiffMatrix,
		real(kind=dp), dimension(:)	Force,
		real(kind=dp), dimension(:,:)	Load,
		logical	Bubbles,
		type(element_t), pointer	Element,
		integer	n,
		type(nodes_t)	Nodes,
		real(kind=dp), dimension(:,:,:)	Amatrix,
		real(kind=dp), dimension(:,:)	AvectorReal,
		real(kind=dp), dimension(:,:)	AvectorImag,
		real(kind=dp), dimension(:)	AscalarReal,
		real(kind=dp), dimension(:)	AscalarImag
	)

References coordinatesystems::coordinatesystemdimension(), coordinatesystems::coordinatesysteminfo(), coordinatesystems::currentcoordinatesystem(), elementdescription::elementinfo(), integration::gausspoints(), and lcondensate().

Here is the call graph for this function:

subroutine dcrcomplexsolver::localmatrixboundary	(	real(kind=dp), dimension(:,:)	StiffMatrix,
		real(kind=dp), dimension(:)	Force,
		real(kind=dp), dimension(:,:)	Load,
		type(element_t), pointer	Element,
		integer	n,
		type(nodes_t)	Nodes,
		real(kind=dp), dimension(:,:,:)	Amatrix,
		real(kind=dp), dimension(:,:)	AvectorReal,
		real(kind=dp), dimension(:,:)	AvectorImag,
		real(kind=dp), dimension(:)	AscalarReal,
		real(kind=dp), dimension(:)	AscalarImag,
		real(kind=dp), dimension(:,:)	Bvector,
		real(kind=dp), dimension(:)	BscalarReal,
		real(kind=dp), dimension(:)	BscalarImag
	)

References coordinatesystems::coordinatesystemdimension(), coordinatesystems::currentcoordinatesystem(), elementdescription::elementinfo(), integration::gausspoints(), normal(), and elementdescription::normalvector().

Here is the call graph for this function: