FEDEM Solver  R8.0
Source code of the dynamics solver
Data Types | Modules | Functions/Subroutines | Variables
FNVwaveForceModule.f90 File Reference

Data Types

type  fnvwaveforcemodule::fnvcolumntype
 

Modules

module  fnvwaveforcemodule
 

Functions/Subroutines

subroutine fnvwaveforcemodule::findcolumns (Tsea, beamProp, ierr)
 
real(dp) function cross_product (a, b)
 
real(dp) function, dimension(3) glob2loc (Tlg, xg)
 
subroutine fnvwaveforcemodule::initiatewavespectrumfnv (sys, env, ierr)
 
real(dp) function, dimension(:), pointer arraypt (array, nval)
 
subroutine fnvwaveforcemodule::initiatefnvkinematics (TsimIn, dT, depth, ierr)
 
subroutine fnvwaveforcemodule::getwavekinematics (istep, inod, waterMotion, stat)
 
subroutine fnvwaveforcemodule::calcfnvforces (TsimIn, rhow, ierr)
 
subroutine fnvwaveforcemodule::addinfnvwaveforces (Q, RF, Tsea, sam, istep, ierr)
 

Variables

type(fnvcolumntype), dimension(:), pointer, save fnvwaveforcemodule::columns => null()
 
real(dp), dimension(:,:), pointer, save, private fnvwaveforcemodule::wavedata => null()
 
real(dp), save, private fnvwaveforcemodule::g
 
real(dp), save, private fnvwaveforcemodule::lpcut
 

Function/Subroutine Documentation

◆ arraypt()

real(dp) function, dimension(:), pointer initiatewavespectrumfnv::arraypt ( real(dp), dimension(nval), intent(in), target  array,
integer, intent(in)  nval 
)

◆ cross_product()

real(dp) function findcolumns::cross_product ( real(dp), dimension(3), intent(in)  a,
real(dp), dimension(3), intent(in)  b 
)

◆ glob2loc()

real(dp) function, dimension(3) findcolumns::glob2loc ( real(dp), dimension(3,4), intent(in)  Tlg,
real(dp), dimension(3), intent(in)  xg 
)