XBeach
|
Data Types | |
type | shortspectrum |
type | spectrum |
type | waveparamsnew |
Public Member Functions | |
subroutine, public | generate_wave_boundary_surfbeat (durationlength) |
subroutine | read_spectrum_input (wp, fn, specin) |
subroutine | read_jonswap_file (par, wp, readfile, listline, specin) |
subroutine | jonswapgk (x, gam, y) |
subroutine | read_vardens_file (par, readfile, specin) |
subroutine | interpolate_spectrum (specin, specinterp, par, fmax) |
subroutine | set_repeatwbc |
subroutine | tpDcalc (Sf, f, Trep, trepfac, switch) |
subroutine | generate_wave_time_axis (wp) |
subroutine | generate_wave_train_variance (wp, specinterp) |
subroutine | generate_wave_train_properties_per_offshore_point (wp, s) |
subroutine | generate_wave_train_Fourier (wp) |
subroutine | distribute_wave_train_directions (wp, nspr) |
subroutine | generate_ebcf (wp) |
subroutine | generate_swts (wp) |
subroutine | generate_qbcf (wp) |
subroutine | generate_nhtimeseries_file (wp) |
Private Member Functions | |
subroutine | read_swan_file (par, readfile, specin) |
subroutine | set_bcfilenames (wp) |
subroutine | generate_combined_spectrum (specinterp, combspec) |
subroutine | generate_wavetrain_components (combspec, wp) |
subroutine | frange (f, Sf, fmax, firstp, lastp, findlineout) |
Private Attributes | |
integer, parameter | nfint = 801 |
integer, parameter | naint = 401 |
integer, parameter | Kmin = 200 |
real *8, parameter | wdmax = 5.d0 |
integer | nspectra |
integer | bccount |
integer | npb |
real *8 | hb0 |
real *8, parameter | par_pi = 4.d0*atan(1.d0) |
real *8, parameter | par_g = 9.81d0 |
complex(kind(0.0d0)), parameter | par_compi = (0.0d0, 1.0d0) |
Definition at line 1 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::distribute_wave_train_directions | ( | type(waveparamsnew), intent(inout) | wp, |
integer, intent(in) | nspr | ||
) |
Definition at line 2035 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::frange | ( | real*8, dimension(:), intent(in) | f, |
real*8, dimension(:), intent(in) | Sf, | ||
real*8, intent(in) | fmax, | ||
integer, intent(out) | firstp, | ||
integer, intent(out) | lastp, | ||
real*8, dimension(:), intent(out), optional, allocatable | findlineout | ||
) | [private] |
Definition at line 1682 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::generate_combined_spectrum | ( | type(spectrum), dimension(nspectra), intent(in) | specinterp, |
type(spectrum), intent(inout) | combspec | ||
) | [private] |
Definition at line 1410 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::generate_ebcf | ( | type(waveparamsnew), intent(inout) | wp | ) |
Definition at line 2142 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::generate_nhtimeseries_file | ( | type(waveparamsnew), intent(inout) | wp | ) |
Definition at line 2735 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::generate_qbcf | ( | type(waveparamsnew), intent(inout) | wp | ) |
Definition at line 2460 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::generate_swts | ( | type(waveparamsnew), intent(inout) | wp | ) |
Definition at line 2376 of file wave_boundary_update.f90.
subroutine, public wave_boundary_update_module::generate_wave_boundary_surfbeat | ( | real*8, intent(out) | durationlength | ) |
Definition at line 73 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::generate_wave_time_axis | ( | type(waveparamsnew), intent(inout) | wp | ) |
Definition at line 1727 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::generate_wave_train_Fourier | ( | type(waveparamsnew), intent(inout) | wp | ) |
Definition at line 1969 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::generate_wave_train_properties_per_offshore_point | ( | type(waveparamsnew), intent(inout) | wp, |
type(spacepars), intent(in) | s | ||
) |
Definition at line 1864 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::generate_wave_train_variance | ( | type(waveparamsnew), intent(inout) | wp, |
type(spectrum), dimension(nspectra), intent(in) | specinterp | ||
) |
Definition at line 1811 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::generate_wavetrain_components | ( | type(spectrum), intent(in) | combspec, |
type(waveparamsnew), intent(inout) | wp | ||
) | [private] |
Definition at line 1494 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::interpolate_spectrum | ( | type(spectrum), intent(in) | specin, |
type(spectrum), intent(inout) | specinterp, | ||
type(parameters), intent(in) | par, | ||
real*8, intent(in) | fmax | ||
) |
Definition at line 1252 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::jonswapgk | ( | real*8, dimension(:), intent(in) | x, |
real*8, intent(in) | gam, | ||
real*8, dimension(:), intent(inout) | y | ||
) |
Definition at line 769 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::read_jonswap_file | ( | type(parameters), intent(in) | par, |
type(waveparamsnew), intent(inout) | wp, | ||
character(len=*), intent(in) | readfile, | ||
integer, intent(inout) | listline, | ||
type(spectrum), intent(inout) | specin | ||
) |
Definition at line 335 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::read_spectrum_input | ( | type(waveparamsnew), intent(inout) | wp, |
type(filenames), intent(inout) | fn, | ||
type(spectrum), intent(inout) | specin | ||
) |
Definition at line 247 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::read_swan_file | ( | type(parameters), intent(in) | par, |
character(len=*), intent(in) | readfile, | ||
type(spectrum), intent(inout) | specin | ||
) | [private] |
Definition at line 816 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::read_vardens_file | ( | type(parameters), intent(in) | par, |
character(len=*), intent(in) | readfile, | ||
type(spectrum), intent(inout) | specin | ||
) |
Definition at line 1086 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::set_bcfilenames | ( | type(waveparamsnew), intent(inout) | wp | ) | [private] |
Definition at line 1382 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::set_repeatwbc | ( | ) |
Definition at line 1361 of file wave_boundary_update.f90.
subroutine wave_boundary_update_module::tpDcalc | ( | real*8, dimension(:), intent(in) | Sf, |
real*8, dimension(:), intent(in) | f, | ||
real*8, intent(out) | Trep, | ||
real*8, intent(in) | trepfac, | ||
integer, intent(in) | switch | ||
) |
Definition at line 1651 of file wave_boundary_update.f90.
integer wave_boundary_update_module::bccount [private] |
Definition at line 65 of file wave_boundary_update.f90.
real*8 wave_boundary_update_module::hb0 [private] |
Definition at line 66 of file wave_boundary_update.f90.
integer, parameter wave_boundary_update_module::Kmin = 200 [private] |
Definition at line 60 of file wave_boundary_update.f90.
integer, parameter wave_boundary_update_module::naint = 401 [private] |
Definition at line 59 of file wave_boundary_update.f90.
integer, parameter wave_boundary_update_module::nfint = 801 [private] |
Definition at line 58 of file wave_boundary_update.f90.
integer wave_boundary_update_module::npb [private] |
Definition at line 65 of file wave_boundary_update.f90.
integer wave_boundary_update_module::nspectra [private] |
Definition at line 65 of file wave_boundary_update.f90.
complex(kind(0.0d0)), parameter wave_boundary_update_module::par_compi = (0.0d0, 1.0d0) [private] |
Definition at line 70 of file wave_boundary_update.f90.
real*8, parameter wave_boundary_update_module::par_g = 9.81d0 [private] |
Definition at line 69 of file wave_boundary_update.f90.
real*8, parameter wave_boundary_update_module::par_pi = 4.d0*atan(1.d0) [private] |
Definition at line 68 of file wave_boundary_update.f90.
real*8, parameter wave_boundary_update_module::wdmax = 5.d0 [private] |
Definition at line 61 of file wave_boundary_update.f90.