/*
 * abs.c
 *
 * Code generation for function 'abs'
 *
 * C source code generated on: Wed Aug 26 14:59:33 2015
 *
 */

/* Include files */
#include "rt_nonfinite.h"
#include "Select_Ground_Motions.h"
#include "abs.h"
#include "Select_Ground_Motions_emxutil.h"

/* Variable Definitions */
static emlrtRTEInfo tb_emlrtRTEI = { 16, 5, "abs",
  "/usr/local/MATLAB/R2013a/toolbox/eml/lib/matlab/elfun/abs.m" };

static emlrtRTEInfo gd_emlrtRTEI = { 14, 5, "abs",
  "/usr/local/MATLAB/R2013a/toolbox/eml/lib/matlab/elfun/abs.m" };

/* Function Definitions */
void b_abs(const emxArray_real_T *x, emxArray_real_T *y)
{
  uint32_T uv1[2];
  int32_T i9;
  int32_T k;
  for (i9 = 0; i9 < 2; i9++) {
    uv1[i9] = (uint32_T)x->size[i9];
  }

  i9 = y->size[0] * y->size[1];
  y->size[0] = (int32_T)uv1[0];
  y->size[1] = (int32_T)uv1[1];
  emxEnsureCapacity((emxArray__common *)y, i9, (int32_T)sizeof(real_T),
                    &tb_emlrtRTEI);
  i9 = x->size[0] * x->size[1];
  for (k = 0; k < i9; k++) {
    y->data[(int32_T)(1.0 + (real_T)k) - 1] = muDoubleScalarAbs(x->data[(int32_T)
      (1.0 + (real_T)k) - 1]);
  }
}

void c_abs(const real_T x[20], real_T y[20])
{
  int32_T k;
  for (k = 0; k < 20; k++) {
    y[k] = muDoubleScalarAbs(x[k]);
  }
}

void d_abs(const real_T x[501], real_T y[501])
{
  int32_T k;
  for (k = 0; k < 501; k++) {
    y[k] = muDoubleScalarAbs(x[k]);
  }
}

void e_abs(const emxArray_boolean_T *x, emxArray_real_T *y)
{
  uint32_T uv5[2];
  int32_T k;
  for (k = 0; k < 2; k++) {
    uv5[k] = (uint32_T)x->size[k];
  }

  k = y->size[0] * y->size[1];
  y->size[0] = 1;
  y->size[1] = (int32_T)uv5[1];
  emxEnsureCapacity((emxArray__common *)y, k, (int32_T)sizeof(real_T),
                    &gd_emlrtRTEI);
  for (k = 0; k < x->size[1]; k++) {
    y->data[k] = x->data[k];
  }
}

/* End of code generation (abs.c) */