Welcome to Adams/Solver Subroutines - Kxcad.net

Welcome to Adams/Solver Subroutines
C - External variable definitions ---------
C INTEGER NPAR DOUBLE PRECISION
PAR( * )
C
C PAR Array containing passed parameters
C NPAR Number of passed parameters
C
C - Local variable definitions -----------
C ...
C
C === Executable code ================================
C
C - Your commands -----------------
C ...
C
RETURN
END
C Style - Prototype
typedef void adams_c_CONSUB(const struct sAdamsControl* con);
/*
* CONTROL
*/
struct sAdamsControl
{
int NPAR;
const double* PAR;
};
Examples
For an example of this subroutine, see consub.f.
COUSUB, COUXX, COUXX2
The COUSUB, COUXX, and COUXX2 subroutines define a user-defined COUPLER (C++ or
FORTRAN):
• COUSUB specifies the coupler constraint as a function of the displacements of the joints being
coupled.
• COUXX returns to Adams/Solver the first partial derivatives of the coupler constraint, with
respect to each joint displacement.
• COUXX2 returns the matrix of second partial derivatives of the coupler constraint, with respect
to the joint displacements.
141