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

Go to the source code of this file.

Functions/Subroutines

subroutine mt12ac (A11, A12, A13, A14, A15, A16, A21, A22, A23, A24, A25, A26, A31, A32, A33, A34, A35, A36, XMUL, SF, SU, SV, F, U, V, XEL, YEL, SURFAC, IKLE1, IKLE2, IKLE3, IKLE4, IKLE5, IKLE6, NELEM, NELMAX, ICOORD)
 

Function/Subroutine Documentation

◆ mt12ac()

subroutine mt12ac ( 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, 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)  SURFAC,
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,
integer, intent(in)  ICOORD 
)
Parameters
[in]nelem[out] A36 Elements 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]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] A36 Elements 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]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]icoord[out] A36 Elements 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]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 13 of file mt12ac.f.

+ Here is the caller graph for this function: