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
subroutine	fstr_init_gauss (gauss)
	Initializer. More...
subroutine	fstr_finalize_gauss (gauss)
	Finializer. More...
integer(kind=kint) function	fstr_shell_num_thickness_points (etype)
	Number of through-thickness quadrature points used by shell stiffness. 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...
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 270 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 295 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 96 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 255 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 52 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 117 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 138 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 189 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 209 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 226 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

)

Number of through-thickness quadrature points used by shell stiffness.

Definition at line 103 of file mechgauss.f90.

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 159 of file mechgauss.f90.

Here is the caller graph for this function: