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

Go to the source code of this file.

Functions/Subroutines

subroutine parcom2i_seg (X1, X2, X3, NSEG, NPLAN, ICOM, IAN, MESH, OPT, IELM)
 

Function/Subroutine Documentation

◆ parcom2i_seg()

subroutine parcom2i_seg ( integer, dimension(*), intent(inout)  X1,
integer, dimension(*), intent(inout)  X2,
integer, dimension(*), intent(inout)  X3,
integer, intent(in)  NSEG,
integer, intent(in)  NPLAN,
integer, intent(in)  ICOM,
integer, intent(in)  IAN,
type(bief_mesh), intent(inout)  MESH,
integer, intent(in)  OPT,
integer, intent(in)  IELM 
)
Parameters
[in]icomIAN Number of vectors to be treated (x1, x2, x3)
[in]ICOMCommunication mode = 1 : VALUE WITH MAXIMUM ABSOLUTE VALUE TAKEN = 2 : CONTRIBUTIONS ADDED = 3 : MAXIMUM CONTRIBUTION RETAINED = 4 : MINIMUM CONTRIBUTION RETAINED
[in]IELMType of element (11: linear triangle, etc.)
[in]MESHMesh structure
[in]NPLANNumber of planes
[in]NSEGNumber of 2d segments
[in]OPT1 : horizontal and vertical segments only 2 : ALL SEGMENTS
[in,out]X1Integer vector to be completed, see ian
[in,out]X2Integer vector to be completed, see ian
[in,out]X3Integer vector to be completed, see ian
[in]nsegIAN Number of vectors to be treated (x1, x2, x3)
[in]ICOMCommunication mode = 1 : VALUE WITH MAXIMUM ABSOLUTE VALUE TAKEN = 2 : CONTRIBUTIONS ADDED = 3 : MAXIMUM CONTRIBUTION RETAINED = 4 : MINIMUM CONTRIBUTION RETAINED
[in]IELMType of element (11: linear triangle, etc.)
[in]MESHMesh structure
[in]NPLANNumber of planes
[in]NSEGNumber of 2d segments
[in]OPT1 : horizontal and vertical segments only 2 : ALL SEGMENTS
[in,out]X1Integer vector to be completed, see ian
[in,out]X2Integer vector to be completed, see ian
[in,out]X3Integer vector to be completed, see ian
[in]nplanIAN Number of vectors to be treated (x1, x2, x3)
[in]ICOMCommunication mode = 1 : VALUE WITH MAXIMUM ABSOLUTE VALUE TAKEN = 2 : CONTRIBUTIONS ADDED = 3 : MAXIMUM CONTRIBUTION RETAINED = 4 : MINIMUM CONTRIBUTION RETAINED
[in]IELMType of element (11: linear triangle, etc.)
[in]MESHMesh structure
[in]NPLANNumber of planes
[in]NSEGNumber of 2d segments
[in]OPT1 : horizontal and vertical segments only 2 : ALL SEGMENTS
[in,out]X1Integer vector to be completed, see ian
[in,out]X2Integer vector to be completed, see ian
[in,out]X3Integer vector to be completed, see ian
[in]ianIAN Number of vectors to be treated (x1, x2, x3)
[in]ICOMCommunication mode = 1 : VALUE WITH MAXIMUM ABSOLUTE VALUE TAKEN = 2 : CONTRIBUTIONS ADDED = 3 : MAXIMUM CONTRIBUTION RETAINED = 4 : MINIMUM CONTRIBUTION RETAINED
[in]IELMType of element (11: linear triangle, etc.)
[in]MESHMesh structure
[in]NPLANNumber of planes
[in]NSEGNumber of 2d segments
[in]OPT1 : horizontal and vertical segments only 2 : ALL SEGMENTS
[in,out]X1Integer vector to be completed, see ian
[in,out]X2Integer vector to be completed, see ian
[in,out]X3Integer vector to be completed, see ian
[in]optIAN Number of vectors to be treated (x1, x2, x3)
[in]ICOMCommunication mode = 1 : VALUE WITH MAXIMUM ABSOLUTE VALUE TAKEN = 2 : CONTRIBUTIONS ADDED = 3 : MAXIMUM CONTRIBUTION RETAINED = 4 : MINIMUM CONTRIBUTION RETAINED
[in]IELMType of element (11: linear triangle, etc.)
[in]MESHMesh structure
[in]NPLANNumber of planes
[in]NSEGNumber of 2d segments
[in]OPT1 : horizontal and vertical segments only 2 : ALL SEGMENTS
[in,out]X1Integer vector to be completed, see ian
[in,out]X2Integer vector to be completed, see ian
[in,out]X3Integer vector to be completed, see ian
[in]ielmIAN Number of vectors to be treated (x1, x2, x3)
[in]ICOMCommunication mode = 1 : VALUE WITH MAXIMUM ABSOLUTE VALUE TAKEN = 2 : CONTRIBUTIONS ADDED = 3 : MAXIMUM CONTRIBUTION RETAINED = 4 : MINIMUM CONTRIBUTION RETAINED
[in]IELMType of element (11: linear triangle, etc.)
[in]MESHMesh structure
[in]NPLANNumber of planes
[in]NSEGNumber of 2d segments
[in]OPT1 : horizontal and vertical segments only 2 : ALL SEGMENTS
[in,out]X1Integer vector to be completed, see ian
[in,out]X2Integer vector to be completed, see ian
[in,out]X3Integer vector to be completed, see ian

Definition at line 7 of file parcom2i_seg.f.

+ Here is the call graph for this function:
+ Here is the caller graph for this function: