blob: 8362967439f9e46f67c8fd7f023196ed0caca8f7 (
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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
|
/*
** ************************************************
** This file has been generated using
** Scilab2C (Version 2.3)
**
** Please visit following links for more informations:
** Atoms Module: http://atoms.scilab.org/toolboxes/scilab2c
** Scilab2C Forge: http://forge.scilab.org/index.php/p/scilab2c/
** Scilab2C ML: http://forge.scilab.org/index.php/p/scilab2c/
** ************************************************
*/
/*
** -----------------
** --- Includes. ---
** -----------------
*/
#include "main.h"
/*
** ---------------------
** --- End Includes. ---
** ---------------------
*/
/*
** -------------------------------------
** --- Global Variables Declaration. ---
** -------------------------------------
*/
/*
** -----------------------------------------
** --- End Global Variables Declaration. ---
** -----------------------------------------
*/
/*
SCI2C: ------------------------------------------------------------------
SCI2C: function lengthfinder()
SCI2C: ------------------------------------------------------------------
*/
int main()
{
/*
** -----------------------------
** --- Variable Declaration. ---
** -----------------------------
*/
double x[1 * 5];
int __xSize[2] = {1, 5};;
double y;
double ans1;
/*
** ---------------------------------
** --- End Variable Declaration. ---
** ---------------------------------
*/
/*
** ---------------
** --- C code. ---
** ---------------
*/
d0d0OpColond2(1,5,x);
y = d2lengthd0(x, __xSize);
d0disp(y);
/*
** ---------------------
** --- Free Section. ---
** ---------------------
*/
/*
** -------------------------
** --- End Free Section. ---
** -------------------------
*/
return(0);
}
|