/* * linspace.c * * Code generation for function 'linspace' * * C source code generated on: Wed Aug 26 14:59:33 2015 * */ /* Include files */ #include "rt_nonfinite.h" #include "Select_Ground_Motions.h" #include "linspace.h" #include "Select_Ground_Motions_emxutil.h" /* Variable Definitions */ static emlrtRTEInfo x_emlrtRTEI = { 31, 1, "linspace", "/usr/local/MATLAB/R2013a/toolbox/eml/lib/matlab/elmat/linspace.m" }; /* Function Definitions */ void linspace(real_T n1, emxArray_real_T *y) { real_T delta1; int32_T i2; int32_T k; if (n1 < 0.0) { n1 = 0.0; } delta1 = muDoubleScalarFloor(n1); i2 = y->size[0] * y->size[1]; y->size[0] = 1; y->size[1] = (int32_T)delta1; emxEnsureCapacity((emxArray__common *)y, i2, (int32_T)sizeof(real_T), &x_emlrtRTEI); if ((int32_T)delta1 >= 1) { y->data[(int32_T)delta1 - 1] = 4.0; if (y->size[1] >= 2) { y->data[0] = 0.0; if (y->size[1] >= 3) { delta1 = 4.0 / ((real_T)y->size[1] - 1.0); i2 = y->size[1]; for (k = 0; k <= i2 - 3; k++) { y->data[1 + k] = (1.0 + (real_T)k) * delta1; } } } } } /* End of code generation (linspace.c) */