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

Go to the source code of this file.

Functions/Subroutines

subroutine charac (FN, FTILD, NOMB, UCONV, VCONV, WCONV, FRCONV, ZSTAR, FREQ, DT, IFAMAS, IELM, NPOIN2, NPLAN, JF, NF, MSK, SHP, SHZ, SHF, TB, ELT, ETA, FRE, IT3, ISUB, FREBUF, MESH, NELEM2, NELMAX2, IKLE2, SURDET2, AM1, RHS, SLV, AGGLO, LISTIN, NGAUSS, UNSV, OPTCHA, POST, PERIO, YA4D, SIGMA, STOCHA, VISC)
 

Function/Subroutine Documentation

◆ charac()

subroutine charac ( type(bief_obj), intent(in)  FN,
type(bief_obj), intent(inout), target  FTILD,
integer, intent(in)  NOMB,
type(bief_obj), intent(in)  UCONV,
type(bief_obj), intent(in)  VCONV,
type(bief_obj), intent(in)  WCONV,
type(bief_obj), intent(in)  FRCONV,
type(bief_obj), intent(in)  ZSTAR,
type(bief_obj), intent(in)  FREQ,
double precision, intent(in)  DT,
type(bief_obj), intent(in), target  IFAMAS,
integer, intent(inout)  IELM,
integer, intent(in)  NPOIN2,
integer, intent(in)  NPLAN,
integer, intent(in)  JF,
integer, intent(in)  NF,
logical, intent(in)  MSK,
type(bief_obj), intent(inout), target  SHP,
type(bief_obj), intent(inout), target  SHZ,
type(bief_obj), intent(inout)  SHF,
type(bief_obj), intent(inout)  TB,
integer, dimension(*), intent(inout)  ELT,
integer, dimension(*), intent(inout)  ETA,
integer, dimension(*), intent(inout)  FRE,
integer, dimension(*), intent(inout)  IT3,
integer, dimension(*), intent(inout)  ISUB,
integer, dimension(*), intent(inout)  FREBUF,
type(bief_mesh), intent(inout)  MESH,
integer, intent(in)  NELEM2,
integer, intent(in)  NELMAX2,
type(bief_obj), intent(in)  IKLE2,
type(bief_obj), intent(in)  SURDET2,
type(bief_obj), intent(inout)  AM1,
type(bief_obj), intent(inout)  RHS,
type(slvcfg), intent(inout)  SLV,
double precision, intent(in)  AGGLO,
logical, intent(in)  LISTIN,
integer, intent(in)  NGAUSS,
type(bief_obj), intent(in)  UNSV,
integer, intent(in)  OPTCHA,
logical, intent(in), optional  POST,
logical, intent(in), optional  PERIO,
logical, intent(in), optional  YA4D,
logical, intent(in), optional  SIGMA,
integer, intent(in), optional  STOCHA,
type(bief_obj), intent(in), optional, target  VISC 
)
Parameters
[in]nombAGGLO Mass-lumping (for weak form)
[in,out]AM1A matrix (for weak form)
[in,out]RHSA right-hand side (for weak form)
[in]DTTime step
[in,out]ELTArrival element
[in,out]ETAArrival layer (in 3d with prisms)
[in]FRCONVFrequency component of advection field
[in,out]FREArrival frequency (in 4d)
[in,out]FREBUFInteger work array (in 4d)
[in]FREQDiscretised frequencies (in 4d). IF NOT TOMAWAC, MUST BE ZSTAR !!!!!!!!!!!
[in]FNVariables at time n .
[out]FTILDVariables after advection .
[in]IELMType of element : 11 : triangle p1 41 : PRISM IN TELEMAC3D
[in]IFAMASA modified ifabor when elements are masked
[in]IKLE2Connectivity table for triangles
[in,out]IT3Integer work array
[in,out]ISUBArrival sub-domain (in parallel)
[in]JFFrequency (in a range of 1 to nf)
[in]LISTINIf yes, prints informations on listing (weak form)
[in]MESHMesh structure
[in]MSKIf yes, there is masked elements.
[in]NELEM2Number of elements in 2d
[in]NELMAX2Maximum number of elements in 2d
[in]NFNumber of frequencies (in 4d)
[in]NGAUSSNumber of gauss points (weak form)
[in]NOMBNumber of variables to be advected
[in]NPLANNumber of planes in the 3d mesh of prisms
[in]NPOIN2Number of points in the 2d mesh
[in]OPTCHAOption for the form of characteristics 1 : STRONG (CLASSICAL) FORM 2 : BACKWARD WEAK FORM
[in]PERIOIf yes, periodic version on the vertical
[in]POSTIf yes, data must be kept for a posteriori INTERPOLATION
[in,out]SHPBarycentric coordinates of points in triangles
[in,out]SHZBarycentric coordinates on vertical
[in,out]SHFBarycentric coordinates on the frequency axis
[in]SIGMAIf yes, transformes mesh for telemac-3d
[in]SLVA solver configuration (for weak form)
[in]STOCHAStochastic diffusion model 0: NO DIFFUSION 1: BROWNIAN MODEL
[in]SURDET2Geometric coefficient used in parametric transformation
[in,out]TBBlock containing the bief_obj work arrays
[in]UCONVX-component of advection field
[in]UNSV1/(integral of test functions)
[in]VCONVY-component of advection field
[in]VISCViscosity (may be tensorial)
[in]WCONVZ-component of advection field in the transformed mesh
[in]YA4DIf yes, 4d version for tomawac
[in]ZSTARTransformed vertical coordinates in 3d
[in]optchaAGGLO Mass-lumping (for weak form)
[in,out]AM1A matrix (for weak form)
[in,out]RHSA right-hand side (for weak form)
[in]DTTime step
[in,out]ELTArrival element
[in,out]ETAArrival layer (in 3d with prisms)
[in]FRCONVFrequency component of advection field
[in,out]FREArrival frequency (in 4d)
[in,out]FREBUFInteger work array (in 4d)
[in]FREQDiscretised frequencies (in 4d). IF NOT TOMAWAC, MUST BE ZSTAR !!!!!!!!!!!
[in]FNVariables at time n .
[out]FTILDVariables after advection .
[in]IELMType of element : 11 : triangle p1 41 : PRISM IN TELEMAC3D
[in]IFAMASA modified ifabor when elements are masked
[in]IKLE2Connectivity table for triangles
[in,out]IT3Integer work array
[in,out]ISUBArrival sub-domain (in parallel)
[in]JFFrequency (in a range of 1 to nf)
[in]LISTINIf yes, prints informations on listing (weak form)
[in]MESHMesh structure
[in]MSKIf yes, there is masked elements.
[in]NELEM2Number of elements in 2d
[in]NELMAX2Maximum number of elements in 2d
[in]NFNumber of frequencies (in 4d)
[in]NGAUSSNumber of gauss points (weak form)
[in]NOMBNumber of variables to be advected
[in]NPLANNumber of planes in the 3d mesh of prisms
[in]NPOIN2Number of points in the 2d mesh
[in]OPTCHAOption for the form of characteristics 1 : STRONG (CLASSICAL) FORM 2 : BACKWARD WEAK FORM
[in]PERIOIf yes, periodic version on the vertical
[in]POSTIf yes, data must be kept for a posteriori INTERPOLATION
[in,out]SHPBarycentric coordinates of points in triangles
[in,out]SHZBarycentric coordinates on vertical
[in,out]SHFBarycentric coordinates on the frequency axis
[in]SIGMAIf yes, transformes mesh for telemac-3d
[in]SLVA solver configuration (for weak form)
[in]STOCHAStochastic diffusion model 0: NO DIFFUSION 1: BROWNIAN MODEL
[in]SURDET2Geometric coefficient used in parametric transformation
[in,out]TBBlock containing the bief_obj work arrays
[in]UCONVX-component of advection field
[in]UNSV1/(integral of test functions)
[in]VCONVY-component of advection field
[in]VISCViscosity (may be tensorial)
[in]WCONVZ-component of advection field in the transformed mesh
[in]YA4DIf yes, 4d version for tomawac
[in]ZSTARTransformed vertical coordinates in 3d
[in]ngaussAGGLO Mass-lumping (for weak form)
[in,out]AM1A matrix (for weak form)
[in,out]RHSA right-hand side (for weak form)
[in]DTTime step
[in,out]ELTArrival element
[in,out]ETAArrival layer (in 3d with prisms)
[in]FRCONVFrequency component of advection field
[in,out]FREArrival frequency (in 4d)
[in,out]FREBUFInteger work array (in 4d)
[in]FREQDiscretised frequencies (in 4d). IF NOT TOMAWAC, MUST BE ZSTAR !!!!!!!!!!!
[in]FNVariables at time n .
[out]FTILDVariables after advection .
[in]IELMType of element : 11 : triangle p1 41 : PRISM IN TELEMAC3D
[in]IFAMASA modified ifabor when elements are masked
[in]IKLE2Connectivity table for triangles
[in,out]IT3Integer work array
[in,out]ISUBArrival sub-domain (in parallel)
[in]JFFrequency (in a range of 1 to nf)
[in]LISTINIf yes, prints informations on listing (weak form)
[in]MESHMesh structure
[in]MSKIf yes, there is masked elements.
[in]NELEM2Number of elements in 2d
[in]NELMAX2Maximum number of elements in 2d
[in]NFNumber of frequencies (in 4d)
[in]NGAUSSNumber of gauss points (weak form)
[in]NOMBNumber of variables to be advected
[in]NPLANNumber of planes in the 3d mesh of prisms
[in]NPOIN2Number of points in the 2d mesh
[in]OPTCHAOption for the form of characteristics 1 : STRONG (CLASSICAL) FORM 2 : BACKWARD WEAK FORM
[in]PERIOIf yes, periodic version on the vertical
[in]POSTIf yes, data must be kept for a posteriori INTERPOLATION
[in,out]SHPBarycentric coordinates of points in triangles
[in,out]SHZBarycentric coordinates on vertical
[in,out]SHFBarycentric coordinates on the frequency axis
[in]SIGMAIf yes, transformes mesh for telemac-3d
[in]SLVA solver configuration (for weak form)
[in]STOCHAStochastic diffusion model 0: NO DIFFUSION 1: BROWNIAN MODEL
[in]SURDET2Geometric coefficient used in parametric transformation
[in,out]TBBlock containing the bief_obj work arrays
[in]UCONVX-component of advection field
[in]UNSV1/(integral of test functions)
[in]VCONVY-component of advection field
[in]VISCViscosity (may be tensorial)
[in]WCONVZ-component of advection field in the transformed mesh
[in]YA4DIf yes, 4d version for tomawac
[in]ZSTARTransformed vertical coordinates in 3d

Definition at line 14 of file charac.f.

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