FEDEM Solver  R8.0
Source code of the dynamics solver
Functions/Subroutines
initiatecontactelmtypemodule Module Reference

Initialization of contact element objects from the solver input file. More...

Functions/Subroutines

subroutine readcontactelements (infp, triads, cSurfs, frictionSets, baseSprings, baseDampers, cElems, err)
 Initializes contact elements with data from the solver input file. More...
 
subroutine, private initiatecontactelement (cElem, cSurf, doDebug)
 Initializes a contact element after reading the solver input file. More...
 

Detailed Description

Initialization of contact element objects from the solver input file.

Function/Subroutine Documentation

◆ initiatecontactelement()

subroutine, private initiatecontactelmtypemodule::initiatecontactelement ( type(contactelementtype), intent(inout)  cElem,
type(glidercurvetype), intent(inout)  cSurf,
logical, intent(in), optional  doDebug 
)
private

Initializes a contact element after reading the solver input file.

Parameters
cElemThe contact element to initializes
cSurfThe contact surface which is used by cElem
[in]doDebugIf .true., print extra output to separate debug file

This subroutine determines which contact curve domain the follower initially is in contact with, or which domain the follower initially is closest to if not initially in contact.

Author
Knut Morten Okstad
Date
Oct 2005
Here is the call graph for this function:
Here is the caller graph for this function:

◆ readcontactelements()

subroutine initiatecontactelmtypemodule::readcontactelements ( integer, intent(in)  infp,
type(triadtype), dimension(:), intent(in)  triads,
type(glidercurvetype), dimension(:), intent(in)  cSurfs,
type(frictionparametertype), dimension(:), intent(in)  frictionSets,
type(springbasetype), dimension(:), intent(in)  baseSprings,
type(damperbasetype), dimension(:), intent(in)  baseDampers,
type(contactelementtype), dimension(:), pointer  cElems,
integer, intent(out)  err 
)

Initializes contact elements with data from the solver input file.

Parameters
[in]infpFile unit number for the solver input file
[in]triadsArray of all triads in the model
[in]cSurfsArray of all contact surfaces in the model
[in]frictionSetsArray of all friction parameter sets in the model
[in]baseSpringsArray of all spring objects in the model
[in]baseDampersArray of all damper objects in the model
[out]cElemsArray of all contact elements in the model
[out]errError flag
Author
Bjorn Haugen
Date
January 2002
Author
Knut Morten Okstad
Date
6 Oct 2005
Here is the call graph for this function:
Here is the caller graph for this function: