diff options
Diffstat (limited to '2.3-1/tests/unit_tests/double/test_atan.sci.dia.ref')
| -rw-r--r-- | 2.3-1/tests/unit_tests/double/test_atan.sci.dia.ref | 758 |
1 files changed, 758 insertions, 0 deletions
diff --git a/2.3-1/tests/unit_tests/double/test_atan.sci.dia.ref b/2.3-1/tests/unit_tests/double/test_atan.sci.dia.ref new file mode 100644 index 00000000..1878019d --- /dev/null +++ b/2.3-1/tests/unit_tests/double/test_atan.sci.dia.ref @@ -0,0 +1,758 @@ +// +// 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/double/test_atan.sci", TMPDIR); + + ----------------------------------- + + --- Executing your SCILAB code. --- + + ----------------------------------- + + 1.2626273 + + 0.7853982 1.1071487 1.2490458 1.3258177 + 1.3258177 1.3734008 1.4056476 1.4464413 + 1.4601391 1.4711277 1.4801364 1.4876551 + 1.4940244 1.4994889 1.5042282 1.5083775 + + 1.4090383 + 0.1563887i + + + column 1 to 2 + + 1.017222 + 0.4023595i 1.3112233 + 0.2388779i + 1.4445192 + 0.1236741i 1.4701378 + 0.0993254i + 1.5151269 + 0.0554408i 1.5207132 + 0.0499164i + 1.5322969 + 0.0384235i 1.5350517 + 0.0356839i + + column 3 to 4 + + 1.40115 + 0.1634816i 1.4445192 + 0.1236741i + 1.4870804 + 0.0829443i 1.5081343 + 0.0623365i + 1.5252793 + 0.0453918i 1.5290815 + 0.0416183i + 1.5374383 + 0.0333086i 1.539526 + 0.0312296i + + 0.7853982 + + 0.7853982 0.7853982 0.7853982 0.7853982 + 0.7853982 0.7853982 0.7853982 0.7853982 + 0.7853982 0.7853982 0.7853982 0.7853982 + 0.7853982 0.7853982 0.7853982 0.7853982 + + ------------------------------------------ + + --- 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_atan" +Warning: file 'TMPDIR/SCI2CTmpResultsReports/test_atan/test_atan_copy.sci' already opened in Scilab. +Warning: file 'TMPDIR/SCI2CTmpResultsReports/test_atan/test_atan_copy.sci' already opened in Scilab. + + ==> Generate the AST. + + ==> Generate C code in TMPDIR/main.c + + /*SCI2C: ########################################################## + ######## + + SCI2C: d0 = %pi + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: d2 = [1 2 3 4 ; 4 5 6 8 ; 9 10 11 12 ; 13 14 15 16] + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: z0 = d0 + %i * d0 + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: z2 = d2 + %i * d2 + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: disp(atan(d0)); + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: disp(atan(d2)); + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: disp(atan(z0)); + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: disp(atan(z2)); + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: disp(atan(d0,d0)); + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: disp(atan(d2,d2)); + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: endfunction + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: + + SCI2C: ########################################################## + ########*/ + + /*SCI2C: ########################################################## + ######## + + SCI2C: + + SCI2C: ########################################################## + ########*/ + + ==> Copying sources + + ==> Copying headers + + ==> Copying interfaces + + ==> Generating Builder TMPDIR/Makefile + + ==> Translation Successfully Completed!!! +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: function test_atan() ! +! ! +! SCI2C: -------------------------------------------------------------! +! ----- ! +! ! +!*/ ! +! ! +!int main() ! +! ! +!{ ! +! ! +!/* ! +! ! +!** ----------------------------- ! +! ! +!** --- Variable Declaration. --- ! +! ! +!** ----------------------------- ! +! ! +!*/ ! +! ! +! ! +! ! +! double d0 = 3.1415927; ! +! ! +! ! +! ! +! double __temp1[1 * 2]; ! +! ! +! int ____temp1Size[2] = {1, 2};; ! +! ! +! ! +! ! +! double __temp2[1 * 3]; ! +! ! +! int ____temp2Size[2] = {1, 3};; ! +! ! +! ! +! ! +! double __temp3[1 * 4]; ! +! ! +! int ____temp3Size[2] = {1, 4};; ! +! ! +! ! +! ! +! double __temp4[1 * 2]; ! +! ! +! int ____temp4Size[2] = {1, 2};; ! +! ! +! ! +! ! +! double __temp5[1 * 3]; ! +! ! +! int ____temp5Size[2] = {1, 3};; ! +! ! +! ! +! ! +! double __temp6[1 * 4]; ! +! ! +! int ____temp6Size[2] = {1, 4};; ! +! ! +! ! +! ! +! double __temp7[2 * 4]; ! +! ! +! int ____temp7Size[2] = {2, 4};; ! +! ! +! ! +! ! +! double __temp8[1 * 2]; ! +! ! +! int ____temp8Size[2] = {1, 2};; ! +! ! +! ! +! ! +! double __temp9[1 * 3]; ! +! ! +! int ____temp9Size[2] = {1, 3};; ! +! ! +! ! +! ! +! double __temp10[1 * 4]; ! +! ! +! int ____temp10Size[2] = {1, 4};; ! +! ! +! ! +! ! +! double __temp11[3 * 4]; ! +! ! +! int ____temp11Size[2] = {3, 4};; ! +! ! +! ! +! ! +! double __temp12[1 * 2]; ! +! ! +! int ____temp12Size[2] = {1, 2};; ! +! ! +! ! +! ! +! double __temp13[1 * 3]; ! +! ! +! int ____temp13Size[2] = {1, 3};; ! +! ! +! ! +! ! +! double __temp14[1 * 4]; ! +! ! +! int ____temp14Size[2] = {1, 4};; ! +! ! +! ! +! ! +! double d2[4 * 4]; ! +! ! +! int __d2Size[2] = {4, 4};; ! +! ! +! ! +! ! +! doubleComplex __temp15; ! +! ! +! ! +! ! +! doubleComplex z0; ! +! ! +! ! +! ! +! doubleComplex __temp16[4 * 4]; ! +! ! +! int ____temp16Size[2] = {4, 4};; ! +! ! +! ! +! ! +! doubleComplex z2[4 * 4]; ! +! ! +! int __z2Size[2] = {4, 4};; ! +! ! +! ! +! ! +! double __temp17; ! +! ! +! ! +! ! +! double ans1; ! +! ! +! ! +! ! +! double __temp18[4 * 4]; ! +! ! +! int ____temp18Size[2] = {4, 4};; ! +! ! +! ! +! ! +! double ans2; ! +! ! +! ! +! ! +! doubleComplex __temp19; ! +! ! +! ! +! ! +! double ans3; ! +! ! +! ! +! ! +! doubleComplex __temp20[4 * 4]; ! +! ! +! int ____temp20Size[2] = {4, 4};; ! +! ! +! ! +! ! +! double ans4; ! +! ! +! ! +! ! +! double __temp21; ! +! ! +! ! +! ! +! double ans5; ! +! ! +! ! +! ! +! double __temp22[4 * 4]; ! +! ! +! int ____temp22Size[2] = {4, 4};; ! +! ! +! ! +! ! +! double ans6; ! +! ! +! ! +! ! +! ! +! ! +! ! +! ! +! ! +! ! +!/* ! +! ! +!** --------------------------------- ! +! ! +!** --- End Variable Declaration. --- ! +! ! +!** --------------------------------- ! +! ! +!*/ ! +! ! +!/* ! +! ! +!** --------------- ! +! ! +!** --- C code. --- ! +! ! +!** --------------- ! +! ! +!*/ ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: d0 = %pi ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! d0 = d0OpEquald0(SCI2C_PI); ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: d2 = [1 2 3 4 ; 4 5 6 8 ; 9 10 11 12 ; 13 14 15 16] ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! d0d0OpRcd2(1,2,__temp1); ! +! ! +! d2d0OpRcd2(__temp1, ____temp1Size,3,__temp2); ! +! ! +! d2d0OpRcd2(__temp2, ____temp2Size,4,__temp3); ! +! ! +! d0d0OpRcd2(4,5,__temp4); ! +! ! +! d2d0OpRcd2(__temp4, ____temp4Size,6,__temp5); ! +! ! +! d2d0OpRcd2(__temp5, ____temp5Size,8,__temp6); ! +! ! +! d2d2OpCcd2(__temp3, ____temp3Size,__temp6, ____temp6Size,__temp7)! +! ; ! +! ! +! d0d0OpRcd2(9,10,__temp8); ! +! ! +! d2d0OpRcd2(__temp8, ____temp8Size,11,__temp9); ! +! ! +! d2d0OpRcd2(__temp9, ____temp9Size,12,__temp10); ! +! ! +! d2d2OpCcd2(__temp7, ____temp7Size,__temp10, ____temp10Size,__temp! +! 11); ! +! ! +! d0d0OpRcd2(13,14,__temp12); ! +! ! +! d2d0OpRcd2(__temp12, ____temp12Size,15,__temp13); ! +! ! +! d2d0OpRcd2(__temp13, ____temp13Size,16,__temp14); ! +! ! +! d2d2OpCcd2(__temp11, ____temp11Size,__temp14, ____temp14Size,d2);! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: z0 = d0 + %i * d0 ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! __temp15 = z0d0OpStarz0(DoubleComplex(0,1),d0); ! +! ! +! z0 = d0z0OpPlusz0(d0,__temp15); ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: z2 = d2 + %i * d2 ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! z0d2OpStarz2(DoubleComplex(0,1),d2, __d2Size,__temp16); ! +! ! +! d2z2OpPlusz2(d2, __d2Size,__temp16, ____temp16Size,z2); ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: disp(atan(d0)); ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! __temp17 = d0atand0(d0); ! +! ! +! ans1 = d0dispd0(__temp17); ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: disp(atan(d2)); ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! d2atand2(d2, __d2Size,__temp18); ! +! ! +! ans2 = d2dispd0(__temp18, ____temp18Size); ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: disp(atan(z0)); ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! __temp19 = z0atanz0(z0); ! +! ! +! ans3 = z0dispd0(__temp19); ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: disp(atan(z2)); ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! z2atanz2(z2, __z2Size,__temp20); ! +! ! +! ans4 = z2dispd0(__temp20, ____temp20Size); ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: disp(atan(d0,d0)); ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! __temp21 = d0d0atand0(d0,d0); ! +! ! +! ans5 = d0dispd0(__temp21); ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: disp(atan(d2,d2)); ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! d2d2atand2(d2, __d2Size,d2, __d2Size,__temp22); ! +! ! +! ans6 = d2dispd0(__temp22, ____temp22Size); ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: endfunction ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +! ! +! ! +! /* ! +! ! +! ** --------------------- ! +! ! +! ** --- Free Section. --- ! +! ! +! ** --------------------- ! +! ! +! */ ! +! ! +! /* ! +! ! +! ** ------------------------- ! +! ! +! ** --- End Free Section. --- ! +! ! +! ** ------------------------- ! +! ! +! */ ! +! ! +! ! +! ! +! return(0); ! +! ! +! ! +! ! +! /*SCI2C: ##########################################################! +! ######## ! +! ! +! SCI2C: ! +! ! +! SCI2C: ##########################################################! +! ########*/ ! +! ! +!} ! +! ! +! ! +mclose(fd); |