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

Go to the source code of this file.

Functions/Subroutines

subroutine bedload_main_gaia (ACLADM, KSP, KSR, V2DPAR, UNSV2D, CF, EBOR, FW, HN, LIQBOR, MASK, MASKEL, MASKPT, QBOR, U2D, V2D, S, UNLADM, UW, THETAW, MU, TOB, TOBW, TW, ZF, DEBUG, HIDFAC, ICF, IELMT, KDDL, KDIR, KENT, KLOG, KNEU, KSORT, NPOIN, NPTFR, NSICLA, OPTBAN, BETA, DCLA, GRAV, HIDI, HMIN, VCE, XMVE, XMVS0, XWC, PI, KARMAN, ZERO, KARIM_HOLLY_YANG, MSK, SUSP, VF, MESH, LIEBOR, LIMTEC, MASKTR, IT1, T1, T2, T3, T4, T5, T6, T7, T8, T9, T10, T11, T12, T13, UNORM, AC, DT, BREACH, CALFA_CL, COEFPN, HIDING, QSCL_C, QSCL_S, QS_C, QSCLXC, QSXC, QSCLYC, QSYC, SALFA_CL, ENTETS, SECCURRENT, SLOPEFF, PHISED, DEVIA, BETA2, BIJK, SEDCO, HOULE, U3D, V3D, CODE, FLBCLA, MAXADV, RATIO_SAND, H_TEL, HW, THETAC, TOBCW_MEAN, TOBCW_MAX, CSTAEQ)
 

Function/Subroutine Documentation

◆ bedload_main_gaia()

