Go to the source code of this file.
Functions/Subroutines | |
| subroutine | vectos (SVEC, VEC, OP, FORMUL, XMUL, F, G, H, U, V, W, SF, SG, SH, SU, SV, SW, T, LEGO, XEL, YEL, XPT, YPT, ZPT, SURFAC, LGSEG, IKLE, IKLBOR, NBOR, XNOR, YNOR, NPT, NELEM, NELEB, NELMAX, NELEBX, IELM1, LV, MSK, MASKEL, MESH, DIM1T, NELBOR, NULONE, ASSPAR) |
Function/Subroutine Documentation
◆ vectos()
| subroutine vectos | ( | type(bief_obj), intent(inout) | SVEC, |
| double precision, dimension(*), intent(inout) | VEC, | ||
| character(len=1), intent(in) | OP, | ||
| character(len=16), intent(in) | FORMUL, | ||
| double precision, intent(in) | XMUL, | ||
| double precision, dimension(*), intent(in) | F, | ||
| double precision, dimension(*), intent(in) | G, | ||
| double precision, dimension(*), intent(in) | H, | ||
| double precision, dimension(*), intent(in) | U, | ||
| double precision, dimension(*), intent(in) | V, | ||
| double precision, dimension(*), intent(in) | W, | ||
| type(bief_obj), intent(in) | SF, | ||
| type(bief_obj), intent(in) | SG, | ||
| type(bief_obj), intent(in) | SH, | ||
| type(bief_obj), intent(in) | SU, | ||
| type(bief_obj), intent(in) | SV, | ||
| type(bief_obj), intent(in) | SW, | ||
| double precision, dimension(dim1t,*), intent(inout) | T, | ||
| logical, intent(in) | LEGO, | ||
| double precision, dimension(*), intent(in) | XEL, | ||
| double precision, dimension(*), intent(in) | YEL, | ||
| double precision, dimension(*), intent(in) | XPT, | ||
| double precision, dimension(*), intent(in) | YPT, | ||
| double precision, dimension(*), intent(in) | ZPT, | ||
| double precision, dimension(nelmax), intent(in) | SURFAC, | ||
| double precision, dimension(neleb), intent(in) | LGSEG, | ||
| integer, dimension(nelmax,*), intent(in) | IKLE, | ||
| integer, dimension(nelebx,*), intent(in) | IKLBOR, | ||
| integer, dimension(*), intent(in) | NBOR, | ||
| double precision, dimension(*), intent(in) | XNOR, | ||
| double precision, dimension(*), intent(in) | YNOR, | ||
| integer, intent(in) | NPT, | ||
| integer, intent(in) | NELEM, | ||
| integer, intent(in) | NELEB, | ||
| integer, intent(in) | NELMAX, | ||
| integer, intent(in) | NELEBX, | ||
| integer, intent(in) | IELM1, | ||
| integer, intent(in) | LV, | ||
| logical, intent(in) | MSK, | ||
| double precision, dimension(*), intent(in) | MASKEL, | ||
| type(bief_mesh), intent(inout) | MESH, | ||
| integer, intent(in) | DIM1T, | ||
| integer, dimension(nelebx), intent(in) | NELBOR, | ||
| integer, dimension(nelebx,*), intent(in) | NULONE, | ||
| logical, intent(in) | ASSPAR | ||
| ) |
- Parameters
-
[in] nelmax DIM1T First dimension of t (nelmax or nelebx) [in] F Function used in the vector formula [in] FORMUL String with the formula describing the vector [in] G Function used in the vector formula [in] H Function used in the vector formula [in] IELM1 Type of element [in] IKLBOR Connectivity table of boundary elements. [in] IKLE Connectivity table. [in] LEGO If yes : the vector will be assembled [in] LGSEG Length of boundary segments [in] LV Vector length of the machine [in] MASKEL Masking of elements =1. : NORMAL =0. : MASKED ELEMENT [in] MESH Mesh structure [in] MSK If yes, there is masked elements [in] NBOR Global number of boundary points [in] NELBOR Adjacent element number [in] NELEB Number of boundary elements [in] NELEBX Maximum number of boundary elements [in] NELEM Number of elements [in] NELEM_AS Number of elements for the call to assvec [in] NELMAX Maximum number of elements [in] NELMAX_AS Maximum number of elements for the call to assvec [in] NPT Number of points of vector. [in] NULONE Local numbering of boundary element in adjacent ELEMENT. [in] OP Operation to be done (see above) [in] SF Bief_obj structure of f [in] SG Bief_obj structure of g [in] SH Bief_obj structure of h [in] SU Bief_obj structure of u [in] SV Bief_obj structure of v [in] SW Bief_obj structure of w [in] SURFAC Area of triangles [in] T Work array with the non assembled vector [in] U Function used in the vector formula [in] V Function used in the vector formula [in] W Function used in the vector formula [in,out] VEC Resulting vector [in] XEL Abscissae of points in the mesh, per element [in] YEL Ordinates of points in the mesh, per element [in] XMUL Multiplication coefficient [in] XNOR X-component of normal vector [in] YNOR Y-component of normal vector [in] npt DIM1T First dimension of t (nelmax or nelebx) [in] F Function used in the vector formula [in] FORMUL String with the formula describing the vector [in] G Function used in the vector formula [in] H Function used in the vector formula [in] IELM1 Type of element [in] IKLBOR Connectivity table of boundary elements. [in] IKLE Connectivity table. [in] LEGO If yes : the vector will be assembled [in] LGSEG Length of boundary segments [in] LV Vector length of the machine [in] MASKEL Masking of elements =1. : NORMAL =0. : MASKED ELEMENT [in] MESH Mesh structure [in] MSK If yes, there is masked elements [in] NBOR Global number of boundary points [in] NELBOR Adjacent element number [in] NELEB Number of boundary elements [in] NELEBX Maximum number of boundary elements [in] NELEM Number of elements [in] NELEM_AS Number of elements for the call to assvec [in] NELMAX Maximum number of elements [in] NELMAX_AS Maximum number of elements for the call to assvec [in] NPT Number of points of vector. [in] NULONE Local numbering of boundary element in adjacent ELEMENT. [in] OP Operation to be done (see above) [in] SF Bief_obj structure of f [in] SG Bief_obj structure of g [in] SH Bief_obj structure of h [in] SU Bief_obj structure of u [in] SV Bief_obj structure of v [in] SW Bief_obj structure of w [in] SURFAC Area of triangles [in] T Work array with the non assembled vector [in] U Function used in the vector formula [in] V Function used in the vector formula [in] W Function used in the vector formula [in,out] VEC Resulting vector [in] XEL Abscissae of points in the mesh, per element [in] YEL Ordinates of points in the mesh, per element [in] XMUL Multiplication coefficient [in] XNOR X-component of normal vector [in] YNOR Y-component of normal vector [in] nelem DIM1T First dimension of t (nelmax or nelebx) [in] F Function used in the vector formula [in] FORMUL String with the formula describing the vector [in] G Function used in the vector formula [in] H Function used in the vector formula [in] IELM1 Type of element [in] IKLBOR Connectivity table of boundary elements. [in] IKLE Connectivity table. [in] LEGO If yes : the vector will be assembled [in] LGSEG Length of boundary segments [in] LV Vector length of the machine [in] MASKEL Masking of elements =1. : NORMAL =0. : MASKED ELEMENT [in] MESH Mesh structure [in] MSK If yes, there is masked elements [in] NBOR Global number of boundary points [in] NELBOR Adjacent element number [in] NELEB Number of boundary elements [in] NELEBX Maximum number of boundary elements [in] NELEM Number of elements [in] NELEM_AS Number of elements for the call to assvec [in] NELMAX Maximum number of elements [in] NELMAX_AS Maximum number of elements for the call to assvec [in] NPT Number of points of vector. [in] NULONE Local numbering of boundary element in adjacent ELEMENT. [in] OP Operation to be done (see above) [in] SF Bief_obj structure of f [in] SG Bief_obj structure of g [in] SH Bief_obj structure of h [in] SU Bief_obj structure of u [in] SV Bief_obj structure of v [in] SW Bief_obj structure of w [in] SURFAC Area of triangles [in] T Work array with the non assembled vector [in] U Function used in the vector formula [in] V Function used in the vector formula [in] W Function used in the vector formula [in,out] VEC Resulting vector [in] XEL Abscissae of points in the mesh, per element [in] YEL Ordinates of points in the mesh, per element [in] XMUL Multiplication coefficient [in] XNOR X-component of normal vector [in] YNOR Y-component of normal vector [in] ielm1 DIM1T First dimension of t (nelmax or nelebx) [in] F Function used in the vector formula [in] FORMUL String with the formula describing the vector [in] G Function used in the vector formula [in] H Function used in the vector formula [in] IELM1 Type of element [in] IKLBOR Connectivity table of boundary elements. [in] IKLE Connectivity table. [in] LEGO If yes : the vector will be assembled [in] LGSEG Length of boundary segments [in] LV Vector length of the machine [in] MASKEL Masking of elements =1. : NORMAL =0. : MASKED ELEMENT [in] MESH Mesh structure [in] MSK If yes, there is masked elements [in] NBOR Global number of boundary points [in] NELBOR Adjacent element number [in] NELEB Number of boundary elements [in] NELEBX Maximum number of boundary elements [in] NELEM Number of elements [in] NELEM_AS Number of elements for the call to assvec [in] NELMAX Maximum number of elements [in] NELMAX_AS Maximum number of elements for the call to assvec [in] NPT Number of points of vector. [in] NULONE Local numbering of boundary element in adjacent ELEMENT. [in] OP Operation to be done (see above) [in] SF Bief_obj structure of f [in] SG Bief_obj structure of g [in] SH Bief_obj structure of h [in] SU Bief_obj structure of u [in] SV Bief_obj structure of v [in] SW Bief_obj structure of w [in] SURFAC Area of triangles [in] T Work array with the non assembled vector [in] U Function used in the vector formula [in] V Function used in the vector formula [in] W Function used in the vector formula [in,out] VEC Resulting vector [in] XEL Abscissae of points in the mesh, per element [in] YEL Ordinates of points in the mesh, per element [in] XMUL Multiplication coefficient [in] XNOR X-component of normal vector [in] YNOR Y-component of normal vector [in] lv DIM1T First dimension of t (nelmax or nelebx) [in] F Function used in the vector formula [in] FORMUL String with the formula describing the vector [in] G Function used in the vector formula [in] H Function used in the vector formula [in] IELM1 Type of element [in] IKLBOR Connectivity table of boundary elements. [in] IKLE Connectivity table. [in] LEGO If yes : the vector will be assembled [in] LGSEG Length of boundary segments [in] LV Vector length of the machine [in] MASKEL Masking of elements =1. : NORMAL =0. : MASKED ELEMENT [in] MESH Mesh structure [in] MSK If yes, there is masked elements [in] NBOR Global number of boundary points [in] NELBOR Adjacent element number [in] NELEB Number of boundary elements [in] NELEBX Maximum number of boundary elements [in] NELEM Number of elements [in] NELEM_AS Number of elements for the call to assvec [in] NELMAX Maximum number of elements [in] NELMAX_AS Maximum number of elements for the call to assvec [in] NPT Number of points of vector. [in] NULONE Local numbering of boundary element in adjacent ELEMENT. [in] OP Operation to be done (see above) [in] SF Bief_obj structure of f [in] SG Bief_obj structure of g [in] SH Bief_obj structure of h [in] SU Bief_obj structure of u [in] SV Bief_obj structure of v [in] SW Bief_obj structure of w [in] SURFAC Area of triangles [in] T Work array with the non assembled vector [in] U Function used in the vector formula [in] V Function used in the vector formula [in] W Function used in the vector formula [in,out] VEC Resulting vector [in] XEL Abscissae of points in the mesh, per element [in] YEL Ordinates of points in the mesh, per element [in] XMUL Multiplication coefficient [in] XNOR X-component of normal vector [in] YNOR Y-component of normal vector [in] neleb DIM1T First dimension of t (nelmax or nelebx) [in] F Function used in the vector formula [in] FORMUL String with the formula describing the vector [in] G Function used in the vector formula [in] H Function used in the vector formula [in] IELM1 Type of element [in] IKLBOR Connectivity table of boundary elements. [in] IKLE Connectivity table. [in] LEGO If yes : the vector will be assembled [in] LGSEG Length of boundary segments [in] LV Vector length of the machine [in] MASKEL Masking of elements =1. : NORMAL =0. : MASKED ELEMENT [in] MESH Mesh structure [in] MSK If yes, there is masked elements [in] NBOR Global number of boundary points [in] NELBOR Adjacent element number [in] NELEB Number of boundary elements [in] NELEBX Maximum number of boundary elements [in] NELEM Number of elements [in] NELEM_AS Number of elements for the call to assvec [in] NELMAX Maximum number of elements [in] NELMAX_AS Maximum number of elements for the call to assvec [in] NPT Number of points of vector. [in] NULONE Local numbering of boundary element in adjacent ELEMENT. [in] OP Operation to be done (see above) [in] SF Bief_obj structure of f [in] SG Bief_obj structure of g [in] SH Bief_obj structure of h [in] SU Bief_obj structure of u [in] SV Bief_obj structure of v [in] SW Bief_obj structure of w [in] SURFAC Area of triangles [in] T Work array with the non assembled vector [in] U Function used in the vector formula [in] V Function used in the vector formula [in] W Function used in the vector formula [in,out] VEC Resulting vector [in] XEL Abscissae of points in the mesh, per element [in] YEL Ordinates of points in the mesh, per element [in] XMUL Multiplication coefficient [in] XNOR X-component of normal vector [in] YNOR Y-component of normal vector [in] nelebx DIM1T First dimension of t (nelmax or nelebx) [in] F Function used in the vector formula [in] FORMUL String with the formula describing the vector [in] G Function used in the vector formula [in] H Function used in the vector formula [in] IELM1 Type of element [in] IKLBOR Connectivity table of boundary elements. [in] IKLE Connectivity table. [in] LEGO If yes : the vector will be assembled [in] LGSEG Length of boundary segments [in] LV Vector length of the machine [in] MASKEL Masking of elements =1. : NORMAL =0. : MASKED ELEMENT [in] MESH Mesh structure [in] MSK If yes, there is masked elements [in] NBOR Global number of boundary points [in] NELBOR Adjacent element number [in] NELEB Number of boundary elements [in] NELEBX Maximum number of boundary elements [in] NELEM Number of elements [in] NELEM_AS Number of elements for the call to assvec [in] NELMAX Maximum number of elements [in] NELMAX_AS Maximum number of elements for the call to assvec [in] NPT Number of points of vector. [in] NULONE Local numbering of boundary element in adjacent ELEMENT. [in] OP Operation to be done (see above) [in] SF Bief_obj structure of f [in] SG Bief_obj structure of g [in] SH Bief_obj structure of h [in] SU Bief_obj structure of u [in] SV Bief_obj structure of v [in] SW Bief_obj structure of w [in] SURFAC Area of triangles [in] T Work array with the non assembled vector [in] U Function used in the vector formula [in] V Function used in the vector formula [in] W Function used in the vector formula [in,out] VEC Resulting vector [in] XEL Abscissae of points in the mesh, per element [in] YEL Ordinates of points in the mesh, per element [in] XMUL Multiplication coefficient [in] XNOR X-component of normal vector [in] YNOR Y-component of normal vector
Definition at line 12 of file vectos.f.
Here is the call graph for this function: Here is the caller graph for this function: