The TELEMAC-MASCARET system  trunk
Functions/Subroutines | Variables
initial_drogues Module Reference

Functions/Subroutines

subroutine sample_wpoin (NP, NP_MAX, NCLS, NTAG, XP, YP, TAGP, CLSP, ELTP, SHPP, DSTY, NPOIN, NELEM, NELMAX, IKLE, CLSN, X, Y)
 
subroutine sample_triangle (IP, NP, NP_MAX, IELM, ITAG, ICLS, TAGP, CLSP, ELTP, SHPP, XP, YP, X1, Y1, X2, Y2, X3, Y3)
 
subroutine sample_polyline (NP, NP_MAX, NCLS, NTAG, XP, YP, TAGP, CLSP, ELTP, SHPP, DSTY, NY, IY, VY, NG, XG, YG, NPOIN, NELEM, NELMAX, IKLE, X, Y)
 
subroutine sample_points (NP, NP_MAX, NCLS, NTAG, XP, YP, TAGP, CLSP, ELTP, SHPP, NG, XG, YG, VG, NPOIN, NELEM, NELMAX, IKLE, X, Y)
 

Variables

integer ndrg_clss
 
integer ndrg_tags = 0
 
type(bief_obj), target nodclss
 
type(bief_obj), target parclss
 
double precision, dimension(:), allocatable drg_density
 
double precision, dimension(:), allocatable drg_release
 

Function/Subroutine Documentation

◆ sample_points()

subroutine initial_drogues::sample_points ( integer, intent(inout)  NP,
integer, intent(in)  NP_MAX,
integer, intent(in)  NCLS,
integer, intent(inout)  NTAG,
double precision, dimension(np_max), intent(inout)  XP,
double precision, dimension(np_max), intent(inout)  YP,
integer, dimension(np_max), intent(inout)  TAGP,
integer, dimension(np_max), intent(inout)  CLSP,
integer, dimension(np_max), intent(inout)  ELTP,
double precision, dimension(3,np_max), intent(inout)  SHPP,
integer, intent(in)  NG,
double precision, dimension(ng), intent(in)  XG,
double precision, dimension(ng), intent(in)  YG,
double precision, dimension(ng), intent(in)  VG,
integer, intent(in)  NPOIN,
integer, intent(in)  NELEM,
integer, intent(in)  NELMAX,
integer, dimension(nelmax,3), intent(in)  IKLE,
double precision, dimension(npoin), intent(in)  X,
double precision, dimension(npoin), intent(in)  Y 
)
Parameters
[in,out]np[in] VG Arrays of values per point
[in]YOrdinates of points in the mesh
[in,out]ntag[in] VG Arrays of values per point
[in]YOrdinates of points in the mesh

Definition at line 705 of file initial_drogues.f.

+ Here is the caller graph for this function:

◆ sample_polyline()

subroutine initial_drogues::sample_polyline ( integer, intent(inout)  NP,
integer, intent(in)  NP_MAX,
integer, intent(in)  NCLS,
integer, intent(inout)  NTAG,
double precision, dimension(np_max), intent(inout)  XP,
double precision, dimension(np_max), intent(inout)  YP,
integer, dimension(np_max), intent(inout)  TAGP,
integer, dimension(np_max), intent(inout)  CLSP,
integer, dimension(np_max), intent(inout)  ELTP,
double precision, dimension(3,np_max), intent(inout)  SHPP,
double precision, dimension(ncls), intent(in)  DSTY,
integer, intent(in)  NY,
integer, dimension(ny), intent(in)  IY,
double precision, dimension(ny), intent(in)  VY,
integer, intent(in)  NG,
double precision, dimension(ng), intent(in)  XG,
double precision, dimension(ng), intent(in)  YG,
integer, intent(in)  NPOIN,
integer, intent(in)  NELEM,
integer, intent(in)  NELMAX,
integer, dimension(nelmax,3), intent(in)  IKLE,
double precision, dimension(npoin), intent(in)  X,
double precision, dimension(npoin), intent(in)  Y 
)
Parameters
[in,out]np[in] VY Arrays of values per polygons
[in]YOrdinates of points in the mesh
[in,out]ntag[in] VY Arrays of values per polygons
[in]YOrdinates of points in the mesh

Definition at line 434 of file initial_drogues.f.

+ Here is the caller graph for this function:

◆ sample_triangle()

