// // 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_variance.sci", TMPDIR); ----------------------------------- --- Executing your SCILAB code. --- ----------------------------------- 0.0862313 0.1724626i 0.1483594 0.0990737 0.0006841 0.2967188 0.1981474 0.0013682 0.1155283 0.0243869 0.2310566 0.0487739 ------------------------------------------ --- 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_variance" Warning: file 'TMPDIR/SCI2CTmpResultsReports/test_variance/test_variance_copy.sci' already opened in Scilab. Warning: file 'TMPDIR/SCI2CTmpResultsReports/test_variance/test_variance_copy.sci' already opened in Scilab. ==> Generate the AST. ==> Generate C code in TMPDIR/main.c /*SCI2C: ########################################################## ######## SCI2C: d0 = 0.2113249 SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: d2 = [0.2113249 0.0002211 0.6653811;0.7560439 0.4453586 0.6283918] SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: z0 = d0 + %i * d0 SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: z2 = d2 + %i * d2 SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: //disp(variance(d0)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: //disp(variance(z0)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(variance(d2)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(variance(z2)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: //disp(variance(d0, 1)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: //disp(variance(z0, 1)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(variance(d2, 1)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(variance(z2, 1)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: //disp(variance(d0, 2)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: //disp(variance(z0, 2)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(variance(d2, 2)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(variance(z2, 2)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // disp(variance(d0, 'r')) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // disp(variance(z0, 'r')) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // disp(variance(d2, 'r')) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // disp(variance(z2, 'r')) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // disp(variance(d0, 'c')) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // disp(variance(z0, 'c')) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // disp(variance(d2, 'c')) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // disp(variance(z2, 'c')) 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_variance() ! ! ! ! SCI2C: -------------------------------------------------------------! ! ----- ! ! ! !*/ ! ! ! !int main() ! ! ! !{ ! ! ! !/* ! ! ! !** ----------------------------- ! ! ! !** --- Variable Declaration. --- ! ! ! !** ----------------------------- ! ! ! !*/ ! ! ! ! ! ! ! ! double d0 = 0.2113249; ! ! ! ! ! ! ! ! double __temp1[1 * 2]; ! ! ! ! int ____temp1Size[2] = {1, 2};; ! ! ! ! ! ! ! ! double __temp2[1 * 3]; ! ! ! ! int ____temp2Size[2] = {1, 3};; ! ! ! ! ! ! ! ! double __temp3[1 * 2]; ! ! ! ! int ____temp3Size[2] = {1, 2};; ! ! ! ! ! ! ! ! double __temp4[1 * 3]; ! ! ! ! int ____temp4Size[2] = {1, 3};; ! ! ! ! ! ! ! ! double d2[2 * 3]; ! ! ! ! int __d2Size[2] = {2, 3};; ! ! ! ! ! ! ! ! doubleComplex __temp5; ! ! ! ! ! ! ! ! doubleComplex z0; ! ! ! ! ! ! ! ! doubleComplex __temp6[2 * 3]; ! ! ! ! int ____temp6Size[2] = {2, 3};; ! ! ! ! ! ! ! ! doubleComplex z2[2 * 3]; ! ! ! ! int __z2Size[2] = {2, 3};; ! ! ! ! ! ! ! ! double __temp7; ! ! ! ! ! ! ! ! double ans1; ! ! ! ! ! ! ! ! doubleComplex __temp8; ! ! ! ! ! ! ! ! double ans2; ! ! ! ! ! ! ! ! double __temp9[1 * 3]; ! ! ! ! int ____temp9Size[2] = {1, 3};; ! ! ! ! ! ! ! ! double ans3; ! ! ! ! ! ! ! ! doubleComplex __temp10[1 * 3]; ! ! ! ! int ____temp10Size[2] = {1, 3};; ! ! ! ! ! ! ! ! double ans4; ! ! ! ! ! ! ! ! double __temp11[2 * 1]; ! ! ! ! int ____temp11Size[2] = {2, 1};; ! ! ! ! ! ! ! ! double ans5; ! ! ! ! ! ! ! ! doubleComplex __temp12[2 * 1]; ! ! ! ! int ____temp12Size[2] = {2, 1};; ! ! ! ! ! ! ! ! double ans6; ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! !/* ! ! ! !** --------------------------------- ! ! ! !** --- End Variable Declaration. --- ! ! ! !** --------------------------------- ! ! ! !*/ ! ! ! !/* ! ! ! !** --------------- ! ! ! !** --- C code. --- ! ! ! !** --------------- ! ! ! !*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: d0 = 0.2113249 ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d0 = d0OpEquald0(0.2113249); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: d2 = [0.2113249 0.0002211 0.6653811;0.7560439 0.4453586 ! ! 0.6283918] ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d0d0OpRcd2(0.2113249,0.0002211,__temp1); ! ! ! ! d2d0OpRcd2(__temp1, ____temp1Size,0.6653811,__temp2); ! ! ! ! d0d0OpRcd2(0.7560439,0.4453586,__temp3); ! ! ! ! d2d0OpRcd2(__temp3, ____temp3Size,0.6283918,__temp4); ! ! ! ! d2d2OpCcd2(__temp2, ____temp2Size,__temp4, ____temp4Size,d2); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: z0 = d0 + %i * d0 ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! __temp5 = z0d0OpStarz0(DoubleComplex(0,1),d0); ! ! ! ! z0 = d0z0OpPlusz0(d0,__temp5); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: z2 = d2 + %i * d2 ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! z0d2OpStarz2(DoubleComplex(0,1),d2, __d2Size,__temp6); ! ! ! ! d2z2OpPlusz2(d2, __d2Size,__temp6, ____temp6Size,z2); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: //disp(variance(d0)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: //disp(variance(z0)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(variance(d2)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! __temp7 = d2varianced0(d2, __d2Size); ! ! ! ! ans1 = d0dispd0(__temp7); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(variance(z2)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! __temp8 = z2variancez0(z2, __z2Size); ! ! ! ! ans2 = z0dispd0(__temp8); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: //disp(variance(d0, 1)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: //disp(variance(z0, 1)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(variance(d2, 1)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d2d0varianced2(d2, __d2Size,1,__temp9); ! ! ! ! ans3 = d2dispd0(__temp9, ____temp9Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(variance(z2, 1)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! z2d0variancez2(z2, __z2Size,1,__temp10); ! ! ! ! ans4 = z2dispd0(__temp10, ____temp10Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: //disp(variance(d0, 2)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: //disp(variance(z0, 2)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(variance(d2, 2)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d2d0varianced2(d2, __d2Size,2,__temp11); ! ! ! ! ans5 = d2dispd0(__temp11, ____temp11Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(variance(z2, 2)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! z2d0variancez2(z2, __z2Size,2,__temp12); ! ! ! ! ans6 = z2dispd0(__temp12, ____temp12Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // disp(variance(d0, 'r')) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // disp(variance(z0, 'r')) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // disp(variance(d2, 'r')) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // disp(variance(z2, 'r')) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // disp(variance(d0, 'c')) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // disp(variance(z0, 'c')) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // disp(variance(d2, 'c')) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // disp(variance(z2, 'c')) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: endfunction ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /* ! ! ! ! ** --------------------- ! ! ! ! ** --- Free Section. --- ! ! ! ! ** --------------------- ! ! ! ! */ ! ! ! ! /* ! ! ! ! ** ------------------------- ! ! ! ! ** --- End Free Section. --- ! ! ! ! ** ------------------------- ! ! ! ! */ ! ! ! ! ! ! ! ! return(0); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! !} ! ! ! ! ! mclose(fd);