Ce_neoHK_current Subroutine

public subroutine Ce_neoHK_current(dim_num, elem, gauss, Lame1, Lame2, C_IJ, Cp_IJ, b_ij, M_IJ, Ce_neoHK, F_T, F_T_inv, ij)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	dim_num
integer(kind=int32),	intent(in)			::	elem
integer(kind=int32),	intent(in)			::	gauss
real(kind=real64),	intent(in)			::	Lame1
real(kind=real64),	intent(in)			::	Lame2
real(kind=real64),	intent(in)			::	C_IJ(:,:)
real(kind=real64),	intent(in)			::	Cp_IJ(:,:)
real(kind=real64),	intent(in)			::	b_ij(:,:)
real(kind=real64),	intent(in)			::	M_IJ(:,:)
real(kind=real64),	intent(out),		allocatable	::	Ce_neoHK(:,:)
real(kind=real64),	intent(in)			::	F_T(:,:)
real(kind=real64),	intent(in)			::	F_T_inv(:,:)
integer(kind=int32),	intent(out),		allocatable	::	ij(:,:)

Contents

None