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

Go to the source code of this file.

Functions/Subroutines

subroutine sor3d (F, NDIRE, NF, NPOIN2, VENT, COURAN, MAREE, TITRE, TRA01, MESH3D)
 

Function/Subroutine Documentation

◆ sor3d()

subroutine sor3d ( double precision, dimension(npoin2,ndire,nf), intent(in)  F,
integer, intent(in)  NDIRE,
integer, intent(in)  NF,
integer, intent(in)  NPOIN2,
logical, intent(in)  VENT,
logical, intent(in)  COURAN,
logical, intent(in)  MAREE,
character(len=80), intent(in)  TITRE,
double precision, dimension(npoin2*ndire), intent(inout)  TRA01,
type(bief_mesh), intent(in)  MESH3D 
)
Parameters
[in]nfAT Computation time
[in]FMTR3DGlobal result file format
[in]COURANLogical indicating if there is a current
[in]FVariance density directional spectrum
[in]MAREELogical indicating consideration of tide
[in]MESH3DMesh structure in 3d (i.e. including directions)
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]NR3DLogical unit number of global result file
[in]TITRETitle
[in]TRA01Double precision work table of size npoin2*ndire
[in]VENTIndicates if wind is taken into account
[in]ndireAT Computation time
[in]FMTR3DGlobal result file format
[in]COURANLogical indicating if there is a current
[in]FVariance density directional spectrum
[in]MAREELogical indicating consideration of tide
[in]MESH3DMesh structure in 3d (i.e. including directions)
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]NR3DLogical unit number of global result file
[in]TITRETitle
[in]TRA01Double precision work table of size npoin2*ndire
[in]VENTIndicates if wind is taken into account
[in]npoin2AT Computation time
[in]FMTR3DGlobal result file format
[in]COURANLogical indicating if there is a current
[in]FVariance density directional spectrum
[in]MAREELogical indicating consideration of tide
[in]MESH3DMesh structure in 3d (i.e. including directions)
[in]NFNumber of frequencies
[in]NDIRENumber of directions
[in]NPOIN2Number of points in 2d mesh
[in]NR3DLogical unit number of global result file
[in]TITRETitle
[in]TRA01Double precision work table of size npoin2*ndire
[in]VENTIndicates if wind is taken into account

Definition at line 7 of file sor3d.f.

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