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

Go to the source code of this file.

Functions/Subroutines

subroutine conwac (CX, CY, CT, XK, CG, NPOIN2, NDIRE, JF, NF)
 

Function/Subroutine Documentation

◆ conwac()

subroutine conwac ( double precision, dimension(npoin2,ndire), intent(inout)  CX,
double precision, dimension(npoin2,ndire), intent(inout)  CY,
double precision, dimension(npoin2,ndire), intent(inout)  CT,
double precision, dimension(npoin2,nf), intent(in)  XK,
double precision, dimension(npoin2,nf), intent(in)  CG,
integer, intent(in)  NPOIN2,
integer, intent(in)  NDIRE,
integer, intent(in)  JF,
integer, intent(in)  NF 
)
Parameters
[in]nfCG Discretized group velocity
[in]COSFCosine of the latitudes of the points 2d
[out]CYAdvection field along x(or phi)
[out]CXAdvection field along y(or lambda)
[out]CTAdvection field along teta
[in]DZYSea bottom slope along x
[in]DZXSea bottom slope along y
[in]JFIndex of the frequencx
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]PROINFLogical indicating infinite depth assumption
[in]PROMINMinimum value of water depth
[in]SPHELogical indicating spherical coord assumption
[in]TGFTangent of the latitudes of the points 2d
[in,out]TRA01Work table
[in]XKDiscretized wave number
[in]ndireCG Discretized group velocity
[in]COSFCosine of the latitudes of the points 2d
[out]CYAdvection field along x(or phi)
[out]CXAdvection field along y(or lambda)
[out]CTAdvection field along teta
[in]DZYSea bottom slope along x
[in]DZXSea bottom slope along y
[in]JFIndex of the frequencx
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]PROINFLogical indicating infinite depth assumption
[in]PROMINMinimum value of water depth
[in]SPHELogical indicating spherical coord assumption
[in]TGFTangent of the latitudes of the points 2d
[in,out]TRA01Work table
[in]XKDiscretized wave number
[in]npoin2CG Discretized group velocity
[in]COSFCosine of the latitudes of the points 2d
[out]CYAdvection field along x(or phi)
[out]CXAdvection field along y(or lambda)
[out]CTAdvection field along teta
[in]DZYSea bottom slope along x
[in]DZXSea bottom slope along y
[in]JFIndex of the frequencx
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]PROINFLogical indicating infinite depth assumption
[in]PROMINMinimum value of water depth
[in]SPHELogical indicating spherical coord assumption
[in]TGFTangent of the latitudes of the points 2d
[in,out]TRA01Work table
[in]XKDiscretized wave number
[in]jfCG Discretized group velocity
[in]COSFCosine of the latitudes of the points 2d
[out]CYAdvection field along x(or phi)
[out]CXAdvection field along y(or lambda)
[out]CTAdvection field along teta
[in]DZYSea bottom slope along x
[in]DZXSea bottom slope along y
[in]JFIndex of the frequencx
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]PROINFLogical indicating infinite depth assumption
[in]PROMINMinimum value of water depth
[in]SPHELogical indicating spherical coord assumption
[in]TGFTangent of the latitudes of the points 2d
[in,out]TRA01Work table
[in]XKDiscretized wave number

Definition at line 7 of file conwac.f.

+ Here is the caller graph for this function: