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

Initialization of superelements from the solver input file. More...

Modules

module  initiatesupeltypemodule
 Initialization of superelements from the solver input file.
 

Functions/Subroutines

subroutine, public initiatesupeltypemodule::readsupels (infp, env, triads, sups, err)
 Initializes superelements with data from the input file. More...
 
subroutine writesupmatrix (label, sup, A)
 Subroutine for debug print of a superelement matrix. More...
 
subroutine computestructdamping (C, M, K, alpha1, alpha2)
 Computes structural damping matrix assuming Rayleigh damping. More...
 
subroutine scalematrices (Km, M, fg)
 Applies scaling factors on the superelement matrices. More...
 
subroutine, public initiatesupeltypemodule::initiatesupels2 (sam, sys, sups, masses, engines, err)
 Initializes more superelement arrays after system initialization. More...
 
logical function hasaddedmass (supel)
 Checks if a superelement has additional masses on triads. More...
 
subroutine initiatesupeltypemodule::readsupelmatrices (fileNames, sup, ierr)
 Reads into core the reduced superelement matrices from file. More...
 
subroutine initiatesupeltypemodule::readnonlinsupelmatrices (fileNames, sup, numData, ierr)
 Reads into core the reduced nonlinear superelement matrices. More...
 
subroutine initiatesupeltypemodule::readmatrix (fileName, supId, dtype, ndata, data, ierr)
 Reads a matrix from a binary file into core. More...
 
subroutine, public initiatesupeltypemodule::writesupels2ftn (sups, ierr)
 Writes a Fortran90 subroutine with hard-coded superelement matrices. More...
 
character(len=1) function i2c (i)
 Converts an integer (less that 37) to a character. More...
 
subroutine writematrix (ndat, data)
 Writes a matrix as a Fortran data statement. More...
 

Detailed Description

Initialization of superelements from the solver input file.

Function/Subroutine Documentation

◆ computestructdamping()

subroutine readsupels::computestructdamping ( real(dp), dimension(:,:), intent(out)  C,
real(dp), dimension(:,:), intent(in)  M,
real(dp), dimension(:,:), intent(in)  K,
real(dp), intent(in)  alpha1,
real(dp), intent(in)  alpha2 
)

Computes structural damping matrix assuming Rayleigh damping.

◆ hasaddedmass()

logical function initiatesupels2::hasaddedmass ( type(supeltype), intent(in)  supel)

Checks if a superelement has additional masses on triads.

◆ i2c()

character(len=1) function writesupels2ftn::i2c ( integer, intent(in)  i)

Converts an integer (less that 37) to a character.

◆ scalematrices()

subroutine readsupels::scalematrices ( real(dp), dimension(:,:), pointer  Km,
real(dp), dimension(:,:), pointer  M,
real(dp), dimension(:,:), pointer  fg 
)
private

Applies scaling factors on the superelement matrices.

◆ writematrix()

subroutine writesupels2ftn::writematrix ( integer, intent(in)  ndat,
double precision, dimension(ndat), intent(in)  data 
)
private

Writes a matrix as a Fortran data statement.

◆ writesupmatrix()

subroutine readsupels::writesupmatrix ( character(len=*), intent(in)  label,
type(supeltype), intent(in)  sup,
real(dp), dimension(:,:), intent(in)  A 
)

Subroutine for debug print of a superelement matrix.