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

Go to the source code of this file.

Functions/Subroutines

subroutine bilan_sisyphe (E, ESOMT, T1, VCUMU, DT, NPTFR, INFO, ZFCL_C, ZFCL_S, ZFCL_MS, NSICLA, VOLTOT, NUMLIQ, NFRLIQ, FLBCLA, LT, NIT, NPOIN, VOLU2D, CSF_SABLE, MASDEP, MASDEPT, CHARR, SUSP, SLIDE)
 

Function/Subroutine Documentation

◆ bilan_sisyphe()

subroutine bilan_sisyphe ( type(bief_obj), intent(in)  E,
type(bief_obj), intent(in)  ESOMT,
type(bief_obj), intent(inout)  T1,
double precision, intent(inout)  VCUMU,
double precision, intent(in)  DT,
integer, intent(in)  NPTFR,
logical, intent(in)  INFO,
type(bief_obj), intent(in)  ZFCL_C,
type(bief_obj), intent(in)  ZFCL_S,
type(bief_obj), intent(in)  ZFCL_MS,
integer, intent(in)  NSICLA,
double precision, dimension(nsicla), intent(in)  VOLTOT,
integer, dimension(nptfr), intent(in)  NUMLIQ,
integer, intent(in)  NFRLIQ,
type(bief_obj), intent(inout)  FLBCLA,
integer, intent(in)  LT,
integer, intent(in)  NIT,
integer, intent(in)  NPOIN,
type(bief_obj), intent(in)  VOLU2D,
double precision, intent(in)  CSF_SABLE,
double precision, dimension(nsicla), intent(in)  MASDEP,
double precision, dimension(nsicla), intent(inout)  MASDEPT,
logical, intent(in)  CHARR,
logical, intent(in)  SUSP,
logical, intent(in)  SLIDE 
)
Parameters
[in]nptfrCSF_SABLE 1-porosity
[in]DTTime step
[in]EBed evolution at a given time step
[in]ESOMTCumulated bed evolution
[in]FLBCLABlock of fluxes at boundary for each class
[in]INFOIf yes : information is printed
[in]LTCurrent time step
[in]MASDEPVolume deposited on the bottom for each class FROM THE BEGINNING
[in]MASDEPTVolume deposited on the bottom for each class FOR THIS TIME STEP
[in]MASKELMasking of elements
[in,out]MESHMesh structure
[in]NFRLIQNumber of liquid boundaries
[in]NITNumber of time steps
[in]NPOINNumber of points
[in]NPTFRNumber of boundary nodes
[in]NSICLANumber of size classes for bed materials
[in]NUMLIQLiquid boundary number of boundary points
[in,out]QSCLXCTransport rate for each class x-direction
[in,out]QSCLYCTransport rate for each class y-direction
[in]SVoid structure
[in,out]T1Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]VCUMUVolume of sediment entering the domain
[in]VFIf yes : finite volumes if no : finite elements
[in]VOLTOTVolume total per class of sediment
[in]VOLU2DIntegral of test functions (not assembled in //)
[in,out]ZFCL_CBedload evolution for each sediment class
[in,out]ZFCL_SSuspended load evolution for each sediment class
[in,out]ZFCL_MSSlide evolution for each sediment class
[in]nfrliqCSF_SABLE 1-porosity
[in]DTTime step
[in]EBed evolution at a given time step
[in]ESOMTCumulated bed evolution
[in]FLBCLABlock of fluxes at boundary for each class
[in]INFOIf yes : information is printed
[in]LTCurrent time step
[in]MASDEPVolume deposited on the bottom for each class FROM THE BEGINNING
[in]MASDEPTVolume deposited on the bottom for each class FOR THIS TIME STEP
[in]MASKELMasking of elements
[in,out]MESHMesh structure
[in]NFRLIQNumber of liquid boundaries
[in]NITNumber of time steps
[in]NPOINNumber of points
[in]NPTFRNumber of boundary nodes
[in]NSICLANumber of size classes for bed materials
[in]NUMLIQLiquid boundary number of boundary points
[in,out]QSCLXCTransport rate for each class x-direction
[in,out]QSCLYCTransport rate for each class y-direction
[in]SVoid structure
[in,out]T1Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]VCUMUVolume of sediment entering the domain
[in]VFIf yes : finite volumes if no : finite elements
[in]VOLTOTVolume total per class of sediment
[in]VOLU2DIntegral of test functions (not assembled in //)
[in,out]ZFCL_CBedload evolution for each sediment class
[in,out]ZFCL_SSuspended load evolution for each sediment class
[in,out]ZFCL_MSSlide evolution for each sediment class
[in]nsiclaCSF_SABLE 1-porosity
[in]DTTime step
[in]EBed evolution at a given time step
[in]ESOMTCumulated bed evolution
[in]FLBCLABlock of fluxes at boundary for each class
[in]INFOIf yes : information is printed
[in]LTCurrent time step
[in]MASDEPVolume deposited on the bottom for each class FROM THE BEGINNING
[in]MASDEPTVolume deposited on the bottom for each class FOR THIS TIME STEP
[in]MASKELMasking of elements
[in,out]MESHMesh structure
[in]NFRLIQNumber of liquid boundaries
[in]NITNumber of time steps
[in]NPOINNumber of points
[in]NPTFRNumber of boundary nodes
[in]NSICLANumber of size classes for bed materials
[in]NUMLIQLiquid boundary number of boundary points
[in,out]QSCLXCTransport rate for each class x-direction
[in,out]QSCLYCTransport rate for each class y-direction
[in]SVoid structure
[in,out]T1Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]VCUMUVolume of sediment entering the domain
[in]VFIf yes : finite volumes if no : finite elements
[in]VOLTOTVolume total per class of sediment
[in]VOLU2DIntegral of test functions (not assembled in //)
[in,out]ZFCL_CBedload evolution for each sediment class
[in,out]ZFCL_SSuspended load evolution for each sediment class
[in,out]ZFCL_MSSlide evolution for each sediment class
[in]ltCSF_SABLE 1-porosity
[in]DTTime step
[in]EBed evolution at a given time step
[in]ESOMTCumulated bed evolution
[in]FLBCLABlock of fluxes at boundary for each class
[in]INFOIf yes : information is printed
[in]LTCurrent time step
[in]MASDEPVolume deposited on the bottom for each class FROM THE BEGINNING
[in]MASDEPTVolume deposited on the bottom for each class FOR THIS TIME STEP
[in]MASKELMasking of elements
[in,out]MESHMesh structure
[in]NFRLIQNumber of liquid boundaries
[in]NITNumber of time steps
[in]NPOINNumber of points
[in]NPTFRNumber of boundary nodes
[in]NSICLANumber of size classes for bed materials
[in]NUMLIQLiquid boundary number of boundary points
[in,out]QSCLXCTransport rate for each class x-direction
[in,out]QSCLYCTransport rate for each class y-direction
[in]SVoid structure
[in,out]T1Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]VCUMUVolume of sediment entering the domain
[in]VFIf yes : finite volumes if no : finite elements
[in]VOLTOTVolume total per class of sediment
[in]VOLU2DIntegral of test functions (not assembled in //)
[in,out]ZFCL_CBedload evolution for each sediment class
[in,out]ZFCL_SSuspended load evolution for each sediment class
[in,out]ZFCL_MSSlide evolution for each sediment class
[in]nitCSF_SABLE 1-porosity
[in]DTTime step
[in]EBed evolution at a given time step
[in]ESOMTCumulated bed evolution
[in]FLBCLABlock of fluxes at boundary for each class
[in]INFOIf yes : information is printed
[in]LTCurrent time step
[in]MASDEPVolume deposited on the bottom for each class FROM THE BEGINNING
[in]MASDEPTVolume deposited on the bottom for each class FOR THIS TIME STEP
[in]MASKELMasking of elements
[in,out]MESHMesh structure
[in]NFRLIQNumber of liquid boundaries
[in]NITNumber of time steps
[in]NPOINNumber of points
[in]NPTFRNumber of boundary nodes
[in]NSICLANumber of size classes for bed materials
[in]NUMLIQLiquid boundary number of boundary points
[in,out]QSCLXCTransport rate for each class x-direction
[in,out]QSCLYCTransport rate for each class y-direction
[in]SVoid structure
[in,out]T1Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]VCUMUVolume of sediment entering the domain
[in]VFIf yes : finite volumes if no : finite elements
[in]VOLTOTVolume total per class of sediment
[in]VOLU2DIntegral of test functions (not assembled in //)
[in,out]ZFCL_CBedload evolution for each sediment class
[in,out]ZFCL_SSuspended load evolution for each sediment class
[in,out]ZFCL_MSSlide evolution for each sediment class

Definition at line 11 of file bilan_sisyphe.f.

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