FEDEM Solver  R8.0
Source code of the dynamics solver
Data Types | Functions/Subroutines | Variables
sdiskmatrixmodule Module Reference

Data Types

type  diskmatrixtype
 
interface  dmmattimesvec
 

Functions/Subroutines

integer function dmgetswapsize ()
 
subroutine dmnullify (this)
 
subroutine dmwrite (this, lpu, name)
 
subroutine dmopen (this, fileName, fileChkSum, nRows, nCols, status, err, nColSwap, swapSize, wantTag)
 
integer(i8) function dmsize (this, iDim)
 
subroutine dmclose (this, err)
 
subroutine, private dmgetaddress (this, rInd, cInd, section, index, err)
 
subroutine, private dmswap (this, newSection, err)
 
subroutine, private dmsinglecast (this, ielSwap, nelSwap)
 
real(sp) function dmgetvalue (this, rInd, cInd, err)
 
real(sp) function, dimension(:,:), pointer dmgetswapsecptr (this, cInd, err)
 
real(sp) function, dimension(:), pointer dmgetcolptr (this, cInd, err)
 
subroutine dmgetcol (this, cInd, col, err)
 
subroutine dmgetrow (this, rInd, row, err)
 
subroutine, private dmmattimesvec_sp (this, xVec, yVec, err, doInitialize)
 
subroutine, private dmmattimesvec_dp (this, xVec, yVec, err, doInitialize)
 
subroutine dmmattranstimesvec (this, xVec, yVec, err)
 
subroutine dmfindabsmaxrowvalues (this, maxRowVal, err)
 

Variables

character(len=30), parameter, private dmtag_p = '#FEDEM disk matrix'
 

Function/Subroutine Documentation

◆ dmclose()

subroutine sdiskmatrixmodule::dmclose ( type(diskmatrixtype), intent(inout)  this,
integer, intent(out)  err 
)

◆ dmfindabsmaxrowvalues()

subroutine sdiskmatrixmodule::dmfindabsmaxrowvalues ( type(diskmatrixtype), intent(inout)  this,
real(sp), dimension(:), intent(out)  maxRowVal,
integer, intent(out)  err 
)

◆ dmgetaddress()

subroutine, private sdiskmatrixmodule::dmgetaddress ( type(diskmatrixtype), intent(inout)  this,
integer, intent(in)  rInd,
integer, intent(in)  cInd,
integer, intent(out)  section,
integer, intent(out)  index,
integer, intent(out)  err 
)
private

◆ dmgetcol()

subroutine sdiskmatrixmodule::dmgetcol ( type(diskmatrixtype), intent(inout)  this,
integer, intent(in)  cInd,
real(sp), dimension(:), intent(out)  col,
integer, intent(out)  err 
)

◆ dmgetcolptr()

real(sp) function, dimension(:), pointer sdiskmatrixmodule::dmgetcolptr ( type(diskmatrixtype), intent(inout)  this,
integer, intent(in)  cInd,
integer, intent(out)  err 
)

◆ dmgetrow()

subroutine sdiskmatrixmodule::dmgetrow ( type(diskmatrixtype), intent(inout)  this,
integer, intent(in)  rInd,
real(sp), dimension(:), intent(out)  row,
integer, intent(out)  err 
)

◆ dmgetswapsecptr()

real(sp) function, dimension(:,:), pointer sdiskmatrixmodule::dmgetswapsecptr ( type(diskmatrixtype), intent(inout)  this,
integer, intent(in)  cInd,
integer, intent(out)  err 
)

◆ dmgetswapsize()

integer function sdiskmatrixmodule::dmgetswapsize

◆ dmgetvalue()

real(sp) function sdiskmatrixmodule::dmgetvalue ( type(diskmatrixtype), intent(inout)  this,
integer, intent(in)  rInd,
integer, intent(in)  cInd,
integer, intent(out)  err 
)

◆ dmmattimesvec_dp()

subroutine, private sdiskmatrixmodule::dmmattimesvec_dp ( type(diskmatrixtype), intent(inout)  this,
real(dp), dimension(:), intent(in)  xVec,
real(sp), dimension(:), intent(inout)  yVec,
integer, intent(out)  err,
logical, intent(in), optional  doInitialize 
)
private

◆ dmmattimesvec_sp()

subroutine, private sdiskmatrixmodule::dmmattimesvec_sp ( type(diskmatrixtype), intent(inout)  this,
real(sp), dimension(:), intent(in)  xVec,
real(sp), dimension(:), intent(inout)  yVec,
integer, intent(out)  err,
logical, intent(in), optional  doInitialize 
)
private

◆ dmmattranstimesvec()

subroutine sdiskmatrixmodule::dmmattranstimesvec ( type(diskmatrixtype), intent(inout)  this,
real(sp), dimension(:), intent(in)  xVec,
real(sp), dimension(:), intent(out)  yVec,
integer, intent(out)  err 
)

◆ dmnullify()

subroutine sdiskmatrixmodule::dmnullify ( type(diskmatrixtype), intent(out)  this)

◆ dmopen()

subroutine sdiskmatrixmodule::dmopen ( type(diskmatrixtype), intent(out)  this,
character(len=*), intent(in)  fileName,
integer, intent(inout)  fileChkSum,
integer, intent(in)  nRows,
integer, intent(in)  nCols,
integer, intent(in)  status,
integer, intent(out)  err,
integer, intent(in), optional  nColSwap,
integer, intent(in), optional  swapSize,
character(len=*), intent(in), optional  wantTag 
)

◆ dmsinglecast()

subroutine, private sdiskmatrixmodule::dmsinglecast ( type(diskmatrixtype), intent(inout)  this,
integer, intent(in)  ielSwap,
integer, intent(in)  nelSwap 
)
private

◆ dmsize()

integer(i8) function sdiskmatrixmodule::dmsize ( type(diskmatrixtype), intent(in)  this,
integer, intent(in), optional  iDim 
)

◆ dmswap()

subroutine, private sdiskmatrixmodule::dmswap ( type(diskmatrixtype), intent(inout)  this,
integer, intent(in)  newSection,
integer, intent(out)  err 
)
private

◆ dmwrite()

subroutine sdiskmatrixmodule::dmwrite ( type(diskmatrixtype), intent(inout)  this,
integer, intent(in)  lpu,
character(len=*), intent(in)  name 
)

Variable Documentation

◆ dmtag_p

character(len=30), parameter, private sdiskmatrixmodule::dmtag_p = '#FEDEM disk matrix'
private