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

Go to the source code of this file.

Functions/Subroutines

subroutine qnlin1 (TSTOT, TSDER, IANGNL, NF, NDIRE, NPOIN2, F, XKMOY, TAUX1, TAUX2, TAUX3, TAUX4, TAUX5, DFINI)
 

Function/Subroutine Documentation

◆ qnlin1()

subroutine qnlin1 ( double precision, dimension(npoin2,ndire,nf), intent(inout)  TSTOT,
double precision, dimension(npoin2,ndire,nf), intent(inout)  TSDER,
integer, dimension(ndire,8), intent(in)  IANGNL,
integer, intent(in)  NF,
integer, intent(in)  NDIRE,
integer, intent(in)  NPOIN2,
double precision, dimension(npoin2,ndire,nf), intent(in)  F,
double precision, dimension(npoin2), intent(in)  XKMOY,
double precision, dimension(npoin2), intent(inout)  TAUX1,
double precision, dimension(npoin2), intent(inout)  TAUX2,
double precision, dimension(npoin2), intent(inout)  TAUX3,
double precision, dimension(npoin2), intent(inout)  TAUX4,
double precision, dimension(npoin2), intent(inout)  TAUX5,
double precision, dimension(npoin2), intent(inout)  DFINI 
)
Parameters
[in]npoin2COEFNL Coefficients used for dia method
[in]DEPTHWater depth
[in,out]DFINIWork table
[in]FDirectional spectrum
[in]F1First discretized frequency
[in]IANGNLAngular indices table
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]PROINFLogical indicating infinite depth assumption
[in]RAISFFrequential ratio
[in,out]TAUX1Work table
[in,out]TAUX2Work table
[in,out]TAUX3Work table
[in,out]TAUX4Work table
[in,out]TAUX5Work table
[in,out]TSDERDerived part of the source term contribution
[in,out]TSTOTTotal part of the source term contribution
[in]XKMOYAverage wave number
[in]ndireCOEFNL Coefficients used for dia method
[in]DEPTHWater depth
[in,out]DFINIWork table
[in]FDirectional spectrum
[in]F1First discretized frequency
[in]IANGNLAngular indices table
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]PROINFLogical indicating infinite depth assumption
[in]RAISFFrequential ratio
[in,out]TAUX1Work table
[in,out]TAUX2Work table
[in,out]TAUX3Work table
[in,out]TAUX4Work table
[in,out]TAUX5Work table
[in,out]TSDERDerived part of the source term contribution
[in,out]TSTOTTotal part of the source term contribution
[in]XKMOYAverage wave number
[in]nfCOEFNL Coefficients used for dia method
[in]DEPTHWater depth
[in,out]DFINIWork table
[in]FDirectional spectrum
[in]F1First discretized frequency
[in]IANGNLAngular indices table
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]PROINFLogical indicating infinite depth assumption
[in]RAISFFrequential ratio
[in,out]TAUX1Work table
[in,out]TAUX2Work table
[in,out]TAUX3Work table
[in,out]TAUX4Work table
[in,out]TAUX5Work table
[in,out]TSDERDerived part of the source term contribution
[in,out]TSTOTTotal part of the source term contribution
[in]XKMOYAverage wave number

Definition at line 8 of file qnlin1.f.

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