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

Go to the source code of this file.

Functions/Subroutines

subroutine qbrek1 (TSTOT, F, FCAR, VARIAN, NF, NDIRE, NPOIN2)
 

Function/Subroutine Documentation

◆ qbrek1()

subroutine qbrek1 ( double precision, dimension(npoin2,ndire,nf), intent(inout)  TSTOT,
double precision, dimension(npoin2,ndire,nf), intent(in)  F,
double precision, dimension(npoin2), intent(in)  FCAR,
double precision, dimension(npoin2), intent(in)  VARIAN,
integer, intent(in)  NF,
integer, intent(in)  NDIRE,
integer, intent(in)  NPOIN2 
)
Parameters
[in]nfALFABJ Coefficient alpha of bj model
[in]FDirectional spectrum
[in]FCARCharacteristic frequency
[in]GAMBJ1Gamma1 constant of wave breaking bj model
[in]GAMBJ2Gamma2 constant of wave breaking bj model
[in]IHMBJDepth-induced breaking criterium giving the BREAKING WAVE HEIGHT
[in]IQBBJSelected qb computation method for bj model
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in,out]TSTOTTotal part of the source term contribution
[in]VARIANSpectrum variance
[in]ndireALFABJ Coefficient alpha of bj model
[in]FDirectional spectrum
[in]FCARCharacteristic frequency
[in]GAMBJ1Gamma1 constant of wave breaking bj model
[in]GAMBJ2Gamma2 constant of wave breaking bj model
[in]IHMBJDepth-induced breaking criterium giving the BREAKING WAVE HEIGHT
[in]IQBBJSelected qb computation method for bj model
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in,out]TSTOTTotal part of the source term contribution
[in]VARIANSpectrum variance
[in]npoin2ALFABJ Coefficient alpha of bj model
[in]FDirectional spectrum
[in]FCARCharacteristic frequency
[in]GAMBJ1Gamma1 constant of wave breaking bj model
[in]GAMBJ2Gamma2 constant of wave breaking bj model
[in]IHMBJDepth-induced breaking criterium giving the BREAKING WAVE HEIGHT
[in]IQBBJSelected qb computation method for bj model
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in,out]TSTOTTotal part of the source term contribution
[in]VARIANSpectrum variance

Definition at line 7 of file qbrek1.f.

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