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

Go to the source code of this file.

Functions/Subroutines

subroutine bedload_evol (S, ELAY, AVA, COEFPN, CALFA, SALFA, LIMTEC, EBOR, MASKEL, MASK, V2DPAR, UNSV2D, DEBUG, NPOIN, NPTFR, IELMT, KENT, KDIR, KDDL, DTS, VF, ENTET, MSK, MESH, QS, T1, T2, T3, T4, T8, T11, T12, T13, CSF_SABLE, BREACH, QSX, QSY, ZFCL, SLOPEFF, ICLA, FLBCLA, LIQBOR, QBOR, MAXADV)
 

Function/Subroutine Documentation

◆ bedload_evol()

subroutine bedload_evol ( type(bief_obj), intent(in)  S,
type(bief_obj), intent(in)  ELAY,
double precision, dimension(npoin), intent(in)  AVA,
type(bief_obj), intent(in)  COEFPN,
type(bief_obj), intent(in)  CALFA,
type(bief_obj), intent(in)  SALFA,
type(bief_obj), intent(inout)  LIMTEC,
type(bief_obj), intent(inout)  EBOR,
type(bief_obj), intent(in)  MASKEL,
type(bief_obj), intent(in)  MASK,
type(bief_obj), intent(in)  V2DPAR,
type(bief_obj), intent(in)  UNSV2D,
integer, intent(in)  DEBUG,
integer, intent(in)  NPOIN,
integer, intent(in)  NPTFR,
integer, intent(in)  IELMT,
integer, intent(in)  KENT,
integer, intent(in)  KDIR,
integer, intent(in)  KDDL,
double precision, intent(in)  DTS,
logical, intent(in)  VF,
logical, intent(in)  ENTET,
logical, intent(in)  MSK,
type(bief_mesh), intent(inout)  MESH,
type(bief_obj), intent(inout)  QS,
type(bief_obj), intent(inout)  T1,
type(bief_obj), intent(inout)  T2,
type(bief_obj), intent(inout)  T3,
type(bief_obj), intent(inout)  T4,
type(bief_obj), intent(inout)  T8,
type(bief_obj), intent(inout)  T11,
type(bief_obj), intent(inout)  T12,
type(bief_obj), intent(inout)  T13,
double precision, intent(in)  CSF_SABLE,
type(bief_obj), intent(inout)  BREACH,
type(bief_obj), intent(inout)  QSX,
type(bief_obj), intent(inout)  QSY,
type(bief_obj), intent(inout)  ZFCL,
integer, intent(in)  SLOPEFF,
integer, intent(in)  ICLA,
type(bief_obj), intent(inout)  FLBCLA,
type(bief_obj), intent(in)  LIQBOR,
type(bief_obj), intent(in)  QBOR,
integer, intent(in)  MAXADV 
)
Parameters
[in]sAVA Percent available
[in,out]BREACHIndicator for non erodible bed (finite volumes shemes)
[in,out]CALFACosinus of the angle between mean flow and transport
[in,out]COEFPNCorrection of transort for sloping bed effect
[in]DEBUGFlag for debugging
[in,out]DTSTime step for suspension
[in,out]EBORBoundary condition for bed evolution (dirichlet)
[in,out]ELAYThickness of surface layer
[in,out]ELAY0Active layer thickness
[in]ENTETLogical, if yes information is given on mass conservation
[in]FLBCLABlock of fluxes at boundary for each class
[in]ICLAClass number
[in]IELMTNumber of elements
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]KENTConvention for liquid input with prescribed value
[in,out]LIMTECType of boundary condition
[in]LIQBORType of boundary condition for bedload discharge
[in]MASKBlock of masks, every one for a type of boundary
[in]MASKELMasking of elements
[in]MAXADVMaximum number of iterations (in positive_depths)
[in,out]MESHMesh structure
[in]MSKIf yes, there is masked elements
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]QBORPrescribed bedload discharge
[in,out]QSEdload transport rate
[in,out]QSXSolid discharge x
[in,out]QSYSolid discharge y
[in]SVoid structure
[in,out]SALFASinus of the angle between transport rate and current
[in]SLOPEFFLogical, sloping bed effect or not
[in,out]T1Work bief_obj structure
[in,out]T11Work bief_obj structure
[in,out]T12Work bief_obj structure
[in,out]T13Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]T3Work bief_obj structure
[in,out]T4Work bief_obj structure
[in,out]T8Work bief_obj structure
[in]UNSV2DInverse of integrals of test functions
[in]V2DPARIntegral of test functions, assembled in parallel
[in]VFLogical, finite volumes or not
[in,out]ZFCLBed evolution per class, due to suspended sediment
[in]unsv2dAVA Percent available
[in,out]BREACHIndicator for non erodible bed (finite volumes shemes)
[in,out]CALFACosinus of the angle between mean flow and transport
[in,out]COEFPNCorrection of transort for sloping bed effect
[in]DEBUGFlag for debugging
[in,out]DTSTime step for suspension
[in,out]EBORBoundary condition for bed evolution (dirichlet)
[in,out]ELAYThickness of surface layer
[in,out]ELAY0Active layer thickness
[in]ENTETLogical, if yes information is given on mass conservation
[in]FLBCLABlock of fluxes at boundary for each class
[in]ICLAClass number
[in]IELMTNumber of elements
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]KENTConvention for liquid input with prescribed value
[in,out]LIMTECType of boundary condition
[in]LIQBORType of boundary condition for bedload discharge
[in]MASKBlock of masks, every one for a type of boundary
[in]MASKELMasking of elements
[in]MAXADVMaximum number of iterations (in positive_depths)
[in,out]MESHMesh structure
[in]MSKIf yes, there is masked elements
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]QBORPrescribed bedload discharge
[in,out]QSEdload transport rate
[in,out]QSXSolid discharge x
[in,out]QSYSolid discharge y
[in]SVoid structure
[in,out]SALFASinus of the angle between transport rate and current
[in]SLOPEFFLogical, sloping bed effect or not
[in,out]T1Work bief_obj structure
[in,out]T11Work bief_obj structure
[in,out]T12Work bief_obj structure
[in,out]T13Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]T3Work bief_obj structure
[in,out]T4Work bief_obj structure
[in,out]T8Work bief_obj structure
[in]UNSV2DInverse of integrals of test functions
[in]V2DPARIntegral of test functions, assembled in parallel
[in]VFLogical, finite volumes or not
[in,out]ZFCLBed evolution per class, due to suspended sediment
[in]elayAVA Percent available
[in,out]BREACHIndicator for non erodible bed (finite volumes shemes)
[in,out]CALFACosinus of the angle between mean flow and transport
[in,out]COEFPNCorrection of transort for sloping bed effect
[in]DEBUGFlag for debugging
[in,out]DTSTime step for suspension
[in,out]EBORBoundary condition for bed evolution (dirichlet)
[in,out]ELAYThickness of surface layer
[in,out]ELAY0Active layer thickness
[in]ENTETLogical, if yes information is given on mass conservation
[in]FLBCLABlock of fluxes at boundary for each class
[in]ICLAClass number
[in]IELMTNumber of elements
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]KENTConvention for liquid input with prescribed value
[in,out]LIMTECType of boundary condition
[in]LIQBORType of boundary condition for bedload discharge
[in]MASKBlock of masks, every one for a type of boundary
[in]MASKELMasking of elements
[in]MAXADVMaximum number of iterations (in positive_depths)
[in,out]MESHMesh structure
[in]MSKIf yes, there is masked elements
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]QBORPrescribed bedload discharge
[in,out]QSEdload transport rate
[in,out]QSXSolid discharge x
[in,out]QSYSolid discharge y
[in]SVoid structure
[in,out]SALFASinus of the angle between transport rate and current
[in]SLOPEFFLogical, sloping bed effect or not
[in,out]T1Work bief_obj structure
[in,out]T11Work bief_obj structure
[in,out]T12Work bief_obj structure
[in,out]T13Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]T3Work bief_obj structure
[in,out]T4Work bief_obj structure
[in,out]T8Work bief_obj structure
[in]UNSV2DInverse of integrals of test functions
[in]V2DPARIntegral of test functions, assembled in parallel
[in]VFLogical, finite volumes or not
[in,out]ZFCLBed evolution per class, due to suspended sediment

Definition at line 14 of file bedload_evol.f.

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