FEDEM Solver
R8.0
Source code of the dynamics solver
|
Data Types | |
type | fnvcolumntype |
Functions/Subroutines | |
subroutine | findcolumns (Tsea, beamProp, ierr) |
subroutine | initiatewavespectrumfnv (sys, env, ierr) |
subroutine | initiatefnvkinematics (TsimIn, dT, depth, ierr) |
subroutine | getwavekinematics (istep, inod, waterMotion, stat) |
subroutine | calcfnvforces (TsimIn, rhow, ierr) |
subroutine | addinfnvwaveforces (Q, RF, Tsea, sam, istep, ierr) |
Variables | |
type(fnvcolumntype), dimension(:), pointer, save | columns => null() |
real(dp), dimension(:,:), pointer, save, private | wavedata => null() |
real(dp), save, private | g |
real(dp), save, private | lpcut |
subroutine fnvwaveforcemodule::addinfnvwaveforces | ( | real(dp), dimension(:), intent(inout) | Q, |
real(dp), dimension(:), intent(inout) | RF, | ||
real(dp), dimension(3,4), intent(in) | Tsea, | ||
type(samtype), intent(in) | sam, | ||
integer, intent(in) | istep, | ||
integer, intent(inout) | ierr | ||
) |
subroutine fnvwaveforcemodule::calcfnvforces | ( | real(dp), intent(in) | TsimIn, |
real(dp), intent(in) | rhow, | ||
integer, intent(out) | ierr | ||
) |
subroutine fnvwaveforcemodule::findcolumns | ( | real(dp), dimension(3,4), intent(in) | Tsea, |
type(beampropertytype), dimension(:), intent(in) | beamProp, | ||
integer, intent(out) | ierr | ||
) |
subroutine fnvwaveforcemodule::getwavekinematics | ( | integer, intent(in) | istep, |
integer, intent(in) | inod, | ||
real(dp), dimension(:), intent(out) | waterMotion, | ||
integer, intent(out) | stat | ||
) |
subroutine fnvwaveforcemodule::initiatefnvkinematics | ( | real(dp), intent(in) | TsimIn, |
real(dp), intent(in) | dT, | ||
real(dp), intent(in) | depth, | ||
integer, intent(inout) | ierr | ||
) |
subroutine fnvwaveforcemodule::initiatewavespectrumfnv | ( | type(systemtype), intent(in) | sys, |
type(environmenttype), intent(inout) | env, | ||
integer, intent(out) | ierr | ||
) |
type(fnvcolumntype), dimension(:), pointer, save fnvwaveforcemodule::columns => null() |
|
private |
|
private |
|
private |