subroutine bedload_main_gaia ( type(bief_obj), intent(in)  ACLADM,
type(bief_obj), intent(in)  KSP,
type(bief_obj), intent(in)  KSR,
type(bief_obj), intent(in)  V2DPAR,
type(bief_obj), intent(in)  UNSV2D,
type(bief_obj), intent(in)  CF,
type(bief_obj), intent(inout)  EBOR,
type(bief_obj), intent(in)  FW,
type(bief_obj), intent(in)  HN,
type(bief_obj), intent(in)  LIQBOR,
type(bief_obj), intent(in)  MASK,
type(bief_obj), intent(in)  MASKEL,
type(bief_obj), intent(in)  MASKPT,
type(bief_obj), intent(in)  QBOR,
type(bief_obj), intent(inout)  U2D,
type(bief_obj), intent(inout)  V2D,
type(bief_obj), intent(in)  S,
type(bief_obj), intent(in)  UNLADM,
type(bief_obj), intent(in)  UW,
type(bief_obj), intent(in)  THETAW,
type(bief_obj), intent(inout)  MU,
type(bief_obj), intent(inout)  TOB,
type(bief_obj), intent(in)  TOBW,
type(bief_obj), intent(in)  TW,
type(bief_obj), intent(in)  ZF,
integer, intent(in)  DEBUG,
integer, intent(in)  HIDFAC,
integer, intent(in)  ICF,
integer, intent(in)  IELMT,
integer, intent(in)  KDDL,
integer, intent(in)  KDIR,
integer, intent(in)  KENT,
integer, intent(in)  KLOG,
integer, intent(in)  KNEU,
integer, intent(in)  KSORT,
integer, intent(in)  NPOIN,
integer, intent(in)  NPTFR,
integer, intent(in)  NSICLA,
integer, intent(in)  OPTBAN,
double precision, intent(in)  BETA,
double precision, dimension(nsicla), intent(in)  DCLA,
double precision, intent(in)  GRAV,
double precision, dimension(nsicla), intent(in)  HIDI,
double precision, intent(in)  HMIN,
double precision, intent(in)  VCE,
double precision, intent(in)  XMVE,
double precision, dimension(nsicla), intent(in)  XMVS0,
double precision, dimension(nsicla), intent(in)  XWC,
double precision, intent(in)  PI,
double precision, intent(in)  KARMAN,
double precision, intent(in)  ZERO,
double precision, intent(in)  KARIM_HOLLY_YANG,
logical, intent(in)  MSK,
logical, intent(in)  SUSP,
logical, intent(in)  VF,
type(bief_mesh), intent(inout)  MESH,
type(bief_obj), intent(inout)  LIEBOR,
type(bief_obj), intent(inout)  LIMTEC,
type(bief_obj), intent(inout)  MASKTR,
type(bief_obj), intent(inout)  IT1,
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)  T5,
type(bief_obj), intent(inout)  T6,
type(bief_obj), intent(inout)  T7,
type(bief_obj), intent(inout)  T8,
type(bief_obj), intent(inout)  T9,
type(bief_obj), intent(inout)  T10,
type(bief_obj), intent(inout)  T11,
type(bief_obj), intent(inout)  T12,
type(bief_obj), intent(inout)  T13,
type(bief_obj), intent(inout)  UNORM,
double precision, dimension(nsicla), intent(inout)  AC,
double precision, intent(inout)  DT,
type(bief_obj), intent(inout)  BREACH,
type(bief_obj), intent(inout)  CALFA_CL,
type(bief_obj), intent(inout)  COEFPN,
type(bief_obj), intent(inout)  HIDING,
type(bief_obj), intent(inout)  QSCL_C,
type(bief_obj), intent(inout)  QSCL_S,
type(bief_obj), intent(inout)  QS_C,
type(bief_obj), intent(inout)  QSCLXC,
type(bief_obj), intent(inout)  QSXC,
type(bief_obj), intent(inout)  QSCLYC,
type(bief_obj), intent(inout)  QSYC,
type(bief_obj), intent(inout)  SALFA_CL,
logical, intent(inout)  ENTETS,
logical, intent(in)  SECCURRENT,
integer, intent(in)  SLOPEFF,
double precision, intent(in)  PHISED,
integer, intent(in)  DEVIA,
double precision, intent(in)  BETA2,
double precision, intent(in)  BIJK,
logical, dimension(nsicla), intent(in)  SEDCO,
logical, intent(in)  HOULE,
type(bief_obj), intent(in)  U3D,
type(bief_obj), intent(in)  V3D,
character(len=24), intent(in)  CODE,
type(bief_obj), intent(inout)  FLBCLA,
integer, intent(in)  MAXADV,
double precision, dimension(nsand,nomblay,npoin), intent(inout)  RATIO_SAND,
type(bief_obj), intent(in)  H_TEL,
type(bief_obj), intent(in)  HW,
type(bief_obj), intent(in)  THETAC,
type(bief_obj), intent(inout)  TOBCW_MEAN,
type(bief_obj), intent(inout)  TOBCW_MAX,
type(bief_obj), intent(inout)  CSTAEQ 
)
Parameters
[in]acladmACLADM Mean diameter of active layer
[in]KSPBed skin roughness
[in]KSRRipple bed roughness
[in]V2DPARIntegral of test functions, assembled in parallel
[in]UNSV2DInverse of integrals of test functions
[in]CFQuadratic friction coefficient
[in,out]EBORImposed boundary condition for bed evolution (Dirichlet)
[in]FWQuadratic friction coefficient (wave)
[in]HNWater depth
[in]LIQBORType of boundary condition for qs
[in]MASKBlock of masks, every one for a type of boundary See diffin.f in library bief.
[in]MASKELMasking of elements
[in]MASKPTMasking per point
[in]QBORBoundary condition for transport rate
[in,out]U2DMean flow velocity x-direction
[in,out]V2DMean flow velocity y-direction
[in]SVoid Structure
[in]UNLADMMean diameter of active stratum layer
[in]UWOrbital wave velocity
[in]THETAWWave direction (deg wrt ox axis)
[in,out]MUCorrection factor for bed roughness
[in,out]TOBBed shear stress (total friction)
[in]TOBWWave induced shear stress
[in]TWWave period
[in]ZFElevation of bottom
[in]DEBUGFlag for debugging
[in]HIDFACHiding factor formulas
[in]ICFBed-load or total load transport formulas
[in]IELMTType of element
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]KENTConvention for liquid input with prescribed value
[in]KLOGConvention for solid boundary
[in]KNEUConvention for neumann condition
[in]KSORTConvention for free output
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]NSICLANumber of size classes for bed materials
[in]OPTBANOption for tidal flats
[in]BETACoefficient for sloping bed effect (Koch and Flokstra)
[in]DCLADiameter dm for each class
[in]GRAVAcceleration of gravity
[in]HIDIHiding factor for particular size class (hidfac =0)
[in]HMINMinimum value of water depth
[in]VCEWater viscosity
[in]XMVEFluid density
[in]XMVS0Sediment density
[in]XWCSettling velocity
[in]PIPi
[in]KARMANVon karman constant
[in]ZEROZero
[in]KARIM_HOLLY_YANGTODO
[in]MSKIf yes, there is masked elements
[in]SUSPLogical, suspension
[in]VFLogical, finite volumes or not
[in,out]MESHMesh structure
[in,out]LIEBORType of boundary conditions for bed evolution
[in,out]LIMTECTechnical boundary condition (neuman...)
[in,out]MASKTRMasking for tracers, per point
[in,out]IT1Integer work array in a bief_obj structure
[in,out]T1Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]T3Work bief_obj structure
[in,out]T4Work bief_obj structure
[in,out]T5Work bief_obj structure
[in,out]T6Work bief_obj structure
[in,out]T7Work bief_obj structure
[in,out]T8Work bief_obj structure
[in,out]T9Work bief_obj structure
[in,out]T10Work bief_obj structure
[in,out]T11Work bief_obj structure
[in,out]T12Work bief_obj structure
[in,out]T13Work bief_obj structure
[in,out]UNORMNorm of the mean flow velocity
[in,out]ACCritical shields parameter
[in,out]DTTime step
[in,out]BREACHIndicator for non erodible bed (finite volumes shemes)
[in,out]CALFA_CLCosinus of the angle between mean flow and transport
[in,out]COEFPNCorrection of transport for sloping bed effect
[in]HIDINGHiding factor correction
[in,out]QSCL_CBedload transport rate
[in,out]QSCL_SSuspended load transport rate
[in,out]QS_CBedload transport rate
[in,out]QSCLXCTransport rate for each class x-direction
[in,out]QSXCBedload transport rate x-direction
[in,out]QSCLYCTransport rate for each class y-direction
[in,out]QSYCBedload transport rate y-direction
[in,out]ENTETSLogical, if yes information is given on mass conservation for suspension
[in]SECCURRENTLogical, parametrisation for secondary currents
[in]SLOPEFFFormula for slope effect
[in]PHISEDAngle of repose of the sediment
[in]DEVIASlope effect formula for deviation
[in]BETA2Coefficient for the deviation (talmon et al.)
[in]BIJKCoefficient of the bijker formula
[in]SEDCOLogical, sediment cohesive or not
[in]HOULELogical, for wave effects
[in]U3DThree-dimensional velocity x-direction
[in]V3DThree-dimensional velocity y-direction
[in]CODEHydrodynamic code in case of coupling
[in]FLBCLABlock of fluxes at boundary for each class
[in]MAXADVTODO
[in,out]RATIO_SANDMass fraction of sand
[in]H_TELTODO
[in]HWTODO
[in]THETACTODO
[in]TOBCW_MEANTODO
[in]TOBCW_MAXTODO
[in,out]CSTAEQEquilibrium sediment concentration
[in]ksrACLADM Mean diameter of active layer
[in]KSPBed skin roughness
[in]KSRRipple bed roughness
[in]V2DPARIntegral of test functions, assembled in parallel
[in]UNSV2DInverse of integrals of test functions
[in]CFQuadratic friction coefficient
[in,out]EBORImposed boundary condition for bed evolution (Dirichlet)
[in]FWQuadratic friction coefficient (wave)
[in]HNWater depth
[in]LIQBORType of boundary condition for qs
[in]MASKBlock of masks, every one for a type of boundary See diffin.f in library bief.
[in]MASKELMasking of elements
[in]MASKPTMasking per point
[in]QBORBoundary condition for transport rate
[in,out]U2DMean flow velocity x-direction
[in,out]V2DMean flow velocity y-direction
[in]SVoid Structure
[in]UNLADMMean diameter of active stratum layer
[in]UWOrbital wave velocity
[in]THETAWWave direction (deg wrt ox axis)
[in,out]MUCorrection factor for bed roughness
[in,out]TOBBed shear stress (total friction)
[in]TOBWWave induced shear stress
[in]TWWave period
[in]ZFElevation of bottom
[in]DEBUGFlag for debugging
[in]HIDFACHiding factor formulas
[in]ICFBed-load or total load transport formulas
[in]IELMTType of element
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]KENTConvention for liquid input with prescribed value
[in]KLOGConvention for solid boundary
[in]KNEUConvention for neumann condition
[in]KSORTConvention for free output
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]NSICLANumber of size classes for bed materials
[in]OPTBANOption for tidal flats
[in]BETACoefficient for sloping bed effect (Koch and Flokstra)
[in]DCLADiameter dm for each class
[in]GRAVAcceleration of gravity
[in]HIDIHiding factor for particular size class (hidfac =0)
[in]HMINMinimum value of water depth
[in]VCEWater viscosity
[in]XMVEFluid density
[in]XMVS0Sediment density
[in]XWCSettling velocity
[in]PIPi
[in]KARMANVon karman constant
[in]ZEROZero
[in]KARIM_HOLLY_YANGTODO
[in]MSKIf yes, there is masked elements
[in]SUSPLogical, suspension
[in]VFLogical, finite volumes or not
[in,out]MESHMesh structure
[in,out]LIEBORType of boundary conditions for bed evolution
[in,out]LIMTECTechnical boundary condition (neuman...)
[in,out]MASKTRMasking for tracers, per point
[in,out]IT1Integer work array in a bief_obj structure
[in,out]T1Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]T3Work bief_obj structure
[in,out]T4Work bief_obj structure
[in,out]T5Work bief_obj structure
[in,out]T6Work bief_obj structure
[in,out]T7Work bief_obj structure
[in,out]T8Work bief_obj structure
[in,out]T9Work bief_obj structure
[in,out]T10Work bief_obj structure
[in,out]T11Work bief_obj structure
[in,out]T12Work bief_obj structure
[in,out]T13Work bief_obj structure
[in,out]UNORMNorm of the mean flow velocity
[in,out]ACCritical shields parameter
[in,out]DTTime step
[in,out]BREACHIndicator for non erodible bed (finite volumes shemes)
[in,out]CALFA_CLCosinus of the angle between mean flow and transport
[in,out]COEFPNCorrection of transport for sloping bed effect
[in]HIDINGHiding factor correction
[in,out]QSCL_CBedload transport rate
[in,out]QSCL_SSuspended load transport rate
[in,out]QS_CBedload transport rate
[in,out]QSCLXCTransport rate for each class x-direction
[in,out]QSXCBedload transport rate x-direction
[in,out]QSCLYCTransport rate for each class y-direction
[in,out]QSYCBedload transport rate y-direction
[in,out]ENTETSLogical, if yes information is given on mass conservation for suspension
[in]SECCURRENTLogical, parametrisation for secondary currents
[in]SLOPEFFFormula for slope effect
[in]PHISEDAngle of repose of the sediment
[in]DEVIASlope effect formula for deviation
[in]BETA2Coefficient for the deviation (talmon et al.)
[in]BIJKCoefficient of the bijker formula
[in]SEDCOLogical, sediment cohesive or not
[in]HOULELogical, for wave effects
[in]U3DThree-dimensional velocity x-direction
[in]V3DThree-dimensional velocity y-direction
[in]CODEHydrodynamic code in case of coupling
[in]FLBCLABlock of fluxes at boundary for each class
[in]MAXADVTODO
[in,out]RATIO_SANDMass fraction of sand
[in]H_TELTODO
[in]HWTODO
[in]THETACTODO
[in]TOBCW_MEANTODO
[in]TOBCW_MAXTODO
[in,out]CSTAEQEquilibrium sediment concentration
[in]v2dparACLADM Mean diameter of active layer
[in]KSPBed skin roughness
[in]KSRRipple bed roughness
[in]V2DPARIntegral of test functions, assembled in parallel
[in]UNSV2DInverse of integrals of test functions
[in]CFQuadratic friction coefficient
[in,out]EBORImposed boundary condition for bed evolution (Dirichlet)
[in]FWQuadratic friction coefficient (wave)
[in]HNWater depth
[in]LIQBORType of boundary condition for qs
[in]MASKBlock of masks, every one for a type of boundary See diffin.f in library bief.
[in]MASKELMasking of elements
[in]MASKPTMasking per point
[in]QBORBoundary condition for transport rate
[in,out]U2DMean flow velocity x-direction
[in,out]V2DMean flow velocity y-direction
[in]SVoid Structure
[in]UNLADMMean diameter of active stratum layer
[in]UWOrbital wave velocity
[in]THETAWWave direction (deg wrt ox axis)
[in,out]MUCorrection factor for bed roughness
[in,out]TOBBed shear stress (total friction)
[in]TOBWWave induced shear stress
[in]TWWave period
[in]ZFElevation of bottom
[in]DEBUGFlag for debugging
[in]HIDFACHiding factor formulas
[in]ICFBed-load or total load transport formulas
[in]IELMTType of element
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]KENTConvention for liquid input with prescribed value
[in]KLOGConvention for solid boundary
[in]KNEUConvention for neumann condition
[in]KSORTConvention for free output
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]NSICLANumber of size classes for bed materials
[in]OPTBANOption for tidal flats
[in]BETACoefficient for sloping bed effect (Koch and Flokstra)
[in]DCLADiameter dm for each class
[in]GRAVAcceleration of gravity
[in]HIDIHiding factor for particular size class (hidfac =0)
[in]HMINMinimum value of water depth
[in]VCEWater viscosity
[in]XMVEFluid density
[in]XMVS0Sediment density
[in]XWCSettling velocity
[in]PIPi
[in]KARMANVon karman constant
[in]ZEROZero
[in]KARIM_HOLLY_YANGTODO
[in]MSKIf yes, there is masked elements
[in]SUSPLogical, suspension
[in]VFLogical, finite volumes or not
[in,out]MESHMesh structure
[in,out]LIEBORType of boundary conditions for bed evolution
[in,out]LIMTECTechnical boundary condition (neuman...)
[in,out]MASKTRMasking for tracers, per point
[in,out]IT1Integer work array in a bief_obj structure
[in,out]T1Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]T3Work bief_obj structure
[in,out]T4Work bief_obj structure
[in,out]T5Work bief_obj structure
[in,out]T6Work bief_obj structure
[in,out]T7Work bief_obj structure
[in,out]T8Work bief_obj structure
[in,out]T9Work bief_obj structure
[in,out]T10Work bief_obj structure
[in,out]T11Work bief_obj structure
[in,out]T12Work bief_obj structure
[in,out]T13Work bief_obj structure
[in,out]UNORMNorm of the mean flow velocity
[in,out]ACCritical shields parameter
[in,out]DTTime step
[in,out]BREACHIndicator for non erodible bed (finite volumes shemes)
[in,out]CALFA_CLCosinus of the angle between mean flow and transport
[in,out]COEFPNCorrection of transport for sloping bed effect
[in]HIDINGHiding factor correction
[in,out]QSCL_CBedload transport rate
[in,out]QSCL_SSuspended load transport rate
[in,out]QS_CBedload transport rate
[in,out]QSCLXCTransport rate for each class x-direction
[in,out]QSXCBedload transport rate x-direction
[in,out]QSCLYCTransport rate for each class y-direction
[in,out]QSYCBedload transport rate y-direction
[in,out]ENTETSLogical, if yes information is given on mass conservation for suspension
[in]SECCURRENTLogical, parametrisation for secondary currents
[in]SLOPEFFFormula for slope effect
[in]PHISEDAngle of repose of the sediment
[in]DEVIASlope effect formula for deviation
[in]BETA2Coefficient for the deviation (talmon et al.)
[in]BIJKCoefficient of the bijker formula
[in]SEDCOLogical, sediment cohesive or not
[in]HOULELogical, for wave effects
[in]U3DThree-dimensional velocity x-direction
[in]V3DThree-dimensional velocity y-direction
[in]CODEHydrodynamic code in case of coupling
[in]FLBCLABlock of fluxes at boundary for each class
[in]MAXADVTODO
[in,out]RATIO_SANDMass fraction of sand
[in]H_TELTODO
[in]HWTODO
[in]THETACTODO
[in]TOBCW_MEANTODO
[in]TOBCW_MAXTODO
[in,out]CSTAEQEquilibrium sediment concentration
[in]unsv2dACLADM Mean diameter of active layer
[in]KSPBed skin roughness
[in]KSRRipple bed roughness
[in]V2DPARIntegral of test functions, assembled in parallel
[in]UNSV2DInverse of integrals of test functions
[in]CFQuadratic friction coefficient
[in,out]EBORImposed boundary condition for bed evolution (Dirichlet)
[in]FWQuadratic friction coefficient (wave)
[in]HNWater depth
[in]LIQBORType of boundary condition for qs
[in]MASKBlock of masks, every one for a type of boundary See diffin.f in library bief.
[in]MASKELMasking of elements
[in]MASKPTMasking per point
[in]QBORBoundary condition for transport rate
[in,out]U2DMean flow velocity x-direction
[in,out]V2DMean flow velocity y-direction
[in]SVoid Structure
[in]UNLADMMean diameter of active stratum layer
[in]UWOrbital wave velocity
[in]THETAWWave direction (deg wrt ox axis)
[in,out]MUCorrection factor for bed roughness
[in,out]TOBBed shear stress (total friction)
[in]TOBWWave induced shear stress
[in]TWWave period
[in]ZFElevation of bottom
[in]DEBUGFlag for debugging
[in]HIDFACHiding factor formulas
[in]ICFBed-load or total load transport formulas
[in]IELMTType of element
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]KENTConvention for liquid input with prescribed value
[in]KLOGConvention for solid boundary
[in]KNEUConvention for neumann condition
[in]KSORTConvention for free output
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]NSICLANumber of size classes for bed materials
[in]OPTBANOption for tidal flats
[in]BETACoefficient for sloping bed effect (Koch and Flokstra)
[in]DCLADiameter dm for each class
[in]GRAVAcceleration of gravity
[in]HIDIHiding factor for particular size class (hidfac =0)
[in]HMINMinimum value of water depth
[in]VCEWater viscosity
[in]XMVEFluid density
[in]XMVS0Sediment density
[in]XWCSettling velocity
[in]PIPi
[in]KARMANVon karman constant
[in]ZEROZero
[in]KARIM_HOLLY_YANGTODO
[in]MSKIf yes, there is masked elements
[in]SUSPLogical, suspension
[in]VFLogical, finite volumes or not
[in,out]MESHMesh structure
[in,out]LIEBORType of boundary conditions for bed evolution
[in,out]LIMTECTechnical boundary condition (neuman...)
[in,out]MASKTRMasking for tracers, per point
[in,out]IT1Integer work array in a bief_obj structure
[in,out]T1Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]T3Work bief_obj structure
[in,out]T4Work bief_obj structure
[in,out]T5Work bief_obj structure
[in,out]T6Work bief_obj structure
[in,out]T7Work bief_obj structure
[in,out]T8Work bief_obj structure
[in,out]T9Work bief_obj structure
[in,out]T10Work bief_obj structure
[in,out]T11Work bief_obj structure
[in,out]T12Work bief_obj structure
[in,out]T13Work bief_obj structure
[in,out]UNORMNorm of the mean flow velocity
[in,out]ACCritical shields parameter
[in,out]DTTime step
[in,out]BREACHIndicator for non erodible bed (finite volumes shemes)
[in,out]CALFA_CLCosinus of the angle between mean flow and transport
[in,out]COEFPNCorrection of transport for sloping bed effect
[in]HIDINGHiding factor correction
[in,out]QSCL_CBedload transport rate
[in,out]QSCL_SSuspended load transport rate
[in,out]QS_CBedload transport rate
[in,out]QSCLXCTransport rate for each class x-direction
[in,out]QSXCBedload transport rate x-direction
[in,out]QSCLYCTransport rate for each class y-direction
[in,out]QSYCBedload transport rate y-direction
[in,out]ENTETSLogical, if yes information is given on mass conservation for suspension
[in]SECCURRENTLogical, parametrisation for secondary currents
[in]SLOPEFFFormula for slope effect
[in]PHISEDAngle of repose of the sediment
[in]DEVIASlope effect formula for deviation
[in]BETA2Coefficient for the deviation (talmon et al.)
[in]BIJKCoefficient of the bijker formula
[in]SEDCOLogical, sediment cohesive or not
[in]HOULELogical, for wave effects
[in]U3DThree-dimensional velocity x-direction
[in]V3DThree-dimensional velocity y-direction
[in]CODEHydrodynamic code in case of coupling
[in]FLBCLABlock of fluxes at boundary for each class
[in]MAXADVTODO
[in,out]RATIO_SANDMass fraction of sand
[in]H_TELTODO
[in]HWTODO
[in]THETACTODO
[in]TOBCW_MEANTODO
[in]TOBCW_MAXTODO
[in,out]CSTAEQEquilibrium sediment concentration

Definition at line 24 of file bedload_main_gaia.f.

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