setjr.for File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	setjr (CJR, SIGMA, UNIT2, NDI)

Function/Subroutine Documentation

subroutine setjr	(	double precision, dimension(ndi,ndi,ndi,ndi)	CJR,
		double precision, dimension(ndi,ndi)	SIGMA,
		double precision, dimension(ndi,ndi)	UNIT2,
		integer	NDI
	)

Parameters

ndi	JAUMAN RATE CONTRIBUTION FOR THE SPATIAL ELASTICITY TENSOR

Definition at line 2 of file setjr.for.

Here is the caller graph for this function: