Welcome to Adams/Solver Subroutines - Kxcad.net

178
Adams/Solver
typedef void adams_c_GSEYX(const struct sAdamsGSE* gse, double TIME,
int IFLAG, int NSTATE, const double* STATES, int NINPUT, const double*
INPUTS, int NOUTPUTS, double* DERIVS);
typedef void STDCALL adams_f77_GSESUB(const int* ID, const double*
TIME, const double* PAR, const int* NPAR, const int* DFLAG, const int*
IFLAG, const int* NSTATE, const double* STATES, const int* NINPUT,
const double* INPUTS, const int* NOUTPUT, double* STATED, double*
OUTPUT);
typedef void adams_c_GSEDERIV(const struct sAdamsGSE* gse, double
TIME, int DFLAG, int IFLAG, int, double*);
typedef void adams_c_GSEOUTPUT(const struct sAdamsGSE* gse, double
TIME, int DFLAG, int IFLAG, int, double*);
typedef void adams_c_GSEUPDATE(const struct sAdamsGSE* gse, double
TIME, int DFLAG, int IFLAG, int, double*);
typedef void adams_c_GSESAMPLE(const struct sAdamsGSE* gse, double
TIME, int IFLAG, double* OUTPUT);
typedef void adams_c_GSESETNS(int NS, int* ERR);
typedef void adams_c_GSESETND(int ND, int* ERR);
typedef void adams_c_GSESETIMPLICIT(int FLAG, int* ERR);
typedef void adams_c_GSESETSTATICHOLD(int FLAG, int* ERR);
typedef void adams_c_GSESETSAMPLEOFFSET(int UNTNUM, double* LOGERR);
/*
* GSE
*/
struct sAdamsGSE
{
int ID;
int NPAR;
const double* PAR;
int NI;
int NO;
int U;
int Y;
int NS;
int X;
int IC;
int STATIC_HOLD;
int IMPLICIT;
int ND;
int XD;
int ICD;
double SAMPLE_OFFSET;
};
MFOSUB
MFOSUB is an evaluation subroutine that computes the modal force corresponding to an MFORCE
statement (C++ or FORTRAN). MFOSUB is optional. You need it only if you don't want to use a function
expression in the MFORCE statement, or if you need the added capabilities of the USER form of the
MFORCE statement.