Smitc.src File Reference

Functions/Subroutines
subroutine	smitcsolver_init (Model, Solver, dt, Transient)
subroutine	smitcsolver (Model, Solver, dt, TransientSimulation)
subroutine	localmatrix (STIFF, DAMP, MASS, Force, Load, Element, n, DOFs, Nodes, DampingCoef, SpringCoef)
subroutine	isotropicelasticity (Ematrix, Gmatrix, Poisson, Young, Thickness, Basis, n)
subroutine	perforatedelasticity (Ematrix, Gmatrix, Poisson, Young, Thickness, HoleFraction, HoleSize, Basis, n)
subroutine	shearcorrectionfactor (Kappa, Thickness, x, y, n)
subroutine	addinnerproducts (A, B, C, m, n, s)
subroutine	covariantinterpolation (ShearStrain, Basis, X, Y, U, V, n)
subroutine	jacobi3 (Jmat, invJ, detJ, x, y)
subroutine	jacobi4 (Jmat, invJ, detJ, xi, eta, x, y)

Function/Subroutine Documentation

subroutine smitcsolver::addinnerproducts	(	real(kind=dp), dimension(:,:)	A,
		real(kind=dp), dimension(:,:)	B,
		real(kind=dp), dimension(:,:)	C,
		integer	m,
		integer	n,
		real(kind=dp)	s
	)

subroutine smitcsolver::covariantinterpolation	(	real(kind=dp), dimension(:,:)	ShearStrain,
		real(kind=dp), dimension(:)	Basis,
		real(kind=dp), dimension(:)	X,
		real(kind=dp), dimension(:)	Y,
		real(kind=dp)	U,
		real(kind=dp)	V,
		integer	n
	)

References jacobi3(), jacobi4(), and messages::warn().

Here is the call graph for this function:

subroutine smitcsolver::isotropicelasticity	(	real(kind=dp), dimension(:,:)	Ematrix,
		real(kind=dp), dimension(:,:)	Gmatrix,
		real(kind=dp), dimension(:)	Poisson,
		real(kind=dp), dimension(:)	Young,
		real(kind=dp), dimension(:)	Thickness,
		real(kind=dp), dimension(:)	Basis,
		integer	n
	)

subroutine smitcsolver::jacobi3	(	real(kind=dp), dimension(:,:)	Jmat,
		real(kind=dp), dimension(:,:)	invJ,
		real(kind=dp)	detJ,
		real(kind=dp), dimension(:)	x,
		real(kind=dp), dimension(:)	y
	)

subroutine smitcsolver::jacobi4	(	real(kind=dp), dimension(:,:)	Jmat,
		real(kind=dp), dimension(:,:)	invJ,
		real(kind=dp)	detJ,
		real(kind=dp)	xi,
		real(kind=dp)	eta,
		real(kind=dp), dimension(:)	x,
		real(kind=dp), dimension(:)	y
	)

subroutine smitcsolver::localmatrix	(	real(kind=dp), dimension(:,:)	STIFF,
		real(kind=dp), dimension(:,:)	DAMP,
		real(kind=dp), dimension(:,:)	MASS,
		real(kind=dp), dimension(:)	Force,
		real(kind=dp), dimension(:)	Load,
		type(element_t), pointer	Element,
		integer	n,
		integer	DOFs,
		type(nodes_t)	Nodes,
		real(kind=dp), dimension(:)	DampingCoef,
		real(kind=dp), dimension(:)	SpringCoef
	)

References addinnerproducts(), covariantinterpolation(), elementdescription::elementinfo(), integration::gausspoints(), isotropicelasticity(), perforatedelasticity(), and shearcorrectionfactor().

Here is the call graph for this function:

subroutine smitcsolver::perforatedelasticity	(	real(kind=dp), dimension(:,:)	Ematrix,
		real(kind=dp), dimension(:,:)	Gmatrix,
		real(kind=dp), dimension(:)	Poisson,
		real(kind=dp), dimension(:)	Young,
		real(kind=dp), dimension(:)	Thickness,
		real(kind=dp), dimension(:)	HoleFraction,
		real(kind=dp), dimension(:)	HoleSize,
		real(kind=dp), dimension(:)	Basis,
		integer	n
	)

The elastic model for perforated plates is taken directly from M. Pedersen, W. Olthuis, P. BergWald: 'On the mechanical behavior of thin perforated plates and their application in silicon condenser microphones', Sensors and Actuators A 54 (1996) 499-504.

Referenced by localmatrix().

Here is the caller graph for this function:

subroutine smitcsolver::shearcorrectionfactor	(	real(kind=dp)	Kappa,
		real(kind=dp)	Thickness,
		real(kind=dp), dimension(:)	x,
		real(kind=dp), dimension(:)	y,
		integer	n
	)

References messages::warn().

Here is the call graph for this function:

subroutine smitcsolver_init	(	type(model_t)	Model,
		type(solver_t)	Solver,
		real(kind=dp)	dt,
		logical	Transient
	)

Initialization for the primary solver: SmitcSolver.

References defutils::getsolverparams(), lists::listaddinteger(), lists::listaddstring(), and lists::listcheckpresent().

Here is the call graph for this function: