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

Initialisation of the SAM data structure for the FE part reducer. More...

Modules

module  samreducermodule
 Initialisation of the SAM data structure for the FE part reducer.
 

Functions/Subroutines

subroutine, private samreducermodule::beampinconstraints (madof, mpbeam, mpmnpc, mmnpc, msc, minex, nceq, nmmceq, mpmceq, mmceq, ttcc, nxnod, lpu, ierr)
 Establishes constraint equations associated with beam pin flags. More...
 
subroutine samreducermodule::initiatesam (sam, tncoor, linearSolve, ipsw, lpu, ierr)
 Initializes the SAM data structure for fedem_reducer. More...
 
elemental subroutine fixexternaldofs (isc)
 Translates the external status code (2) to fixed (0). More...
 
subroutine estimateconstrsize (mpar, melcon, mpmnpc, nceq, nmceq)
 Finds a conservative estimate on the constraint array sizes. More...
 
subroutine samreducermodule::savesam (filename, chksum, sam, ierr)
 Writes arrays of the SAM data structure to binary file. More...
 

Detailed Description

Initialisation of the SAM data structure for the FE part reducer.

Function/Subroutine Documentation

◆ estimateconstrsize()

subroutine initiatesam::estimateconstrsize ( integer, dimension(:), intent(in)  mpar,
integer, dimension(:), intent(in)  melcon,
integer, dimension(:), intent(in)  mpmnpc,
integer, intent(out)  nceq,
integer, intent(out)  nmceq 
)

Finds a conservative estimate on the constraint array sizes.

◆ fixexternaldofs()

elemental subroutine initiatesam::fixexternaldofs ( integer, intent(inout)  isc)

Translates the external status code (2) to fixed (0).