Functions/Subroutines
subroutine	vitfon (VIFOND, F, XK, NF, NPOIN2, NDIRE)

Function/Subroutine Documentation

◆ vitfon()

subroutine vitfon	(	double precision, dimension(npoin2), intent(inout)	VIFOND,
		double precision, dimension(npoin2,ndire,nf), intent(in)	F,
		double precision, dimension(npoin2,nf), intent(in)	XK,
		integer, intent(in)	NF,
		integer, intent(in)	NPOIN2,
		integer, intent(in)	NDIRE
	)

Parameters

[in]	nf	[in, out] BETA Work table
[in]	DEPTH	Water depth
[in]	DFREQ	Frequency steps between discretized frequencies
[in]	F	Variance density directional spectrum
[in]	NF	Number of frequencies
[in]	NDIRE	Number of directions
[in]	NPOIN2	Number of points in 2d mesh
[out]	UWBM	Maximum orbital velocity near the bottom
[in]	XK	Discretized wave number
[in]	ndire	[in, out] BETA Work table
[in]	DEPTH	Water depth
[in]	DFREQ	Frequency steps between discretized frequencies
[in]	F	Variance density directional spectrum
[in]	NF	Number of frequencies
[in]	NDIRE	Number of directions
[in]	NPOIN2	Number of points in 2d mesh
[out]	UWBM	Maximum orbital velocity near the bottom
[in]	XK	Discretized wave number
[in]	npoin2	[in, out] BETA Work table
[in]	DEPTH	Water depth
[in]	DFREQ	Frequency steps between discretized frequencies
[in]	F	Variance density directional spectrum
[in]	NF	Number of frequencies
[in]	NDIRE	Number of directions
[in]	NPOIN2	Number of points in 2d mesh
[out]	UWBM	Maximum orbital velocity near the bottom
[in]	XK	Discretized wave number

Definition at line 7 of file vitfon.f.

Here is the caller graph for this function: