diff options
Diffstat (limited to '2.3-1/tests/unit_tests/test_hypermat.sci.dia.ref')
| -rw-r--r-- | 2.3-1/tests/unit_tests/test_hypermat.sci.dia.ref | 1455 |
1 files changed, 1455 insertions, 0 deletions
diff --git a/2.3-1/tests/unit_tests/test_hypermat.sci.dia.ref b/2.3-1/tests/unit_tests/test_hypermat.sci.dia.ref new file mode 100644 index 00000000..163460fa --- /dev/null +++ b/2.3-1/tests/unit_tests/test_hypermat.sci.dia.ref @@ -0,0 +1,1455 @@ +// +// 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); |