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

Go to the source code of this file.

Functions/Subroutines

subroutine windiss1 (FWX, FWY, NPOIN2, XK, NDIRE, FS, NF)
 

Function/Subroutine Documentation

◆ windiss1()

subroutine windiss1 ( double precision, dimension(npoin2), intent(inout)  FWX,
double precision, dimension(npoin2), intent(inout)  FWY,
integer, intent(in)  NPOIN2,
double precision, dimension(npoin2,nf), intent(in)  XK,
integer, intent(in)  NDIRE,
double precision, dimension(npoin2,ndire,nf), intent(in)  FS,
integer, intent(in)  NF 
)
Parameters
[in]npoin2FS Variance density directional spectrum
[out]FWXSurface stress due to wind along x
[out]FWYSurface stress due to wind along y
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]XKDiscretized wave number
[in]ndireFS Variance density directional spectrum
[out]FWXSurface stress due to wind along x
[out]FWYSurface stress due to wind along y
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]XKDiscretized wave number
[in]nfFS Variance density directional spectrum
[out]FWXSurface stress due to wind along x
[out]FWYSurface stress due to wind along y
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]XKDiscretized wave number

Definition at line 6 of file windiss1.f.

+ Here is the caller graph for this function: