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

Go to the source code of this file.

Functions/Subroutines

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

Function/Subroutine Documentation

◆ mt08ac()

subroutine mt08ac ( 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,
double precision, dimension(*), intent(in)  F,
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,
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]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]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]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]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]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]XELAbscissae of points in the mesh, per element
[in]YELOrdinates of points in the mesh, per element
[in]XMULMultiplication factor

Definition at line 12 of file mt08ac.f.

+ Here is the caller graph for this function: