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

Go to the source code of this file.

Functions/Subroutines

subroutine mt05cc (A11, A12, A13, A14, A15, A16, A21, A22, A23, A24, A25, A26, A31, A32, A33, A34, A35, A36, A41, A42, A43, A44, A45, A46, A51, A52, A53, A54, A55, A56, A61, A62, A63, A64, A65, A66, XMUL, SU, SV, U, V, XEL, YEL, IKLE1, IKLE2, IKLE3, IKLE4, IKLE5, IKLE6, NELEM, NELMAX, FORMUL)
 

Function/Subroutine Documentation

◆ mt05cc()

subroutine mt05cc ( double precision, dimension(*), intent(inout)  A11,
double precision, dimension(*), intent(inout)  A12,
double precision, dimension(*), intent(inout)  A13,
double precision, dimension(*), intent(inout)  A14,
double precision, dimension(*), intent(inout)  A15,
double precision, dimension(*), intent(inout)  A16,
double precision, dimension(*), intent(inout)  A21,
double precision, dimension(*), intent(inout)  A22,
double precision, dimension(*), intent(inout)  A23,
double precision, dimension(*), intent(inout)  A24,
double precision, dimension(*), intent(inout)  A25,
double precision, dimension(*), intent(inout)  A26,
double precision, dimension(*), intent(inout)  A31,
double precision, dimension(*), intent(inout)  A32,
double precision, dimension(*), intent(inout)  A33,
double precision, dimension(*), intent(inout)  A34,
double precision, dimension(*), intent(inout)  A35,
double precision, dimension(*), intent(inout)  A36,
double precision, dimension(*), intent(inout)  A41,
double precision, dimension(*), intent(inout)  A42,
double precision, dimension(*), intent(inout)  A43,
double precision, dimension(*), intent(inout)  A44,
double precision, dimension(*), intent(inout)  A45,
double precision, dimension(*), intent(inout)  A46,
double precision, dimension(*), intent(inout)  A51,
double precision, dimension(*), intent(inout)  A52,
double precision, dimension(*), intent(inout)  A53,
double precision, dimension(*), intent(inout)  A54,
double precision, dimension(*), intent(inout)  A55,
double precision, dimension(*), intent(inout)  A56,
double precision, dimension(*), intent(inout)  A61,
double precision, dimension(*), intent(inout)  A62,
double precision, dimension(*), intent(inout)  A63,
double precision, dimension(*), intent(inout)  A64,
double precision, dimension(*), intent(inout)  A65,
double precision, dimension(*), intent(inout)  A66,
double precision, intent(in)  XMUL,
type(bief_obj), intent(in)  SU,
type(bief_obj), intent(in)  SV,
double precision, dimension(*), intent(in)  U,
double precision, dimension(*), intent(in)  V,
double precision, dimension(nelmax,3), intent(in)  XEL,
double precision, dimension(nelmax,3), intent(in)  YEL,
integer, dimension(nelmax), intent(in)  IKLE1,
integer, dimension(nelmax), intent(in)  IKLE2,
integer, dimension(nelmax), intent(in)  IKLE3,
integer, dimension(nelmax), intent(in)  IKLE4,
integer, dimension(nelmax), intent(in)  IKLE5,
integer, dimension(nelmax), intent(in)  IKLE6,
integer, intent(in)  NELEM,
integer, intent(in)  NELMAX,
character(len=16)  FORMUL 
)
Parameters
[in]nelem[out] A66 Elements of matrix
[in]FORMULFormula describing the resulting matrix
[in]IKLE1First points of triangles
[in]IKLE2Second points of triangles
[in]IKLE3Third points of triangles
[in]IKLE4Fourth points of triangles (quadratic)
[in]IKLE5Fifth points of triangles (quadratic)
[in]IKLE6Sixth points of triangles (quadratic)
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SUBief_obj structure of u
[in]SURFACArea of triangles
[in]SVBief_obj structure of v
[in]UFunction u used in the formula
[in]VFunction v used in the formula
[in]XELAbscissae of points in the mesh, per element
[in]YELOrdinates of points in the mesh, per element
[in]XMULMultiplication factor
[in]nelmax[out] A66 Elements of matrix
[in]FORMULFormula describing the resulting matrix
[in]IKLE1First points of triangles
[in]IKLE2Second points of triangles
[in]IKLE3Third points of triangles
[in]IKLE4Fourth points of triangles (quadratic)
[in]IKLE5Fifth points of triangles (quadratic)
[in]IKLE6Sixth points of triangles (quadratic)
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SUBief_obj structure of u
[in]SURFACArea of triangles
[in]SVBief_obj structure of v
[in]UFunction u used in the formula
[in]VFunction v used in the formula
[in]XELAbscissae of points in the mesh, per element
[in]YELOrdinates of points in the mesh, per element
[in]XMULMultiplication factor

Definition at line 15 of file mt05cc.f.

+ Here is the caller graph for this function: