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

Go to the source code of this file.

Functions/Subroutines

subroutine tracvf (F, FSCEXP, FXMAT, FXMATPAR, VOLU2D, UNSV2D, DDT, FXBOR, FBOR, SMH, YASMH, T1, T2, T4, T5, T7, T8, MESH, LIMTRA, KDIR, KDDL, OPTSOU, IOPT2, FLBORTRA, MSK, DT, RAIN, PLUIE, TRAIN, MASSOU, MASS_BALANCE)
 

Function/Subroutine Documentation

◆ tracvf()

subroutine tracvf ( type(bief_obj), intent(inout)  F,
type(bief_obj), intent(in)  FSCEXP,
double precision, dimension(*), intent(in)  FXMAT,
double precision, dimension(*), intent(in)  FXMATPAR,
type(bief_obj), intent(in)  VOLU2D,
type(bief_obj), intent(in)  UNSV2D,
double precision, intent(in)  DDT,
type(bief_obj), intent(in)  FXBOR,
type(bief_obj), intent(in)  FBOR,
type(bief_obj), intent(in)  SMH,
logical, intent(in)  YASMH,
type(bief_obj), intent(inout)  T1,
type(bief_obj), intent(inout)  T2,
type(bief_obj), intent(inout)  T4,
type(bief_obj), intent(inout)  T5,
type(bief_obj), intent(inout)  T7,
type(bief_obj), intent(inout)  T8,
type(bief_mesh), intent(inout)  MESH,
integer, dimension(*), intent(in)  LIMTRA,
integer, intent(in)  KDIR,
integer, intent(in)  KDDL,
integer, intent(in)  OPTSOU,
integer, intent(in)  IOPT2,
type(bief_obj), intent(inout)  FLBORTRA,
logical, intent(in)  MSK,
double precision, intent(in)  DT,
logical, intent(in)  RAIN,
type(bief_obj), intent(in)  PLUIE,
double precision, intent(in)  TRAIN,
double precision, intent(inout)  MASSOU,
logical, intent(in)  MASS_BALANCE 
)
Parameters
[in]kdirDDT Sub time-step
[in]DTTime-step
[out]FValues of f at time n+1.
[in]FBORValues of f at the prescribed boundaries
[in,out]FLBORTRAFlux of tracer at the boundaries
[in]FSCEXPExplicit source term for f
[in]FXBORFluxes on boundaries
[in]FXMATFluxes (non assembled in parallel)
[in]FXMATPARFluxes (assembled in parallel)
[in]HWater depth at time n+1
[in]HNWater depth at time n
[in]IOPT20 : uconv obeys continuity equation 1 : UCONV DOES NOT OBEY CONTINUITY EQUATION
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]LIMTRATechnical boundary conditions for tracers
[in]MASS_BALANCEIf yes, all terms for mass balance WILL BE COMPUTED
[in]MASSOUMass added by source term
[in]MESHMesh structure
[in]MSKIf yes, masking of dry elements
[in]OPTSOUType of sources 1: NORMAL 2: DIRAC
[in]PLUIERain or evaporation in m/s, in bief_obj structure
[in]RAINIf yes: rain or evaporation
[in]SMHSource term in continuity equation
[in,out]T1Bief_obj structure used as work array
[in,out]T2Bief_obj structure used as work array
[in,out]T4Bief_obj structure used as work array
[in,out]T5Bief_obj structure used as work array
[in,out]T6Bief_obj structure used as work array
[in,out]T7Bief_obj structure used as work array
[in,out]T8Bief_obj structure used as work array
[in]TRAINValue of tracer in rain
[in]UNSV2DInverse of integrals of test functions
[in]YASMHIf yes, smh must be taken into account
[in]kddlDDT Sub time-step
[in]DTTime-step
[out]FValues of f at time n+1.
[in]FBORValues of f at the prescribed boundaries
[in,out]FLBORTRAFlux of tracer at the boundaries
[in]FSCEXPExplicit source term for f
[in]FXBORFluxes on boundaries
[in]FXMATFluxes (non assembled in parallel)
[in]FXMATPARFluxes (assembled in parallel)
[in]HWater depth at time n+1
[in]HNWater depth at time n
[in]IOPT20 : uconv obeys continuity equation 1 : UCONV DOES NOT OBEY CONTINUITY EQUATION
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]LIMTRATechnical boundary conditions for tracers
[in]MASS_BALANCEIf yes, all terms for mass balance WILL BE COMPUTED
[in]MASSOUMass added by source term
[in]MESHMesh structure
[in]MSKIf yes, masking of dry elements
[in]OPTSOUType of sources 1: NORMAL 2: DIRAC
[in]PLUIERain or evaporation in m/s, in bief_obj structure
[in]RAINIf yes: rain or evaporation
[in]SMHSource term in continuity equation
[in,out]T1Bief_obj structure used as work array
[in,out]T2Bief_obj structure used as work array
[in,out]T4Bief_obj structure used as work array
[in,out]T5Bief_obj structure used as work array
[in,out]T6Bief_obj structure used as work array
[in,out]T7Bief_obj structure used as work array
[in,out]T8Bief_obj structure used as work array
[in]TRAINValue of tracer in rain
[in]UNSV2DInverse of integrals of test functions
[in]YASMHIf yes, smh must be taken into account
[in]optsouDDT Sub time-step
[in]DTTime-step
[out]FValues of f at time n+1.
[in]FBORValues of f at the prescribed boundaries
[in,out]FLBORTRAFlux of tracer at the boundaries
[in]FSCEXPExplicit source term for f
[in]FXBORFluxes on boundaries
[in]FXMATFluxes (non assembled in parallel)
[in]FXMATPARFluxes (assembled in parallel)
[in]HWater depth at time n+1
[in]HNWater depth at time n
[in]IOPT20 : uconv obeys continuity equation 1 : UCONV DOES NOT OBEY CONTINUITY EQUATION
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]LIMTRATechnical boundary conditions for tracers
[in]MASS_BALANCEIf yes, all terms for mass balance WILL BE COMPUTED
[in]MASSOUMass added by source term
[in]MESHMesh structure
[in]MSKIf yes, masking of dry elements
[in]OPTSOUType of sources 1: NORMAL 2: DIRAC
[in]PLUIERain or evaporation in m/s, in bief_obj structure
[in]RAINIf yes: rain or evaporation
[in]SMHSource term in continuity equation
[in,out]T1Bief_obj structure used as work array
[in,out]T2Bief_obj structure used as work array
[in,out]T4Bief_obj structure used as work array
[in,out]T5Bief_obj structure used as work array
[in,out]T6Bief_obj structure used as work array
[in,out]T7Bief_obj structure used as work array
[in,out]T8Bief_obj structure used as work array
[in]TRAINValue of tracer in rain
[in]UNSV2DInverse of integrals of test functions
[in]YASMHIf yes, smh must be taken into account
[in]limtraDDT Sub time-step
[in]DTTime-step
[out]FValues of f at time n+1.
[in]FBORValues of f at the prescribed boundaries
[in,out]FLBORTRAFlux of tracer at the boundaries
[in]FSCEXPExplicit source term for f
[in]FXBORFluxes on boundaries
[in]FXMATFluxes (non assembled in parallel)
[in]FXMATPARFluxes (assembled in parallel)
[in]HWater depth at time n+1
[in]HNWater depth at time n
[in]IOPT20 : uconv obeys continuity equation 1 : UCONV DOES NOT OBEY CONTINUITY EQUATION
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]LIMTRATechnical boundary conditions for tracers
[in]MASS_BALANCEIf yes, all terms for mass balance WILL BE COMPUTED
[in]MASSOUMass added by source term
[in]MESHMesh structure
[in]MSKIf yes, masking of dry elements
[in]OPTSOUType of sources 1: NORMAL 2: DIRAC
[in]PLUIERain or evaporation in m/s, in bief_obj structure
[in]RAINIf yes: rain or evaporation
[in]SMHSource term in continuity equation
[in,out]T1Bief_obj structure used as work array
[in,out]T2Bief_obj structure used as work array
[in,out]T4Bief_obj structure used as work array
[in,out]T5Bief_obj structure used as work array
[in,out]T6Bief_obj structure used as work array
[in,out]T7Bief_obj structure used as work array
[in,out]T8Bief_obj structure used as work array
[in]TRAINValue of tracer in rain
[in]UNSV2DInverse of integrals of test functions
[in]YASMHIf yes, smh must be taken into account

Definition at line 11 of file tracvf.f.

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