Welcome to Adams/Solver Subroutines - Kxcad.net

184
Adams/Solver
C
LOADVEC(I+6) = -TWO * DSQRT(GSTF * GMAS) * QDOT(I)
END DO
RETURN
END
C Style - Prototype
typedef void adams_c_MFOSUB(const struct sAdamsMforce* mforce, double
TIME, int DFLAG, int IFLAG, const double* MODLOADS, int NMODES, int
NCASES, double* SCALE, int* CASE, double* LOADVEC);
/*
* MFORCE
*/
struct sAdamsMforce
{
struct sAdamsFlexBody FlexBody;
int ID;
int NPAR;
const double* PAR;
int JFLOAT;
};
MOTSUB
The MOTSUB evaluation subroutine computes the joint displacement, velocity, or acceleration for a
MOTION statement (C++ or FORTRAN). MOTSUB is optional. You only need it if you don't want to
use a function expression in the MOTION statement.
Use
Corresponding Statement
Calling Sequence
SUBROUTINE MOTSUB(id, time, par, npar, iord, iflag,value)