GET_RFLEX_NODEVEL subroutine returns a velocity vector for a node of RFlex body. This is an auxiliary subroutine for Modal_Force_Ext.
Langunage type |
SubRoutine |
FORTRAN |
call get_rflex_nodevel(ifbody, NodeSeq, MKID, nMK, VEL, ErrFlg) |
C/C++ |
get_rflex_nodevel(ifbody, NodeSeq, MKID, nMK, VEL, &ErrFlg) |
Parameter information
Variable Name |
Size |
Description |
ifbody |
int |
Sequential id of RFlex body defined in RecurDyn/Solver. This is a related argument with the 5th argument of Modal_Force_Ext subroutine. |
NodeSeq |
int |
Node sequential id defined in RecurDyn/Solver. This is a related argument with the 6th argument of Modal_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 postion vector and an orientation matrix of NodeSeq. If nMK is 1, then the subroutine calculates a position vector considering base marker. If nMK is 2, then the subroutine calculates a position vector considering base and reference marker. |
Vel |
double [6] |
An array of double precision type. The array size must be 6. First 3 values mean a relative velocity vector. The last 3 values mean a relative angular velocity vector. |
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. |