The TELEMAC-MASCARET system  trunk
circul.f File Reference

Go to the source code of this file.


subroutine circul (IKLE, ITEST1, IELEM, I1, I2, I3, X, Y, NNELMAX)

Function/Subroutine Documentation

◆ circul()

subroutine circul ( integer, dimension(nnelmax,4), intent(inout)  IKLE,
integer, intent(inout)  ITEST1,
integer, intent(in)  IELEM,
integer, intent(in)  I1,
integer, intent(in)  I2,
integer, intent(in)  I3,
double precision, dimension(*), intent(in)  X,
double precision, dimension(*), intent(in)  Y,
integer, intent(in)  NNELMAX 
[in]nnelmaxNDP Nombre de noeuds par elements
[in]NPOINNombre total de noeuds du maillage
[in]NELEMNombre total d'elements du maillage
[in]NPMAXDimension effective des tableaux x et y (NPMAX = NPOIN + 0.1*NELEM)
[in]NNELMAXDimension effective des tableaux concernant LES ELEMENTS (NNELMAX = NELEM + 0.2*NELEM)

Definition at line 7 of file circul.f.

+ Here is the caller graph for this function: