eml_mtimes_helper.c

Go to the documentation of this file.

/*
 * Academic License - for use in teaching, academic research, and meeting
 * course requirements at degree granting institutions only.  Not for
 * government, commercial, or other organizational use.
 * File: eml_mtimes_helper.c
 *
 * MATLAB Coder version            : 24.2
 * C/C++ source code generated on  : 03-Dec-2024 17:11:12
 */
 
/* Include Files */
#include "eml_mtimes_helper.h"
#include "rt_nonfinite.h"
 
/* Function Definitions */
/*
 * Arguments    : const double in1_data[]
 *                const int in1_size[2]
 *                const double in2_data[]
 *                const int *in2_size
 *                const double in3_data[]
 *                const double in4_data[]
 *                const int *in4_size
 *                const double in5_data[]
 *                const int *in5_size
 *                const double in6_data[]
 *                const double in7_data[]
 *                const int *in7_size
 * Return Type  : double
 */
double binary_expand_op(const double in1_data[], const int in1_size[2],
                        const double in2_data[], const int *in2_size,
                        const double in3_data[], const double in4_data[],
                        const int *in4_size, const double in5_data[],
                        const int *in5_size, const double in6_data[],
                        const double in7_data[], const int *in7_size)
{
  double b_in2_data;
  double in6;
  double out1;
  int i;
  int loop_ub;
  out1 = in3_data[0];
  in6 = in6_data[0];
  if (*in7_size == 1) {
    if (*in5_size == 1) {
      if (*in4_size == 1) {
        loop_ub = *in2_size;
      } else {
        loop_ub = *in4_size;
      }
    } else {
      loop_ub = *in5_size;
    }
  } else {
    loop_ub = *in7_size;
  }
  for (i = 0; i < loop_ub; i++) {
    b_in2_data =
        ((in2_data[0] * out1 + in4_data[0] * out1) + in5_data[0] * in6) +
        in7_data[0] * in6;
  }
  out1 = 0.0;
  loop_ub = in1_size[1];
  for (i = 0; i < loop_ub; i++) {
    out1 += in1_data[0] * b_in2_data;
  }
  return out1;
}
 
/*
 * File trailer for eml_mtimes_helper.c
 *
 * [EOF]
 */