RigidBodyReduction.src File Reference

Functions/Subroutines
INTEGER function	rigidbody (Model, Solver, A, b, x, n, DOFs, Norm)
subroutine	computemasscenter (Centers, Model, Solver, Indx, n)
subroutine	crs_sortmatrixvalues (A)
type(matrix_t) function, pointer	crs_transposelocal (A, MVal, DVal)
subroutine	crs_matrixmatrixmultiply (C, A, B, MVal, DVal)
subroutine	localfreematrix (A)
subroutine	matrixbandwidthoptimize (A, DoneAlready)

Function/Subroutine Documentation

subroutine rigidbody::computemasscenter	(	real(kind=dp), dimension(:,:), pointer	Centers,
		type(model_t)	Model,
		type(solver_t)	Solver,
		integer, dimension( model % numberofbodies )	Indx,
		integer	n
	)

References coordinatesystems::coordinatesysteminfo(), coordinatesystems::currentcoordinatesystem(), elementdescription::elementinfo(), messages::fatal(), integration::gausspoints(), messages::info(), lists::listgetinteger(), lists::listgetreal(), and solver().

Referenced by rigidbody().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine rigidbody::crs_matrixmatrixmultiply	(	type(matrix_t), pointer	C,
		type(matrix_t), pointer	A,
		type(matrix_t), pointer	B,
		logical	MVal,
		logical, optional	DVal
	)

References generalutils::allocatematrix(), crsmatrix::crs_makematrixindex(), and crsmatrix::crs_sortmatrix().

Here is the call graph for this function:

subroutine rigidbody::crs_sortmatrixvalues

(

type(matrix_t), pointer

A)

References generalutils::sortf(), and generalutils::sorti().

Here is the call graph for this function:

type(matrix_t) function, pointer rigidbody::crs_transposelocal	(	type(matrix_t), pointer	A,
		logical, optional	MVal,
		logical, optional	DVal
	)

References generalutils::allocatematrix(), messages::error(), and messages::fatal().

Here is the call graph for this function:

subroutine rigidbody::localfreematrix

(

type(matrix_t), pointer

A)

Referenced by rigidbody().

Here is the caller graph for this function:

subroutine rigidbody::matrixbandwidthoptimize	(	type(matrix_t), pointer	A,
		logical, optional	DoneAlready
	)

References crs_sortmatrixvalues(), messages::fatal(), messages::info(), lists::listgetlogical(), solver(), and generalutils::sorti().

Referenced by rigidbody().

Here is the call graph for this function:

Here is the caller graph for this function:

INTEGER function rigidbody	(	type(model_t)	Model,
		type(solver_t), target	Solver,
		type(matrix_t), pointer	A,
		real(kind=dp), dimension(n)	b,
		real(kind=dp), dimension(n)	x,
		integer	n,
		integer	DOFs,
		real(kind=dp)	Norm
	)

Subroutine for reducing a rigid body as a mass point for the linear elasticity.

References generalutils::allocatematrix(), computemasscenter(), crs_matrixmatrixmultiply(), crsmatrix::crs_matrixvectormultiply(), crsmatrix::crs_sortmatrix(), crs_sortmatrixvalues(), crs_transposelocal(), messages::fatal(), messages::info(), lists::listaddconstreal(), lists::listcheckpresent(), lists::listgetinteger(), lists::listgetlogical(), localfreematrix(), matrixbandwidthoptimize(), solverutils::setdirichletpoint(), solverutils::solvelinearsystem(), solver(), lists::variableadd(), and messages::warn().

Here is the call graph for this function: