summaryrefslogtreecommitdiff
path: root/2.3-1/src/c/implicitList/simplicitLists.c
blob: d5f741ae8d281f3e24ae0ef9616b97821476c956 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
/*
 *  Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
 *  Copyright (C) 2007-2008 - INRIA - Bruno JOFRET
 *
 *  This file must be used under the terms of the CeCILL.
 *  This source file is licensed as described in the file COPYING, which
 *  you should have received as part of this distribution.  The terms
 *  are also available at
 *  http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
 *
 */

#include "implicitList.h"

void simplicitLists(float start, float step, float end, float *out)
{
  int i = 0;
  if (start <= end)
    {
      if (start < start + step)
	{
	  while (start <= end)
	    {
	      out[i] = start;
	      start += step;
	      ++i;
	    }
	}
    }
  else
    {
      if (start > start + step)
	{
	  while (start >= end)
	    {
	      out[i] = start;
	      start += step;
	      ++i;
	    }
	}
    }
}