FEDEM Solver
R8.0
Source code of the dynamics solver
|
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' |
subroutine sdiskmatrixmodule::dmclose | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(out) | err | ||
) |
subroutine sdiskmatrixmodule::dmfindabsmaxrowvalues | ( | type(diskmatrixtype), intent(inout) | this, |
real(sp), dimension(:), intent(out) | maxRowVal, | ||
integer, intent(out) | err | ||
) |
|
private |
subroutine sdiskmatrixmodule::dmgetcol | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | cInd, | ||
real(sp), dimension(:), intent(out) | col, | ||
integer, intent(out) | err | ||
) |
real(sp) function, dimension(:), pointer sdiskmatrixmodule::dmgetcolptr | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | cInd, | ||
integer, intent(out) | err | ||
) |
subroutine sdiskmatrixmodule::dmgetrow | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | rInd, | ||
real(sp), dimension(:), intent(out) | row, | ||
integer, intent(out) | err | ||
) |
real(sp) function, dimension(:,:), pointer sdiskmatrixmodule::dmgetswapsecptr | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | cInd, | ||
integer, intent(out) | err | ||
) |
integer function sdiskmatrixmodule::dmgetswapsize |
real(sp) function sdiskmatrixmodule::dmgetvalue | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | rInd, | ||
integer, intent(in) | cInd, | ||
integer, intent(out) | err | ||
) |
|
private |
|
private |
subroutine sdiskmatrixmodule::dmmattranstimesvec | ( | type(diskmatrixtype), intent(inout) | this, |
real(sp), dimension(:), intent(in) | xVec, | ||
real(sp), dimension(:), intent(out) | yVec, | ||
integer, intent(out) | err | ||
) |
subroutine sdiskmatrixmodule::dmnullify | ( | type(diskmatrixtype), intent(out) | this | ) |
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 | ||
) |
|
private |
integer(i8) function sdiskmatrixmodule::dmsize | ( | type(diskmatrixtype), intent(in) | this, |
integer, intent(in), optional | iDim | ||
) |
|
private |
subroutine sdiskmatrixmodule::dmwrite | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | lpu, | ||
character(len=*), intent(in) | name | ||
) |
|
private |