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

Go to the source code of this file.

Functions/Subroutines

subroutine hvf (H, HN, FXMAT, UNSV2D, DT, FXBOR, SMH, YASMH, NSEG, NPOIN, NPTFR, GLOSEG, SIZGLO, NBOR, OPTSOU, T7, MESH, MSK, RAIN, PLUIE)
 

Function/Subroutine Documentation

◆ hvf()

subroutine hvf ( double precision, dimension(npoin), intent(inout)  H,
double precision, dimension(npoin), intent(in)  HN,
double precision, dimension(nseg*2), intent(in)  FXMAT,
double precision, dimension(npoin), intent(in)  UNSV2D,
double precision, intent(in)  DT,
double precision, dimension(npoin), intent(in)  FXBOR,
double precision, dimension(npoin), intent(in)  SMH,
logical, intent(in)  YASMH,
integer, intent(in)  NSEG,
integer, intent(in)  NPOIN,
integer, intent(in)  NPTFR,
integer, dimension(sizglo,2), intent(in)  GLOSEG,
integer, intent(in)  SIZGLO,
integer, dimension(nptfr), intent(in)  NBOR,
integer, intent(in)  OPTSOU,
type(bief_obj), intent(inout)  T7,
type(bief_mesh), intent(inout)  MESH,
logical, intent(in)  MSK,
logical, intent(in)  RAIN,
double precision, dimension(npoin), intent(in)  PLUIE 
)
Parameters
[in]nsegDT Time step
[in]FXBORFlux on boundaries (defined on all domain AND ASSEMBLED IN PARALLEL)
[in]FXMATMatrix for storing fluxes.
[in]GLOSEGGlobal number of the 2 points of a segment
[in]HWater depth at time n+1
[in]HNWater depth at time n
[in]MESHMesh structure
[in]MSKMsk : if yes, masking of dry elements
[in]NBORGlobal number of boundary points
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]NSEGNumber of segments
[in]OPTSOUOption for the treatment of sources 1: NORMAL 2: DIRAC SEE PROPAG IN TELEMAC-2D
[in]PLUIERain or evaporation, in m/s
[in]RAINIf yes: rain or evaporation
[in]SIZGLOFirst dimension of gloseg
[in]SMHSource term in continuity equation
[in,out]T7Work bief_obj structure
[in]UNSV2DInverse of integrals of test functions
[in]YASMHIf yes, smh must be taken into account
[in]npoinDT Time step
[in]FXBORFlux on boundaries (defined on all domain AND ASSEMBLED IN PARALLEL)
[in]FXMATMatrix for storing fluxes.
[in]GLOSEGGlobal number of the 2 points of a segment
[in]HWater depth at time n+1
[in]HNWater depth at time n
[in]MESHMesh structure
[in]MSKMsk : if yes, masking of dry elements
[in]NBORGlobal number of boundary points
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]NSEGNumber of segments
[in]OPTSOUOption for the treatment of sources 1: NORMAL 2: DIRAC SEE PROPAG IN TELEMAC-2D
[in]PLUIERain or evaporation, in m/s
[in]RAINIf yes: rain or evaporation
[in]SIZGLOFirst dimension of gloseg
[in]SMHSource term in continuity equation
[in,out]T7Work bief_obj structure
[in]UNSV2DInverse of integrals of test functions
[in]YASMHIf yes, smh must be taken into account
[in]nptfrDT Time step
[in]FXBORFlux on boundaries (defined on all domain AND ASSEMBLED IN PARALLEL)
[in]FXMATMatrix for storing fluxes.
[in]GLOSEGGlobal number of the 2 points of a segment
[in]HWater depth at time n+1
[in]HNWater depth at time n
[in]MESHMesh structure
[in]MSKMsk : if yes, masking of dry elements
[in]NBORGlobal number of boundary points
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]NSEGNumber of segments
[in]OPTSOUOption for the treatment of sources 1: NORMAL 2: DIRAC SEE PROPAG IN TELEMAC-2D
[in]PLUIERain or evaporation, in m/s
[in]RAINIf yes: rain or evaporation
[in]SIZGLOFirst dimension of gloseg
[in]SMHSource term in continuity equation
[in,out]T7Work bief_obj structure
[in]UNSV2DInverse of integrals of test functions
[in]YASMHIf yes, smh must be taken into account
[in]optsouDT Time step
[in]FXBORFlux on boundaries (defined on all domain AND ASSEMBLED IN PARALLEL)
[in]FXMATMatrix for storing fluxes.
[in]GLOSEGGlobal number of the 2 points of a segment
[in]HWater depth at time n+1
[in]HNWater depth at time n
[in]MESHMesh structure
[in]MSKMsk : if yes, masking of dry elements
[in]NBORGlobal number of boundary points
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]NSEGNumber of segments
[in]OPTSOUOption for the treatment of sources 1: NORMAL 2: DIRAC SEE PROPAG IN TELEMAC-2D
[in]PLUIERain or evaporation, in m/s
[in]RAINIf yes: rain or evaporation
[in]SIZGLOFirst dimension of gloseg
[in]SMHSource term in continuity equation
[in,out]T7Work bief_obj structure
[in]UNSV2DInverse of integrals of test functions
[in]YASMHIf yes, smh must be taken into account
[in]sizgloDT Time step
[in]FXBORFlux on boundaries (defined on all domain AND ASSEMBLED IN PARALLEL)
[in]FXMATMatrix for storing fluxes.
[in]GLOSEGGlobal number of the 2 points of a segment
[in]HWater depth at time n+1
[in]HNWater depth at time n
[in]MESHMesh structure
[in]MSKMsk : if yes, masking of dry elements
[in]NBORGlobal number of boundary points
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]NSEGNumber of segments
[in]OPTSOUOption for the treatment of sources 1: NORMAL 2: DIRAC SEE PROPAG IN TELEMAC-2D
[in]PLUIERain or evaporation, in m/s
[in]RAINIf yes: rain or evaporation
[in]SIZGLOFirst dimension of gloseg
[in]SMHSource term in continuity equation
[in,out]T7Work bief_obj structure
[in]UNSV2DInverse of integrals of test functions
[in]YASMHIf yes, smh must be taken into account

Definition at line 8 of file hvf.f.

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