File: isfinite.c

    1   /*
    2    * isfinite.c
    3    *
    4    * Code generation for function 'isfinite'
    5    *
    6    */
    7   
    8   /* Include files */
    9   #include "rt_nonfinite.h"
   10   #include "gjbf.h"
   11   #include "isfinite.h"
   12   #include "blas.h"
   13   
   14   /* Function Definitions */
   15   void b_isfinite(const real_T x[14112], boolean_T b[14112])
   16   {
   17     int32_T i3;
   18     for (i3 = 0; i3 < 14112; i3++) {
   19       b[i3] = ((!muDoubleScalarIsInf(x[i3])) && (!muDoubleScalarIsNaN(x[i3])));
   20     }
   21   }
   22   
   23   boolean_T c_isfinite(real_T x)
   24   {
   25     return (!muDoubleScalarIsInf(x)) && (!muDoubleScalarIsNaN(x));
   26   }
   27   
   28   void d_isfinite(const real_T x[3], boolean_T b[3])
   29   {
   30     int32_T i;
   31     for (i = 0; i < 3; i++) {
   32       b[i] = ((!muDoubleScalarIsInf(x[i])) && (!muDoubleScalarIsNaN(x[i])));
   33     }
   34   }
   35   
   36   void e_isfinite(const real_T x[48], boolean_T b[48])
   37   {
   38     int32_T i7;
   39     for (i7 = 0; i7 < 48; i7++) {
   40       b[i7] = ((!muDoubleScalarIsInf(x[i7])) && (!muDoubleScalarIsNaN(x[i7])));
   41     }
   42   }
   43   
   44   void f_isfinite(const real_T x[320], boolean_T b[320])
   45   {
   46     int32_T i15;
   47     for (i15 = 0; i15 < 320; i15++) {
   48       b[i15] = ((!muDoubleScalarIsInf(x[i15])) && (!muDoubleScalarIsNaN(x[i15])));
   49     }
   50   }
   51   
   52   void g_isfinite(const emxArray_real_T *x, boolean_T b_data[], int32_T b_size[2])
   53   {
   54     int32_T loop_ub;
   55     int32_T i19;
   56     boolean_T tmp_data[14112];
   57     b_size[0] = x->size[0];
   58     loop_ub = x->size[0] * x->size[1];
   59     for (i19 = 0; i19 < loop_ub; i19++) {
   60       b_data[i19] = muDoubleScalarIsInf(x->data[i19]);
   61     }
   62   
   63     loop_ub = x->size[0] * x->size[1];
   64     for (i19 = 0; i19 < loop_ub; i19++) {
   65       tmp_data[i19] = muDoubleScalarIsNaN(x->data[i19]);
   66     }
   67   
   68     b_size[1] = 16;
   69     loop_ub = b_size[0] << 4;
   70     for (i19 = 0; i19 < loop_ub; i19++) {
   71       b_data[i19] = ((!b_data[i19]) && (!tmp_data[i19]));
   72     }
   73   }
   74   
   75   void h_isfinite(const real_T x_data[], const int32_T x_size[1], boolean_T
   76                   b_data[], int32_T b_size[1])
   77   {
   78     int32_T loop_ub;
   79     int32_T i21;
   80     boolean_T tmp_data[1764];
   81     b_size[0] = x_size[0];
   82     loop_ub = x_size[0];
   83     for (i21 = 0; i21 < loop_ub; i21++) {
   84       b_data[i21] = muDoubleScalarIsInf(x_data[i21]);
   85     }
   86   
   87     loop_ub = x_size[0];
   88     for (i21 = 0; i21 < loop_ub; i21++) {
   89       tmp_data[i21] = muDoubleScalarIsNaN(x_data[i21]);
   90     }
   91   
   92     loop_ub = x_size[0];
   93     for (i21 = 0; i21 < loop_ub; i21++) {
   94       b_data[i21] = ((!b_data[i21]) && (!tmp_data[i21]));
   95     }
   96   }
   97   
   98   /* End of code generation (isfinite.c) */
   99