ipa_control_acc.c

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

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

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

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

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S12>/andorMethod */
    {
      real_T min = rtb_temp143;

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

    /* Product Block: <S12>/Weighting */
    rtb_temp143 = IPa_control_B->s12_Weight *
      rtb_temp143;
  }

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

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

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

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

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

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

    /* Constant Block: <S42>/a */
    IPa_control_B->s42_a = (IPa_control_P->s42_a_Value);
  }

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

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

    /* Sum Block: <S42>/Sum1 */
    IPa_control_B->s42_b_a = - IPa_control_B->s42_a + rtb_temp149;
  }

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

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

    /* Sum Block: <S42>/Sum2 */
    IPa_control_B->s42_c_b = - rtb_temp149 + IPa_control_B->s42_c;
  }

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* Sum Block: <S42>/Sum3 */
    rtb_temp136 = IPa_control_B->s42_c - rtb_temp137;

    /* Product Block: <S42>/Product cd (trimf) */
    rtb_temp136 = 1.0 / IPa_control_B->s42_c_b *
      rtb_temp136;

    /* MinMax Block: <S42>/Min (trimf) */
    rtb_temp144 = (rtb_temp144 < rtb_temp136) ? rtb_temp144 : rtb_temp136;
  }

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

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

    /* MinMax Block: <S13>/andorMethod */
    {
      real_T min = rtb_temp144;

      if (rtb_temp147 < min) {
        min = rtb_temp147;
      }
      rtb_temp136 = min;
    }

    /* Product Block: <S13>/Weighting */
    rtb_temp136 = IPa_control_B->s13_Weight *
      rtb_temp136;

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

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

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

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

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S14>/andorMethod */
    {
      real_T min = rtb_temp144;

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

    /* Product Block: <S14>/Weighting */
    rtb_temp126 = IPa_control_B->s14_Weight *
      rtb_temp126;

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

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

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

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

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S15>/andorMethod */
    {
      real_T min = rtb_temp144;

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

    /* Product Block: <S15>/Weighting */
    rtb_temp127 = IPa_control_B->s15_Weight *
      rtb_temp127;

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

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

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

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

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S16>/andorMethod */
    {
      real_T min = rtb_temp144;

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

    /* Product Block: <S16>/Weighting */
    rtb_temp128 = IPa_control_B->s16_Weight *
      rtb_temp128;

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

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

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

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

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S18>/andorMethod */
    {
      real_T min = rtb_temp144;

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

    /* Product Block: <S18>/Weighting */
    rtb_temp144 = IPa_control_B->s18_Weight *
      rtb_temp144;

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

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

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

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

    /* Constant Block: <S41>/a */
    IPa_control_B->s41_a = (IPa_control_P->s41_a_Value);
  }

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

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

    /* Sum Block: <S41>/Sum1 */
    IPa_control_B->s41_b_a = - IPa_control_B->s41_a + rtb_temp149;
  }

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

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

    /* Sum Block: <S41>/Sum2 */
    IPa_control_B->s41_c_b = - rtb_temp149 + IPa_control_B->s41_c;
  }

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

    /* Product Block: <S41>/Product cd (trimf) */
    rtb_temp137 = 1.0 / IPa_control_B->s41_c_b *
      rtb_temp137;

    /* MinMax Block: <S41>/Min (trimf) */
    rtb_temp145 = (rtb_temp145 < rtb_temp137) ? rtb_temp145 : rtb_temp137;
  }

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

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

    /* MinMax Block: <S19>/andorMethod */
    {
      real_T min = rtb_temp145;

      if (rtb_temp147 < min) {
        min = rtb_temp147;
      }
      rtb_temp137 = min;
    }

    /* Product Block: <S19>/Weighting */
    rtb_temp137 = IPa_control_B->s19_Weight *
      rtb_temp137;

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

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

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

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

  if (ssIsContinuousTask(S, tid)) {     /* Sample time: [0.0, 0.0] */
    /* MinMax Block: <S20>/andorMethod */
    {
      real_T min = rtb_temp145;

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

    /* Product Block: <S20>/Weighting */
    rtb_temp147 = IPa_control_B->s20_Weight *
      rtb_temp147;