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

Go to the source code of this file.

Functions/Subroutines

subroutine cvtrvf_eria (F, FN, FSCEXP, H, HN, HPROP, UDEL, VDEL, DM1, ZCONV, SOLSYS, SM, SMH, YASMH, SMI, YASMI, FBOR, MASKTR, MESH, T1, T2, T3, T4, T5, T6, T7, HT, DT, ENTET, MSK, MASKEL, OPTSOU, LIMTRA, KDIR, KDDL, NPTFR, FLBOR, YAFLBOR, UNSV2D, IOPT, FLBORTRA, NBOR, RAIN, PLUIE, TRAIN, NITMAX, NCO_DIST, OPTADV)
 

Function/Subroutine Documentation

◆ cvtrvf_eria()

subroutine cvtrvf_eria ( type(bief_obj), intent(inout)  F,
type(bief_obj), intent(in)  FN,
type(bief_obj), intent(in)  FSCEXP,
type(bief_obj), intent(in)  H,
type(bief_obj), intent(in)  HN,
type(bief_obj), intent(in)  HPROP,
type(bief_obj), intent(in)  UDEL,
type(bief_obj), intent(in)  VDEL,
type(bief_obj), intent(in)  DM1,
type(bief_obj), intent(in)  ZCONV,
integer, intent(in)  SOLSYS,
type(bief_obj), intent(inout)  SM,
type(bief_obj), intent(in)  SMH,
logical, intent(in)  YASMH,
type(bief_obj), intent(in)  SMI,
logical, intent(in)  YASMI,
type(bief_obj), intent(inout)  FBOR,
type(bief_obj), intent(in)  MASKTR,
type(bief_mesh)  MESH,
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)  HT,
double precision, intent(in)  DT,
logical, intent(in)  ENTET,
logical, intent(in)  MSK,
type(bief_obj), intent(in)  MASKEL,
integer, intent(in)  OPTSOU,
integer, dimension(nptfr), intent(inout)  LIMTRA,
integer, intent(in)  KDIR,
integer, intent(in)  KDDL,
integer, intent(in)  NPTFR,
type(bief_obj), intent(inout)  FLBOR,
logical, intent(in)  YAFLBOR,
type(bief_obj), intent(in)  UNSV2D,
integer, intent(in)  IOPT,
type(bief_obj), intent(inout)  FLBORTRA,
integer, dimension(nptfr), intent(in)  NBOR,
logical, intent(in)  RAIN,
type(bief_obj), intent(in)  PLUIE,
double precision, intent(in)  TRAIN,
integer, intent(in)  NITMAX,
integer, intent(in)  NCO_DIST,
integer, intent(in)  OPTADV 
)
Parameters
[in]optsouDM1 The piece-wise constant part of advection field IS DM1*GRAD(ZCONV), SEE SOLSYS.
[in]DTTime step
[in]ENTETLogical, if yes information is given on mass CONSERVATION.
[out]FF at time t(n+1)
[in]FBORDirichlet conditions on f.
[in]FLBORFluxes at boundaries
[in,out]FLBORTRATracer fluxes at boundaries
[in]FNF at time t(n)
[in]FSCEXPExplicit part of the source term EQUAL TO ZERO EVERYWHERE BUT ON SOURCES WHERE THERE IS FSCE - (1-TETAT) FN SEE DIFSOU
[out]HTWork array (depth going from hn to h)
[in]HPROPPropagation depth (done in cvdftr).
[in]IOPTOptions for computation (number between 0 and 13) THE TENS (IOPT2, I.E. 0 OR 1): 0: UCONV OBEYS THE CONTINUITY EQUATION 1: UCONV DOES NOT OBEY THE CONTINUITY EQUATION THE UNITS (IOPT1, I.E. 0 TO 3): VARIANT FOR FLUXES 0: CONSTANT PER ELEMENT = 0 1: CHI-TUAN PHAM'S CONSTANT 2: N SCHEME 3: PSI SCHEME
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]LIMTRABoundary conditions on booundary points
[in]MASKELMasking of elements =1. : NORMAL =0. : MASKED ELEMENT
[in]MESHMesh structure
[in]MSKIf yes, there is masked elements.
[in]NBORGlobal numbers of boundary points
[in]NCO_DISTNumber of corrections in distributive schemes
[in]NITMAXMaximum number of iterations
[in]NPTFRNumber of boundary points
[in]OPTADVFor eria scheme 1: first order 2: SECOND ORDER
[in]OPTSOUType of sources 1: NORMAL 2: DIRAC
[in]PLUIERain or evaporation, in m/s
[in]RAINIf yes: rain or evaporation
[in]SMSource terms.
[in]SMHSource term in continuity equation
[in]SMIImplicit source term
[in]SOLSYS1 or 2. if 2 advection field is uconv + dm1*grad(zconv)
[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]TRAINValue of tracer in the rain
[in]UDELX-component of advection velocity
[in]UNSV2DInverse of v2dpar
[in]VDELX-component of advection velocity
[in]YAFLBORIf yes flbor is given
[in]YASMHIf yes, smh must be taken into account
[in]YASMIIf yes, smi must be taken into account
[in]ZCONVThe piece-wise constant part of advection field IS DM1*GRAD(ZCONV), SEE SOLSYS.
[in]kdirDM1 The piece-wise constant part of advection field IS DM1*GRAD(ZCONV), SEE SOLSYS.
[in]DTTime step
[in]ENTETLogical, if yes information is given on mass CONSERVATION.
[out]FF at time t(n+1)
[in]FBORDirichlet conditions on f.
[in]FLBORFluxes at boundaries
[in,out]FLBORTRATracer fluxes at boundaries
[in]FNF at time t(n)
[in]FSCEXPExplicit part of the source term EQUAL TO ZERO EVERYWHERE BUT ON SOURCES WHERE THERE IS FSCE - (1-TETAT) FN SEE DIFSOU
[out]HTWork array (depth going from hn to h)
[in]HPROPPropagation depth (done in cvdftr).
[in]IOPTOptions for computation (number between 0 and 13) THE TENS (IOPT2, I.E. 0 OR 1): 0: UCONV OBEYS THE CONTINUITY EQUATION 1: UCONV DOES NOT OBEY THE CONTINUITY EQUATION THE UNITS (IOPT1, I.E. 0 TO 3): VARIANT FOR FLUXES 0: CONSTANT PER ELEMENT = 0 1: CHI-TUAN PHAM'S CONSTANT 2: N SCHEME 3: PSI SCHEME
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]LIMTRABoundary conditions on booundary points
[in]MASKELMasking of elements =1. : NORMAL =0. : MASKED ELEMENT
[in]MESHMesh structure
[in]MSKIf yes, there is masked elements.
[in]NBORGlobal numbers of boundary points
[in]NCO_DISTNumber of corrections in distributive schemes
[in]NITMAXMaximum number of iterations
[in]NPTFRNumber of boundary points
[in]OPTADVFor eria scheme 1: first order 2: SECOND ORDER
[in]OPTSOUType of sources 1: NORMAL 2: DIRAC
[in]PLUIERain or evaporation, in m/s
[in]RAINIf yes: rain or evaporation
[in]SMSource terms.
[in]SMHSource term in continuity equation
[in]SMIImplicit source term
[in]SOLSYS1 or 2. if 2 advection field is uconv + dm1*grad(zconv)
[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]TRAINValue of tracer in the rain
[in]UDELX-component of advection velocity
[in]UNSV2DInverse of v2dpar
[in]VDELX-component of advection velocity
[in]YAFLBORIf yes flbor is given
[in]YASMHIf yes, smh must be taken into account
[in]YASMIIf yes, smi must be taken into account
[in]ZCONVThe piece-wise constant part of advection field IS DM1*GRAD(ZCONV), SEE SOLSYS.
[in]nptfrDM1 The piece-wise constant part of advection field IS DM1*GRAD(ZCONV), SEE SOLSYS.
[in]DTTime step
[in]ENTETLogical, if yes information is given on mass CONSERVATION.
[out]FF at time t(n+1)
[in]FBORDirichlet conditions on f.
[in]FLBORFluxes at boundaries
[in,out]FLBORTRATracer fluxes at boundaries
[in]FNF at time t(n)
[in]FSCEXPExplicit part of the source term EQUAL TO ZERO EVERYWHERE BUT ON SOURCES WHERE THERE IS FSCE - (1-TETAT) FN SEE DIFSOU
[out]HTWork array (depth going from hn to h)
[in]HPROPPropagation depth (done in cvdftr).
[in]IOPTOptions for computation (number between 0 and 13) THE TENS (IOPT2, I.E. 0 OR 1): 0: UCONV OBEYS THE CONTINUITY EQUATION 1: UCONV DOES NOT OBEY THE CONTINUITY EQUATION THE UNITS (IOPT1, I.E. 0 TO 3): VARIANT FOR FLUXES 0: CONSTANT PER ELEMENT = 0 1: CHI-TUAN PHAM'S CONSTANT 2: N SCHEME 3: PSI SCHEME
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]LIMTRABoundary conditions on booundary points
[in]MASKELMasking of elements =1. : NORMAL =0. : MASKED ELEMENT
[in]MESHMesh structure
[in]MSKIf yes, there is masked elements.
[in]NBORGlobal numbers of boundary points
[in]NCO_DISTNumber of corrections in distributive schemes
[in]NITMAXMaximum number of iterations
[in]NPTFRNumber of boundary points
[in]OPTADVFor eria scheme 1: first order 2: SECOND ORDER
[in]OPTSOUType of sources 1: NORMAL 2: DIRAC
[in]PLUIERain or evaporation, in m/s
[in]RAINIf yes: rain or evaporation
[in]SMSource terms.
[in]SMHSource term in continuity equation
[in]SMIImplicit source term
[in]SOLSYS1 or 2. if 2 advection field is uconv + dm1*grad(zconv)
[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]TRAINValue of tracer in the rain
[in]UDELX-component of advection velocity
[in]UNSV2DInverse of v2dpar
[in]VDELX-component of advection velocity
[in]YAFLBORIf yes flbor is given
[in]YASMHIf yes, smh must be taken into account
[in]YASMIIf yes, smi must be taken into account
[in]ZCONVThe piece-wise constant part of advection field IS DM1*GRAD(ZCONV), SEE SOLSYS.
[in]solsysDM1 The piece-wise constant part of advection field IS DM1*GRAD(ZCONV), SEE SOLSYS.
[in]DTTime step
[in]ENTETLogical, if yes information is given on mass CONSERVATION.
[out]FF at time t(n+1)
[in]FBORDirichlet conditions on f.
[in]FLBORFluxes at boundaries
[in,out]FLBORTRATracer fluxes at boundaries
[in]FNF at time t(n)
[in]FSCEXPExplicit part of the source term EQUAL TO ZERO EVERYWHERE BUT ON SOURCES WHERE THERE IS FSCE - (1-TETAT) FN SEE DIFSOU
[out]HTWork array (depth going from hn to h)
[in]HPROPPropagation depth (done in cvdftr).
[in]IOPTOptions for computation (number between 0 and 13) THE TENS (IOPT2, I.E. 0 OR 1): 0: UCONV OBEYS THE CONTINUITY EQUATION 1: UCONV DOES NOT OBEY THE CONTINUITY EQUATION THE UNITS (IOPT1, I.E. 0 TO 3): VARIANT FOR FLUXES 0: CONSTANT PER ELEMENT = 0 1: CHI-TUAN PHAM'S CONSTANT 2: N SCHEME 3: PSI SCHEME
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]LIMTRABoundary conditions on booundary points
[in]MASKELMasking of elements =1. : NORMAL =0. : MASKED ELEMENT
[in]MESHMesh structure
[in]MSKIf yes, there is masked elements.
[in]NBORGlobal numbers of boundary points
[in]NCO_DISTNumber of corrections in distributive schemes
[in]NITMAXMaximum number of iterations
[in]NPTFRNumber of boundary points
[in]OPTADVFor eria scheme 1: first order 2: SECOND ORDER
[in]OPTSOUType of sources 1: NORMAL 2: DIRAC
[in]PLUIERain or evaporation, in m/s
[in]RAINIf yes: rain or evaporation
[in]SMSource terms.
[in]SMHSource term in continuity equation
[in]SMIImplicit source term
[in]SOLSYS1 or 2. if 2 advection field is uconv + dm1*grad(zconv)
[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]TRAINValue of tracer in the rain
[in]UDELX-component of advection velocity
[in]UNSV2DInverse of v2dpar
[in]VDELX-component of advection velocity
[in]YAFLBORIf yes flbor is given
[in]YASMHIf yes, smh must be taken into account
[in]YASMIIf yes, smi must be taken into account
[in]ZCONVThe piece-wise constant part of advection field IS DM1*GRAD(ZCONV), SEE SOLSYS.

Definition at line 12 of file cvtrvf_eria.f.

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