w3src4md.F90 File Reference

The 'SHOM/Ifremer' source terms based on P.A.E.M. More...

Go to the source code of this file.

Modules
module	w3src4md
	The 'SHOM/Ifremer' source terms based on P.A.E.M.

Functions/Subroutines
subroutine	w3src4md::w3spr4 (A, CG, WN, EMEAN, FMEAN, FMEAN1, WNMEAN, AMAX, U, UDIR, ifdef W3_FLX5
	Calculate mean wave parameters for the use in the source term routines. More...
subroutine	w3src4md::w3sin4 (A, CG, K, U, USTAR, DRAT, AS, USDIR, Z0, CD, TAUWX, TAUWY, TAUWNX, TAUWNY, S, D, LLWS, IX, IY, BRLAMBDA)
	Calculate diagonal and input source term for WAM4+ approach. More...
subroutine	w3src4md::insin4 (FLTABS)
	Initialization for source term routine. More...
subroutine	w3src4md::tabu_stress
	To generate friction velocity table TAUT(TAUW,U10)=SQRT(TAU). More...
subroutine	w3src4md::tabu_tauhf (SIGMAX)
	Tabulation of the high-frequency wave-supported stress. More...
subroutine	w3src4md::tabu_tauhf2 (SIGMAX)
	Tabulation of the high-frequency wave-supported stress as a function of ustar, alpha (modified Charnock), and tail energy level. More...
subroutine	w3src4md::calc_ustar (WINDSPEED, TAUW, USTAR, Z0, CHARN)
	Compute friction velocity based on wind speed U10. More...
subroutine	w3src4md::w3sds4 (A, K, CG, USTAR, USDIR, DEPTH, DAIR, SRHS, DDIAG, IX, IY, BRLAMBDA, WHITECAP, DLWMEAN)
	Calculate whitecapping source term and diagonal term of derivative. More...

Variables
integer, parameter	w3src4md::itaumax =200
integer, parameter	w3src4md::jumax =200
integer, parameter	w3src4md::iustar =100
integer, parameter	w3src4md::ialpha =200
integer, parameter	w3src4md::ilevtail =50
real, dimension(:,:), allocatable	w3src4md::taut
real, dimension(:,:), allocatable	w3src4md::tauhft
real, dimension(:,:,:), allocatable	w3src4md::tauhft2
real	w3src4md::delust
real	w3src4md::delalp
real	w3src4md::deltauw
real	w3src4md::delu
real	w3src4md::deltail
real, parameter	w3src4md::umax = 50.
real, parameter	w3src4md::tauwmax = 2.2361
integer	w3src4md::dikcumul
integer, parameter	w3src4md::nkhi =100
integer, parameter	w3src4md::fac_kd2 =1000
real, parameter	w3src4md::fac_kd1 =1.01
real, parameter	w3src4md::khsmax =2.
real, parameter	w3src4md::khmax =2.
real, parameter	w3src4md::kdmax =200000.

Detailed Description

The 'SHOM/Ifremer' source terms based on P.A.E.M.

Author

F. Ardhuin

Date

13-Nov-2013

Definition in file w3src4md.F90.