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

Go to the source code of this file.

Functions/Subroutines

subroutine comp_fac (ELTSEG, ORISEG, IFABOR, NELEM, NPOIN, IFAC)
 

Function/Subroutine Documentation

◆ comp_fac()

subroutine comp_fac ( integer, dimension(nelem,3), intent(in)  ELTSEG,
integer, dimension(nelem,3), intent(in)  ORISEG,
integer, dimension(nelem,3), intent(in)  IFABOR,
integer, intent(in)  NELEM,
integer, intent(in)  NPOIN,
type(bief_obj), intent(inout)  IFAC 
)
Parameters
[in]nelemELTSEG Gives the segment number of edges of elements
[in]ORISEGOrientation of segments (1 or 2).
[in,out]FACCoefficient for computing dot products in //
[in]IFABOR-2 means interface with another sub-domain
[in]NELEMNumber of elements
[in]NPOINNumber of points
[in]npoinELTSEG Gives the segment number of edges of elements
[in]ORISEGOrientation of segments (1 or 2).
[in,out]FACCoefficient for computing dot products in //
[in]IFABOR-2 means interface with another sub-domain
[in]NELEMNumber of elements
[in]NPOINNumber of points

Definition at line 7 of file comp_fac.f.

+ Here is the caller graph for this function: