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

Go to the source code of this file.

Functions/Subroutines

subroutine mt12aa (A11, A12, A13, A21, A22, A23, A31, A32, A33, XMUL, SF, SU, SV, F, U, V, XEL, YEL, SURDET, IKLE1, IKLE2, IKLE3, NELEM, NELMAX, ICOORD)
 

Function/Subroutine Documentation

◆ mt12aa()

subroutine mt12aa ( 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,
type(bief_obj), intent(in)  SU,
type(bief_obj), intent(in)  SV,
double precision, dimension(*), intent(in)  F,
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,
double precision, dimension(nelmax), intent(in)  SURDET,
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,
integer, intent(in)  ICOORD 
)
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]FFunction used in the formula
[in]ICOORD1: derivative along x, 2: along y
[in]IKLE1First points of triangles
[in]IKLE2Second points of triangles
[in]IKLE3Third points of triangles
[in]IKLE4Quasi-bubble point
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SFStructure of functions f
[in]SUBief_obj structure of u
[in]SURDETHere = 1/(2*surfac)
[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] 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]FFunction used in the formula
[in]ICOORD1: derivative along x, 2: along y
[in]IKLE1First points of triangles
[in]IKLE2Second points of triangles
[in]IKLE3Third points of triangles
[in]IKLE4Quasi-bubble point
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SFStructure of functions f
[in]SUBief_obj structure of u
[in]SURDETHere = 1/(2*surfac)
[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]icoord[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]FFunction used in the formula
[in]ICOORD1: derivative along x, 2: along y
[in]IKLE1First points of triangles
[in]IKLE2Second points of triangles
[in]IKLE3Third points of triangles
[in]IKLE4Quasi-bubble point
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SFStructure of functions f
[in]SUBief_obj structure of u
[in]SURDETHere = 1/(2*surfac)
[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 13 of file mt12aa.f.

+ Here is the caller graph for this function: