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

Modules

module  diffractionmodule
 

Functions/Subroutines

character(len=18) function diffractionmodule::bodyname (id)
 
subroutine, public diffractionmodule::nemohinit (sups, ierr)
 
subroutine, public diffractionmodule::nemohclose
 
subroutine, public diffractionmodule::nemohmesh (prefix, sId, bodyIdx, supTr, Xc, rho, g, nfobj, ierr)
 
subroutine, public diffractionmodule::nemohanalysis (prefix, env, waveData, beta, M, omega, Kext, Cext, RAO, ipsw, ierr)
 
subroutine writemat (array, lpu, name)
 
subroutine, public diffractionmodule::getexcitationforce (ibody, t, Fex, ierr)
 

Variables

integer, save diffractionmodule::ndof
 
integer, dimension(:), allocatable diffractionmodule::np
 
integer, dimension(:), allocatable diffractionmodule::nf
 
real(sp), dimension(:,:), allocatable diffractionmodule::cog
 
real(sp), dimension(:,:), allocatable diffractionmodule::wave
 
character(len=32), dimension(:), allocatable diffractionmodule::cbody
 
real(sp), dimension(:,:,:), pointer diffractionmodule::a => null()
 
real(sp), dimension(:,:,:), pointer diffractionmodule::b => null()
 
complex(sp), dimension(:,:), pointer diffractionmodule::fe => null()
 

Function/Subroutine Documentation

◆ writemat()

subroutine nemohanalysis::writemat ( real(sp), dimension(:,:), intent(in)  array,
integer, intent(in), optional  lpu,
character(len=*), intent(in), optional  name 
)