4.8.3.25. GET_RFLEX_BODYSEQID

GET_RFLEX_BODYSEQID subroutine returns RFlex body Sequence Id defined in RecurDyn Solver. This is an auxiliary subroutine for Modal_Force and Modal_Force_Ext.

Table 4.95 Function Name
Language type	Subroutine
FORTRAN	call get_rflex_bodyseqid (BodyName,ifbody ,ErrFlg)
C/C++	get_rflex_bodyseqid (BodyName,&ifbody ,&ErrFlg)

Table 4.96 Parameter information
Variable Name	Size	Description
BODY NAME	tchar[256]	Name of RFlex body defined in RecurDyn. This name have to exactly same with the name of FFlexBody which user defined in RecurDyn/GUI.
IFBODY	int	Sequential id of RFlex body defined in RecurDyn/Solver. This is a related argument with the 5^th argument of Modal_Force_Ext subroutine.
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.

Listing 4.52 C/C++ code for GET_RFLEX_BODYSEQID

 #include "stdafx.h"
 #include "DllFunc.h"
 #include "math.h"

 ModalForceExt_API void __cdecl modal_force_ext
   (int id, double time, double upar[], int npar, int ifbody, int nodarr[], int nonde, int jflag, int iflag, double result[])
 {
   using namespace rd_syscall;
 int errflg = 0;
 int targerBodySeq = 0;
 TCHAR targerBodyName[256];

   __tcscpy(targerBodyName,_T("RFlexBody1"));
   get_rflex_bodyseqid(targerBodyName,&targerBodySeq,&errflg);
 for(int i=0;i<6;i++) result[i] = 0.0;
 }