tensors Module Reference

Data Types
interface	operator(.dot.)
interface	operator(.dyad.)
interface	operator(.double.)
interface	unit
interface	norm
interface	tr
interface	det
interface	inverse
interface	mb
interface	hs1
interface	sign1
interface	dev

Functions/Subroutines
double precision function, dimension(3, 3)	dev33 (A33)
double precision function	tr33 (a)
double precision function	det33 (T)
double precision function, dimension(3, 3)	dot1 (a1, a2)
double precision function	dot2 (a1, a2)
double precision function	dot3 (a1, a2, k)
subroutine	elmod1 (E, nu, ELMOD)
subroutine	ivol1 (Ivol)
subroutine	isym1 (Isym)
subroutine	iunit1 (Iunit)
subroutine	idev1 (Idev)
subroutine	iunit2 (Iunit)
subroutine	matrixtovector (vec1, mat1)
subroutine	vectortomatrix (vec1, mat1)
subroutine	tensortomatrix (a3333, b66)
subroutine	f1 (T, Fm)
subroutine	pq (T, p, q)
subroutine	j23s (T, J2s, J3s)
subroutine	initial (STRESS, T, DSTRAN, DEPS, NTENS, NDI, NSHR)
subroutine	solution (NTENS, NDI, NSHR, T, STRESS, JAC, DDSDDE)
double precision function, dimension(3, 3, 3, 3)	dyad33x33 (a1, a2)
double precision function, dimension(3, 3)	double3333x33 (a, b)
double precision function, dimension(3, 3)	double33x3333 (b, a)
double precision function	double33x33 (a, b)
double precision function, dimension(3, 3, 3, 3)	double3333x3333 (a, b)
double precision function	norm33 (a)
double precision function, dimension(3, 3)	unit33 (a)
subroutine	d1 (DSTRAN, D, dtime, NDI, NSHR, NTENS)
double precision function, dimension(3, 3, 3, 3)	inverse3333 (a3333)
double precision function, dimension(3, 3)	inverse33 (a33)
subroutine	dpdtdqdt (T, dpdT, dqdT)
subroutine	lode (T, theta)
subroutine	cep1 (Elmod, dFdT, dgdT, H, CEP)
subroutine	dotgamma1 (Elmod, dFdT, dgdT, H, D, dotgamma)
subroutine	phimob (ndi, nshr, ntens, stress, sinphim)
subroutine	m1 (phi, M)
subroutine	cos33 (A, B, c)
subroutine	sttosvi (st, svi)
subroutine	svitost (st, svi)
double precision function	cos3theta1 (a)
double precision function	mb (a)
double precision function	hs1 (a)
integer function	sign1 (a)
subroutine	rigidrot (tensor33, dfgrd0, dfgrd1)

Variables
double precision, dimension(3, 3), public	delta
double precision, public	sq2
double precision, public	sq3
double precision, public	sq4
double precision, public	pi
double precision, public	minvalue
integer	i
integer	j
integer	k
integer	l

Function/Subroutine Documentation

cep1()

subroutine tensors::cep1	(	double precision, dimension(3,3,3,3)	Elmod,
		double precision, dimension(3,3)	dFdT,
		double precision, dimension(3,3)	dgdT,
		double precision	H,
		double precision, dimension(3,3,3,3)	CEP
	)

cos33()

subroutine tensors::cos33	(	double precision, dimension(3,3)	A,
		double precision, dimension(3,3)	B,
		double precision	c
	)

cos3theta1()

double precision function tensors::cos3theta1

(

double precision, dimension(3,3), intent(in)

a

)

d1()

subroutine tensors::d1	(	double precision, dimension(6)	DSTRAN,
		double precision, dimension(3,3)	D,
		double precision	dtime,
		integer	NDI,
		integer	NSHR,
		integer	NTENS
	)

det33()

double precision function tensors::det33

(

double precision, dimension(3,3), intent(in)

T

)

dev33()

double precision function, dimension(3,3) tensors::dev33

(

double precision, dimension(3,3), intent(in)

A33

)

dot1()

double precision function, dimension(3,3) tensors::dot1	(	double precision, dimension(3,3), intent(in)	a1,
		double precision, dimension(3,3), intent(in)	a2
	)

dot2()

double precision function tensors::dot2	(	double precision, dimension(3), intent(in)	a1,
		double precision, dimension(3), intent(in)	a2
	)

dot3()

double precision function tensors::dot3	(	double precision, dimension(k), intent(in)	a1,
		double precision, dimension(k), intent(in)	a2,
		integer	k
	)

dotgamma1()

subroutine tensors::dotgamma1	(	double precision, dimension(3,3,3,3)	Elmod,
		double precision, dimension(3,3)	dFdT,
		double precision, dimension(3,3)	dgdT,
		double precision	H,
		double precision, dimension(3,3)	D,
		double precision	dotgamma
	)

double3333x33()

double precision function, dimension(3,3) tensors::double3333x33	(	double precision, dimension(3,3,3,3), intent(in)	a,
		double precision, dimension(3,3), intent(in)	b
	)

double3333x3333()

double precision function, dimension(3,3,3,3) tensors::double3333x3333	(	double precision, dimension(3,3,3,3), intent(in)	a,
		double precision, dimension(3,3,3,3), intent(in)	b
	)

