mod_linear_wave_theory Module

module~~mod_linear_wave_theory~~UsesGraph module~mod_linear_wave_theory mod_linear_wave_theory module~mod_precision mod_precision module~mod_precision->module~mod_linear_wave_theory iso_fortran_env iso_fortran_env iso_fortran_env->module~mod_precision
Help

Functions

public pure elemental function elevation(x, t, a, k, omega)

Returns the elevation [m] of a sinusoid wave given its amplitude [m], wavenumber [rad/m], and frequency [Hz].

Arguments

Type IntentOptional AttributesName
real(kind=realkind), intent(in) :: x

Horizontal space [m]

real(kind=realkind), intent(in) :: t

Time [s]

real(kind=realkind), intent(in) :: a

Wave amplitude [m]

real(kind=realkind), intent(in) :: k

Wavenumber [rad/m]

real(kind=realkind), intent(in) :: omega

Angular frequency [rad]

Return Value real(kind=realkind)

public pure elemental function pressure(x, z, t, a, k, omega, rho, grav)

Returns the pressure [Pa] at depth z (negative downward) for a sinusoid wave given its amplitude [m], wavenumber [rad/m], and frequency [Hz].

Arguments

Type IntentOptional AttributesName
real(kind=realkind), intent(in) :: x

Horizontal space [m]

real(kind=realkind), intent(in) :: z

Vertical displacement [m] from the surface, negative downward

real(kind=realkind), intent(in) :: t

Time [s]

real(kind=realkind), intent(in) :: a

Wave amplitude [m]

real(kind=realkind), intent(in) :: k

Wavenumber [rad/m]

real(kind=realkind), intent(in) :: omega

Angular frequency [rad]

real(kind=realkind), intent(in) :: rho

Water density [kg/m^3]

real(kind=realkind), intent(in) :: grav

Gravitational acceleration [m/s^2]

Return Value real(kind=realkind)

public pure elemental function horizontalAcceleration(x, z, t, a, k, omega)

Returns the horizontal acceleration of a water particle under a sinusoid wave, given its amplitude, wavenumber, and frequency.

Arguments

Type IntentOptional AttributesName
real(kind=realkind), intent(in) :: x

Horizontal space [m]

real(kind=realkind), intent(in) :: z

Vertical space, negative downward [m]

real(kind=realkind), intent(in) :: t

Time [s]

real(kind=realkind), intent(in) :: a

Wave amplitude [m]

real(kind=realkind), intent(in) :: k

Wavenumber [rad/m]

real(kind=realkind), intent(in) :: omega

Angular frequency [rad]

Return Value real(kind=realkind)

public pure elemental function horizontalVelocity(x, z, t, a, k, omega)

Returns the horizontal velocity of a water particle under a sinusoid wave, given its amplitude, wavenumber, and frequency.

Arguments

Type IntentOptional AttributesName
real(kind=realkind), intent(in) :: x

Horizontal space [m]

real(kind=realkind), intent(in) :: z

Vertical space, negative downward [m]

real(kind=realkind), intent(in) :: t

Time [s]

real(kind=realkind), intent(in) :: a

Wave amplitude [m]

real(kind=realkind), intent(in) :: k

Wavenumber [rad/m]

real(kind=realkind), intent(in) :: omega

Angular frequency [rad]

Return Value real(kind=realkind)

public pure elemental function verticalAcceleration(x, z, t, a, k, omega)

Returns the vertical acceleration of a water particle under a sinusoid wave, given its amplitude, wavenumber, and frequency.

Arguments

Type IntentOptional AttributesName
real(kind=realkind), intent(in) :: x

Horizontal space [m]

real(kind=realkind), intent(in) :: z

Vertical space, negative downward [m]

real(kind=realkind), intent(in) :: t

Time [s]

real(kind=realkind), intent(in) :: a

Wave amplitude [m]

real(kind=realkind), intent(in) :: k

Wavenumber [rad/m]

real(kind=realkind), intent(in) :: omega

Angular frequency [rad]

Return Value real(kind=realkind)

public pure elemental function verticalVelocity(x, z, t, a, k, omega)

Returns the vertical velocity of a water particle under a sinusoid wave, given its amplitude, wavenumber, and frequency.

Arguments

Type IntentOptional AttributesName
real(kind=realkind), intent(in) :: x

Horizontal space [m]

real(kind=realkind), intent(in) :: z

Vertical space, negative downward [m]

real(kind=realkind), intent(in) :: t

Time [s]

real(kind=realkind), intent(in) :: a

Wave amplitude [m]

real(kind=realkind), intent(in) :: k

Wavenumber [rad/m]

real(kind=realkind), intent(in) :: omega

Angular frequency [rad]

Return Value real(kind=realkind)