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

Module with subroutine for setting up linear multi-point constraints. More...

Functions/Subroutines

subroutine, public wavgmconstreqn (iel, lDof, nM, indC, txc, tyc, tzc, mnpc, epsX, tolX, dX, work, weight, omega, ipsw, lpu)
 Computes constraint equation coefficients for a WAVGM element. More...
 

Detailed Description

Module with subroutine for setting up linear multi-point constraints.

This module contains a subroutine for processing the Weighted Average Motion (WAVGM) elements (also known as RBE3 elements in Nastran).

Function/Subroutine Documentation

◆ wavgmconstreqn()

subroutine, public wavgmotionmodule::wavgmconstreqn ( integer, intent(in)  iel,
integer, intent(in)  lDof,
integer, intent(in)  nM,
integer, dimension(:), intent(in)  indC,
real(dp), dimension(:), intent(in)  txc,
real(dp), dimension(:), intent(in)  tyc,
real(dp), dimension(:), intent(in)  tzc,
integer, dimension(:), intent(in)  mnpc,
real(dp), intent(in)  epsX,
real(dp), dimension(3), intent(inout)  tolX,
real(dp), dimension(:,:), intent(inout)  dX,
real(dp), dimension(:), intent(inout)  work,
real(dp), dimension(:), intent(in)  weight,
real(dp), dimension(:), intent(out)  omega,
integer, intent(in)  ipsw,
integer, intent(in)  lpu 
)

Computes constraint equation coefficients for a WAVGM element.

Parameters
[in]ielElement index
[in]lDofLocal index of dependent DOF to compute coefficients for
[in]nMNumber of independent nodes in current element
[in]indCNodal component indices (common for all nodes)
[in]txcTable of x-coordinates for the nodal points
[in]tycTable of Y-coordinates for the nodal points
[in]tzcTable of Z-coordinates for the nodal points
[in]mnpcMatrix of nodal point correspondances for current element
[in]epsXRelative geometric tolerance for WAVGM elements
tolXAbsolute geometric tolerance for each coordinate direction
dXElement nodal coordinates relative to the centre of gravity
workWork array
[in]weightIndependent DOF weights for current element
[out]omegaResulting constraint equation coefficients
[in]ipswPrint switch
[in]lpuFile unit number for res-file output

The coefficients that couples a dependent DOF at the reference node of a Weighted AVerage Motion element to the independent nodal DOFs of the same element are computed.

Author
Knut Morten Okstad
Date
24 Sep 2002
Here is the caller graph for this function: