The TELEMAC-MASCARET system  trunk
Functions/Subroutines
mt99aa.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine mt99aa (A11, A12, A13, A21, A22, A23, A31, A32, A33, XMUL, SF, F, XEL, YEL, SURFAC, IKLE1, IKLE2, IKLE3, NELEM, NELMAX, FORMUL, TDIA, TEXT)
 

Function/Subroutine Documentation

◆ mt99aa()

subroutine mt99aa ( double precision, dimension(*), intent(inout)  A11,
double precision, dimension(*), intent(inout)  A12,
double precision, dimension(*), intent(inout)  A13,
double precision, dimension(*), intent(inout)  A21,
double precision, dimension(*), intent(inout)  A22,
double precision, dimension(*), intent(inout)  A23,
double precision, dimension(*), intent(inout)  A31,
double precision, dimension(*), intent(inout)  A32,
double precision, dimension(*), intent(inout)  A33,
double precision, intent(in)  XMUL,
type(bief_obj), intent(in)  SF,
double precision, dimension(*), intent(in)  F,
double precision, dimension(nelmax,3), intent(in)  XEL,
double precision, dimension(nelmax,3), intent(in)  YEL,
double precision, dimension(nelmax), intent(in)  SURFAC,
integer, dimension(nelmax), intent(in)  IKLE1,
integer, dimension(nelmax), intent(in)  IKLE2,
integer, dimension(nelmax), intent(in)  IKLE3,
integer, intent(in)  NELEM,
integer, intent(in)  NELMAX,
character(len=16), intent(in)  FORMUL,
character(len=1), intent(inout)  TDIA,
character(len=1), intent(inout)  TEXT 
)
Parameters
[in]nelem[out] A11 Elements of matrix
[out]A12Elements of matrix
[out]A13Elements of matrix
[out]A21Elements of matrix
[out]A22Elements of matrix
[out]A23Elements of matrix
[out]A31Elements of matrix
[out]A32Elements of matrix
[out]A33Elements of matrix
[in]FORMULFormula describing the resulting matrix
[in]IKLE1First points of triangles
[in]IKLE2Second points of triangles
[in]IKLE3Third points of triangles
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SURFACArea of triangles
[out]TDIAType of diagonal
[out]TEXTType of off-diagonal terms
[in]XMULMultiplication factor
[in]nelmax[out] A11 Elements of matrix
[out]A12Elements of matrix
[out]A13Elements of matrix
[out]A21Elements of matrix
[out]A22Elements of matrix
[out]A23Elements of matrix
[out]A31Elements of matrix
[out]A32Elements of matrix
[out]A33Elements of matrix
[in]FORMULFormula describing the resulting matrix
[in]IKLE1First points of triangles
[in]IKLE2Second points of triangles
[in]IKLE3Third points of triangles
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SURFACArea of triangles
[out]TDIAType of diagonal
[out]TEXTType of off-diagonal terms
[in]XMULMultiplication factor

Definition at line 11 of file mt99aa.f.

+ Here is the caller graph for this function: