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

Go to the source code of this file.

Functions/Subroutines

subroutine mt03cc (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, SF, SG, SU, SV, F, G, U, V, XEL, YEL, IKLE1, IKLE2, IKLE3, IKLE4, IKLE5, IKLE6, NELEM, NELMAX)
 

Function/Subroutine Documentation

◆ mt03cc()

subroutine mt03cc ( 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)  SF,
type(bief_obj), intent(in)  SG,
type(bief_obj), intent(in)  SU,
type(bief_obj), intent(in)  SV,
double precision, dimension(*), intent(in)  F,
double precision, dimension(*), intent(in)  G,
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 
)
Parameters
[in]nelem[out] A66 Elements of matrix
[in]FFunction used in the formula
[in]GFunction used in the formula
[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]SFStructure of functions f
[in]SGStructure of functions g
[in]SUBief_obj structure of u
[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]FFunction used in the formula
[in]GFunction used in the formula
[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]SFStructure of functions f
[in]SGStructure of functions g
[in]SUBief_obj structure of u
[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 mt03cc.f.

+ Here is the caller graph for this function: