WAVEWATCH III  beta 0.0.1
w3wavset.F90 File Reference

Contains MODULE W3WAVSET for implicit solution of wave setup problem. More...

Go to the source code of this file.

Modules

module  w3wavset
 Implicit solution of wave setup problem following Dingemans for structured and unstructured grids.
 

Functions/Subroutines

subroutine w3wavset::differentiate_xydir_native (VAR, DVDX, DVDY)
 Differentiate xy, using linear shape function. More...
 
subroutine w3wavset::differentiate_xydir_mapsta (VAR, DVDX, DVDY)
 Differentiate xy based on mapsta, using linear shape function. More...
 
subroutine w3wavset::differentiate_xydir (VAR, DVDX, DVDY)
 Driver routine for xydir. More...
 
subroutine w3wavset::trig_compute_lh_stress (F_X, F_Y, DWNX)
 Setup boundary pointer. More...
 
subroutine w3wavset::trig_compute_diff (IE, I1, UGRAD, VGRAD)
 Differentiate other way around. More...
 
subroutine w3wavset::trig_wave_setup_compute_system (ASPAR, B, FX, FY, DWNX, ACTIVE, ACTIVESEC)
 Setup system matrix for solutions of wave setup eq. More...
 
subroutine w3wavset::trig_wave_setup_apply_precond (ASPAR, TheIn, TheOut, ACTIVE, ACTIVESEC)
 Preconditioner. More...
 
subroutine w3wavset::trig_wave_setup_apply_fct (ASPAR, TheIn, TheOut, ACTIVE, ACTIVESEC)
 
subroutine w3wavset::trig_wave_setup_scalar_prod (V1, V2, eScal)
 Scalar product plus exchange. More...
 
subroutine w3wavset::trig_wave_setup_solve_poisson_neumann_dir (ASPAR, B, TheOut, ACTIVE, ACTIVESEC)
 Poisson equation solver. More...
 
subroutine w3wavset::trig_set_meanvalue_to_zero (TheVar)
 Set mean value. More...
 
subroutine w3wavset::compute_active_node (DWNX, ACTIVE)
 Compute active node for setup comp. More...
 
subroutine w3wavset::trig_wave_setup_computation
 Setup computation. More...
 
subroutine w3wavset::preparation_fd_scheme (IMOD)
 Wave setup for FD grids. More...
 
subroutine w3wavset::fd_wave_setup_apply_fct (ASPAR, TheIn, TheOut)
 Compute off diagonal for FD grids. More...
 
subroutine w3wavset::fd_wave_setup_apply_precond (ASPAR, TheIn, TheOut)
 Preconditioning for FD grids. More...
 
subroutine w3wavset::fd_collect_sxx_xy_yy (SXX_t, SXY_t, SYY_t)
 Radiation stresses for FD grids. More...
 
subroutine w3wavset::fd_compute_lh_stress (SXX_t, SXY_t, SYY_t, FX, FY)
 Setup fluxes. More...
 
subroutine w3wavset::fd_compute_diff (IEDGE, ISEA, UGRAD, VGRAD, dist)
 Differences on FD grids. More...
 
subroutine w3wavset::fd_wave_setup_compute_system (ASPAR, B, FX, FY)
 Setup matrix on FD grids. More...
 
subroutine w3wavset::fd_wave_setup_scalar_prod (V1, V2, eScal)
 Scalar product. More...
 
subroutine w3wavset::fd_wave_setup_solve_poisson_neumann_dir (ASPAR, B, TheOut)
 Poisson solver on FD grids. More...
 
subroutine w3wavset::fd_set_meanvalue_to_zero (TheVar)
 Set mean value. More...
 
subroutine w3wavset::fd_wave_setup_computation
 Wave setup comp on FD grids. More...
 
subroutine w3wavset::wave_setup_computation
 General driver. More...
 

Variables

integer, save w3wavset::ient = 0
 
logical w3wavset::do_wave_setup = .TRUE.
 

Detailed Description

Contains MODULE W3WAVSET for implicit solution of wave setup problem.

Author
Aron Roland
Mathieu Dutour-Sikiric
Date
1-Jun-2018

Definition in file w3wavset.F90.