Go to the source code of this file.
Functions/Subroutines | |
| subroutine | vc13pp2 (XMUL, SF, F, X, Y, Z, IKLE1, IKLE2, IKLE3, IKLE4, IKLE5, IKLE6, NELEM, NELMAX, W1, W2, W3, W4, W5, W6, ICOORD) |
Function/Subroutine Documentation
◆ vc13pp2()
| subroutine vc13pp2 | ( | double precision, intent(in) | XMUL, |
| type(bief_obj), intent(in) | SF, | ||
| double precision, dimension(*), intent(in) | F, | ||
| double precision, dimension(nelmax,6), intent(in) | X, | ||
| double precision, dimension(nelmax,6), intent(in) | Y, | ||
| double precision, dimension(*), intent(in) | Z, | ||
| 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, | ||
| double precision, dimension(nelmax), intent(inout) | W1, | ||
| double precision, dimension(nelmax), intent(inout) | W2, | ||
| double precision, dimension(nelmax), intent(inout) | W3, | ||
| double precision, dimension(nelmax), intent(inout) | W4, | ||
| double precision, dimension(nelmax), intent(inout) | W5, | ||
| double precision, dimension(nelmax), intent(inout) | W6, | ||
| integer, intent(in) | ICOORD | ||
| ) |
- Parameters
-
[in] nelem F Function used in the vector formula [in] FORMUL See at the end of the subroutine [in] ICOORD 1: derivative along x, 2: along y [in] IKLE1 First point of prisms [in] IKLE2 Second point of prisms [in] IKLE3 Third point of prisms [in] IKLE4 Fourth point of prisms [in] IKLE5 Fifth point of prisms [in] IKLE6 Sixth point of prisms [in] NELEM Number of elements [in] NELMAX Maximum number of elements [in] SF Bief_obj structure of f [in] SURFAC Area of triangles [out] W1 Result in non assembled form [out] W2 Result in non assembled form [out] W3 Result in non assembled form [out] W4 Result in non assembled form [out] W5 Result in non assembled form [out] W6 Result in non assembled form [in] X Abscissae of points in the mesh, per element [in] XMUL Multiplication coefficient [in] Y Ordinates of points in the mesh, per element [in] Z Z-coordinates of points in the mesh, per point ! [in] nelmax F Function used in the vector formula [in] FORMUL See at the end of the subroutine [in] ICOORD 1: derivative along x, 2: along y [in] IKLE1 First point of prisms [in] IKLE2 Second point of prisms [in] IKLE3 Third point of prisms [in] IKLE4 Fourth point of prisms [in] IKLE5 Fifth point of prisms [in] IKLE6 Sixth point of prisms [in] NELEM Number of elements [in] NELMAX Maximum number of elements [in] SF Bief_obj structure of f [in] SURFAC Area of triangles [out] W1 Result in non assembled form [out] W2 Result in non assembled form [out] W3 Result in non assembled form [out] W4 Result in non assembled form [out] W5 Result in non assembled form [out] W6 Result in non assembled form [in] X Abscissae of points in the mesh, per element [in] XMUL Multiplication coefficient [in] Y Ordinates of points in the mesh, per element [in] Z Z-coordinates of points in the mesh, per point ! [in] icoord F Function used in the vector formula [in] FORMUL See at the end of the subroutine [in] ICOORD 1: derivative along x, 2: along y [in] IKLE1 First point of prisms [in] IKLE2 Second point of prisms [in] IKLE3 Third point of prisms [in] IKLE4 Fourth point of prisms [in] IKLE5 Fifth point of prisms [in] IKLE6 Sixth point of prisms [in] NELEM Number of elements [in] NELMAX Maximum number of elements [in] SF Bief_obj structure of f [in] SURFAC Area of triangles [out] W1 Result in non assembled form [out] W2 Result in non assembled form [out] W3 Result in non assembled form [out] W4 Result in non assembled form [out] W5 Result in non assembled form [out] W6 Result in non assembled form [in] X Abscissae of points in the mesh, per element [in] XMUL Multiplication coefficient [in] Y Ordinates of points in the mesh, per element [in] Z Z-coordinates of points in the mesh, per point !
Definition at line 9 of file vc13pp2.f.
Here is the caller graph for this function: