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

Go to the source code of this file.

Functions/Subroutines

subroutine kspg11 (KX, KY, XEL, YEL, U, V, IKLE, NELEM, NELMAX, XMUL)
 

Function/Subroutine Documentation

◆ kspg11()

subroutine kspg11 ( double precision, dimension(nelem), intent(inout)  KX,
double precision, dimension(nelem), intent(inout)  KY,
double precision, dimension(nelmax,*), intent(in)  XEL,
double precision, dimension(nelmax,*), intent(in)  YEL,
double precision, dimension(*), intent(in)  U,
double precision, dimension(*), intent(in)  V,
integer, dimension(nelmax,*), intent(in)  IKLE,
integer, intent(in)  NELEM,
integer, intent(in)  NELMAX,
double precision, intent(in)  XMUL 
)
Parameters
[in]nelemIKLE Connectivity table.
[in]KXFirst component of resulting vector
[in]KYSecond component of resulting vector
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]UFirst component of velocity
[in]VSecond component of velocity
[in]XMULMultiplication coeficient
[in]nelmaxIKLE Connectivity table.
[in]KXFirst component of resulting vector
[in]KYSecond component of resulting vector
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]UFirst component of velocity
[in]VSecond component of velocity
[in]XMULMultiplication coeficient

Definition at line 7 of file kspg11.f.

+ Here is the caller graph for this function: