mmechgauss Module Reference

This modules defines a structure to record history dependent parameter in static analysis. More...

Data Types
type	tgaussstatus
	All data should be recorded in every quadrature points. More...
type	telement
	All data should be recorded in every elements. More...

Functions/Subroutines
integer(kind=kint) function	fstr_shell_output_point_count (element)
	Number of shell thickness-point tensors available for result output. More...
logical function	fstr_uses_plane_stress_j2_shell (etype, nn, material)
	Return whether the element and material are supported by the plane-stress J2 shell path. More...
subroutine	fstr_init_gauss (gauss)
	Initializer. More...
subroutine	fstr_finalize_gauss (gauss)
	Finializer. More...
integer(kind=kint) function	fstr_shell_num_thickness_points (etype)
	Compatibility accessor for shell history allocation. The quadrature rule itself is defined in elementInfo. More...
subroutine	fstr_init_shell_layer_gausses (element, ng, nlayer, nthick)
	Allocate shell history for every surface Gauss point, layer, and thickness point. More...
integer(kind=kint) function	fstr_shell_layer_gauss_index (element, ig, ilayer, ithick)
	Convert surface Gauss/layer/thickness indices to shell_layer_gausses index. More...
real(kind=kreal) function	fstr_element_average_plstrain (element)
	Average equivalent plastic strain over the active quadrature history. Average shell history points equally within each layer and weight layers by thickness. More...
subroutine	fstr_shell_thickness_quadrature (etype, ithick, zeta, weight, ierr)
	Through-thickness quadrature point and weight used by shell elements. More...
subroutine	fstr_shell_layer_quadrature (element, ilayer, ithick, zeta_layer, weight, ierr)
	Layer-local shell thickness coordinate and quadrature weight. More...
subroutine	fstr_shell_layer_quadrature_gauss (etype, gauss, ilayer, ithick, zeta_layer, weight, ierr)
	Layer-local shell thickness coordinate and quadrature weight from material status. More...
subroutine	fstr_shell_layer_zeta (gauss, ilayer, zeta, zeta_layer, ierr)
	Map layer-local zeta to the whole shell thickness coordinate. More...
subroutine	fstr_finalize_shell_layer_gausses (element)
	Release shell layer/thickness history. More...
subroutine	fstr_copy_gauss (gauss1, gauss2)
	Copy. More...
subroutine	fstr_copy_shell_layer_gausses (element1, element2)
	Copy shell layer/thickness history. More...

Detailed Description

This modules defines a structure to record history dependent parameter in static analysis.

Function/Subroutine Documentation

fstr_copy_gauss()

subroutine mmechgauss::fstr_copy_gauss	(	type( tgaussstatus ), intent(in)	gauss1,
		type( tgaussstatus ), intent(inout)	gauss2
	)

Copy.

Definition at line 330 of file mechgauss.f90.

Here is the caller graph for this function:

fstr_copy_shell_layer_gausses()

subroutine mmechgauss::fstr_copy_shell_layer_gausses	(	type( telement ), intent(in)	element1,
		type( telement ), intent(inout)	element2
	)

Copy shell layer/thickness history.

Definition at line 355 of file mechgauss.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

fstr_element_average_plstrain()

real(kind=kreal) function mmechgauss::fstr_element_average_plstrain

(

type( telement ), intent(in)

element

)

Average equivalent plastic strain over the active quadrature history. Average shell history points equally within each layer and weight layers by thickness.

Definition at line 193 of file mechgauss.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

fstr_finalize_gauss()

subroutine mmechgauss::fstr_finalize_gauss

(

type( tgaussstatus ), intent(inout)

gauss

)

Finializer.

Definition at line 135 of file mechgauss.f90.

Here is the caller graph for this function:

fstr_finalize_shell_layer_gausses()

subroutine mmechgauss::fstr_finalize_shell_layer_gausses

(

type( telement ), intent(inout)

element

)

Release shell layer/thickness history.

Definition at line 315 of file mechgauss.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

fstr_init_gauss()

subroutine mmechgauss::fstr_init_gauss

(

type( tgaussstatus ), intent(inout)

gauss

)

Initializer.

Definition at line 88 of file mechgauss.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

