File: scalexpAlloc.c

    1   /*
    2    * scalexpAlloc.c
    3    *
    4    * Code generation for function 'scalexpAlloc'
    5    *
    6    */
    7   
    8   /* Include files */
    9   #include "rt_nonfinite.h"
   10   #include "gjbf.h"
   11   #include "scalexpAlloc.h"
   12   #include "blas.h"
   13   
   14   /* Function Definitions */
   15   boolean_T b_dimagree(const emxArray_real_T *z, const emxArray_real_T *varargin_1)
   16   {
   17     boolean_T p;
   18     boolean_T b_p;
   19     int32_T k;
   20     boolean_T exitg1;
   21     p = true;
   22     b_p = true;
   23     k = 0;
   24     exitg1 = false;
   25     while ((!exitg1) && (k + 1 < 3)) {
   26       if (z->size[k] != varargin_1->size[k]) {
   27         b_p = false;
   28         exitg1 = true;
   29       } else {
   30         k++;
   31       }
   32     }
   33   
   34     if (b_p) {
   35     } else {
   36       p = false;
   37     }
   38   
   39     return p;
   40   }
   41   
   42   boolean_T c_dimagree(const emxArray_real_T *z, const emxArray_real_T *varargin_1)
   43   {
   44     boolean_T p;
   45     boolean_T b_p;
   46     int32_T k;
   47     boolean_T exitg1;
   48     p = true;
   49     b_p = true;
   50     k = 0;
   51     exitg1 = false;
   52     while ((!exitg1) && (k + 1 < 3)) {
   53       if (z->size[k] != varargin_1->size[k]) {
   54         b_p = false;
   55         exitg1 = true;
   56       } else {
   57         k++;
   58       }
   59     }
   60   
   61     if (b_p) {
   62     } else {
   63       p = false;
   64     }
   65   
   66     return p;
   67   }
   68   
   69   boolean_T dimagree(const int32_T z_size[1], const int32_T varargin_1_size[1])
   70   {
   71     boolean_T p;
   72     boolean_T b_p;
   73     int32_T k;
   74     boolean_T exitg1;
   75     int32_T b_k;
   76     int32_T c_k;
   77     p = true;
   78     b_p = true;
   79     k = 1;
   80     exitg1 = false;
   81     while ((!exitg1) && (k < 3)) {
   82       if (k <= 1) {
   83         b_k = z_size[0];
   84       } else {
   85         b_k = 1;
   86       }
   87   
   88       if (k <= 1) {
   89         c_k = varargin_1_size[0];
   90       } else {
   91         c_k = 1;
   92       }
   93   
   94       if (b_k != c_k) {
   95         b_p = false;
   96         exitg1 = true;
   97       } else {
   98         k++;
   99       }
  100     }
  101   
  102     if (b_p) {
  103     } else {
  104       p = false;
  105     }
  106   
  107     return p;
  108   }
  109   
  110   /* End of code generation (scalexpAlloc.c) */
  111