GET_FFLEX_NODEVEL

 

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

 

Langunage type

SubRoutine

FORTRAN

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

C/C++

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

 

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 global velocity vectors of NodeSeq. If nMK is 1, then the subroutine calculates velocity vectors considering base marker. If nMK is 2, then the subroutine calculates velocity vectors 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.

 

Where,  is a orientation matrix of the reference marker (=MKID[1] ).  is a global position vector of NodeSeq.  is a global position vector of the base marker (=MKID[0]).

Where,  is a global angular velocity vector of NodeSeq.  is a 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.