fstr_init_shell_layer_gausses()

subroutine mmechgauss::fstr_init_shell_layer_gausses	(	type( telement ), intent(inout)	element,
		integer(kind=kint), intent(in)	ng,
		integer(kind=kint), intent(in)	nlayer,
		integer(kind=kint), intent(in)	nthick
	)

Allocate shell history for every surface Gauss point, layer, and thickness point.

Definition at line 150 of file mechgauss.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

fstr_shell_layer_gauss_index()

integer(kind=kint) function mmechgauss::fstr_shell_layer_gauss_index	(	type( telement ), intent(in)	element,
		integer(kind=kint), intent(in)	ig,
		integer(kind=kint), intent(in)	ilayer,
		integer(kind=kint), intent(in)	ithick
	)

Convert surface Gauss/layer/thickness indices to shell_layer_gausses index.

Definition at line 171 of file mechgauss.f90.

Here is the caller graph for this function:

fstr_shell_layer_quadrature()

subroutine mmechgauss::fstr_shell_layer_quadrature	(	type( telement ), intent(in)	element,
		integer(kind=kint), intent(in)	ilayer,
		integer(kind=kint), intent(in)	ithick,
		real(kind=kreal), intent(out)	zeta_layer,
		real(kind=kreal), intent(out)	weight,
		integer(kind=kint), intent(out)	ierr
	)

Layer-local shell thickness coordinate and quadrature weight.

Definition at line 249 of file mechgauss.f90.

Here is the call graph for this function:

fstr_shell_layer_quadrature_gauss()

subroutine mmechgauss::fstr_shell_layer_quadrature_gauss	(	integer(kind=kint), intent(in)	etype,
		type( tgaussstatus ), intent(in)	gauss,
		integer(kind=kint), intent(in)	ilayer,
		integer(kind=kint), intent(in)	ithick,
		real(kind=kreal), intent(out)	zeta_layer,
		real(kind=kreal), intent(out)	weight,
		integer(kind=kint), intent(out)	ierr
	)

Layer-local shell thickness coordinate and quadrature weight from material status.

Definition at line 269 of file mechgauss.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

fstr_shell_layer_zeta()

subroutine mmechgauss::fstr_shell_layer_zeta	(	type( tgaussstatus ), intent(in)	gauss,
		integer(kind=kint), intent(in)	ilayer,
		real(kind=kreal), intent(in)	zeta,
		real(kind=kreal), intent(out)	zeta_layer,
		integer(kind=kint), intent(out)	ierr
	)

Map layer-local zeta to the whole shell thickness coordinate.

Definition at line 286 of file mechgauss.f90.

Here is the caller graph for this function:

fstr_shell_num_thickness_points()

integer(kind=kint) function mmechgauss::fstr_shell_num_thickness_points

(

integer(kind=kint), intent(in)

etype

)

Compatibility accessor for shell history allocation. The quadrature rule itself is defined in elementInfo.

Definition at line 143 of file mechgauss.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

fstr_shell_output_point_count()

integer(kind=kint) function mmechgauss::fstr_shell_output_point_count

(

type(telement), intent(in)

element

)

Number of shell thickness-point tensors available for result output.

Definition at line 51 of file mechgauss.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

fstr_shell_thickness_quadrature()

subroutine mmechgauss::fstr_shell_thickness_quadrature	(	integer(kind=kint), intent(in)	etype,
		integer(kind=kint), intent(in)	ithick,
		real(kind=kreal), intent(out)	zeta,
		real(kind=kreal), intent(out)	weight,
		integer(kind=kint), intent(out)	ierr
	)

Through-thickness quadrature point and weight used by shell elements.

Definition at line 230 of file mechgauss.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

fstr_uses_plane_stress_j2_shell()

logical function mmechgauss::fstr_uses_plane_stress_j2_shell	(	integer(kind=kint), intent(in)	etype,
		integer(kind=kint), intent(in)	nn,
		type(tmaterial), intent(in)	material
	)

Return whether the element and material are supported by the plane-stress J2 shell path.

Definition at line 71 of file mechgauss.f90.

Here is the call graph for this function:

Here is the caller graph for this function: