//
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2010-2010 - DIGITEO - 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
//
//
// <-- ENGLISH IMPOSED -->
// <-- JVM NOT MANDATORY -->
global SCI2CHOME;
scilab2c(SCI2CHOME+"/tests/unit_tests/test_hypermat.sci", TMPDIR);
-----------------------------------
--- Executing your SCILAB code. ---
-----------------------------------
(:,:,1)
1. 3. 5.
2. 4. 6.
(:,:,2)
7. 9. 11.
8. 10. 12.
(:,:,3)
13. 15. 17.
14. 16. 18.
(:,:,4)
19. 21. 23.
20. 22. 24.
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
(:,:,1)
0. 4. 8. 12. 16.
1. 5. 9. 13. 17.
2. 6. 10. 14. 18.
3. 7. 11. 15. 19.
(:,:,2)
20. 24. 28. 32. 36.
21. 25. 29. 33. 37.
22. 26. 30. 34. 38.
23. 27. 31. 35. 39.
(:,:,3)
40. 44. 48. 52. 56.
41. 45. 49. 53. 57.
42. 46. 50. 54. 58.
43. 47. 51. 55. 59.
(:,:,4)
60. 64. 68. 72. 76.
61. 65. 69. 73. 77.
62. 66. 70. 74. 78.
63. 67. 71. 75. 79.
(:,:,5)
80. 84. 88. 92. 96.
81. 85. 89. 93. 97.
82. 86. 90. 94. 98.
83. 87. 91. 95. 99.
(:,:,6)
100. 104. 108. 112. 116.
101. 105. 109. 113. 117.
102. 106. 110. 114. 118.
103. 107. 111. 115. 119.
0.
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.
98.
99.
100.
101.
102.
103.
104.
105.
106.
107.
108.
109.
110.
111.
112.
113.
114.
115.
116.
117.
118.
119.
------------------------------------------
--- End Execution of your SCILAB code. ---
------------------------------------------
==> SCI2C hArtes/POLIBA Tool!!!
Removing directory: TMPDIR/SCI2CTmpResultsReports
Removing directory: TMPDIR
==> Initialize SCI2C and USER2C Libraries.
==> Load SCI2C and USER2C Libraries.
==> Start translation of function "test_hypermat"
Warning: file 'TMPDIR/SCI2CTmpResultsReports/test_hypermat/test_hypermat_copy.sci' already opened in Scilab.
Warning: file 'TMPDIR/SCI2CTmpResultsReports/test_hypermat/test_hypermat_copy.sci' already opened in Scilab.
==> Generate the AST.
==> Generate C code in TMPDIR/main.c
/*SCI2C: ##########################################################
########
SCI2C: a = zeros(2,3,4);
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: for i = 1:24
SCI2C: ##########################################################
########*/
/*SCI2C: #######################################################
###########
SCI2C: a(i) = i
SCI2C: #######################################################
###########*/
/*SCI2C: #######################################################
###########
SCI2C: end
SCI2C: #######################################################
###########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(a);
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: for i = 1:24
SCI2C: ##########################################################
########*/
/*SCI2C: #######################################################
###########
SCI2C: disp(a(i))
SCI2C: #######################################################
###########*/
/*SCI2C: #######################################################
###########
SCI2C: end
SCI2C: #######################################################
###########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: b = zeros(4,5,6);
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: for i = 1:4
SCI2C: ##########################################################
########*/
/*SCI2C: #######################################################
###########
SCI2C: for j = 1:5
SCI2C: #######################################################
###########*/
/*SCI2C: ####################################################
##############
SCI2C: for k = 1:6
SCI2C: ####################################################
##############*/
/*SCI2C: #################################################
#################
SCI2C: b(i,j,k) = (i - 1) + 4 * (j - 1) + 4 * 5
* (k - 1);
SCI2C: #################################################
#################*/
/*SCI2C: #################################################
#################
SCI2C: end
SCI2C: #################################################
#################*/
/*SCI2C: ####################################################
##############
SCI2C: end
SCI2C: ####################################################
##############*/
/*SCI2C: #######################################################
###########
SCI2C: end
SCI2C: #######################################################
###########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: disp(b);
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: for k = 1:6
SCI2C: ##########################################################
########*/
/*SCI2C: #######################################################
###########
SCI2C: for j = 1:5
SCI2C: #######################################################
###########*/
/*SCI2C: ####################################################
##############
SCI2C: for i = 1:4
SCI2C: ####################################################
##############*/
/*SCI2C: #################################################
#################
SCI2C: disp(b(i,j,k));
SCI2C: #################################################
#################*/
/*SCI2C: #################################################
#################
SCI2C: end
SCI2C: #################################################
#################*/
/*SCI2C: ####################################################
##############
SCI2C: end
SCI2C: ####################################################
##############*/
/*SCI2C: #######################################################
###########
SCI2C: end
SCI2C: #######################################################
###########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C: endfunction
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
/*SCI2C: ##########################################################
########
SCI2C:
SCI2C: ##########################################################
########*/
==> Copying sources
==> Copying headers
==> Copying interfaces
==> Generating Builder TMPDIR/Makefile
==> Translation Successfully Completed!!!
//editor(TMPDIR + "/main.c");
fd = mopen(TMPDIR+"/main.c");
mgetl(fd)
ans =
!/* !
! !
!** ************************************************ !
! !
!** This file has been generated using !
! !
!** Scilab2C (Version 2.0) !
! !
!** !
! !
!** 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: // !
! !
! SCI2C: // Scilab ( http://www.scilab.org/ ) - This file is part of S!
! cilab !
! !
! SCI2C: // Copyright (C) 2010-2010 - DIGITEO - Bruno JOFRET !
! !
! SCI2C: // !
! !
! SCI2C: // This file must be used under the terms of the CeCILL. !
! !
! SCI2C: // This source file is licensed as described in the file COPY!
! ING, which !
! !
! SCI2C: // you should have received as part of this distribution. Th!
! e terms !
! !
! SCI2C: // are also available at !
! !
! SCI2C: // http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt !
! !
! SCI2C: // !
! !
! SCI2C: // !
! !
! SCI2C: !
! !
! SCI2C: function test_hypermat() !
! !
! SCI2C: -------------------------------------------------------------!
! ----- !
! !
!*/ !
! !
!int main() !
! !
!{ !
! !
!/* !
! !
!** ----------------------------- !
! !
!** --- Variable Declaration. --- !
! !
!** ----------------------------- !
! !
!*/ !
! !
! !
! !
! double a[2 * 3 * 4]; !
! !
! int __aSize[3] = {2, 3, 4};; !
! !
! !
! !
! double i; !
! !
! !
! !
! double ans1; !
! !
! !
! !
! double __temp1; !
! !
! !
! !
! double ans2; !
! !
! !
! !
! double b[4 * 5 * 6]; !
! !
! int __bSize[3] = {4, 5, 6};; !
! !
! !
! !
! double j; !
! !
! !
! !
! double k; !
! !
! !
! !
! double __temp2; !
! !
! !
! !
! double __temp3; !
! !
! !
! !
! double __temp4; !
! !
! !
! !
! double __temp5; !
! !
! !
! !
! double __temp6; !
! !
! !
! !
! double __temp7; !
! !
! !
! !
! double __temp8; !
! !
! !
! !
! double __temp9; !
! !
! !
! !
! double ans3; !
! !
! !
! !
! double __temp10; !
! !
! !
! !
! double ans4; !
! !
! !
! !
! !
! !
! !
! !
! !
! !
!/* !
! !
!** --------------------------------- !
! !
!** --- End Variable Declaration. --- !
! !
!** --------------------------------- !
! !
!*/ !
! !
!/* !
! !
!** --------------- !
! !
!** --- C code. --- !
! !
!** --------------- !
! !
!*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: a = zeros(2,3,4); !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! d0d0d0zerosd3(2,3,4,a); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: for i = 1:24 !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! for(i = 1; i <= 24; i += 1) !
! !
! { !
! !
! !
! !
! /*SCI2C: #######################################################!
! ########### !
! !
! SCI2C: a(i) = i !
! !
! SCI2C: #######################################################!
! ###########*/ !
! !
! d3d0d0OpIns(a, __aSize,i,i); !
! !
! !
! !
! /*SCI2C: #######################################################!
! ########### !
! !
! SCI2C: end !
! !
! SCI2C: #######################################################!
! ###########*/ !
! !
! !
! !
! !
! !
! } !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(a); !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! ans1 = d3dispd0(a, __aSize); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: for i = 1:24 !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! for(i = 1; i <= 24; i += 1) !
! !
! { !
! !
! !
! !
! /*SCI2C: #######################################################!
! ########### !
! !
! SCI2C: disp(a(i)) !
! !
! SCI2C: #######################################################!
! ###########*/ !
! !
! __temp1 = d3d0OpExtd0(a, __aSize,i); !
! !
! ans2 = d0dispd0(__temp1); !
! !
! !
! !
! /*SCI2C: #######################################################!
! ########### !
! !
! SCI2C: end !
! !
! SCI2C: #######################################################!
! ###########*/ !
! !
! !
! !
! !
! !
! } !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: b = zeros(4,5,6); !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! d0d0d0zerosd3(4,5,6,b); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: for i = 1:4 !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! for(i = 1; i <= 4; i += 1) !
! !
! { !
! !
! !
! !
! /*SCI2C: #######################################################!
! ########### !
! !
! SCI2C: for j = 1:5 !
! !
! SCI2C: #######################################################!
! ###########*/ !
! !
! !
! !
! for(j = 1; j <= 5; j += 1) !
! !
! { !
! !
! !
! !
! /*SCI2C: ####################################################!
! ############## !
! !
! SCI2C: for k = 1:6 !
! !
! SCI2C: ####################################################!
! ##############*/ !
! !
! !
! !
! for(k = 1; k <= 6; k += 1) !
! !
! { !
! !
! !
! !
! /*SCI2C: #################################################!
! ################# !
! !
! SCI2C: b(i,j,k) = (i - 1) + 4 * (j - 1) + 4 * 5 !
! * (k - 1); !
! !
! SCI2C: #################################################!
! #################*/ !
! !
! __temp2 = d0d0OpMinusd0(i,1); !
! !
! __temp3 = d0d0OpMinusd0(j,1); !
! !
! __temp4 = d0d0OpStard0(4,__temp3); !
! !
! __temp5 = d0d0OpPlusd0(__temp2,__temp4); !
! !
! __temp6 = d0d0OpStard0(4,5); !
! !
! __temp7 = d0d0OpMinusd0(k,1); !
! !
! __temp8 = d0d0OpStard0(__temp6,__temp7); !
! !
! __temp9 = d0d0OpPlusd0(__temp5,__temp8); !
! !
! d3d0d0d0d0OpIns(b, __bSize,i,j,k,__temp9); !
! !
! !
! !
! /*SCI2C: #################################################!
! ################# !
! !
! SCI2C: end !
! !
! SCI2C: #################################################!
! #################*/ !
! !
! !
! !
! !
! !
! } !
! !
! !
! !
! /*SCI2C: ####################################################!
! ############## !
! !
! SCI2C: end !
! !
! SCI2C: ####################################################!
! ##############*/ !
! !
! !
! !
! !
! !
! } !
! !
! !
! !
! /*SCI2C: #######################################################!
! ########### !
! !
! SCI2C: end !
! !
! SCI2C: #######################################################!
! ###########*/ !
! !
! !
! !
! !
! !
! } !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: disp(b); !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! ans3 = d3dispd0(b, __bSize); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: for k = 1:6 !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! for(k = 1; k <= 6; k += 1) !
! !
! { !
! !
! !
! !
! /*SCI2C: #######################################################!
! ########### !
! !
! SCI2C: for j = 1:5 !
! !
! SCI2C: #######################################################!
! ###########*/ !
! !
! !
! !
! for(j = 1; j <= 5; j += 1) !
! !
! { !
! !
! !
! !
! /*SCI2C: ####################################################!
! ############## !
! !
! SCI2C: for i = 1:4 !
! !
! SCI2C: ####################################################!
! ##############*/ !
! !
! !
! !
! for(i = 1; i <= 4; i += 1) !
! !
! { !
! !
! !
! !
! /*SCI2C: #################################################!
! ################# !
! !
! SCI2C: disp(b(i,j,k)); !
! !
! SCI2C: #################################################!
! #################*/ !
! !
! __temp10 = d3d0d0d0OpExtd0(b, __bSize,i,j,k); !
! !
! ans4 = d0dispd0(__temp10); !
! !
! !
! !
! /*SCI2C: #################################################!
! ################# !
! !
! SCI2C: end !
! !
! SCI2C: #################################################!
! #################*/ !
! !
! !
! !
! !
! !
! } !
! !
! !
! !
! /*SCI2C: ####################################################!
! ############## !
! !
! SCI2C: end !
! !
! SCI2C: ####################################################!
! ##############*/ !
! !
! !
! !
! !
! !
! } !
! !
! !
! !
! /*SCI2C: #######################################################!
! ########### !
! !
! SCI2C: end !
! !
! SCI2C: #######################################################!
! ###########*/ !
! !
! !
! !
! !
! !
! } !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: endfunction !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
! !
! !
! /* !
! !
! ** --------------------- !
! !
! ** --- Free Section. --- !
! !
! ** --------------------- !
! !
! */ !
! !
! /* !
! !
! ** ------------------------- !
! !
! ** --- End Free Section. --- !
! !
! ** ------------------------- !
! !
! */ !
! !
! !
! !
! return(0); !
! !
! !
! !
! /*SCI2C: ##########################################################!
! ######## !
! !
! SCI2C: !
! !
! SCI2C: ##########################################################!
! ########*/ !
! !
!} !
! !
! !
mclose(fd);