double33x33()

double precision function tensors::double33x33	(	double precision, dimension(3,3), intent(in)	a,
		double precision, dimension(3,3), intent(in)	b
	)

double33x3333()

double precision function, dimension(3,3) tensors::double33x3333	(	double precision, dimension(3,3), intent(in)	b,
		double precision, dimension(3,3,3,3), intent(in)	a
	)

dpdtdqdt()

subroutine tensors::dpdtdqdt	(	double precision, dimension(3,3)	T,
		double precision, dimension(3,3)	dpdT,
		double precision, dimension(3,3)	dqdT
	)

dyad33x33()

double precision function, dimension(3,3,3,3) tensors::dyad33x33	(	double precision, dimension(3,3), intent(in)	a1,
		double precision, dimension(3,3), intent(in)	a2
	)

elmod1()

subroutine tensors::elmod1	(	double precision	E,
		double precision	nu,
		double precision, dimension(3,3,3,3)	ELMOD
	)

f1()

subroutine tensors::f1	(	double precision, dimension(3,3)	T,
		double precision	Fm
	)

hs1()

double precision function tensors::hs1

(

double precision, intent(in)

a

)

idev1()

subroutine tensors::idev1

(

double precision, dimension(3,3,3,3)

Idev

)

initial()

subroutine tensors::initial	(	double precision, dimension(ntens)	STRESS,
		double precision, dimension(3,3)	T,
		double precision, dimension(ntens)	DSTRAN,
		double precision, dimension(3,3)	DEPS,
		integer	NTENS,
		integer	NDI,
		integer	NSHR
	)

inverse33()

double precision function, dimension(3,3) tensors::inverse33

(

double precision, dimension(3,3)

a33

)

inverse3333()

double precision function, dimension(3,3,3,3) tensors::inverse3333

(

double precision, dimension(3,3,3,3), intent(in)

a3333

)

isym1()

subroutine tensors::isym1

(

double precision, dimension(3,3,3,3)

Isym

)

iunit1()

subroutine tensors::iunit1

(

double precision, dimension(3,3,3,3)

Iunit

)

iunit2()

subroutine tensors::iunit2

(

double precision, dimension(3,3,3,3)

Iunit

)

ivol1()

subroutine tensors::ivol1

(

double precision, dimension(3,3,3,3)

Ivol

)

j23s()

subroutine tensors::j23s	(	double precision, dimension(3,3)	T,
		double precision	J2s,
		double precision	J3s
	)

lode()

subroutine tensors::lode	(	double precision, dimension(3,3)	T,
		double precision	theta
	)

m1()

subroutine tensors::m1	(	double precision	phi,
		double precision	M
	)

matrixtovector()

subroutine tensors::matrixtovector	(	double precision, dimension(6)	vec1,
		double precision, dimension(3,3)	mat1
	)

mb()

double precision function tensors::mb

(

double precision, intent(in)

a

)

norm33()

double precision function tensors::norm33

(

double precision, dimension(3,3), intent(in)

a

)

phimob()

subroutine tensors::phimob	(	integer	ndi,
		integer	nshr,
		integer	ntens,
		double precision, dimension(ntens)	stress,
		double precision	sinphim
	)

pq()

subroutine tensors::pq	(	double precision, dimension(3,3)	T,
		double precision	p,
		double precision	q
	)

rigidrot()

subroutine tensors::rigidrot	(	double precision, dimension(1:3,1:3)	tensor33,
		double precision, dimension(1:3,1:3), intent(in)	dfgrd0,
		double precision, dimension(1:3,1:3), intent(in)	dfgrd1
	)

sign1()

integer function tensors::sign1

(

double precision, intent(in)

a

)

solution()

subroutine tensors::solution	(	integer	NTENS,
		integer	NDI,
		integer	NSHR,
		double precision, dimension(3,3)	T,
		double precision, dimension(ntens)	STRESS,
		double precision, dimension(3,3,3,3)	JAC,
		double precision, dimension(ntens,ntens)	DDSDDE
	)

sttosvi()

subroutine tensors::sttosvi	(	type (statevariables )	st,
		double precision, dimension(8,1)	svi
	)

svitost()

subroutine tensors::svitost	(	type (statevariables )	st,
		double precision, dimension(8,1)	svi
	)

tensortomatrix()

subroutine tensors::tensortomatrix	(	double precision, dimension(3,3,3,3)	a3333,
		double precision, dimension(6,6)	b66
	)

tr33()

double precision function tensors::tr33

(

double precision, dimension(3,3), intent(in)

a

)

unit33()

double precision function, dimension(3,3) tensors::unit33

(

double precision, dimension(3,3), intent(in)

a

)

vectortomatrix()

subroutine tensors::vectortomatrix	(	double precision, dimension(6)	vec1,
		double precision, dimension(3,3)	mat1
	)

Variable Documentation

delta

double precision, dimension(3,3), public tensors::delta

i

integer tensors::i

j

integer tensors::j

k

integer tensors::k

l

integer tensors::l

minvalue

double precision, public tensors::minvalue

pi

double precision, public tensors::pi

sq2

double precision, public tensors::sq2

sq3

double precision, public tensors::sq3

sq4

double precision, public tensors::sq4