vdpmult.c

《MATLAB7.0_Simulink6.0建模仿真开发与高级工程应用》书中程序

/*
 * Real-Time Workshop code generation for Simulink system "<Root>/TmpModelReferenceSubsystem"
 *
 * Model                      : vdpmult
 * Model Version              : 1.1
 * Real-Time Workshop version : 6.0  (R14)  05-May-2004
 * C source code generated on : Thu Feb 24 17:59:16 2005
 *
 * Note that the functions contained in this file are part of a Simulink
 * model, and are not self-contained algorithms.
 */

#include "vdpmult.h"

#include "vdpmult_private.h"

/* Output and update for referenced model: 'vdpmult'*/
void mr_vdpmult(const real_T *rtu_0, const real_T *rtu_1, real_T *rty_0,
 RT_MODEL_vdpmult *vdpmult_M)
{

  /* local block i/o variables */

  /* Gain: '<Root>/Mu' incorporates:
   *  Fcn: '<Root>/Fcn'
   *  Product: '<Root>/Product'
   */
  (*rty_0) = (1.0 - (*rtu_0) * (*rtu_0)) * (*rtu_1);

  /* Update absolute time for base rate */

  if(!(++vdpmult_M->Timing.clockTick0)) ++vdpmult_M->Timing.clockTickH0;
}

/* Model initialize function */
void mr_vdpmult_initialize(boolean_T firstTime, const char **rt_errorStatus,
 RTWSolverInfo *rt_solverInfo, int_T mdlref_TID0, RT_MODEL_vdpmult *vdpmult_M)
{

  if (firstTime) {
    /* registration code */
    /* initialize real-time model */
    (void)memset((char_T *)vdpmult_M, 0, sizeof(RT_MODEL_vdpmult));

    rtmSetTPtr(vdpmult_M, &vdpmult_M->Timing.tArray[0]);

    /* initialize error status */
    rtmSetErrorStatusPointer(vdpmult_M, rt_errorStatus);
    /* initialize RTWSolverInfo */
    vdpmult_M->solverInfo = (rt_solverInfo);
    /* Set the Timing fields to the appropriate data in the RTWSolverInfo */
    rtmSetSimTimeStepPointer(vdpmult_M,
     rtsiGetSimTimeStepPtr(vdpmult_M->solverInfo));
    rtmSetTaskTime0(vdpmult_M, &rtsiGetT(vdpmult_M->solverInfo));
    vdpmult_M->Timing.stepSize0 = (rtsiGetStepSize(vdpmult_M->solverInfo));
  }
}