FEDEM Solver
R8.0
Source code of the dynamics solver
|
Calculation and storage of superelement stresses. More...
Modules | |
module | stressroutinesmodule |
Module with subroutine for superelement stress calculation/storage. | |
Functions/Subroutines | |
subroutine | stressroutinesmodule::calcstresses (addStress0, rdb, sam, vtf, vtfId, isup, sv, sf, vms, irec, isav, iprint, lpu, ierr) |
Calculates element stresses and stores on results database file. More... | |
integer function | numberofcomponents (ieltyp, restyp) |
Returns the number of result components for an element type. More... | |
subroutine | addef (SF, EF, madof, mnpc, nenod, nndof) |
Adds element nodal forces into the global vector. More... | |
subroutine | printnodalforces (nnod, madof, minex, sf, lpu) |
Prints nodal forces to unit LPU, omitting nodes with zero forces. More... | |
Calculation and storage of superelement stresses.
subroutine calcstresses::addef | ( | real(dp), dimension(:), intent(inout) | SF, |
real(dp), dimension(nndof,nenod), intent(in) | EF, | ||
integer, dimension(:), intent(in) | madof, | ||
integer, dimension(nenod), intent(in) | mnpc, | ||
integer, intent(in) | nenod, | ||
integer, intent(in) | nndof | ||
) |
Adds element nodal forces into the global vector.
integer function calcstresses::numberofcomponents | ( | integer, intent(in) | ieltyp, |
integer, intent(in) | restyp | ||
) |
Returns the number of result components for an element type.
subroutine calcstresses::printnodalforces | ( | integer, intent(in) | nnod, |
integer, dimension(:), intent(in) | madof, | ||
integer, dimension(:), intent(in) | minex, | ||
real(dp), dimension(:), intent(in) | sf, | ||
integer, intent(in) | lpu | ||
) |
Prints nodal forces to unit LPU, omitting nodes with zero forces.