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.
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) |
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.