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

Go to the source code of this file.

Functions/Subroutines

subroutine diffin (MASKTR, LIMTRA, LITBOR, CLT, U, V, XNEBOR, YNEBOR, NBOR, NPTFR, KENT, KSORT, KLOG, KNEU, KDIR, KDDL, ICONV, NELBOR, NPOIN, MSK, MASKEL, NFRLIQ, THOMFR, FRTYPE, TN, TBOR, NUMLIQ, IKLBOR, NELEB, NELEBX)
 

Function/Subroutine Documentation

◆ diffin()

subroutine diffin ( type(bief_obj), intent(inout)  MASKTR,
integer, dimension(nptfr), intent(inout)  LIMTRA,
integer, dimension(nptfr), intent(in)  LITBOR,
integer, dimension(nptfr), intent(inout)  CLT,
double precision, dimension(npoin), intent(in)  U,
double precision, dimension(npoin), intent(in)  V,
double precision, dimension(nptfr), intent(in)  XNEBOR,
double precision, dimension(nptfr), intent(in)  YNEBOR,
integer, dimension(nptfr), intent(in)  NBOR,
integer, intent(in)  NPTFR,
integer, intent(in)  KENT,
integer, intent(in)  KSORT,
integer, intent(in)  KLOG,
integer, intent(in)  KNEU,
integer, intent(in)  KDIR,
integer, intent(in)  KDDL,
integer, intent(in)  ICONV,
integer, dimension(nelebx), intent(in)  NELBOR,
integer, intent(in)  NPOIN,
logical, intent(in)  MSK,
double precision, dimension(*), intent(in)  MASKEL,
integer, intent(in)  NFRLIQ,
logical, intent(in)  THOMFR,
integer, dimension(nfrliq), intent(in)  FRTYPE,
type(bief_obj), intent(in)  TN,
type(bief_obj), intent(inout)  TBOR,
integer, dimension(*), intent(in)  NUMLIQ,
integer, dimension(nelebx,2), intent(in)  IKLBOR,
integer, intent(in)  NELEB,
integer, intent(in)  NELEBX 
)
Parameters
[in,out]masktr[out] CLT A modified copy of litbor.
[in]FRTYPEType of boundary conditions 1: NORMAL 2: THOMPSON
[in]ICONVOption for advection : 1) characteristics 2) SUPG, ETC.
[in]IKLBORConnectivity table for boundary elements
[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 liquid output with free value
[out]LIMTRATechnical boundary conditions for tracers
[in]LITBORPhysical boundary conditions for tracers
[in]MASKELMasking of elements =1. : NORMAL =0. : MASKED ELEMENT
[in]MSKIf yes, there is masked elements.
[in]MSKIf yes, there is masked elements.
[in]NELBORFor the kth boundary edge, gives the corresponding ELEMENT.
[in]NELEBNumber of boundary elements
[in]NELEBXMaximum number of boundary elements
[in]NFRLIQNumber of liquid boundaries
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]TBORDirichlet boundary conditions on tracers
[in]THOMFRIf yes, there are thompson boundary conditions
[in]TNTracers at old time step
[in]UX-component of velocity
[in]VY-component of velocity
[in]XNEBORX-component of external normal boundary vector
[in]YNEBORY-component of external normal boundary vector
[in,out]tbor[out] CLT A modified copy of litbor.
[in]FRTYPEType of boundary conditions 1: NORMAL 2: THOMPSON
[in]ICONVOption for advection : 1) characteristics 2) SUPG, ETC.
[in]IKLBORConnectivity table for boundary elements
[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 liquid output with free value
[out]LIMTRATechnical boundary conditions for tracers
[in]LITBORPhysical boundary conditions for tracers
[in]MASKELMasking of elements =1. : NORMAL =0. : MASKED ELEMENT
[in]MSKIf yes, there is masked elements.
[in]MSKIf yes, there is masked elements.
[in]NELBORFor the kth boundary edge, gives the corresponding ELEMENT.
[in]NELEBNumber of boundary elements
[in]NELEBXMaximum number of boundary elements
[in]NFRLIQNumber of liquid boundaries
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]TBORDirichlet boundary conditions on tracers
[in]THOMFRIf yes, there are thompson boundary conditions
[in]TNTracers at old time step
[in]UX-component of velocity
[in]VY-component of velocity
[in]XNEBORX-component of external normal boundary vector
[in]YNEBORY-component of external normal boundary vector

Definition at line 10 of file diffin.f.

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