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

Go to the source code of this file.

Functions/Subroutines

subroutine qnlin3 (T1TOT, T1DER, F2, N1POIN2, N1PLAN, N1F)
 

Function/Subroutine Documentation

◆ qnlin3()

subroutine qnlin3 ( double precision, dimension( n1poin2,n1plan,n1f), intent(inout)  T1TOT,
double precision, dimension( n1poin2,n1plan,n1f), intent(inout)  T1DER,
double precision, dimension(n1poin2,n1plan,n1f), intent(inout)  F2,
integer, intent(in)  N1POIN2,
integer, intent(in)  N1PLAN,
integer, intent(in)  N1F 
)
Parameters
[in]n1poin2DIMBUF Variable for spectrum interpolation
[in]FDirectional spectrum
[in]F_COEFWork table for spectrum interpolation
[in]F_POINWork table for spectrum interpolation
[in]F_PROJWork table for spectrum interpolation
[in]FSEUILWork table
[in]K_IF1Work table
[in]K_IF2Work table
[in]K_IF3Work table
[in]K_1MWork table
[in]K_1M2MWork table
[in]K_1M2PWork table
[in]K_1M3MWork table
[in]K_1M3PWork table
[in]K_1PWork table
[in]K_1P2MWork table
[in]K_1P2PWork table
[in]K_1P3MWork table
[in]K_1P3PWork table
[in]IDCONFWork table
[in]LBUFVariable for spectrum interpolation
[in]NB_NODNumber of points in 2d mesh
[in]NCONFNumber of retained configurations
[in]NCONFMMaximum number of configurations
[in]NFNumber of frequencies
[in]NF1Number of integration point on omega1
[in]NQ_OM2Number of integration point on omega2
[in]NTNumber of directions
[in]NT1Number of integration point on teta1
[in]RAISFFrequential ratio
[in]SEUILThreshold0 for configurations elimination (gqm)
[in]T_POINWork table for spectrum interpolation
[in]TB_FACWork table
[in]TB_SCAScale coefficient
[in]TB_TMPWork table
[in]TB_TPMWork table
[in]TB_V14Work table
[in]TB_V24Work table
[in]TB_V34Work table
[in,out]TSDERDerived part of the source term contribution
[in,out]TSTOTTotal part of the source term contribution
[in]n1planDIMBUF Variable for spectrum interpolation
[in]FDirectional spectrum
[in]F_COEFWork table for spectrum interpolation
[in]F_POINWork table for spectrum interpolation
[in]F_PROJWork table for spectrum interpolation
[in]FSEUILWork table
[in]K_IF1Work table
[in]K_IF2Work table
[in]K_IF3Work table
[in]K_1MWork table
[in]K_1M2MWork table
[in]K_1M2PWork table
[in]K_1M3MWork table
[in]K_1M3PWork table
[in]K_1PWork table
[in]K_1P2MWork table
[in]K_1P2PWork table
[in]K_1P3MWork table
[in]K_1P3PWork table
[in]IDCONFWork table
[in]LBUFVariable for spectrum interpolation
[in]NB_NODNumber of points in 2d mesh
[in]NCONFNumber of retained configurations
[in]NCONFMMaximum number of configurations
[in]NFNumber of frequencies
[in]NF1Number of integration point on omega1
[in]NQ_OM2Number of integration point on omega2
[in]NTNumber of directions
[in]NT1Number of integration point on teta1
[in]RAISFFrequential ratio
[in]SEUILThreshold0 for configurations elimination (gqm)
[in]T_POINWork table for spectrum interpolation
[in]TB_FACWork table
[in]TB_SCAScale coefficient
[in]TB_TMPWork table
[in]TB_TPMWork table
[in]TB_V14Work table
[in]TB_V24Work table
[in]TB_V34Work table
[in,out]TSDERDerived part of the source term contribution
[in,out]TSTOTTotal part of the source term contribution
[in]n1fDIMBUF Variable for spectrum interpolation
[in]FDirectional spectrum
[in]F_COEFWork table for spectrum interpolation
[in]F_POINWork table for spectrum interpolation
[in]F_PROJWork table for spectrum interpolation
[in]FSEUILWork table
[in]K_IF1Work table
[in]K_IF2Work table
[in]K_IF3Work table
[in]K_1MWork table
[in]K_1M2MWork table
[in]K_1M2PWork table
[in]K_1M3MWork table
[in]K_1M3PWork table
[in]K_1PWork table
[in]K_1P2MWork table
[in]K_1P2PWork table
[in]K_1P3MWork table
[in]K_1P3PWork table
[in]IDCONFWork table
[in]LBUFVariable for spectrum interpolation
[in]NB_NODNumber of points in 2d mesh
[in]NCONFNumber of retained configurations
[in]NCONFMMaximum number of configurations
[in]NFNumber of frequencies
[in]NF1Number of integration point on omega1
[in]NQ_OM2Number of integration point on omega2
[in]NTNumber of directions
[in]NT1Number of integration point on teta1
[in]RAISFFrequential ratio
[in]SEUILThreshold0 for configurations elimination (gqm)
[in]T_POINWork table for spectrum interpolation
[in]TB_FACWork table
[in]TB_SCAScale coefficient
[in]TB_TMPWork table
[in]TB_TPMWork table
[in]TB_V14Work table
[in]TB_V24Work table
[in]TB_V34Work table
[in,out]TSDERDerived part of the source term contribution
[in,out]TSTOTTotal part of the source term contribution

Definition at line 7 of file qnlin3.f.

+ Here is the caller graph for this function: