4.8.3.15. GET_FFLEX_NODERVEL

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

Table 4.75 Function Name
Language type	Subroutine
FORTRAN	call get_fflex_nodervel (ifbody,NodeSeq,MKID,nMK,Vel,ErrFlg)
C/C++	get_fflex_nodervel (ifbody,NodeSeq,MKID[2],2,Vel,&Errflg)

Table 4.76 Parameter information
Variable Name	Size	Description
ifbody	int	Sequential id of FFlex body defined in RecurDyn/Solver. This is a related argument with the 5^th argument of Nodal_Force_Ext subroutine.
NodeSeq	int	Node sequential id defined in RecurDyn/Solver. This is a related argument with the 6^th argument of Nodal_Force_Ext subroutine.
MKID	int[2]	An array of integer type. Each value should be zero or a marker id. 1^st value is defined as base marker. 2^nd 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 angular velocity vector of NodeSeq. If nMK is 1, then the subroutine calculates a angular velocity vector considering base marker. If nMK is 2, then the subroutine calculates a velocity angular 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 angular velocity vector. \(\mathbf{A}_{r}^{T}({{\mathbf{\omega }}_{FFlexNode}}-{{\mathbf{\omega }}_{b}})\) Where, \({{\mathbf{\omega }}_{FFlexNode}}\) is a global angular velocity vector of NodeSeq. \({{\mathbf{\omega }}_{b}}\) is an angular velocity 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.