FEDEM Solver
R8.0
Source code of the dynamics solver
|
Data Types | |
type | diskmatrixtype |
Functions/Subroutines | |
integer function | dmgetswapsize (n1, n2, autoRamSizeRatio) |
subroutine | dmnullify (this) |
subroutine | dmwrite (this, lpu, name) |
subroutine | dmopen (this, fileName, fileChkSum, nRows, nCols, status, err, nColSwap, swapSize, wantTag) |
subroutine | dmsetreadonly (this, err, isReadOnly) |
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 | dmsingledoublecast (this, ielSwap, nelSwap, toSingle) |
subroutine | dmsetvalue (this, value, rInd, cInd, err) |
real(dp) function | dmgetvalue (this, rInd, cInd, err) |
real(dp) function, dimension(:,:), pointer | dmgetswapsecptr (this, cInd, err) |
real(dp) function, dimension(:), pointer | dmgetcolptr (this, cInd, err) |
subroutine | dmgetcol (this, cInd, col, err) |
subroutine | dmgetrow (this, rInd, row, err) |
subroutine | dmmattimesvec (this, xVec, yVec, err, doInitialize) |
subroutine | dmmattranstimesvec (this, xVec, yVec, err) |
subroutine | dmfindabsmaxrowvalues (this, maxRowVal, err) |
subroutine | dmfindminconnections (this, minIdx, minVal, err) |
Variables | |
integer, parameter | dmold_p = 0 |
integer, parameter | dmnsp_p = 1 |
integer, parameter | dmndp_p = 2 |
character(len=30), parameter, private | dmtag_p = '#FEDEM disk matrix' |
subroutine diskmatrixmodule::dmclose | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(out) | err | ||
) |
subroutine diskmatrixmodule::dmfindabsmaxrowvalues | ( | type(diskmatrixtype), intent(inout) | this, |
real(dp), dimension(:), intent(out) | maxRowVal, | ||
integer, intent(out) | err | ||
) |
subroutine diskmatrixmodule::dmfindminconnections | ( | type(diskmatrixtype), intent(inout) | this, |
integer, dimension(:), intent(out) | minIdx, | ||
real(dp), dimension(:), intent(out) | minVal, | ||
integer, intent(out) | err | ||
) |
|
private |
subroutine diskmatrixmodule::dmgetcol | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | cInd, | ||
real(dp), dimension(:), intent(out) | col, | ||
integer, intent(out) | err | ||
) |
real(dp) function, dimension(:), pointer diskmatrixmodule::dmgetcolptr | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | cInd, | ||
integer, intent(out) | err | ||
) |
subroutine diskmatrixmodule::dmgetrow | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | rInd, | ||
real(dp), dimension(:), intent(out) | row, | ||
integer, intent(out) | err | ||
) |
real(dp) function, dimension(:,:), pointer diskmatrixmodule::dmgetswapsecptr | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | cInd, | ||
integer, intent(out) | err | ||
) |
integer function diskmatrixmodule::dmgetswapsize | ( | integer, intent(in), optional | n1, |
integer, intent(in), optional | n2, | ||
real(sp), intent(in), optional | autoRamSizeRatio | ||
) |
real(dp) function diskmatrixmodule::dmgetvalue | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | rInd, | ||
integer, intent(in) | cInd, | ||
integer, intent(out) | err | ||
) |
subroutine diskmatrixmodule::dmmattimesvec | ( | type(diskmatrixtype), intent(inout) | this, |
real(dp), dimension(:), intent(in) | xVec, | ||
real(dp), dimension(:), intent(inout) | yVec, | ||
integer, intent(out) | err, | ||
logical, intent(in), optional | doInitialize | ||
) |
subroutine diskmatrixmodule::dmmattranstimesvec | ( | type(diskmatrixtype), intent(inout) | this, |
real(dp), dimension(:), intent(in) | xVec, | ||
real(dp), dimension(:), intent(out) | yVec, | ||
integer, intent(out) | err | ||
) |
subroutine diskmatrixmodule::dmnullify | ( | type(diskmatrixtype), intent(out) | this | ) |
subroutine diskmatrixmodule::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 | ||
) |
subroutine diskmatrixmodule::dmsetreadonly | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(out) | err, | ||
logical, intent(in), optional | isReadOnly | ||
) |
subroutine diskmatrixmodule::dmsetvalue | ( | type(diskmatrixtype), intent(inout) | this, |
real(dp), intent(in) | value, | ||
integer, intent(in) | rInd, | ||
integer, intent(in) | cInd, | ||
integer, intent(out) | err | ||
) |
|
private |
integer(i8) function diskmatrixmodule::dmsize | ( | type(diskmatrixtype), intent(in) | this, |
integer, intent(in), optional | iDim | ||
) |
|
private |
subroutine diskmatrixmodule::dmwrite | ( | type(diskmatrixtype), intent(inout) | this, |
integer, intent(in) | lpu, | ||
character(len=*), intent(in) | name | ||
) |
integer, parameter diskmatrixmodule::dmndp_p = 2 |
integer, parameter diskmatrixmodule::dmnsp_p = 1 |
integer, parameter diskmatrixmodule::dmold_p = 0 |
|
private |