// // 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_OpColon.sci", TMPDIR); ----------------------------------- --- Executing your SCILAB code. --- ----------------------------------- 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 0. 1. 2. 3. 1. [] 2. 3. 4. 5. 4. 5. 6. 7. 8. 1. 0. 1. 2. 2. 4. 8. ------------------------------------------ --- 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_OpColon" Warning: file 'TMPDIR/SCI2CTmpResultsReports/test_OpColon/test_OpColon_copy.sci' already opened in Scilab. Warning: file 'TMPDIR/SCI2CTmpResultsReports/test_OpColon/test_OpColon_copy.sci' already opened in Scilab. ==> Generate the AST. ==> Generate C code in TMPDIR/main.c /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // A = [1 2 3 4 ; 5 6 7 8 ; 9 10 11 12]; SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // B = A * %i ; SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: d = %i ; SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: a = %pi ; SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: b = %e ; SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: c = [7 8 5 ]; SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(zeros ( a , %e )); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(zeros ( %pi , %e)); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(zeros(c)); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(zeros ([4 5 6 ; 4 5 6]) ); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(0:1:3); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(1:1); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(4+53*%i:0); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(2:5); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(4+3*%i:8+%i); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(1:5:1); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(%i:%i+1:2); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(2:7:5); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: disp(4+3*%i:4:8+%i); SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: //a =4 + 53 *%i : 0 ; SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: endfunction SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: //OUT(1).SZ(2)= FA_INT( SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // FA_ADD( SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // FA_DIV( SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // FA_SUB(FA_REAL(IN(3).VAL,IN(3).TP),FA_REA L(IN(1).VAL, IN(3).TP)) SCI2C: ########################################################## ########*/ /*SCI2C: ########################################################## ######## SCI2C: // ,FA_REAL(IN(2).VAL,IN (2).TP) 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_OpColon() ! ! ! ! SCI2C: -------------------------------------------------------------! ! ----- ! ! ! !*/ ! ! ! !int main() ! ! ! !{ ! ! ! !/* ! ! ! !** ----------------------------- ! ! ! !** --- Variable Declaration. --- ! ! ! !** ----------------------------- ! ! ! !*/ ! ! ! ! ! ! ! ! doubleComplex d = DoubleComplex(0,1); ! ! ! ! ! ! ! ! double a = 3.1415927; ! ! ! ! ! ! ! ! double b = 2.7182818; ! ! ! ! ! ! ! ! double __temp1[1 * 2]; ! ! ! ! int ____temp1Size[2] = {1, 2};; ! ! ! ! ! ! ! ! double c[1 * 3]; ! ! ! ! int __cSize[2] = {1, 3};; ! ! ! ! ! ! ! ! double __temp2[3 * 2]; ! ! ! ! int ____temp2Size[2] = {3, 2};; ! ! ! ! ! ! ! ! double ans1; ! ! ! ! ! ! ! ! double __temp3[3 * 2]; ! ! ! ! int ____temp3Size[2] = {3, 2};; ! ! ! ! ! ! ! ! double ans2; ! ! ! ! ! ! ! ! double __temp4[1 * 3]; ! ! ! ! int ____temp4Size[2] = {1, 3};; ! ! ! ! ! ! ! ! double ans3; ! ! ! ! ! ! ! ! double __temp5[1 * 2]; ! ! ! ! int ____temp5Size[2] = {1, 2};; ! ! ! ! ! ! ! ! double __temp6[1 * 3]; ! ! ! ! int ____temp6Size[2] = {1, 3};; ! ! ! ! ! ! ! ! double __temp7[1 * 2]; ! ! ! ! int ____temp7Size[2] = {1, 2};; ! ! ! ! ! ! ! ! double __temp8[1 * 3]; ! ! ! ! int ____temp8Size[2] = {1, 3};; ! ! ! ! ! ! ! ! double __temp9[2 * 3]; ! ! ! ! int ____temp9Size[2] = {2, 3};; ! ! ! ! ! ! ! ! double __temp10[2 * 3]; ! ! ! ! int ____temp10Size[2] = {2, 3};; ! ! ! ! ! ! ! ! double ans4; ! ! ! ! ! ! ! ! double __temp11[1 * 4]; ! ! ! ! int ____temp11Size[2] = {1, 4};; ! ! ! ! ! ! ! ! double ans5; ! ! ! ! ! ! ! ! double __temp12; ! ! ! ! ! ! ! ! double ans6; ! ! ! ! ! ! ! ! doubleComplex __temp13; ! ! ! ! ! ! ! ! doubleComplex __temp14; ! ! ! ! ! ! ! ! double* __temp15 = NULL; ! ! ! ! int ____temp15Size[2]; ! ! ! ! ! ! ! ! double ans7; ! ! ! ! ! ! ! ! double __temp16[1 * 4]; ! ! ! ! int ____temp16Size[2] = {1, 4};; ! ! ! ! ! ! ! ! double ans8; ! ! ! ! ! ! ! ! doubleComplex __temp17; ! ! ! ! ! ! ! ! doubleComplex __temp18; ! ! ! ! ! ! ! ! doubleComplex __temp19; ! ! ! ! ! ! ! ! double* __temp20 = NULL; ! ! ! ! int ____temp20Size[2]; ! ! ! ! ! ! ! ! double ans9; ! ! ! ! ! ! ! ! double __temp21; ! ! ! ! ! ! ! ! double ans10; ! ! ! ! ! ! ! ! doubleComplex __temp22; ! ! ! ! ! ! ! ! double* __temp23 = NULL; ! ! ! ! int ____temp23Size[2]; ! ! ! ! ! ! ! ! double ans11; ! ! ! ! ! ! ! ! double __temp24; ! ! ! ! ! ! ! ! double ans12; ! ! ! ! ! ! ! ! doubleComplex __temp25; ! ! ! ! ! ! ! ! doubleComplex __temp26; ! ! ! ! ! ! ! ! doubleComplex __temp27; ! ! ! ! ! ! ! ! double* __temp28 = NULL; ! ! ! ! int ____temp28Size[2]; ! ! ! ! ! ! ! ! double ans13; ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! !/* ! ! ! !** --------------------------------- ! ! ! !** --- End Variable Declaration. --- ! ! ! !** --------------------------------- ! ! ! !*/ ! ! ! !/* ! ! ! !** --------------- ! ! ! !** --- C code. --- ! ! ! !** --------------- ! ! ! !*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // A = [1 2 3 4 ; 5 6 7 8 ; 9 10 11 12]; ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // B = A * %i ; ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: d = %i ; ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d = z0OpEqualz0(DoubleComplex(0,1)); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: a = %pi ; ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! a = d0OpEquald0(SCI2C_PI); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: b = %e ; ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! b = d0OpEquald0(SCI2C_E); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: c = [7 8 5 ]; ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d0d0OpRcd2(7,8,__temp1); ! ! ! ! d2d0OpRcd2(__temp1, ____temp1Size,5,c); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(zeros ( a , %e )); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d0d0zerosd2(a,SCI2C_E,__temp2); ! ! ! ! ans1 = d2dispd0(__temp2, ____temp2Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(zeros ( %pi , %e)); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d0d0zerosd2(SCI2C_PI,SCI2C_E,__temp3); ! ! ! ! ans2 = d2dispd0(__temp3, ____temp3Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(zeros(c)); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d2zerosd2(c, __cSize,__temp4); ! ! ! ! ans3 = d2dispd0(__temp4, ____temp4Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(zeros ([4 5 6 ; 4 5 6]) ); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d0d0OpRcd2(4,5,__temp5); ! ! ! ! d2d0OpRcd2(__temp5, ____temp5Size,6,__temp6); ! ! ! ! d0d0OpRcd2(4,5,__temp7); ! ! ! ! d2d0OpRcd2(__temp7, ____temp7Size,6,__temp8); ! ! ! ! d2d2OpCcd2(__temp6, ____temp6Size,__temp8, ____temp8Size,__temp9)! ! ; ! ! ! ! d2zerosd2(__temp9, ____temp9Size,__temp10); ! ! ! ! ans4 = d2dispd0(__temp10, ____temp10Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(0:1:3); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d0d0d0OpColond2(0,1,3,__temp11); ! ! ! ! ans5 = d2dispd0(__temp11, ____temp11Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(1:1); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! __temp12 = d0d0OpColond0(1,1); ! ! ! ! ans6 = d0dispd0(__temp12); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(4+53*%i:0); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! __temp13 = d0z0OpStarz0(53,DoubleComplex(0,1)); ! ! ! ! __temp14 = d0z0OpPlusz0(4,__temp13); ! ! ! ! ____temp15Size[0]=1; ! ! ! ! ____temp15Size[1]=d0absd0(d0floord0(((0-z0reald0(__temp14))+1))); ! ! ! ! __temp15 = (double*) realloc(__temp15,(1)*(d0absd0(d0floord0(((0-z0! ! reald0(__temp14))+1))))*sizeof(double)); ! ! ! ! z0d0OpColond2(__temp14,0,__temp15); ! ! ! ! ans7 = d2dispd0(__temp15, ____temp15Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(2:5); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(4+3*%i:8+%i); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! d0d0OpColond2(2,5,__temp16); ! ! ! ! ans8 = d2dispd0(__temp16, ____temp16Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! __temp17 = d0z0OpStarz0(3,DoubleComplex(0,1)); ! ! ! ! __temp18 = d0z0OpPlusz0(4,__temp17); ! ! ! ! __temp19 = d0z0OpPlusz0(8,DoubleComplex(0,1)); ! ! ! ! ____temp20Size[0]=1; ! ! ! ! ____temp20Size[1]=d0absd0(d0floord0(((z0reald0(__temp19)-z0reald0(_! ! _temp18))+1))); ! ! ! ! __temp20 = (double*) realloc(__temp20,(1)*(d0absd0(d0floord0(((z0re! ! ald0(__temp19)-z0reald0(__temp18))+1))))*sizeof(double)); ! ! ! ! z0z0OpColond2(__temp18,__temp19,__temp20); ! ! ! ! ans9 = d2dispd0(__temp20, ____temp20Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(1:5:1); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(%i:%i+1:2); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! __temp21 = d0d0d0OpColond0(1,5,1); ! ! ! ! ans10 = d0dispd0(__temp21); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! __temp22 = z0d0OpPlusz0(DoubleComplex(0,1),1); ! ! ! ! ____temp23Size[0]=1; ! ! ! ! ____temp23Size[1]=d0absd0(d0floord0(((2/z0reald0(__temp22))+1))); ! ! ! ! __temp23 = (double*) realloc(__temp23,(1)*(d0absd0(d0floord0(((2/z0! ! reald0(__temp22))+1))))*sizeof(double)); ! ! ! ! z0z0d0OpColond2(DoubleComplex(0,1),__temp22,2,__temp23); ! ! ! ! ans11 = d2dispd0(__temp23, ____temp23Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(2:7:5); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: disp(4+3*%i:4:8+%i); ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: //a =4 + 53 *%i : 0 ; ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: endfunction ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! __temp24 = d0d0d0OpColond0(2,7,5); ! ! ! ! ans12 = d0dispd0(__temp24); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: //OUT(1).SZ(2)= FA_INT( ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! __temp25 = d0z0OpStarz0(3,DoubleComplex(0,1)); ! ! ! ! __temp26 = d0z0OpPlusz0(4,__temp25); ! ! ! ! __temp27 = d0z0OpPlusz0(8,DoubleComplex(0,1)); ! ! ! ! ____temp28Size[0]=1; ! ! ! ! ____temp28Size[1]=d0absd0(d0floord0((((z0reald0(__temp27)-z0reald0(! ! __temp26))/4)+1))); ! ! ! ! __temp28 = (double*) realloc(__temp28,(1)*(d0absd0(d0floord0((((z0r! ! eald0(__temp27)-z0reald0(__temp26))/4)+1))))*sizeof(double)); ! ! ! ! z0d0z0OpColond2(__temp26,4,__temp27,__temp28); ! ! ! ! ans13 = d2dispd0(__temp28, ____temp28Size); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // FA_ADD( ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // FA_DIV( ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // FA_SUB(FA_REAL(IN(3).VAL,IN(3).TP),FA_REA! ! L(IN(1).VAL, IN(3).TP)) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! ! ! ! ! ! /* ! ! ! ! ** --------------------- ! ! ! ! ** --- Free Section. --- ! ! ! ! ** --------------------- ! ! ! ! */ ! ! ! ! free(__temp15); ! ! ! ! free(__temp20); ! ! ! ! free(__temp23); ! ! ! ! free(__temp28); ! ! ! ! /* ! ! ! ! ** ------------------------- ! ! ! ! ** --- End Free Section. --- ! ! ! ! ** ------------------------- ! ! ! ! */ ! ! ! ! ! ! ! ! return(0); ! ! ! ! ! ! ! ! /*SCI2C: ##########################################################! ! ######## ! ! ! ! SCI2C: // ,FA_REAL(IN(2).VAL,IN! ! (2).TP) ! ! ! ! SCI2C: ##########################################################! ! ########*/ ! ! ! !} ! ! ! ! ! mclose(fd);