preverseg.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	preverseg (XAUX, AD, AX, TYPDIA, TYPEXT, NPOIN, MESH, NSEG3D, TYPEMESH)

Function/Subroutine Documentation

preverseg()

subroutine preverseg	(	double precision, dimension(npoin,*), intent(inout)	XAUX,
		double precision, dimension(npoin), intent(in)	AD,
		double precision, dimension(nseg3d,*), intent(in)	AX,
		character(len=1), intent(in)	TYPDIA,
		character(len=1), intent(in)	TYPEXT,
		integer, intent(in)	NPOIN,
		type(bief_mesh), intent(inout)	MESH,
		integer, intent(in)	NSEG3D,
		integer, intent(in)	TYPEMESH
	)

Parameters

[in]	npoin	AD Matrix diagonal
[in]	AX	Matrix off-diagonal terms
[in]	MESH	Mesh structure
[in]	NPOIN	Number of points
[in]	NSEG3D	Number of segments in 3d mesh
[in]	TYPDIA	Type of diagonal: TYPDIA = 'Q' : ANY VALUE TYPDIA = 'I' : IDENTITY TYPDIA = '0' : ZERO
[in]	TYPEXT	Type of off-diagonal terms TYPEXT = 'Q' : ANY VALUE TYPEXT = 'S' : SYMMETRIC TYPEXT = '0' : ZERO
[in]	TYPEMESH	Type of mesh (40: prisms, 50: prisms cut into TETRAHEDRONS)
[out]	XAUX	Tridiagonal matrix
[in]	nseg3d	AD Matrix diagonal
[in]	AX	Matrix off-diagonal terms
[in]	MESH	Mesh structure
[in]	NPOIN	Number of points
[in]	NSEG3D	Number of segments in 3d mesh
[in]	TYPDIA	Type of diagonal: TYPDIA = 'Q' : ANY VALUE TYPDIA = 'I' : IDENTITY TYPDIA = '0' : ZERO
[in]	TYPEXT	Type of off-diagonal terms TYPEXT = 'Q' : ANY VALUE TYPEXT = 'S' : SYMMETRIC TYPEXT = '0' : ZERO
[in]	TYPEMESH	Type of mesh (40: prisms, 50: prisms cut into TETRAHEDRONS)
[out]	XAUX	Tridiagonal matrix
[in]	typemesh	AD Matrix diagonal
[in]	AX	Matrix off-diagonal terms
[in]	MESH	Mesh structure
[in]	NPOIN	Number of points
[in]	NSEG3D	Number of segments in 3d mesh
[in]	TYPDIA	Type of diagonal: TYPDIA = 'Q' : ANY VALUE TYPDIA = 'I' : IDENTITY TYPDIA = '0' : ZERO
[in]	TYPEXT	Type of off-diagonal terms TYPEXT = 'Q' : ANY VALUE TYPEXT = 'S' : SYMMETRIC TYPEXT = '0' : ZERO
[in]	TYPEMESH	Type of mesh (40: prisms, 50: prisms cut into TETRAHEDRONS)
[out]	XAUX	Tridiagonal matrix

Definition at line 7 of file preverseg.f.

Here is the call graph for this function:

Here is the caller graph for this function: