4.8.3.20. GET_FFLEX_NODETVEL

GET_FFLEX_NODETVEL subroutine returns a velocity vector for a node of FFlex body. This is an auxiliary subroutine for Nodal_Force and Nodal_Force_Ext.

Table 4.85 Function Name

Language type

Subroutine

FORTRAN

call get_fflex_nodetvel (ifbody,NodeSeq,MKID,nMK,Vel,ErrFlg)

C/C++

get_fflex_nodetvel (ifbody,NodeSeq,MKID[2],2,Vel,&Errflg)

Table 4.86 Parameter information

Variable Name

Size

Description

ifbody

int

Sequential id of FFlex body defined in RecurDyn/Solver. This is a related argument with the 5th argument of Nodal_Force_Ext subroutine.

NodeSeq

int

Node sequential id defined in RecurDyn/Solver. This is a related argument with the 6th argument of Nodal_Force_Ext subroutine.

MKID

int[2]

An array of integer type. Each value should be zero or a marker id. 1st value is defined as base marker. 2nd value is defined as reference marker.

nMK

int

An integer variable for considering base and reference marker. If nMK is 0, then the subroutine returns a global velocity vector of NodeSeq. If nMK is 1, then the subroutine calculates a velocity vector considering base marker. If nMK is 2, then the subroutine calculates a velocity vector considering base and reference marker.

Vel

double[3]

An array of double precision type. The array size must be 3. 3 values mean a relative velocity vector.

\(\frac{d}{dt}\left\{ \mathbf{A}_{r}^{T}({{\mathbf{r}}_{FFlexNode}}-{{\mathbf{r}}_{b}}) \right\}\)

Where,
\(\mathbf{A}_{r}^{{}}\) is a orientation matrix of the reference marker (=MKID[1]).
\({{\mathbf{r}}_{FFlexNode}}\) is a global position vector of NodeSeq.
\({{\mathbf{r}}_{b}}\) is a global position vector of the base marker (=MKID[0]).

Errflg

int

Error flag.
If the result of this argument is -1 (means TRUE in Fortran logical value), there is no error.
The others mean that there is an error.

Code Example

Refer to GET_FFLEX_NODEPOS.