ipa_control_acc.c

其中提到遺傳學的程式碼與應用提供給次淚相向的研究者參考下載

        real_T *y0 = &rtb_temp119[0];

        for (i1=0; i1 < 101; i1++) {
          min = rtb_temp139;
          if (u1[i1] < min) {
            min = u1[i1];
          }
          y0[i1] = min;
        }
      }
    }
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S17>/Weight */
    IPa_control_B->s17_Weight = (IPa_control_P->s17_Weight_Value);

    /* Constant Block: <S35>/a */
    IPa_control_B->s35_a = (IPa_control_P->s35_a_Value);
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Sum Block: <S35>/Sum */
    rtb_temp140 = rtb_temp148 - IPa_control_B->s35_a;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S35>/b */
    rtb_temp149 = (IPa_control_P->s35_b_Value);

    /* Sum Block: <S35>/Sum1 */
    IPa_control_B->s35_b_a = - IPa_control_B->s35_a + rtb_temp149;
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Product Block: <S35>/Product ab (trimf) */
    rtb_temp140 = rtb_temp140 /
      IPa_control_B->s35_b_a;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S35>/c */
    IPa_control_B->s35_c = (IPa_control_P->s35_c_Value);

    /* Sum Block: <S35>/Sum2 */
    IPa_control_B->s35_c_b = - rtb_temp149 + IPa_control_B->s35_c;
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Sum Block: <S35>/Sum3 */
    rtb_temp131 = IPa_control_B->s35_c - rtb_temp148;

    /* Product Block: <S35>/Product cd (trimf) */
    rtb_temp131 = 1.0 / IPa_control_B->s35_c_b *
      rtb_temp131;

    /* MinMax Block: <S35>/Min (trimf) */
    rtb_temp140 = (rtb_temp140 < rtb_temp131) ? rtb_temp140 : rtb_temp131;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S35>/0 */
    IPa_control_B->s35_0 = (IPa_control_P->s35_0_Value);
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S35>/Max (trimf) */
    rtb_temp140 = (rtb_temp140 > IPa_control_B->s35_0) ? rtb_temp140 : IPa_control_B->s35_0;

    /* MinMax Block: <S17>/andorMethod */
    {
      real_T min = rtb_temp138;

      if (rtb_temp140 < min) {
        min = rtb_temp140;
      }
      rtb_temp131 = min;
    }

    /* Product Block: <S17>/Weighting */
    rtb_temp131 = IPa_control_B->s17_Weight *
      rtb_temp131;

    /* MinMax Block: <S17>/impMethod */
    {
      real_T min;

      {
        int_T i1;
        const real_T *u1 = &IPa_control_B->s33_PL[0];
        real_T *y0 = &rtb_s17_impMethod[0];

        for (i1=0; i1 < 101; i1++) {
          min = rtb_temp131;
          if (u1[i1] < min) {
            min = u1[i1];
          }
          y0[i1] = min;
        }
      }
    }
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S24>/Weight */
    IPa_control_B->s24_Weight = (IPa_control_P->s24_Weight_Value);

    /* Constant Block: <S38>/a */
    IPa_control_B->s38_a = (IPa_control_P->s38_a_Value);
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Sum Block: <S38>/Sum */
    rtb_temp141 = rtb_temp148 - IPa_control_B->s38_a;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S38>/b */
    rtb_temp149 = (IPa_control_P->s38_b_Value);

    /* Sum Block: <S38>/Sum1 */
    IPa_control_B->s38_b_a = - IPa_control_B->s38_a + rtb_temp149;
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Product Block: <S38>/Product ab (trimf) */
    rtb_temp141 = rtb_temp141 /
      IPa_control_B->s38_b_a;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S38>/c */
    IPa_control_B->s38_c = (IPa_control_P->s38_c_Value);

    /* Sum Block: <S38>/Sum2 */
    IPa_control_B->s38_c_b = - rtb_temp149 + IPa_control_B->s38_c;
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Sum Block: <S38>/Sum3 */
    rtb_temp132 = IPa_control_B->s38_c - rtb_temp148;

    /* Product Block: <S38>/Product cd (trimf) */
    rtb_temp132 = 1.0 / IPa_control_B->s38_c_b *
      rtb_temp132;

    /* MinMax Block: <S38>/Min (trimf) */
    rtb_temp141 = (rtb_temp141 < rtb_temp132) ? rtb_temp141 : rtb_temp132;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S38>/0 */
    IPa_control_B->s38_0 = (IPa_control_P->s38_0_Value);
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S38>/Max (trimf) */
    rtb_temp141 = (rtb_temp141 > IPa_control_B->s38_0) ? rtb_temp141 : IPa_control_B->s38_0;

    /* MinMax Block: <S24>/andorMethod */
    {
      real_T min = rtb_temp138;

      if (rtb_temp141 < min) {
        min = rtb_temp141;
      }
      rtb_temp132 = min;
    }

    /* Product Block: <S24>/Weighting */
    rtb_temp132 = IPa_control_B->s24_Weight *
      rtb_temp132;

    /* MinMax Block: <S24>/impMethod */
    {
      real_T min;

      {
        int_T i1;
        const real_T *u1 = &IPa_control_B->s33_PL[0];
        real_T *y0 = &rtb_s24_impMethod[0];

        for (i1=0; i1 < 101; i1++) {
          min = rtb_temp132;
          if (u1[i1] < min) {
            min = u1[i1];
          }
          y0[i1] = min;
        }
      }
    }
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S25>/Weight */
    IPa_control_B->s25_Weight = (IPa_control_P->s25_Weight_Value);

    /* Constant Block: <S37>/a */
    IPa_control_B->s37_a = (IPa_control_P->s37_a_Value);
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Sum Block: <S37>/Sum */
    rtb_temp142 = rtb_temp148 - IPa_control_B->s37_a;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S37>/b */
    rtb_temp149 = (IPa_control_P->s37_b_Value);

    /* Sum Block: <S37>/Sum1 */
    IPa_control_B->s37_b_a = - IPa_control_B->s37_a + rtb_temp149;
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Product Block: <S37>/Product ab (trimf) */
    rtb_temp142 = rtb_temp142 /
      IPa_control_B->s37_b_a;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S37>/c */
    IPa_control_B->s37_c = (IPa_control_P->s37_c_Value);

    /* Sum Block: <S37>/Sum2 */
    IPa_control_B->s37_c_b = - rtb_temp149 + IPa_control_B->s37_c;
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Sum Block: <S37>/Sum3 */
    rtb_temp133 = IPa_control_B->s37_c - rtb_temp148;

    /* Product Block: <S37>/Product cd (trimf) */
    rtb_temp133 = 1.0 / IPa_control_B->s37_c_b *
      rtb_temp133;

    /* MinMax Block: <S37>/Min (trimf) */
    rtb_temp142 = (rtb_temp142 < rtb_temp133) ? rtb_temp142 : rtb_temp133;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S37>/0 */
    IPa_control_B->s37_0 = (IPa_control_P->s37_0_Value);
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S37>/Max (trimf) */
    rtb_temp142 = (rtb_temp142 > IPa_control_B->s37_0) ? rtb_temp142 : IPa_control_B->s37_0;

    /* MinMax Block: <S25>/andorMethod */
    {
      real_T min = rtb_temp138;

      if (rtb_temp142 < min) {
        min = rtb_temp142;
      }
      rtb_temp133 = min;
    }

    /* Product Block: <S25>/Weighting */
    rtb_temp133 = IPa_control_B->s25_Weight *
      rtb_temp133;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S33>/PS */
    {
      int_T i1;
      real_T *y0 = &IPa_control_B->s33_PS[0];
      const real_T *p_s33_PS_Value = &IPa_control_P->s33_PS_Value[0];

      for (i1=0; i1 < 101; i1++) {
        y0[i1] = (p_s33_PS_Value[i1]);
      }
    }
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S25>/impMethod */
    {
      real_T min;

      {
        int_T i1;
        const real_T *u1 = &IPa_control_B->s33_PS[0];
        real_T *y0 = &rtb_s25_impMethod[0];

        for (i1=0; i1 < 101; i1++) {
          min = rtb_temp133;
          if (u1[i1] < min) {
            min = u1[i1];
          }
          y0[i1] = min;
        }
      }
    }
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S26>/Weight */
    IPa_control_B->s26_Weight = (IPa_control_P->s26_Weight_Value);

    /* Constant Block: <S36>/a */
    IPa_control_B->s36_a = (IPa_control_P->s36_a_Value);
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Sum Block: <S36>/Sum */
    rtb_temp146 = rtb_temp148 - IPa_control_B->s36_a;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S36>/b */
    rtb_temp149 = (IPa_control_P->s36_b_Value);

    /* Sum Block: <S36>/Sum1 */
    IPa_control_B->s36_b_a = - IPa_control_B->s36_a + rtb_temp149;
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Product Block: <S36>/Product ab (trimf) */
    rtb_temp146 = rtb_temp146 /
      IPa_control_B->s36_b_a;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S36>/c */
    IPa_control_B->s36_c = (IPa_control_P->s36_c_Value);

    /* Sum Block: <S36>/Sum2 */
    IPa_control_B->s36_c_b = - rtb_temp149 + IPa_control_B->s36_c;
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Sum Block: <S36>/Sum3 */
    rtb_temp148 = IPa_control_B->s36_c - rtb_temp148;

    /* Product Block: <S36>/Product cd (trimf) */
    rtb_temp148 = 1.0 / IPa_control_B->s36_c_b *
      rtb_temp148;

    /* MinMax Block: <S36>/Min (trimf) */
    rtb_temp146 = (rtb_temp146 < rtb_temp148) ? rtb_temp146 : rtb_temp148;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S36>/0 */
    IPa_control_B->s36_0 = (IPa_control_P->s36_0_Value);
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S36>/Max (trimf) */
    rtb_temp146 = (rtb_temp146 > IPa_control_B->s36_0) ? rtb_temp146 : IPa_control_B->s36_0;

    /* MinMax Block: <S26>/andorMethod */
    {
      real_T min = rtb_temp138;

      if (rtb_temp146 < min) {
        min = rtb_temp146;
      }
      rtb_temp138 = min;
    }

    /* Product Block: <S26>/Weighting */
    rtb_temp138 = IPa_control_B->s26_Weight *
      rtb_temp138;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S33>/ZE */
    {
      int_T i1;
      real_T *y0 = &IPa_control_B->s33_ZE[0];
      const real_T *p_s33_ZE_Value = &IPa_control_P->s33_ZE_Value[0];

      for (i1=0; i1 < 101; i1++) {
        y0[i1] = (p_s33_ZE_Value[i1]);
      }
    }
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S26>/impMethod */
    {
      real_T min;

      {
        int_T i1;
        const real_T *u1 = &IPa_control_B->s33_ZE[0];
        real_T *y0 = &rtb_s26_impMethod[0];

        for (i1=0; i1 < 101; i1++) {
          min = rtb_temp138;
          if (u1[i1] < min) {
            min = u1[i1];
          }
          y0[i1] = min;
        }
      }
    }
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S27>/Weight */
    IPa_control_B->s27_Weight = (IPa_control_P->s27_Weight_Value);

    /* Constant Block: <S40>/a */
    IPa_control_B->s40_a = (IPa_control_P->s40_a_Value);
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Sum Block: <S40>/Sum */
    rtb_temp148 = rtb_temp137 - IPa_control_B->s40_a;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */
    /* Constant Block: <S40>/b */
    rtb_temp149 = (IPa_control_P->s40_b_Value);

    /* Sum Block: <S40>/Sum1 */
    IPa_control_B->s40_b_a = - IPa_control_B->s40_a + rtb_temp149;
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Product Block: <S40>/Product ab (trimf) */
    rtb_temp148 = rtb_temp148 /
      IPa_control_B->s40_b_a;
  }

  if (ssIsSampleHit(S, 1, tid)) {       /* Sample time: [0.01, 0.0] */