subroutine initial_drogues::sample_triangle ( integer, intent(in)  IP,
integer, intent(in)  NP,
integer, intent(in)  NP_MAX,
integer, intent(in)  IELM,
integer, intent(inout)  ITAG,
integer, intent(inout)  ICLS,
integer, dimension(np_max), intent(inout)  TAGP,
integer, dimension(np_max), intent(inout)  CLSP,
integer, dimension(np_max), intent(inout)  ELTP,
double precision, dimension(3,np_max), intent(inout)  SHPP,
double precision, dimension(np_max), intent(inout)  XP,
double precision, dimension(np_max), intent(inout)  YP,
double precision, intent(in)  X1,
double precision, intent(in)  Y1,
double precision, intent(in)  X2,
double precision, intent(in)  Y2,
double precision, intent(in)  X3,
double precision, intent(in)  Y3 
)
Parameters
[in]ip[in, out] CLSP Class of each drogue
[in,out]ELTPElement for each drogue
[in,out]ICLSClass to be assigned
[in]IELMElement to be assigned
[in]IPIndex number of first drogue
[in]ITAGTagging range for drogues per processor
[in]NPNumber of drogues to be created
[in]NP_MAXMaximum number of drogues to be created
[in,out]SHPPBarycentric coordinates of drogues
[in,out]TAGPTag of each drogue
[in]np[in, out] CLSP Class of each drogue
[in,out]ELTPElement for each drogue
[in,out]ICLSClass to be assigned
[in]IELMElement to be assigned
[in]IPIndex number of first drogue
[in]ITAGTagging range for drogues per processor
[in]NPNumber of drogues to be created
[in]NP_MAXMaximum number of drogues to be created
[in,out]SHPPBarycentric coordinates of drogues
[in,out]TAGPTag of each drogue
[in]np_max[in, out] CLSP Class of each drogue
[in,out]ELTPElement for each drogue
[in,out]ICLSClass to be assigned
[in]IELMElement to be assigned
[in]IPIndex number of first drogue
[in]ITAGTagging range for drogues per processor
[in]NPNumber of drogues to be created
[in]NP_MAXMaximum number of drogues to be created
[in,out]SHPPBarycentric coordinates of drogues
[in,out]TAGPTag of each drogue
[in]ielm[in, out] CLSP Class of each drogue
[in,out]ELTPElement for each drogue
[in,out]ICLSClass to be assigned
[in]IELMElement to be assigned
[in]IPIndex number of first drogue
[in]ITAGTagging range for drogues per processor
[in]NPNumber of drogues to be created
[in]NP_MAXMaximum number of drogues to be created
[in,out]SHPPBarycentric coordinates of drogues
[in,out]TAGPTag of each drogue

Definition at line 342 of file initial_drogues.f.

+ Here is the caller graph for this function:

◆ sample_wpoin()

subroutine initial_drogues::sample_wpoin ( integer, intent(inout)  NP,
integer, intent(in)  NP_MAX,
integer, intent(in)  NCLS,
integer, intent(inout)  NTAG,
double precision, dimension(np_max), intent(inout)  XP,
double precision, dimension(np_max), intent(inout)  YP,
integer, dimension(np_max), intent(inout)  TAGP,
integer, dimension(np_max), intent(inout)  CLSP,
integer, dimension(np_max), intent(inout)  ELTP,
double precision, dimension(3,np_max), intent(inout)  SHPP,
double precision, dimension(ncls), intent(in)  DSTY,
integer, intent(in)  NPOIN,
integer, intent(in)  NELEM,
integer, intent(in)  NELMAX,
integer, dimension(nelmax,3), intent(in)  IKLE,
integer, dimension(npoin), intent(in)  CLSN,
double precision, dimension(npoin), intent(in)  X,
double precision, dimension(npoin), intent(in)  Y 
)
Parameters
[in,out]np[in] CLSN Class at nodes
[in,out]CLSPClass of each drogue
[in]DSTYDrogue density for each class
[in,out]ELTPElement for each drogue
[in]IKLEConnectivity matrix
[in]NELEMNumber of elements in ikle
[in]NELMAXMaximum number of elements in ikle
[in]NCLSNumber of classes
[in]NPNumber of drogues to be created
[in]NPOINNumber of nodes in the mesh
[in]NP_MAXMaximum number of drogues to be created
[in,out]NTAGNumber of tags
[in,out]SHPPBarycentric coordinates of drogues
[in,out]TAGPTag of each drogue
[in]XAbscissae of points in the mesh
[in,out]XPAbscissae of drogues
[in]YOrdinates of points in the mesh
[in]YPOrdinates of drogues
[in,out]ntag[in] CLSN Class at nodes
[in,out]CLSPClass of each drogue
[in]DSTYDrogue density for each class
[in,out]ELTPElement for each drogue
[in]IKLEConnectivity matrix
[in]NELEMNumber of elements in ikle
[in]NELMAXMaximum number of elements in ikle
[in]NCLSNumber of classes
[in]NPNumber of drogues to be created
[in]NPOINNumber of nodes in the mesh
[in]NP_MAXMaximum number of drogues to be created
[in,out]NTAGNumber of tags
[in,out]SHPPBarycentric coordinates of drogues
[in,out]TAGPTag of each drogue
[in]XAbscissae of points in the mesh
[in,out]XPAbscissae of drogues
[in]YOrdinates of points in the mesh
[in]YPOrdinates of drogues

Definition at line 81 of file initial_drogues.f.

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

Variable Documentation

◆ drg_density

double precision, dimension(:), allocatable initial_drogues::drg_density

Definition at line 61 of file initial_drogues.f.

◆ drg_release

double precision, dimension(:), allocatable initial_drogues::drg_release

Definition at line 62 of file initial_drogues.f.

◆ ndrg_clss

integer initial_drogues::ndrg_clss

Definition at line 41 of file initial_drogues.f.

◆ ndrg_tags

integer initial_drogues::ndrg_tags = 0

Definition at line 45 of file initial_drogues.f.

◆ nodclss

type(bief_obj), target initial_drogues::nodclss

Definition at line 50 of file initial_drogues.f.

◆ parclss

type(bief_obj), target initial_drogues::parclss

Definition at line 55 of file initial_drogues.f.