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

Go to the source code of this file.

Functions/Subroutines

subroutine bedload_diffin_gaia (U2D, V2D, NBOR, XNEBOR, YNEBOR, MASKEL, NELBOR, NPTFR, KENT, KSORT, KLOG, KDIR, KDDL, KNEU, MSK, CLT, LITBOR, MASKTR, LIMTRA, IKLBOR, NELEB, NELEBX)
 

Function/Subroutine Documentation

◆ bedload_diffin_gaia()

subroutine bedload_diffin_gaia ( type(bief_obj), intent(in)  U2D,
type(bief_obj), intent(in)  V2D,
type(bief_obj), intent(in)  NBOR,
type(bief_obj), intent(in)  XNEBOR,
type(bief_obj), intent(in)  YNEBOR,
type(bief_obj), intent(in)  MASKEL,
type(bief_obj), intent(in)  NELBOR,
integer, intent(in)  NPTFR,
integer, intent(in)  KENT,
integer, intent(in)  KSORT,
integer, intent(in)  KLOG,
integer, intent(in)  KDIR,
integer, intent(in)  KDDL,
integer, intent(in)  KNEU,
logical, intent(in)  MSK,
type(bief_obj), intent(inout)  CLT,
type(bief_obj), intent(inout)  LITBOR,
type(bief_obj), intent(inout)  MASKTR,
type(bief_obj), intent(inout)  LIMTRA,
integer, dimension(nelebx,2), intent(in)  IKLBOR,
integer, intent(in)  NELEB,
integer, intent(in)  NELEBX 
)
Parameters
[in]u2dU2D Mean flow velocity x-direction
[in]V2DMean flow velocity y-direction
[in]NBORNumber of boudary points
[in]XNEBORX-coordinates of the boundary point
[in]YNEBORY-coordinates of the boundary point
[in]MASKELMasking of elements
[in]NELBORNumbers of elements touching the border
[in]NPTFRNumber of boudaries
[in]KENTConvention for liquid input with prescribed value
[in]KSORTConvention for free output
[in]KLOGConvention for solid boundary
[in]KDIRConvention for dirichlet point
[in]KDDLConvention for degree of freedom
[in]KNEUConvention for neumann condition
[in]MSKIf yes, there is masked elements
[in,out]CLTType of boundary conditions for tracer
[in,out]LITBORType of boundary conditions for tracer (***)
[in,out]MASKTRMasking for tracers, per point
[in,out]LIMTRAType of boundary condition for tracer
[in]IKLBORConnectivity of boundary elements.
[in]NELEBNumber of boudary elements
[in]NELEBXMaximum number of boudary elements
[in]v2dU2D Mean flow velocity x-direction
[in]V2DMean flow velocity y-direction
[in]NBORNumber of boudary points
[in]XNEBORX-coordinates of the boundary point
[in]YNEBORY-coordinates of the boundary point
[in]MASKELMasking of elements
[in]NELBORNumbers of elements touching the border
[in]NPTFRNumber of boudaries
[in]KENTConvention for liquid input with prescribed value
[in]KSORTConvention for free output
[in]KLOGConvention for solid boundary
[in]KDIRConvention for dirichlet point
[in]KDDLConvention for degree of freedom
[in]KNEUConvention for neumann condition
[in]MSKIf yes, there is masked elements
[in,out]CLTType of boundary conditions for tracer
[in,out]LITBORType of boundary conditions for tracer (***)
[in,out]MASKTRMasking for tracers, per point
[in,out]LIMTRAType of boundary condition for tracer
[in]IKLBORConnectivity of boundary elements.
[in]NELEBNumber of boudary elements
[in]NELEBXMaximum number of boudary elements
[in]nborU2D Mean flow velocity x-direction
[in]V2DMean flow velocity y-direction
[in]NBORNumber of boudary points
[in]XNEBORX-coordinates of the boundary point
[in]YNEBORY-coordinates of the boundary point
[in]MASKELMasking of elements
[in]NELBORNumbers of elements touching the border
[in]NPTFRNumber of boudaries
[in]KENTConvention for liquid input with prescribed value
[in]KSORTConvention for free output
[in]KLOGConvention for solid boundary
[in]KDIRConvention for dirichlet point
[in]KDDLConvention for degree of freedom
[in]KNEUConvention for neumann condition
[in]MSKIf yes, there is masked elements
[in,out]CLTType of boundary conditions for tracer
[in,out]LITBORType of boundary conditions for tracer (***)
[in,out]MASKTRMasking for tracers, per point
[in,out]LIMTRAType of boundary condition for tracer
[in]IKLBORConnectivity of boundary elements.
[in]NELEBNumber of boudary elements
[in]NELEBXMaximum number of boudary elements
[in]xneborU2D Mean flow velocity x-direction
[in]V2DMean flow velocity y-direction
[in]NBORNumber of boudary points
[in]XNEBORX-coordinates of the boundary point
[in]YNEBORY-coordinates of the boundary point
[in]MASKELMasking of elements
[in]NELBORNumbers of elements touching the border
[in]NPTFRNumber of boudaries
[in]KENTConvention for liquid input with prescribed value
[in]KSORTConvention for free output
[in]KLOGConvention for solid boundary
[in]KDIRConvention for dirichlet point
[in]KDDLConvention for degree of freedom
[in]KNEUConvention for neumann condition
[in]MSKIf yes, there is masked elements
[in,out]CLTType of boundary conditions for tracer
[in,out]LITBORType of boundary conditions for tracer (***)
[in,out]MASKTRMasking for tracers, per point
[in,out]LIMTRAType of boundary condition for tracer
[in]IKLBORConnectivity of boundary elements.
[in]NELEBNumber of boudary elements
[in]NELEBXMaximum number of boudary elements
[in]yneborU2D Mean flow velocity x-direction
[in]V2DMean flow velocity y-direction
[in]NBORNumber of boudary points
[in]XNEBORX-coordinates of the boundary point
[in]YNEBORY-coordinates of the boundary point
[in]MASKELMasking of elements
[in]NELBORNumbers of elements touching the border
[in]NPTFRNumber of boudaries
[in]KENTConvention for liquid input with prescribed value
[in]KSORTConvention for free output
[in]KLOGConvention for solid boundary
[in]KDIRConvention for dirichlet point
[in]KDDLConvention for degree of freedom
[in]KNEUConvention for neumann condition
[in]MSKIf yes, there is masked elements
[in,out]CLTType of boundary conditions for tracer
[in,out]LITBORType of boundary conditions for tracer (***)
[in,out]MASKTRMasking for tracers, per point
[in,out]LIMTRAType of boundary condition for tracer
[in]IKLBORConnectivity of boundary elements.
[in]NELEBNumber of boudary elements
[in]NELEBXMaximum number of boudary elements

Definition at line 9 of file bedload_diffin_gaia.f.

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