From 2a9c7982e4a41abc88c93bf9a2f0bfa6856559b6 Mon Sep 17 00:00:00 2001 From: jofret Date: Tue, 28 Apr 2009 07:11:26 +0000 Subject: Macro moved --- src/Scilab2C/HowToInstallAndUseSCI2C.txt | 27 - src/Scilab2C/Scilab2C/ASTManagement/%program_p.sci | 202 -- src/Scilab2C/Scilab2C/ASTManagement/AST2Ccode.sci | 246 -- .../ASTManagement/AST_CheckCommonInOutArgs.sci | 88 - .../Scilab2C/ASTManagement/AST_CheckLastFunc.sci | 77 - .../Scilab2C/ASTManagement/AST_CheckLineLength.sci | 29 - .../ASTManagement/AST_CheckPrecSpecifier.sci | 82 - .../Scilab2C/ASTManagement/AST_DisplayStack.sci | 42 - .../ASTManagement/AST_ExtractNameAndScope.sci | 93 - .../Scilab2C/ASTManagement/AST_GetASTFile.sci | 59 - .../Scilab2C/ASTManagement/AST_GetFuncallPrm.sci | 54 - .../ASTManagement/AST_GetPrecAndLhsArg.sci | 99 - .../Scilab2C/ASTManagement/AST_HandleEOL.sci | 62 - .../Scilab2C/ASTManagement/AST_HandleEndFor.sci | 78 - .../Scilab2C/ASTManagement/AST_HandleEndGenFun.sci | 442 --- .../ASTManagement/AST_HandleEndProgram.sci | 62 - .../Scilab2C/ASTManagement/AST_HandleEndWhile.sci | 76 - .../Scilab2C/ASTManagement/AST_HandleFor.sci | 84 - .../Scilab2C/ASTManagement/AST_HandleForStatem.sci | 87 - .../Scilab2C/ASTManagement/AST_HandleHeader.sci | 245 -- .../Scilab2C/ASTManagement/AST_HandleIfElse.sci | 92 - .../Scilab2C/ASTManagement/AST_HandleWhileExpr.sci | 80 - .../ASTManagement/AST_HandleWhileStatem.sci | 119 - .../ASTManagement/AST_ParseEqualStruct.sci | 168 - .../ASTManagement/AST_ParseFuncallStruct.sci | 116 - .../ASTManagement/AST_ParseIfExprStruct.sci | 119 - .../Scilab2C/ASTManagement/AST_ParseOperStruct.sci | 127 - .../Scilab2C/ASTManagement/AST_PopSCI2CStack.sci | 40 - .../Scilab2C/ASTManagement/AST_PushSCI2CStack.sci | 36 - .../Scilab2C/ASTManagement/AST_ReadASTHeader.sci | 90 - .../ASTManagement/AST_ReadEqualRhsNames.sci | 61 - .../Scilab2C/ASTManagement/GenOutArgNames.sci | 89 - .../Scilab2C/ASTManagement/Operator2FunName.sci | 118 - .../Scilab2C/ASTManagement/SciFile2ASTFile.sci | 36 - .../Scilab2C/CCodeGeneration/C_FinalizeCode.sci | 86 - .../Scilab2C/CCodeGeneration/C_ForExpression.sci | 212 -- .../Scilab2C/CCodeGeneration/C_Funcall.sci | 389 --- .../Scilab2C/CCodeGeneration/C_GenDeclarations.sci | 132 - .../Scilab2C/CCodeGeneration/C_GenerateFunName.sci | 45 - .../CCodeGeneration/C_GenerateLaunchScript.sci | 86 - .../CCodeGeneration/C_GenerateMakefile.sci | 93 - .../Scilab2C/CCodeGeneration/C_IfElseBlocks.sci | 68 - .../Scilab2C/CCodeGeneration/C_IfExpression.sci | 91 - .../Scilab2C/CCodeGeneration/C_IndentBlanks.sci | 31 - .../Scilab2C/CCodeGeneration/C_InitHeader.sci | 65 - .../CCodeGeneration/C_MemAllocOutTempVars.sci | 64 - .../Scilab2C/CCodeGeneration/C_SCI2CHeader.sci | 41 - src/Scilab2C/Scilab2C/CCodeGeneration/C_Type.sci | 41 - .../Scilab2C/CCodeGeneration/C_WhileExpression.sci | 90 - .../Scilab2C/CCodeGeneration/GenCFunDatFiles.sci | 73 - .../Scilab2C/CCodeGeneration/GetClsFileName.sci | 95 - .../CCodeGeneration/GetSymbolDimension.sci | 70 - .../CCodeGeneration/GetWhileCondVariable.sci | 72 - .../CCodeGeneration/JoinDeclarAndCcode.sci | 168 - .../CCodeGeneration/SCI2CMakefileTemplate.bkp | 230 -- .../CCodeGeneration/SCI2CMakefileTemplate.bkp1 | 230 -- .../CCodeGeneration/SCI2CMakefileTemplate.bkp2 | 126 - .../CCodeGeneration/SCI2CMakefileTemplate.rc | 548 ---- .../CCodeGeneration/Sci2AnnotationFile.sci | 55 - .../Scilab2C/CFiles/sci2ccode/ConvertPrecision.c | 41 - .../Scilab2C/CFiles/sci2ccode/FileManagement.c | 12 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpEqual.c | 90 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpExt.c | 11 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpIns.c | 11 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogAnd.c | 38 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogGe.c | 37 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogGt.c | 37 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogLe.c | 37 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogLt.c | 37 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogOr.c | 38 - .../Scilab2C/CFiles/sci2ccode/RealToComplex.c | 134 - .../Scilab2C/CFiles/sci2ccode/SCI2Cconvol.c | 2 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/SCI2Cfft.c | 13 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cabsa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cabss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacosa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacosha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacoshs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacoss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cadda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cadds.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/casina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/casinha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/casinhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/casins.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/catana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/catanha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/catanhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/catans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccata.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccats.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cceila.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cceils.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cchola.c | 1 - .../Scilab2C/CFiles/sci2ccode/ccolumnfftshifta.c | 1 - .../Scilab2C/CFiles/sci2ccode/ccolumnmeana.c | 1 - .../Scilab2C/CFiles/sci2ccode/ccolumnsuma.c | 1 - .../Scilab2C/CFiles/sci2ccode/ccolumnvariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconja.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconjs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconv2da.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccosa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccosha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccoshs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccoss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdeterma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdiffa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdiffs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdispa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdisps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexpa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexpma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ceyea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfftma.c | 1 - .../Scilab2C/CFiles/sci2ccode/cfftshifta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfilla.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfind2da.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfinda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfixa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfixs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfloora.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfloors.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cifftma.c | 1 - .../Scilab2C/CFiles/sci2ccode/cimplicitLists.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinfnorma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cints.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinverma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cisnana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cisnans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldiva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldivma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldivs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cleva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cleva2.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog10a.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog10s.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog1pa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog1ps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cloga.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/clogs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmeana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmula.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmulma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmuls.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/conesa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpowa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpowma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpows.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpythags.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdiva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdivma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdivs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/crounda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/crounds.c | 1 - .../Scilab2C/CFiles/sci2ccode/crowfftshifta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowmeana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowsuma.c | 1 - .../Scilab2C/CFiles/sci2ccode/crowvariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/csigna.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/csigns.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/csina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/csinha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/csinhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/csins.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cspec2a.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/cspeca.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/csqrta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/csqrts.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/csuma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctanha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctanhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctracea.c | 1 - .../Scilab2C/CFiles/sci2ccode/ctransposea.c | 1 - .../Scilab2C/CFiles/sci2ccode/cvariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/czerosa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dabsa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dabss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacosa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacosha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacoshs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacoss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dadda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dadds.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasinha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasinhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasins.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/datan2a.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/datan2s.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/datana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/datanha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/datanhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/datans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcata.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcats.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dceila.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dceils.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dchola.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dchols.c | 1 - .../Scilab2C/CFiles/sci2ccode/dcolumnfftshifta.c | 1 - .../Scilab2C/CFiles/sci2ccode/dcolumnmaxa.c | 1 - .../Scilab2C/CFiles/sci2ccode/dcolumnmeana.c | 1 - .../Scilab2C/CFiles/sci2ccode/dcolumnmina.c | 1 - .../Scilab2C/CFiles/sci2ccode/dcolumnsuma.c | 1 - .../Scilab2C/CFiles/sci2ccode/dcolumnvariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dconv2da.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dconva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcosa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcosha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcoshs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcoss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddeterma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddiffa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddiffs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddispa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddisps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/deyea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfft2.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftbi.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftmx.c | 1 - .../Scilab2C/CFiles/sci2ccode/dfftshifta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfilla.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfind2da.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfinda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfixa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfixs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfloora.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfloors.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfrexps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/difft2.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftbi.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftmx.c | 1 - .../Scilab2C/CFiles/sci2ccode/dimplicitLists.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinfnorma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dints.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinverma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/disnana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/disnans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldiva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldivma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldivs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dleva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dleva2.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlnp1m1s.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog10a.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog10s.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog1pa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog1ps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dloga.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlogs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmaxa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmeana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmula.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmulma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmuls.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/donesa.c | 1 - .../Scilab2C/CFiles/sci2ccode/doubleComplex.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpowa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpowma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpows.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpythags.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdiva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdivma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdivs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/drounda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/drounds.c | 1 - .../Scilab2C/CFiles/sci2ccode/drowfftshifta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmaxa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmeana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowsuma.c | 1 - .../Scilab2C/CFiles/sci2ccode/drowvariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsigna.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsigns.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsinha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsinhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsins.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dspec2a.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dspeca.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsqrta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsqrts.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsuma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtanha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtanhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtracea.c | 1 - .../Scilab2C/CFiles/sci2ccode/dtransposea.c | 1 - .../Scilab2C/CFiles/sci2ccode/dvariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/dzerosa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/fft842.c | 1 - .../Scilab2C/CFiles/sci2ccode/floatComplex.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ifft842.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir2tx.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir4tx.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir8tx.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/r2tx.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/r4tx.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/r8tx.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sabsa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sabss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacosa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacosha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacoshs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacoss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sadda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sadds.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasinha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasinhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasins.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/satan2a.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/satan2s.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/satana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/satanha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/satanhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/satans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/scata.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/scats.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sceila.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sceils.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/schola.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/schols.c | 1 - .../Scilab2C/CFiles/sci2ccode/scolumnfftshifta.c | 1 - .../Scilab2C/CFiles/sci2ccode/scolumnmaxa.c | 1 - .../Scilab2C/CFiles/sci2ccode/scolumnmeana.c | 1 - .../Scilab2C/CFiles/sci2ccode/scolumnmina.c | 1 - .../Scilab2C/CFiles/sci2ccode/scolumnsuma.c | 1 - .../Scilab2C/CFiles/sci2ccode/scolumnvariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sconv2da.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sconva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/scosa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/scosha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/scoshs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/scoss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdeterma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdiffa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdiffs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdispa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdisps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexpa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexpma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/seyea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfftma.c | 1 - .../Scilab2C/CFiles/sci2ccode/sfftshifta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfilla.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfind2da.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfinda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfixa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfixs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfloora.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfloors.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfrexps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sifftma.c | 1 - .../Scilab2C/CFiles/sci2ccode/simplicitLists.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinfnorma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sints.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinverma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sisnana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sisnans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldiva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldivma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldivs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sleva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sleva2.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/slnp1m1s.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog10a.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog10s.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog1pa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog1ps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sloga.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/slogs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/smaxa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/smeana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/smina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/smula.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/smulma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/smuls.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sonesa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/spowa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/spowma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/spows.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/spythags.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdiva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdivma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdivs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/srounda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/srounds.c | 1 - .../Scilab2C/CFiles/sci2ccode/srowfftshifta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmaxa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmeana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowsuma.c | 1 - .../Scilab2C/CFiles/sci2ccode/srowvariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssigna.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssigns.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssinha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssinhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssins.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sspec2a.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/sspeca.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssqrta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssqrts.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssuma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/stana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/stanha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/stanhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/stans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/stracea.c | 1 - .../Scilab2C/CFiles/sci2ccode/stransposea.c | 1 - .../Scilab2C/CFiles/sci2ccode/svariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/szerosa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zabsa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zabss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacosa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacosha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacoshs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacoss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zadda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zadds.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasinha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasinhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasins.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatanha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatanhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcata.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcats.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zceila.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zceils.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zchola.c | 1 - .../Scilab2C/CFiles/sci2ccode/zcolumnfftshifta.c | 1 - .../Scilab2C/CFiles/sci2ccode/zcolumnmeana.c | 1 - .../Scilab2C/CFiles/sci2ccode/zcolumnsuma.c | 1 - .../Scilab2C/CFiles/sci2ccode/zcolumnvariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconja.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconjs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconv2da.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcosa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcosha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcoshs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcoss.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdeterma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdiffa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdiffs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdispa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdisps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexpa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexpma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zeyea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfftma.c | 1 - .../Scilab2C/CFiles/sci2ccode/zfftshifta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfilla.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfind2da.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfinda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfixa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfixs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfloora.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfloors.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zifftma.c | 1 - .../Scilab2C/CFiles/sci2ccode/zimplicitLists.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinfnorma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zints.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinverma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zisnana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zisnans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldiva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldivma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldivs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zleva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zleva2.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog10a.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog10s.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog1pa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog1ps.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zloga.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlogs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmeana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmula.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmulma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmuls.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zonesa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpowa.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpowma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpows.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpythags.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdiva.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdivma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdivs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrounda.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrounds.c | 1 - .../Scilab2C/CFiles/sci2ccode/zrowfftshifta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowmeana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowsuma.c | 1 - .../Scilab2C/CFiles/sci2ccode/zrowvariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsigna.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsigns.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsina.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsinha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsinhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsins.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zspec2a.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zspeca.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsqrta.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsqrts.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsuma.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztana.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztanha.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztanhs.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztans.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztracea.c | 1 - .../Scilab2C/CFiles/sci2ccode/ztransposea.c | 1 - .../Scilab2C/CFiles/sci2ccode/zvariancea.c | 1 - src/Scilab2C/Scilab2C/CFiles/sci2ccode/zzerosa.c | 1 - .../CFiles/sci2cincludes/ConvertPrecision.h | 18 - .../Scilab2C/CFiles/sci2cincludes/FileManagement.h | 13 - .../Scilab2C/CFiles/sci2cincludes/OpEqual.h | 33 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpExt.h | 108 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpIns.h | 352 -- .../Scilab2C/CFiles/sci2cincludes/OpLogAnd.h | 23 - .../Scilab2C/CFiles/sci2cincludes/OpLogEq.h | 94 - .../Scilab2C/CFiles/sci2cincludes/OpLogGe.h | 36 - .../Scilab2C/CFiles/sci2cincludes/OpLogGt.h | 37 - .../Scilab2C/CFiles/sci2cincludes/OpLogLe.h | 37 - .../Scilab2C/CFiles/sci2cincludes/OpLogLt.h | 35 - .../Scilab2C/CFiles/sci2cincludes/OpLogNe.h | 98 - .../Scilab2C/CFiles/sci2cincludes/OpLogNot.h | 42 - .../Scilab2C/CFiles/sci2cincludes/OpLogOr.h | 23 - .../Scilab2C/CFiles/sci2cincludes/RealToComplex.h | 33 - .../CFiles/sci2cincludes/SCI2CMacroInterface.h | 281 -- .../Scilab2C/CFiles/sci2cincludes/SCI2Cconvol.h | 15 - .../Scilab2C/CFiles/sci2cincludes/SCI2Cfft.h | 16 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/abs.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/acos.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/acosh.h | 1 - .../Scilab2C/CFiles/sci2cincludes/addition.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/asin.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/asinh.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atan.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atan2.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atanh.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/blas.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cat.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ceil.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/chol.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conj.h | 1 - .../Scilab2C/CFiles/sci2cincludes/constant.h | 27 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conv.h | 1 - .../Scilab2C/CFiles/sci2cincludes/conv2d.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cos.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cosh.h | 1 - .../Scilab2C/CFiles/sci2cincludes/determ.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/disp.h | 1 - .../Scilab2C/CFiles/sci2cincludes/division.h | 1 - .../Scilab2C/CFiles/sci2cincludes/doubleComplex.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/exp.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/eye.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fft.h | 1 - .../Scilab2C/CFiles/sci2cincludes/fft_internal.h | 1 - .../Scilab2C/CFiles/sci2cincludes/fftshift.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fill.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/find.h | 1 - .../Scilab2C/CFiles/sci2cincludes/find2d.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fix.h | 1 - .../Scilab2C/CFiles/sci2cincludes/floatComplex.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/floor.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/frexp.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ifft.h | 1 - .../Scilab2C/CFiles/sci2cincludes/ifft_internal.h | 1 - .../Scilab2C/CFiles/sci2cincludes/implicitList.h | 1 - .../Scilab2C/CFiles/sci2cincludes/infiniteNorm.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/int.h | 1 - .../Scilab2C/CFiles/sci2cincludes/isempty.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/isnan.h | 1 - .../Scilab2C/CFiles/sci2cincludes/lapack.h | 1 - .../Scilab2C/CFiles/sci2cincludes/length.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lev.h | 1 - .../Scilab2C/CFiles/sci2cincludes/lnp1m1.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log10.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log1p.h | 1 - .../Scilab2C/CFiles/sci2cincludes/machine.h.in | 141 - .../Scilab2C/CFiles/sci2cincludes/matrixDivision.h | 1 - .../CFiles/sci2cincludes/matrixExponential.h | 1 - .../CFiles/sci2cincludes/matrixInversion.h | 1 - .../CFiles/sci2cincludes/matrixMultiplication.h | 1 - .../Scilab2C/CFiles/sci2cincludes/matrixPow.h | 1 - .../Scilab2C/CFiles/sci2cincludes/matrixTrace.h | 1 - .../CFiles/sci2cincludes/matrixTranspose.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/max.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/mean.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/min.h | 1 - .../Scilab2C/CFiles/sci2cincludes/multiplication.h | 1 - .../Scilab2C/CFiles/sci2cincludes/notFound.h | 18 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ones.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/pow.h | 1 - .../Scilab2C/CFiles/sci2cincludes/pythag.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/round.h | 1 - .../Scilab2C/CFiles/sci2cincludes/sci2clib.h | 264 -- src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sign.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sin.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sinh.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/size.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/spec.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sqrt.h | 1 - .../Scilab2C/CFiles/sci2cincludes/statMax.h | 1 - .../Scilab2C/CFiles/sci2cincludes/statMin.h | 1 - .../Scilab2C/CFiles/sci2cincludes/subtraction.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sum.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/tan.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/tanh.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/type.h | 1 - .../Scilab2C/CFiles/sci2cincludes/variance.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cincludes/zeros.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_OpApex.h | 1 - .../CFiles/sci2cinterfaces/int_OpBackSlash.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_OpCc.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_OpColon.h | 1 - .../CFiles/sci2cinterfaces/int_OpDotApex.h | 1 - .../CFiles/sci2cinterfaces/int_OpDotBackSlash.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_OpDotHat.h | 1 - .../CFiles/sci2cinterfaces/int_OpDotSlash.h | 1 - .../CFiles/sci2cinterfaces/int_OpDotStar.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_OpHat.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_OpMinus.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_OpPlus.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_OpRc.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_OpSlash.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_OpStar.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_abs.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_acos.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_acosh.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_asin.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_asinh.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_atan.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_atanh.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_ceil.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_chol.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_conj.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_convol.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_cos.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_cosh.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_det.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_disp.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_exp.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_expm.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_eye.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_fft.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_fftshift.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_find.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_fix.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_floor.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_ifft.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_imag.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_int.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_invert.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_isempty.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_isnan.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_length.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_lev.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_log.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_log10.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_log1p.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_max.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_mean.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_min.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_ones.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_real.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_round.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_sign.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_sin.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_sinh.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_size.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_spec.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_sqrt.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_sum.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_tan.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_tanh.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_trace.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_type.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_variance.h | 1 - .../Scilab2C/CFiles/sci2cinterfaces/int_zeros.h | 1 - src/Scilab2C/Scilab2C/CFiles/sci2cobj/readme.txt | 2 - src/Scilab2C/Scilab2C/ErrorMessages/EM_NanSize.sci | 82 - .../Scilab2C/ErrorMessages/EM_UnknownStep.sci | 70 - .../Scilab2C/ErrorMessages/EM_ZeroSize.sci | 27 - .../Scilab2C/FunctionAnnotation/FA_ADD.sci | 43 - .../Scilab2C/FunctionAnnotation/FA_DIV.sci | 41 - .../FunctionAnnotation/FA_GetDefaultPrecision.sci | 86 - .../Scilab2C/FunctionAnnotation/FA_GetFunAnn.sci | 206 -- .../FunctionAnnotation/FA_GetOutArgInfo.sci | 142 - .../FunctionAnnotation/FA_GetResizeApproach.sci | 79 - .../Scilab2C/FunctionAnnotation/FA_INT.sci | 40 - .../Scilab2C/FunctionAnnotation/FA_MAX.sci | 51 - .../Scilab2C/FunctionAnnotation/FA_MUL.sci | 42 - .../Scilab2C/FunctionAnnotation/FA_SUB.sci | 41 - .../Scilab2C/FunctionAnnotation/FA_SZ_1.sci | 20 - .../Scilab2C/FunctionAnnotation/FA_SZ_2.sci | 20 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPAPEX.sci | 26 - .../FunctionAnnotation/FA_SZ_OPBACKSLASH.sci | 39 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPCC.sci | 40 - .../FunctionAnnotation/FA_SZ_OPDOTAPEX.sci | 16 - .../FunctionAnnotation/FA_SZ_OPDOTBACKSLASH.sci | 16 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPDOTHAT.sci | 43 - .../FunctionAnnotation/FA_SZ_OPDOTSLASH.sci | 16 - .../FunctionAnnotation/FA_SZ_OPDOTSTAR.sci | 32 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPHAT.sci | 43 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPLOGAND.sci | 16 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPLOGEQ.sci | 16 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPLOGGE.sci | 16 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPLOGGT.sci | 16 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPLOGLE.sci | 16 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPLOGLT.sci | 16 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPLOGNE.sci | 16 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPLOGNOT.sci | 16 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPLOGOR.sci | 16 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPMINUS.sci | 51 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPPLUS.sci | 93 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPPLUSA.sci | 66 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPRC.sci | 40 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPSLASH.sci | 45 - .../Scilab2C/FunctionAnnotation/FA_SZ_OPSTAR.sci | 68 - .../Scilab2C/FunctionAnnotation/FA_SZ_SEL1.sci | 44 - .../Scilab2C/FunctionAnnotation/FA_SZ_SEL2.sci | 44 - .../Scilab2C/FunctionAnnotation/FA_TP_C.sci | 32 - .../Scilab2C/FunctionAnnotation/FA_TP_COMPLEX.sci | 42 - .../Scilab2C/FunctionAnnotation/FA_TP_D.sci | 32 - .../Scilab2C/FunctionAnnotation/FA_TP_I.sci | 32 - .../Scilab2C/FunctionAnnotation/FA_TP_MAX.sci | 45 - .../Scilab2C/FunctionAnnotation/FA_TP_MIN_REAL.sci | 35 - .../Scilab2C/FunctionAnnotation/FA_TP_REAL.sci | 38 - .../Scilab2C/FunctionAnnotation/FA_TP_S.sci | 32 - .../Scilab2C/FunctionAnnotation/FA_TP_USER.sci | 38 - .../Scilab2C/FunctionAnnotation/FA_TP_Z.sci | 32 - .../Scilab2C/FunctionList/FL_ExistCFunction.sci | 106 - .../Scilab2C/FunctionList/FL_ExtractFuncList.sci | 62 - .../Scilab2C/FunctionList/FL_GetFunctionClass.sci | 54 - .../FunctionList/FL_InOutArgs2CFunNames.sci | 52 - .../Scilab2C/FunctionList/FL_UpdateConverted.sci | 46 - .../Scilab2C/FunctionList/FL_UpdateToBeConv.sci | 114 - .../Scilab2C/GeneralFunctions/Array2String.sci | 40 - .../Scilab2C/GeneralFunctions/ConvertPathMat2C.sci | 61 - .../Scilab2C/GeneralFunctions/File2StringArray.sci | 54 - .../GeneralFunctions/FunName2SciFileName.sci | 56 - .../Scilab2C/GeneralFunctions/IsNanSize.sci | 39 - .../GeneralFunctions/KeyStr2FileStrPos.sci | 83 - .../Scilab2C/GeneralFunctions/PrintStepInfo.sci | 67 - .../Scilab2C/GeneralFunctions/PrintStringInfo.sci | 65 - .../Scilab2C/GeneralFunctions/ReadStringCard.sci | 61 - .../Scilab2C/GeneralFunctions/SCI2CCreateDir.sci | 31 - .../Scilab2C/GeneralFunctions/SCI2CFindFile.sci | 41 - .../Scilab2C/GeneralFunctions/SCI2CNInArgCheck.sci | 28 - .../GeneralFunctions/SCI2COpenFileRead.sci | 30 - .../GeneralFunctions/SCI2COpenFileWrite.sci | 30 - .../Scilab2C/GeneralFunctions/SCI2CTemplate.sci | 32 - .../Scilab2C/GeneralFunctions/SCI2Ccopyfile.sci | 49 - .../Scilab2C/GeneralFunctions/SCI2Cerror.sci | 28 - .../Scilab2C/GeneralFunctions/SCI2CerrorFile.sci | 29 - .../Scilab2C/GeneralFunctions/SCI2Cfileexist.sci | 38 - .../Scilab2C/GeneralFunctions/SCI2Cflipud.sci | 40 - .../Scilab2C/GeneralFunctions/SCI2Cisnum.sci | 30 - .../Scilab2C/GeneralFunctions/SCI2Cmdelete.sci | 33 - .../Scilab2C/GeneralFunctions/SCI2Cresize.sci | 33 - .../Scilab2C/GeneralFunctions/SCI2Cstring.sci | 34 - .../Scilab2C/GeneralFunctions/SCI2Cstrncmp.sci | 27 - .../GeneralFunctions/SCI2Cstrncmps1size.sci | 32 - .../Scilab2C/GeneralFunctions/SizeInByte.sci | 41 - src/Scilab2C/Scilab2C/GeneralFunctions/dispina.sci | 31 - .../Scilab2C/GeneralFunctions/filenamefprintf.sci | 43 - src/Scilab2C/Scilab2C/GeneralFunctions/float.sci | 26 - .../Scilab2C/GeneralFunctions/squeezestrings.sci | 31 - src/Scilab2C/Scilab2C/LaunchMultiRunSCI2C.sci | 80 - src/Scilab2C/Scilab2C/LaunchRunSCI2C.sci | 37 - .../Scilab2C/SymbolTable/ST_AnalyzeScope.sci | 124 - src/Scilab2C/Scilab2C/SymbolTable/ST_Del.sci | 41 - src/Scilab2C/Scilab2C/SymbolTable/ST_FindPos.sci | 46 - src/Scilab2C/Scilab2C/SymbolTable/ST_Get.sci | 66 - .../Scilab2C/SymbolTable/ST_GetInArgInfo.sci | 159 - .../Scilab2C/SymbolTable/ST_GetSymbolInfo.sci | 99 - .../Scilab2C/SymbolTable/ST_InsForCntVars.sci | 191 -- src/Scilab2C/Scilab2C/SymbolTable/ST_InsOutArg.sci | 187 -- src/Scilab2C/Scilab2C/SymbolTable/ST_Load.sci | 36 - .../Scilab2C/SymbolTable/ST_MatchSymbol.sci | 70 - src/Scilab2C/Scilab2C/SymbolTable/ST_Save.sci | 44 - src/Scilab2C/Scilab2C/SymbolTable/ST_Set.sci | 49 - .../ToolInitialization/INIT_CreateDirs.sci | 65 - .../ToolInitialization/INIT_FillSCI2LibCDirs.sci | 3360 -------------------- .../ToolInitialization/INIT_GenAnnFLFunctions.sci | 28 - .../ToolInitialization/INIT_GenFileInfo.sci | 110 - .../ToolInitialization/INIT_GenLibraries.sci | 61 - .../ToolInitialization/INIT_GenSharedInfo.sci | 118 - .../ToolInitialization/INIT_LoadLibraries.sci | 64 - .../ToolInitialization/INIT_RemoveDirs.sci | 65 - .../Scilab2C/ToolInitialization/INIT_SCI2C.sci | 144 - .../ToolInitialization/INIT_SCI2CLoader.sce | 72 - .../ToolInitialization/INIT_SharedInfoEqual.sci | 43 - .../ToolInitialization/ManageNextConversion.sci | 87 - .../ToolInitialization/SCI2CInputParameters.bkp | 87 - .../ToolInitialization/SCI2CInputParameters.sce | 87 - .../ToolInitialization/UpdateSCI2CInfo.sci | 203 -- .../Scilab2C/ToolInitialization/doublecomplex.sci | 26 - .../Scilab2C/ToolInitialization/floatcomplex.sci | 26 - src/Scilab2C/Scilab2C/findDeps/Scilab2CDeps.sci | 748 ----- src/Scilab2C/Scilab2C/findDeps/findDeps.sci | 44 - src/Scilab2C/Scilab2C/full_reset.sce | 22 - src/Scilab2C/Scilab2C/runsci2c.sci | 103 - src/Scilab2C/Scilab2C/runscicode.sci | 64 - 828 files changed, 20385 deletions(-) delete mode 100644 src/Scilab2C/HowToInstallAndUseSCI2C.txt delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/%program_p.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST2Ccode.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_CheckCommonInOutArgs.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_CheckLastFunc.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_CheckLineLength.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_CheckPrecSpecifier.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_DisplayStack.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_ExtractNameAndScope.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_GetASTFile.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_GetFuncallPrm.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_GetPrecAndLhsArg.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEOL.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndFor.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndGenFun.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndProgram.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndWhile.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_HandleFor.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_HandleForStatem.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_HandleHeader.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_HandleIfElse.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_HandleWhileExpr.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_HandleWhileStatem.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_ParseEqualStruct.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_ParseFuncallStruct.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_ParseIfExprStruct.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_ParseOperStruct.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_PopSCI2CStack.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_PushSCI2CStack.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_ReadASTHeader.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/AST_ReadEqualRhsNames.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/GenOutArgNames.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/Operator2FunName.sci delete mode 100644 src/Scilab2C/Scilab2C/ASTManagement/SciFile2ASTFile.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_FinalizeCode.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_ForExpression.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_Funcall.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_GenDeclarations.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateFunName.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateLaunchScript.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateMakefile.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_IfElseBlocks.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_IfExpression.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_IndentBlanks.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_InitHeader.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_MemAllocOutTempVars.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_SCI2CHeader.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_Type.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/C_WhileExpression.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/GenCFunDatFiles.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/GetClsFileName.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/GetSymbolDimension.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/GetWhileCondVariable.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/JoinDeclarAndCcode.sci delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp1 delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp2 delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.rc delete mode 100644 src/Scilab2C/Scilab2C/CCodeGeneration/Sci2AnnotationFile.sci delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ConvertPrecision.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/FileManagement.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpEqual.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpExt.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpIns.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogAnd.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogGe.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogGt.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogLe.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogLt.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogOr.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/RealToComplex.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/SCI2Cconvol.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2ccode/SCI2Cfft.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cabsa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cabss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacosa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacosha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacoshs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacoss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cadda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cadds.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/casina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/casinha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/casinhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/casins.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/catana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/catanha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/catanhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/catans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccata.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccats.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cceila.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cceils.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cchola.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnmeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnsuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnvariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconja.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconjs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconv2da.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccosa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccosha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccoshs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccoss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdeterma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdiffa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdiffs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdispa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdisps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexpa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexpma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ceyea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfftma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfilla.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfind2da.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfinda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfixa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfixs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfloora.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfloors.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cifftma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cimplicitLists.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinfnorma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cints.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinverma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cisnana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cisnans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldiva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldivma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldivs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cleva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cleva2.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog10a.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog10s.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog1pa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog1ps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cloga.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/clogs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmula.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmulma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmuls.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/conesa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpowa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpowma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpows.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpythags.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdiva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdivma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdivs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/crounda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/crounds.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowmeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowsuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowvariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/csigna.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/csigns.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/csina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/csinha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/csinhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/csins.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cspec2a.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cspeca.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/csqrta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/csqrts.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/csuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctanha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctanhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctracea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctransposea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/cvariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/czerosa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dabsa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dabss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacosa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacosha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacoshs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacoss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dadda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dadds.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasinha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasinhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasins.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/datan2a.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/datan2s.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/datana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/datanha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/datanhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/datans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcata.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcats.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dceila.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dceils.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dchola.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dchols.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmaxa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnsuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnvariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dconv2da.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dconva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcosa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcosha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcoshs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcoss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddeterma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddiffa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddiffs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddispa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddisps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/deyea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfft2.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftbi.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftmx.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfilla.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfind2da.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfinda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfixa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfixs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfloora.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfloors.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfrexps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/difft2.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftbi.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftmx.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dimplicitLists.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinfnorma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dints.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinverma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/disnana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/disnans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldiva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldivma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldivs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dleva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dleva2.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlnp1m1s.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog10a.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog10s.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog1pa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog1ps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dloga.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlogs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmaxa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmula.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmulma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmuls.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/donesa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/doubleComplex.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpowa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpowma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpows.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpythags.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdiva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdivma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdivs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/drounda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/drounds.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmaxa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowsuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowvariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsigna.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsigns.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsinha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsinhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsins.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dspec2a.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dspeca.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsqrta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsqrts.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtanha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtanhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtracea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtransposea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dvariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/dzerosa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/fft842.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/floatComplex.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ifft842.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir2tx.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir4tx.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir8tx.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/r2tx.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/r4tx.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/r8tx.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sabsa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sabss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacosa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacosha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacoshs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacoss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sadda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sadds.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasinha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasinhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasins.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/satan2a.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/satan2s.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/satana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/satanha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/satanhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/satans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scata.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scats.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sceila.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sceils.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/schola.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/schols.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmaxa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnsuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnvariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sconv2da.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sconva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scosa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scosha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scoshs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/scoss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdeterma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdiffa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdiffs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdispa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdisps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexpa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexpma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/seyea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfftma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfilla.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfind2da.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfinda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfixa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfixs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfloora.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfloors.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfrexps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sifftma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/simplicitLists.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinfnorma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sints.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinverma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sisnana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sisnans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldiva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldivma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldivs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sleva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sleva2.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/slnp1m1s.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog10a.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog10s.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog1pa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog1ps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sloga.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/slogs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/smaxa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/smeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/smina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/smula.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/smulma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/smuls.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sonesa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/spowa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/spowma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/spows.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/spythags.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdiva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdivma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdivs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/srounda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/srounds.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmaxa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowsuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowvariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssigna.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssigns.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssinha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssinhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssins.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sspec2a.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/sspeca.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssqrta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssqrts.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/stana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/stanha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/stanhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/stans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/stracea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/stransposea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/svariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/szerosa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zabsa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zabss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacosa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacosha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacoshs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacoss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zadda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zadds.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasinha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasinhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasins.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatanha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatanhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcata.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcats.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zceila.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zceils.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zchola.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnmeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnsuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnvariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconja.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconjs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconv2da.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcosa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcosha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcoshs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcoss.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdeterma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdiffa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdiffs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdispa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdisps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexpa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexpma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zeyea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfftma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfilla.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfind2da.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfinda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfixa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfixs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfloora.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfloors.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zifftma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zimplicitLists.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinfnorma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zints.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinverma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zisnana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zisnans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldiva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldivma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldivs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zleva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zleva2.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog10a.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog10s.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog1pa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog1ps.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zloga.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlogs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmula.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmulma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmuls.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zonesa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpowa.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpowma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpows.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpythags.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdiva.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdivma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdivs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrounda.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrounds.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowfftshifta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowmeana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowsuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowvariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsigna.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsigns.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsina.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsinha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsinhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsins.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zspec2a.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zspeca.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsqrta.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsqrts.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsuma.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztana.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztanha.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztanhs.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztans.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztracea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztransposea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zvariancea.c delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2ccode/zzerosa.c delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ConvertPrecision.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/FileManagement.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpEqual.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpExt.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpIns.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpLogAnd.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpLogEq.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpLogGe.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpLogGt.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpLogLe.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpLogLt.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpLogNe.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpLogNot.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpLogOr.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/RealToComplex.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/SCI2CMacroInterface.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/SCI2Cconvol.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/SCI2Cfft.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/abs.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/acos.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/acosh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/addition.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/asin.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/asinh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atan.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atan2.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atanh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/blas.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cat.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ceil.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/chol.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conj.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/constant.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conv.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conv2d.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cos.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cosh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/determ.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/disp.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/division.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/doubleComplex.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/exp.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/eye.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fft.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fft_internal.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fftshift.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fill.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/find.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/find2d.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fix.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/floatComplex.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/floor.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/frexp.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ifft.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ifft_internal.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/implicitList.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/infiniteNorm.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/int.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/isempty.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/isnan.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lapack.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/length.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lev.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lnp1m1.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log10.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log1p.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/machine.h.in delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixDivision.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixExponential.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixInversion.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixMultiplication.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixPow.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixTrace.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixTranspose.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/max.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/mean.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/min.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/multiplication.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/notFound.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ones.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/pow.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/pythag.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/round.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sci2clib.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sign.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sin.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sinh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/size.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/spec.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sqrt.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/statMax.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/statMin.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/subtraction.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sum.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/tan.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/tanh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/type.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/variance.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cincludes/zeros.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpApex.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpBackSlash.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpCc.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpColon.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotApex.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotBackSlash.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotHat.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotSlash.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotStar.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpHat.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpMinus.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpPlus.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpRc.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpSlash.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpStar.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_abs.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_acos.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_acosh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_asin.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_asinh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_atan.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_atanh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ceil.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_chol.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_conj.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_convol.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_cos.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_cosh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_det.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_disp.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_exp.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_expm.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_eye.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fft.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fftshift.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_find.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fix.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_floor.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ifft.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_imag.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_int.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_invert.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_isempty.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_isnan.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_length.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_lev.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log10.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log1p.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_max.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_mean.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_min.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ones.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_real.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_round.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sign.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sin.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sinh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_size.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_spec.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sqrt.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sum.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_tan.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_tanh.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_trace.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_type.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_variance.h delete mode 120000 src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_zeros.h delete mode 100644 src/Scilab2C/Scilab2C/CFiles/sci2cobj/readme.txt delete mode 100644 src/Scilab2C/Scilab2C/ErrorMessages/EM_NanSize.sci delete mode 100644 src/Scilab2C/Scilab2C/ErrorMessages/EM_UnknownStep.sci delete mode 100644 src/Scilab2C/Scilab2C/ErrorMessages/EM_ZeroSize.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_ADD.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_DIV.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetDefaultPrecision.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetFunAnn.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetOutArgInfo.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetResizeApproach.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_INT.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_MAX.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_MUL.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SUB.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_1.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_2.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPAPEX.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPBACKSLASH.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPCC.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTAPEX.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTBACKSLASH.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTHAT.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTSLASH.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTSTAR.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPHAT.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGAND.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGEQ.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGGE.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGGT.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGLE.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGLT.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGNE.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGNOT.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGOR.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPMINUS.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPPLUS.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPPLUSA.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPRC.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPSLASH.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPSTAR.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_SEL1.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_SEL2.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_C.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_COMPLEX.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_D.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_I.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_MAX.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_MIN_REAL.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_REAL.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_S.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_USER.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_Z.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionList/FL_ExistCFunction.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionList/FL_ExtractFuncList.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionList/FL_GetFunctionClass.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionList/FL_InOutArgs2CFunNames.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionList/FL_UpdateConverted.sci delete mode 100644 src/Scilab2C/Scilab2C/FunctionList/FL_UpdateToBeConv.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/Array2String.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/ConvertPathMat2C.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/File2StringArray.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/FunName2SciFileName.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/IsNanSize.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/KeyStr2FileStrPos.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/PrintStepInfo.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/PrintStringInfo.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/ReadStringCard.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CCreateDir.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CFindFile.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CNInArgCheck.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2COpenFileRead.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2COpenFileWrite.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CTemplate.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Ccopyfile.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cerror.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CerrorFile.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cfileexist.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cflipud.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cisnum.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cmdelete.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cresize.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstring.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstrncmp.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstrncmps1size.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/SizeInByte.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/dispina.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/filenamefprintf.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/float.sci delete mode 100644 src/Scilab2C/Scilab2C/GeneralFunctions/squeezestrings.sci delete mode 100644 src/Scilab2C/Scilab2C/LaunchMultiRunSCI2C.sci delete mode 100644 src/Scilab2C/Scilab2C/LaunchRunSCI2C.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_AnalyzeScope.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_Del.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_FindPos.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_Get.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_GetInArgInfo.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_GetSymbolInfo.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_InsForCntVars.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_InsOutArg.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_Load.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_MatchSymbol.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_Save.sci delete mode 100644 src/Scilab2C/Scilab2C/SymbolTable/ST_Set.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/INIT_CreateDirs.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/INIT_FillSCI2LibCDirs.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenAnnFLFunctions.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenFileInfo.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenLibraries.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenSharedInfo.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/INIT_LoadLibraries.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/INIT_RemoveDirs.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/INIT_SCI2C.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/INIT_SCI2CLoader.sce delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/INIT_SharedInfoEqual.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/ManageNextConversion.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/SCI2CInputParameters.bkp delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/SCI2CInputParameters.sce delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/UpdateSCI2CInfo.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/doublecomplex.sci delete mode 100644 src/Scilab2C/Scilab2C/ToolInitialization/floatcomplex.sci delete mode 100644 src/Scilab2C/Scilab2C/findDeps/Scilab2CDeps.sci delete mode 100644 src/Scilab2C/Scilab2C/findDeps/findDeps.sci delete mode 100644 src/Scilab2C/Scilab2C/full_reset.sce delete mode 100644 src/Scilab2C/Scilab2C/runsci2c.sci delete mode 100644 src/Scilab2C/Scilab2C/runscicode.sci diff --git a/src/Scilab2C/HowToInstallAndUseSCI2C.txt b/src/Scilab2C/HowToInstallAndUseSCI2C.txt deleted file mode 100644 index ec08ab42..00000000 --- a/src/Scilab2C/HowToInstallAndUseSCI2C.txt +++ /dev/null @@ -1,27 +0,0 @@ ----------------------------- ---- HOW TO INSTALL SCI2C --- ----------------------------- -1. Install scilab-4.1.2.exe - -2. Configure the following two parameters in Scilab2C/LaunchRunSCI2C.sci: - SCI2CDirectory - SCI2CInputPrmFileName - -3. Configure the following parameters in SCI2CTests\test999_WorkingDir\SCI2CInputParameters.sce - UserSciCodeMainDir - CCompilerPathStyle - Sci2CLibMainHeaderFName - ------------------------- ---- HOW TO USE SCI2C --- ------------------------- -4. Edit mainfunction.sci according to the scilab algorithm to be converted into C - -5. Start SCI2C conversion typing the following command in the Scilab workspace: - mclose('all'); cd ; exec LaunchRunSCI2C.sci - -6. Compile/Execute C code by using the makefile created in SCI2CTests\test999_WorkingDir\C_Code - -7. Compare the results with the Scilab execution by typing again - mclose('all'); cd ; exec LaunchRunSCI2C.sci - (answer n when the SCI2C attempts to convert again the scilab code) diff --git a/src/Scilab2C/Scilab2C/ASTManagement/%program_p.sci b/src/Scilab2C/Scilab2C/ASTManagement/%program_p.sci deleted file mode 100644 index 931f1f17..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/%program_p.sci +++ /dev/null @@ -1,202 +0,0 @@ -function %program_p(p) - //overloading function for "program" type tlist display - mprintf("%s\n",string(p)) -endfunction - -function txt=%program_string(p) -//overloading function for "program" type tlist string function -//main (root) node of the Abstract Formal Tree -//fields: -// name : string (the function name) -// outputs : list of "variable" type tlist (the output arg names) -// inputs : list of "variable" type tlist (the intput arg names) -// statements: list of "equal" type tlist and list('EOL') (the -// instructions list) -// nblines : number (the number of lines in the scilab function) - txt=['Program' - 'Name : '+p.name - 'Outputs: '+strcat(objectlist2string(p.outputs),' ') - 'Inputs : '+strcat(objectlist2string(p.inputs),' ') - 'Statements ' - ' '+objectlist2string(p.statements) - 'EndProgram' - ] -endfunction - - -function txt=%equal_string(e) -//overloading function for "equal" type tlist string function -//this is a node of the AST - -//fields: -// expression: "expression" type tlist (the right hand side) -// lhs : list of "variable" type tlist and "operation" type tlist // (the assignment) -// endsymbol : string (the orginal end-of-instruction symbol (, ; )) - txt=['Equal' - ' Expression: ' - ' '+string(e.expression) - ' Lhs : ' - ' '+objectlist2string(e.lhs) - 'EndEqual' - ] -endfunction - - -function txt=%for_string(F) -//overloading function for "for" type tlist string function -//this is a node of the AST -//fields: -// expression : "expression" type tlist (the loop expression) -// statements : list of "equal" type tlist and list('EOL') (the -// for instructions list) -//NUT: raf cambiato ForExpression e ForStatements - txt=['For' - ' ForExpression:' - ' '+string(F.expression) - ' ForStatements:' - ' '+objectlist2string(F.statements) - 'EndFor'] -endfunction - -function txt=%while_string(W) -//overloading function for "while" type tlist string function -//this is a node of the AST -//fields: -// expression : "expression" type tlist (the loop expression) -// statements : list of "equal" type tlist and list('EOL') (the -// while instructions list) - txt=['While' - ' WhileExpression:' - ' '+string(W.expression) - ' WhileStatements:' - ' '+objectlist2string(W.statements) - 'EndWhile'] -endfunction - -function txt=%ifthenel_string(I) -//overloading function for "ifthenel" type tlist string function -//this is a node of the AST -//fields: -// expression : "expression" type tlist (the if expression) -// then : list of "equal" type tlist and list('EOL') (the -// then instructions list) -// elseifs : a list of tlists -// else : list of "equal" type tlist and list('EOL') (the -// else instructions list) - txt=['If ' - ' Expression:' - ' '+string(I.expression) - ' If Statements' - ' '+objectlist2string(I.then)] - for e=I.elseifs - txt=[txt; - ' Else If Expression' - ' '+string(e.expression) - ' Else If Statements' - ' '+objectlist2string(e.then)] - end - txt=[txt; - ' Else Statements' - ' '+objectlist2string(I.else) - 'EndIf'] -endfunction - -function txt=%operatio_string(O) -//overloading function for "operation" type tlist string function -//this is a node of the AST -//fields: -// operands: a list -// operator: a string - txt=['Operation' - ' Operands:' - ' '+objectlist2string(O.operands) - ' Operator: '+O.operator - 'EndOperation' - ] -endfunction - -function txt=%funcall_string(F) -//overloading function for "funcall" type tlist string function -//this is a node of the AST -//fields: -// rhs : a list -// name : string, the name of the function -// lhsnb: number, the number of function lhs - -txt=['Funcall : '+F.name - ' #lhs : '+string(F.lhsnb) - ' Rhs : ' - ' '+objectlist2string(F.rhs) - 'EndFuncall' - ] -endfunction - -function txt=%variable_string(v) - global anscounter; //NUT: just to fix problem with ans variables. -//overloading function for "variable" type tlist string function -//fields: name -//this is a leaf of the AST -//NUT: changed here. For me %i is a number not a variable. - if (v.name == "%T" | ... - v.name == "%F"| ... - v.name == "%nan"| ... - v.name == "%inf"| ... - v.name == "%pi") - txt=['Number_x: '+v.name]; - elseif (v.name == "%i") - txt=['Number_X: '+v.name]; - else - if (v.name == 'ans') - anscounter = anscounter + 1; - txt=['Variable: '+v.name+string(anscounter)]; - else - txt=['Variable: '+v.name]; - end - end -endfunction - -function txt=%cste_string(c) -//overloading function for "cste" type tlist string function -//this is a leaf of the AST -//fields: -// value : a number or a string -//NUT: added cste I also need "" for strings in order to be sure that the blanks are -//NUT: correctly considered and not mistaken with additional blanks present in the ast text file. - stringcvalue = string(c.value); - if (stringcvalue == "%T" | ... - stringcvalue == "%F" | ... - stringcvalue == "%nan" | ... - stringcvalue == "%inf" | ... - stringcvalue == "%pi") - txt=['Number_x: '+stringcvalue]; - elseif (SCI2Cisnum(stringcvalue)) - //NUT needed to convert format 1D-14 into 1d-14 - txt=['Number_x: '+strsubst(stringcvalue,'D','e')]; - elseif (stringcvalue == "%i") - txt=['Number_X: '+stringcvalue]; - else - txt=['String: ""'+stringcvalue+'""']; - end -endfunction - -function txt=%comment_string(e) -//overloading function for "comment" type tlist string function -//fields: -// text: a string -//this is a leaf of the AST - txt=['Comment : '+e.text] -endfunction - -function txt=objectlist2string(L) -//auxiliary function for conversion of a list of objects -//into a string vector - txt=[]; - for o=L, - if type(o)==15 then //EOL case - txt=[txt;'<'+o(1)+'>'], - else - txt=[txt; string(o)], - end - end - if txt==[] then txt='',end -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST2Ccode.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST2Ccode.sci deleted file mode 100644 index 4600f3c3..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST2Ccode.sci +++ /dev/null @@ -1,246 +0,0 @@ -function AST2Ccode(FileInfoDatFile) -// function AST2Ccode(FileInfoDatFile) -// ----------------------------------------------------------------- -// Read the AST and call the corresponding handlers. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-May-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - - -//NUT: questa funzione e' da sistemare meglio - -// --------------------- -// --- Load section. --- -// --------------------- -// --- Load File Info Structure. --- -load(FileInfoDatFile,'FileInfo'); - -// --- Load Shared Info Structure. --- -load(FileInfo.SharedInfoDatFile,'SharedInfo'); -// ------------------------- -// --- End load section. --- -// ------------------------- - -// --------------------------------------------------- -// --- Extraction of the function name and number. --- -// --------------------------------------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; - -// --------------------------------- -// --- Parameter Initialization. --- -// --------------------------------- -global SCI2CSTACK -SCI2CSTACK = ['EMPTYSTACK']; - -global StackPosition; -StackPosition = 1; - -global STACKDEDUG -STACKDEDUG = 0; // 1 -> Every Pop and Push operation on the stack, the stack content will be printed on screen. -// ------------------------------------- -// --- End parameter Initialization. --- -// ------------------------------------- - -ASTFileName = FileInfo.Funct(nxtscifunnumber).ASTFileName; - -// ----------------------- -// --- Initialization. --- -// ----------------------- -// --- Open AST file. --- -SharedInfo.ASTReader.fidAST = SCI2COpenFileRead(ASTFileName); -fidAST = SharedInfo.ASTReader.fidAST; - -OrigWorkAreaUsedBytes = SharedInfo.WorkAreaUsedBytes; -OrigUsedTempScalarVars = SharedInfo.UsedTempScalarVars; - -PrintStepInfo('Generate C code in '+FileInfo.Funct(nxtscifunnumber).FinalCFileName,... - FileInfo.GeneralReport,'both'); -// --------------------------- -// --- End initialization. --- -// --------------------------- - -// ------------------------ -// --- Parse AST header. --- -// ------------------------ -ASTHeader = AST_ReadASTHeader(fidAST,ReportFileName); -SharedInfo = AST_HandleHeader(ASTHeader,FileInfo,SharedInfo); -//NUT: le metto per ora perche' quando provo a cercare lo specifier di precisione al termine -//NUT: del programma non ho piu' nulla da poppare se lo specifier e' assente. Al limite posso mettere la program e i nomi -//NUT: al posto di dummy. -AST_PushASTStack('Dummy'); -AST_PushASTStack('Dummy'); -AST_PushASTStack('Dummy'); -AST_PushASTStack('Dummy'); -AST_PushASTStack('Dummy'); -AST_PushASTStack('Dummy'); -AST_PushASTStack('Dummy'); -AST_PushASTStack('Dummy'); -//NUT: Se ne tolgo qualcuno ottengo errori -// ---------------------------- -// --- End Parse AST header. --- -// ---------------------------- - //NUT: better to have a function. - - // --- Reset TempVars Structure. --- - TempVars = []; - // Reset info related to temp variables used in the C code. - SharedInfo.WorkAreaUsedBytes = OrigWorkAreaUsedBytes; - SharedInfo.UsedTempScalarVars = OrigUsedTempScalarVars; - //NUT: put here a manageeol so that you can have all the save and load you want. - SharedInfo.ASTReader.UsedTempVars = 0; - -// ---------------------------------- -// --- Main loop to read the AST. --- -// ---------------------------------- -//NUT: file ottenuto con m2sci se hai tempo prova a vedere se ci sono inesattezze. -//NUT: inoltre per maggiore eleganza si puo' pensare di introdurre piu' funzioni - -while ~meof(fidAST) - // Read a line from the AST - tline = mgetl(fidAST,1); - AST_CheckLineLength(tline); - treeline = stripblanks(tline); - - if STACKDEDUG == 1 - disp('Read AST Line: '+treeline); - end - - // Analyze line. - select treeline - - // ------------------ - // --- Functions. --- - // ------------------ - //NUT: qui puoi anche aggiunger piu' case per specificare meglio la struttura della funcall - //NUT: i case aggiunti ovviamente faranno solo il push della treeline. - case 'EndOperation' then - [FileInfo,SharedInfo] = AST_HandleEndGenFun(FileInfo,SharedInfo,'Operation'); - case 'EndFuncall' then - [FileInfo,SharedInfo] = AST_HandleEndGenFun(FileInfo,SharedInfo,'Funcall'); - - // -------------- - // --- Equal. --- - // -------------- - case 'EndEqual' then - //NUT: prima di lanciare l'analisi della equal puoi mettere degli argomenti dummy - //NUT: per fare in modo di coprire le ins, anche se ci puo' essere qualche rischio quando - //NUT: ho miste ins e variabili, per esempio [c(1,1), a] = twooutfun(); - //NUT: in questo caso solo una delle due equal va scartata. - [FileInfo,SharedInfo] = AST_HandleEndGenFun(FileInfo,SharedInfo,'Equal'); - SharedInfo = INIT_SharedInfoEqual(SharedInfo); - case 'Equal' then - SharedInfo.Equal.Enabled = 1; // 1 means enabled -> we are inside an equal AST block. - AST_PushASTStack(treeline); - case 'Lhs :' then - SharedInfo.Equal.Lhs = 1; // 1 means that we are inside the Lhs block of the Equal - [EqualInArgName,EqualInArgScope,EqualNInArg] = AST_ReadEqualRhsNames(FileInfo,SharedInfo); - SharedInfo.Equal.NInArg = EqualNInArg; - for tmpcnt = 1:SharedInfo.Equal.NInArg - SharedInfo.Equal.InArg(tmpcnt).Name = EqualInArgName(tmpcnt); - SharedInfo.Equal.InArg(tmpcnt).Scope = EqualInArgScope(tmpcnt); - end - AST_PushASTStack(treeline); - - // ---------------- - // --- If/Else. --- - // ---------------- - //NUT: da verificare la gestione dello stack - case 'If Statements' then - [FileInfo,SharedInfo] = AST_HandleIfElse(FileInfo,SharedInfo,'if'); - case 'Else If Expression' then - AST_PushASTStack(treeline); - [FileInfo,SharedInfo] = AST_HandleIfElse(FileInfo,SharedInfo,'else'); - case 'Else If Statements' then - [FileInfo,SharedInfo] = AST_HandleIfElse(FileInfo,SharedInfo,'elseif'); - case 'Else Statements' then - [FileInfo,SharedInfo] = AST_HandleIfElse(FileInfo,SharedInfo,'else'); - case 'EndIf' then - for counter=1:SharedInfo.CountNestedIf+1 - SharedInfo = C_IfElseBlocks(FileInfo,SharedInfo,'out'); - end - SharedInfo.CountNestedIf = 0; - - // -------------- - // --- Dummy. --- - // -------------- - case 'Comment :' then - AST_HandleEOL(FileInfo,SharedInfo); //NUT: si potrebbe differenziare comment da EOL - case '' then - AST_HandleEOL(FileInfo,SharedInfo); - - // ----------------- - // --- Epilogue. --- - // ----------------- - case 'EndProgram' - SharedInfo = AST_HandleEndProgram(FileInfo,SharedInfo); - //NUT: per essere precisi si puo' pensare di mettere un check - //NUT: alla fine dell'albero per accertarsi che c'e' end program li' dove ce lo aspettiamo - - // ------------ - // --- For. --- - // ------------ - case 'For' then - SharedInfo.For.Level = SharedInfo.For.Level + 1; - FileInfo = AST_HandleFor(FileInfo,SharedInfo); - case 'ForExpression:' - AST_PushASTStack(treeline); - SharedInfo.ForExpr.OnExec = SharedInfo.ForExpr.OnExec + 1; - case 'ForStatements:' - [FileInfo,SharedInfo] = AST_HandleForStatem(FileInfo,SharedInfo); - case 'EndFor' then - SharedInfo = AST_HandleEndFor(FileInfo,SharedInfo); - SharedInfo.For.Level = SharedInfo.For.Level - 1; - - // -------------- - // --- While. --- - // -------------- - case 'While' then - AST_PushASTStack(treeline); - SharedInfo.While.Level = SharedInfo.While.Level + 1; - case 'WhileExpression:' - AST_PushASTStack(treeline); - [FileInfo,SharedInfo] = AST_HandleWhileExpr(FileInfo,SharedInfo); - case 'WhileStatements:' - [FileInfo,SharedInfo] = AST_HandleWhileStatem(FileInfo,SharedInfo); - case 'EndWhile' then - SharedInfo = AST_HandleEndWhile(FileInfo,SharedInfo); - SharedInfo.While.Level = SharedInfo.While.Level - 1; - - // ---------------- - // --- Default. --- - // ---------------- - else - AST_PushASTStack(treeline); - end -end -// -------------------------------------- -// --- End main loop to read the AST. --- -// -------------------------------------- - -mclose(fidAST); -// --------------------- -// --- Save section. --- -// --------------------- -// --- Save Shared Info Structure. --- -save(SharedInfoDatFile,SharedInfo); -// ------------------------- -// --- End save section. --- -// ------------------------- -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckCommonInOutArgs.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckCommonInOutArgs.sci deleted file mode 100644 index 952514cc..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckCommonInOutArgs.sci +++ /dev/null @@ -1,88 +0,0 @@ -function AST_CheckCommonInOutArgs(InArg,NInArg,OutArg,NOutArg,ReportFileName) -// function AST_CheckCommonInOutArgs(InArg,NInArg,OutArg,NOutArg,ReportFileName) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Compares input and output arguments names and issues and error -// when at least one output argument is equal to the one of the -// input arguments. The error is issued only when the common argument -// is not a scalar value. This is a safe approach that prevents error -// when the same matrix is used as both input and output argument of -// a function. -// #RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 08-Jan-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),5,5); - -ncommonstrings = 0; -commonstrings = ''; - -//RNU non mi ricordo per quale motivo avevo commentato il seguente codice -//RNU e decommentato l'altro a seguire. Sembra che avessi deciso che anche -//RNU le variabili scalari non potessero essere usate nella stessa expr -//RNU contemporaneamente come input e come output -for cnt1 = 1:NInArg - for cnt2 = 1:NOutArg - if ((InArg(cnt1).Name == OutArg(cnt2).Name) & ... - (InArg(cnt1).Dimension > 0)) - ncommonstrings = ncommonstrings + 1; - commonstrings(ncommonstrings) = InArg(cnt1).Name; - end - end -end - -// for cnt1 = 1:NInArg -// for cnt2 = 1:NOutArg -// if ((InArg(cnt1).Name == OutArg(cnt2).Name)) -// ncommonstrings = ncommonstrings + 1; -// commonstrings(ncommonstrings) = InArg(cnt1).Name; -// end -// end -// end - -if (ncommonstrings > 0) - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Found '+string(ncommonstrings)+' input/output 2-D arguments',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: with the same name: ',ReportFileName,'both','y'); - for cntstr = 1:ncommonstrings - PrintStringInfo('SCI2CERROR: Arg('+string(cntstr)+'): '+commonstrings(cntstr),ReportFileName,'both','y'); - end - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: This approach is not allowed because it is not safe',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: due to the fact that arrays are passed by reference to functions.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: For example if A is a squared matrix then the following code,',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: A = A'';',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: could generate incorrect results.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Please consider renaming input or output arguments.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: See examples below:',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: // Example 1: Function call.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: A = zeros(10,9);',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: A = sin(A); // Not Allowed',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: // The previous line must be rewritten as:',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: MYTMP = A; // Allowed',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: A = sin(MYTMP); // Allowed',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: // Example 2: Function definition.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: function d = myfun(a,b,c,d) // Not Allowed',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: // The previous line must be rewritten as:',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: function e = myfun(a,b,c,d) // Not Allowed',ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckLastFunc.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckLastFunc.sci deleted file mode 100644 index 0fff6b22..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckLastFunc.sci +++ /dev/null @@ -1,77 +0,0 @@ -function [LhsArgNames,LhsArgScope,NLhsArg] = AST_CheckLastFunc(fidAST,SearchLevel) -// function [LhsArgNames,LhsArgScope,NLhsArg] = AST_CheckLastFunc(fidAST,SearchLevel) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -astfilepos = mtell(fidAST); -NLhsArg = 0; -LhsArgNames = ''; -LhsArgScope = ''; -FlagLastFunc = 0; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -//NUT: non capisco come mai tu non faccia il flipud degli argometi letti. -//NUT: Level 1 e' quando abbiamo una equal float fun -//NUT: level 0 quando abbiamo equal fun -tline = mgetl(fidAST,1); -AST_CheckLineLength(tline); -LhsField = stripblanks(tline); -if ((SearchLevel == 1) & (LhsField == 'EndFuncall')) - SearchLevel = 0; - tline = mgetl(fidAST,1); - AST_CheckLineLength(tline); - LhsField = stripblanks(tline); -end -if ((SearchLevel == 0) & (LhsField == 'Lhs :')) - tline = mgetl(fidAST,1); - AST_CheckLineLength(tline); - LhsField = stripblanks(tline); - while(LhsField ~= 'EndEqual') - NLhsArg = NLhsArg + 1; - if (LhsField == '') - SCI2Cerror('Found before EndEqual'); - elseif (LhsField == 'EndProgram') - SCI2Cerror('Found EndProgram before EndEqual'); - end - if (LhsField == 'Operation') - // if (LhsField == 'Operator: ins') - // It means that we have to store the results of the function in temp vars. - LhsField = 'EndEqual'; // Force the exit from the while. - NLhsArg = 0; - LhsArgNames = ''; - LhsArgScope = ''; - else - [LhsArgNames(NLhsArg),LhsArgScope(NLhsArg)] = AST_ExtractNameAndScope(LhsField); - tline = mgetl(fidAST,1); - AST_CheckLineLength(tline); - LhsField = stripblanks(tline); - end - end -end -mseek(astfilepos,fidAST,'set'); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckLineLength.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckLineLength.sci deleted file mode 100644 index d74cf26b..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckLineLength.sci +++ /dev/null @@ -1,29 +0,0 @@ -function AST_CheckLineLength(instring) -// function AST_CheckLineLength(instring) -// ----------------------------------------------------------------- -// "Fixes" the AST generator bug. When a line of code is greater -// than 80 chars the generated AST is wrong. -// -// Input data: -// instring: string read from the AST. -// -// Output data: -// --- -// -// Status: -// 15-May-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -//if length(instring) > 77 -// SCI2Cerror('Line too long: please reduce the length of the current line.'); -//end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckPrecSpecifier.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckPrecSpecifier.sci deleted file mode 100644 index e8ffbf1f..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_CheckPrecSpecifier.sci +++ /dev/null @@ -1,82 +0,0 @@ -function AnnotationFnc = AST_CheckPrecSpecifier(FunctionName,FileInfo,SharedInfo); -// function AnnotationFnc = AST_CheckPrecSpecifier(FunctionName,FileInfo,SharedInfo); -// ----------------------------------------------------------------- -// #RNU_RES_B -// Searches for one of the following data annotation functions: -// Funcall : int -// Funcall : float -// Funcall : double -// Note: remember to execute this function before pushing the output -// argument names into the stack. -// #RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 13-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -PrintStringInfo(' ',ReportFileName,'file','y'); -// #RNU_RES_B -PrintStringInfo(' Checking presence of precision specifier',ReportFileName,'file','y'); -//NUT: da sistemare senza le global -// #RNU_RES_E -global SCI2CSTACK -global StackPosition; -global STACKDEDUG - -AnnotationFnc = 'default'; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -Pop1 = AST_PopASTStack(); // Rhs : -if (mtlb_strcmp(stripblanks(Pop1),'Rhs :')) - Pop2 = AST_PopASTStack(); // #lhs : 1 - if (mtlb_strcmp(stripblanks(Pop2),'#lhs : 1')) - Pop3 = AST_PopASTStack(); // Funcall : double - FunctionName = stripblanks(part(Pop3,12:length(Pop3))); - for counterdataprec = 1:max(size(SharedInfo.Annotations.DataPrec)) - if (mtlb_strcmp(FunctionName,SharedInfo.Annotations.DataPrec(counterdataprec))) - AnnotationFnc = FunctionName; - end - end - // --- Repush strings into the AST stack. --- - AST_PushASTStack(Pop3); - end - // --- Repush strings into the AST stack. --- - AST_PushASTStack(Pop2); -end -// --- Repush strings into the AST stack. --- -AST_PushASTStack(Pop1); - -if mtlb_strcmp(AnnotationFnc,'default') - // #RNU_RES_B - PrintStringInfo('Function is not annotated',ReportFileName,'file','y'); - PrintStringInfo('The ""'+SharedInfo.DefaultPrecision+'"" default precision will be used.',ReportFileName,'file','y'); - // #RNU_RES_E -else - // #RNU_RES_B - PrintStringInfo('Function is annotated with ""'+AnnotationFnc+'"" specifier',ReportFileName,'file','y'); - // #RNU_RES_E -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_DisplayStack.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_DisplayStack.sci deleted file mode 100644 index 8543e2e0..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_DisplayStack.sci +++ /dev/null @@ -1,42 +0,0 @@ -function AST_DisplayStack() -// function AST_DisplayStack() -// ----------------------------------------------------------------- -// Displays the AST stack content. The AST stack is used to read the -// AST. -// -// Input data: -// --- -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),0,0); - -global SCI2CSTACK -global StackPosition; -global STACKDEDUG - -disp('*********************') -disp('*********************') - -if (STACKDEDUG == 1) - for counterposition = 1:StackPosition - disp(SCI2CSTACK(counterposition,1)) - end -end -disp('---------------------') -disp('---------------------') -disp(' ');disp(' ');disp('Press return to continue'); halt; - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_ExtractNameAndScope.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_ExtractNameAndScope.sci deleted file mode 100644 index 7e71f75a..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_ExtractNameAndScope.sci +++ /dev/null @@ -1,93 +0,0 @@ -function [ArgName,ArgScope] = AST_ExtractNameAndScope(ASTField) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Dec-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -ArgName = ''; -ArgScope = ''; - -cnttag = 0; -cnttag = cnttag + 1; -tagname(cnttag) = 'Number_'; -taglength(cnttag) = length(tagname(cnttag)); - -cnttag = cnttag + 1; -tagname(cnttag) = 'String:'; -taglength(cnttag) = length(tagname(cnttag)); - -cnttag = cnttag + 1; -tagname(cnttag) = 'Variable:'; -taglength(cnttag) = length(tagname(cnttag)); - -cnttag = cnttag + 1; -tagname(cnttag) = 'Global:'; -taglength(cnttag) = length(tagname(cnttag)); - -cnttag = cnttag + 1; -tagname(cnttag) = 'Local:'; -taglength(cnttag) = length(tagname(cnttag)); - -cnttag = cnttag + 1; -tagname(cnttag) = 'Temp:'; -taglength(cnttag) = length(tagname(cnttag)); - -cnttag = cnttag + 1; -tagname(cnttag) = ''; -taglength(cnttag) = length(tagname(cnttag)); - -fieldlength = length(ASTField); - -//NUT: il seguente codice e' poco elegante. -if (SCI2Cstrncmps1size(tagname(1),ASTField)) - // Here we can have: - // Number_x: it means default precision. - // Number_s: it means float real type. - // Number_d: it means double real type. - // Number_c: it means float complex type. - // Number_z: it means double complex type. - ArgName = stripblanks(part(ASTField,taglength(1)+3:fieldlength)); - ArgScope = stripblanks(part(ASTField,1:taglength(1)+1)); -elseif (SCI2Cstrncmps1size(tagname(2),ASTField)) - ArgName = stripblanks(part(ASTField,taglength(2)+1:fieldlength)); - ArgName = part(ArgName,2:length(ArgName)-1); // I remove also the first and the last " - ArgScope = 'String'; -elseif (SCI2Cstrncmps1size(tagname(3),ASTField)) - ArgName = stripblanks(part(ASTField,taglength(3)+1:fieldlength)); - ArgScope = 'Variable'; -elseif (SCI2Cstrncmps1size(tagname(4),ASTField)) - ArgName = stripblanks(part(ASTField,taglength(4)+1:fieldlength)); - ArgScope = 'Global'; -elseif (SCI2Cstrncmps1size(tagname(5),ASTField)) - ArgName = stripblanks(part(ASTField,taglength(5)+1:fieldlength)); - ArgScope = 'Local'; -elseif (SCI2Cstrncmps1size(tagname(6),ASTField)) - ArgName = stripblanks(part(ASTField,taglength(6)+1:fieldlength)); - ArgScope = 'Temp'; -elseif (SCI2Cstrncmps1size(tagname(7),ASTField)) - ArgName = ''; - ArgScope = 'None'; -else - SCI2Cerror('Argument specifier not found in the AST field: '+ASTField); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_GetASTFile.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_GetASTFile.sci deleted file mode 100644 index 025aca74..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_GetASTFile.sci +++ /dev/null @@ -1,59 +0,0 @@ -function AST_GetASTFile(FileInfoDatFile) -// function AST_GetASTFile(FileInfoDatFile) -// ----------------------------------------------------------------- -// Generates the AST file starting from the .sci file specified -// in SharedInfo.NextSCIFileName. -// -// Input data: -// FileInfoDatFile: name of the .dat file containing the FileInfo structure. -// -// Output data: -// --- -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// --------------------------------- -// --- Load File Info Structure. --- -// --------------------------------- -clear FileInfo -load(FileInfoDatFile,'FileInfo'); - -// ----------------------------------- -// --- Load Shared Info Structure. --- -// ----------------------------------- -clear SharedInfo -load(FileInfo.SharedInfoDatFile,'SharedInfo'); - -// --------------------------------------------------- -// --- Extraction of the function name and number. --- -// --------------------------------------------------- -funname = SharedInfo.NextSCIFunName; -funnumber = SharedInfo.NextSCIFunNumber; - -PrintStepInfo('Generate the AST in '+FileInfo.Funct(funnumber).ASTFileName,... - FileInfo.GeneralReport,'both'); - -// --- Generation of the AST file. --- -SciFile2ASTFile(FileInfo.Funct(funnumber).SCIFileName,... - FileInfo.Funct(funnumber).ASTFileName); - -// --------------------- -// --- Save section. --- -// --------------------- -// --- Save File Info Structure. --- -// save(FileInfoDatFile,FileInfo); -// ------------------------- -// --- End save section. --- -// ------------------------- - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_GetFuncallPrm.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_GetFuncallPrm.sci deleted file mode 100644 index aa5ab62c..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_GetFuncallPrm.sci +++ /dev/null @@ -1,54 +0,0 @@ -function [FunctionName,InArg,NInArg,OutArg,NOutArg] = ... - AST_GetFuncallPrm(FileInfo,SharedInfo,ASTFunType) -// function [FunctionName,InArg,NInArg,NOutArg] = ... -// AST_GetFuncallPrm(FileInfo,SharedInfo,ASTFunType) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -//#RNU_RES_B -PrintStringInfo('***Retrieving '+ASTFunType+' Parameters from AST***',ReportFileName,'file','y'); -//#RNU_RES_E -OutArg = []; -NOutArg = 0; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// ------------------------------------------------------ -// --- Get Parameters from the AST Funcall structure. --- -// ------------------------------------------------------ -if (ASTFunType=='Funcall') - [FunctionName,InArg,NInArg,NOutArg] = AST_ParseFuncallStruct(FileInfo,SharedInfo); -elseif (ASTFunType=='Operation') - [FunctionName,InArg,NInArg,NOutArg] = AST_ParseOperStruct(FileInfo,SharedInfo); -elseif (ASTFunType=='Equal') - [FunctionName,InArg,NInArg,OutArg,NOutArg] = AST_ParseEqualStruct(FileInfo,SharedInfo); -else - SCI2CerrorFile('Unknown Function type: '+ASTFunType+'.',ReportFileName); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_GetPrecAndLhsArg.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_GetPrecAndLhsArg.sci deleted file mode 100644 index feb8a6ec..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_GetPrecAndLhsArg.sci +++ /dev/null @@ -1,99 +0,0 @@ -function [LhsArg,NLhsArg,PrecisionSpecifier,SharedInfo] = AST_GetPrecAndLhsArg(OutArg,NOutArg,FunctionName,FunTypeAnnot,FunSizeAnnot,ASTFunType,FileInfo,SharedInfo); -// function [LhsArg,NLhsArg,PrecisionSpecifier,SharedInfo] = AST_GetPrecAndLhsArg(OutArg,NOutArg,FunctionName,FunTypeAnnot,FunSizeAnnot,ASTFunType,FileInfo,SharedInfo); -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),8,8); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -// #RNU_RES_B -PrintStringInfo('***Search for Equal Lhs and precision specifier to be applied to the current function.***',ReportFileName,'file','y'); -// #RNU_RES_E -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// #RNU_RES_B -// --------------------------------------- -// --- Search for Precision Specifier. --- -// --------------------------------------- -// #RNU_RES_E -if (NOutArg == 1 & FunTypeAnnot == 'FA_TP_USER') - PrecisionSpecifier = AST_CheckPrecSpecifier(FunctionName,FileInfo,SharedInfo); - if (PrecisionSpecifier == 'default') - SearchLevel = 0; - else - SearchLevel = 1; - SharedInfo.SkipNextPrec = 1; - end -else - PrecisionSpecifier = ''; - SearchLevel = 0; -end - -// #RNU_RES_B -// ------------------------------------------------------------- -// --- Check Last Function Condition and update LhsArg info. --- -// ------------------------------------------------------------- -// #RNU_RES_E -if (ASTFunType~='Equal') - // #RNU_RES_B - PrintStringInfo(' ',ReportFileName,'file','y'); - PrintStringInfo(' Checking presence of Equal after the current function...',ReportFileName,'file','y'); - // #RNU_RES_E - [LhsArgNames,LhsArgScope,NLhsArg] = AST_CheckLastFunc(SharedInfo.ASTReader.fidAST,SearchLevel); -else - LhsArgNames = ''; - LhsArgScope = ''; - NLhsArg = 0; -end - -// --- Generate the LhsArg structure. --- -LhsArg = []; -for cntarg = 1:NLhsArg - LhsArg(cntarg).Name = LhsArgNames(cntarg); - LhsArg(cntarg).Scope = LhsArgScope(cntarg); -end - -// #RNU_RES_B -// ------------------------- -// --- Check on NLhsArg. --- -// ------------------------- -// #RNU_RES_E -if (NLhsArg > 0) - // #RNU_RES_B - PrintStringInfo('...Found Equal.',ReportFileName,'file','y'); - PrintStringInfo('OutArg Names will be replaced with Lhs Names of the Equal.',ReportFileName,'file','y'); - // #RNU_RES_E - SharedInfo.SkipNextEqual = 1; // 1 = the next equal in the AST will not produce C code. - if (NLhsArg ~= NOutArg) - SCI2CerrorFile('NLhsArg='+string(NLhsArg)+' must be equal to NOutArg='+string(NOutArg)+'.',ReportFileName); - end -else - // #RNU_RES_B - PrintStringInfo('...Equal not found.',ReportFileName,'file','y'); - // #RNU_RES_E -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEOL.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEOL.sci deleted file mode 100644 index 286bab7b..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEOL.sci +++ /dev/null @@ -1,62 +0,0 @@ -function AST_HandleEOL(FileInfo,SharedInfo) -// function AST_HandleEOL(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// Handles the EOL tag of the AST. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - - -//#RNU_RES_B -//NUT: questa parte e' molto interessante perche' ti puo' aiutare per fare confronti -//NUT: incrociati tra le annotazioni della funzione e gli argomenti in uscita. -//NUT: in particolare una volta messi nella tabella dei simboli anche gli argomenti -//NUT: di uscita puoi benissimo verificare che li stai utilizzando bene nel corpo della funzione stessa. -//#RNU_RES_E - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1FileName; -SciFileFid = FileInfo.Funct(nxtscifunnumber).SCICopyFileFid; -IndentLevel = SharedInfo.NIndent; - -PrintStepInfo('Handling EOL',ReportFileName,'file'); -sciline = mgetl(SciFileFid,1); - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('##################'+'################'+'##################'+'##################'+'##################',ReportFileName,'file','y'); -PrintStringInfo('##################'+'################'+'##################'+'##################'+'##################',ReportFileName,'file','y'); -PrintStringInfo('### Scilab code: '+sciline+' ###',ReportFileName,'file','y'); -PrintStringInfo('##################'+'################'+'##################'+'##################'+'##################',ReportFileName,'file','y'); -PrintStringInfo('##################'+'################'+'##################'+'##################'+'##################',ReportFileName,'file','y'); -// #RNU_RES_E -PrintStringInfo(' ',CPass1FileName,'file','y'); -modeprintstringinfo = 'stdout'; -if (SharedInfo.CopySciCodeIntoCCode == 1) - modeprintstringinfo = 'both'; -end -PrintStringInfo(C_IndentBlanks(IndentLevel)+'/*SCI2C: #############'+'############'+'##############'+'###############'+'############',CPass1FileName,modeprintstringinfo,'y'); -PrintStringInfo(C_IndentBlanks(IndentLevel)+' SCI2C: '+sciline,CPass1FileName,modeprintstringinfo,'y'); -PrintStringInfo(C_IndentBlanks(IndentLevel)+' SCI2C: #############'+'############'+'##############'+'###############'+'############*/',CPass1FileName,modeprintstringinfo,'y'); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndFor.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndFor.sci deleted file mode 100644 index dc6c4126..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndFor.sci +++ /dev/null @@ -1,78 +0,0 @@ -function SharedInfo = AST_HandleEndFor(FileInfo,SharedInfo) -// function SharedInfo = AST_HandleEndFor(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Handles the EndFor tag of the AST. -// overloading function for "for" type tlist string function -// this is a node of the AST -// fields: -// expression : "expression" type tlist (the loop expression) -// statements : list of "equal" type tlist and list('EOL') (the -// for instructions list) -// txt=['For' -// ' ForExpression:' -// ' '+string(F.expression) -// ' ForStatements:' -// ' '+objectlist2string(F.statements) -// 'EndFor'] -// -// #RNU_RES_E -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 15-Nov-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; - -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1FileName; -CPass1ForProlFileName = FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level); -CPass1ForEpilFileName = FileInfo.Funct(nxtscifunnumber).CPass1ForEpilFileName(SharedInfo.For.Level); - -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Handling EndFor***',ReportFileName,'file','y'); -CCall =''; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// ---------------------------- -// --- Generate the C code. --- -// ---------------------------- -// --- Copy Epilogue into C code (Pass1) file. --- -[CLinesArray,N_Lines] = File2StringArray(CPass1ForEpilFileName); -CLinesArray = stripblanks(CLinesArray); - -for tmpcnt = 1:N_Lines-1 - PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+CLinesArray(tmpcnt),CPass1FileName,'file','y'); -end -PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent-1)+CLinesArray(N_Lines),CPass1FileName,'file','y'); - -// -------------------------- -// --- Update SharedInfo. --- -// -------------------------- -SharedInfo.NIndent = SharedInfo.NIndent - 1; - -// ------------------------------- -// --- Delete temporary files. --- -// ------------------------------- -SCI2Cmdelete(FileInfo.Funct(nxtscifunnumber).CPass1ForEpilFileName(SharedInfo.For.Level)); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndGenFun.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndGenFun.sci deleted file mode 100644 index 2bc31969..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndGenFun.sci +++ /dev/null @@ -1,442 +0,0 @@ -function [FileInfo,SharedInfo] = AST_HandleEndGenFun(FileInfo,SharedInfo,ASTFunType) -// function [FileInfo,SharedInfo] = AST_HandleEndGenFun(FileInfo,SharedInfo,ASTFunType) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Handles the EndFuncall, EndOperation and EndEqual tags of the AST. -// ASTFunType can be 'Funcall', 'Operation', 'Equal' -// Structure of Funcall: -// overloading function for "funcall" type tlist string function -// this is a node of the AST -// fields: -// rhs : a list -// name : string, the name of the function -// lhsnb: number, the number of function lhs -// txt=['Funcall : '+F.name -// ' #lhs : '+string(F.lhsnb) -// ' Rhs : ' -// ' '+objectlist2string(F.rhs) -// 'EndFuncall' -// ] -// #RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -Pass1HeaderFileName = FileInfo.Funct(nxtscifunnumber).Pass1HeaderFileName; -FunInfoDatDir = FileInfo.FunctionList.FunInfoDatDir; -CGblDeclarFileName = FileInfo.Funct(nxtscifunnumber).CGblDeclarFileName; - -Flag_FunAlreadyCalled = 0; -// #RNU_RES_B -PrintStepInfo('Handling Funcall/Operation/Equal',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); -// #RNU_RES_E -//NUT: da sistemare senza le global -global SCI2CSTACK -global StackPosition; -global STACKDEDUG -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// #RNU_RES_B -// --------------------------------------------- -// --- Retrieve FunCall Parameters from AST. --- -// --------------------------------------------- -//NUT: verifica se ASTFunType e' veramente importante -// #RNU_RES_E -[ASTFunName,InArg,NInArg,OutArg,NOutArg] = AST_GetFuncallPrm(FileInfo,SharedInfo,ASTFunType); -if (ASTFunName == 'OpIns') - SharedInfo.SkipNextEqual = 1; - SharedInfo.Equal.Nins = SharedInfo.Equal.Nins + 1; - //NUT: Force ins to have 0 args. Double check it. - NOutArg = 0; - // #RNU_RES_B - //NUT: io aumenterei qui gli argomenti in ingresso della ins cosi qui vengono fatte tutte le modifiche del - //NUT: caso e la C_FunCall non se ne deve preoccupare, vedi se lo stesso vale per le altre funzioni - //NUT: speciali presenti nell C_FunCall. - - // 1 more input argument containing the values to be inserted in the matrix. - // #RNU_RES_E - NInArg = NInArg + 1; - InArg(NInArg).Name = SharedInfo.Equal.InArg(SharedInfo.Equal.Nins).Name; - InArg(NInArg).Scope = SharedInfo.Equal.InArg(SharedInfo.Equal.Nins).Scope; -elseif (ASTFunName == 'global') - SharedInfo.SkipNextEqual = 1; - SharedInfo.SkipNextFun = 1; - if (NInArg ~= 1) - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Multiple declaration of global variables is not allowed.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: See example below:',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: global var1 var2; //NOT ALLOWED',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: global var1; //ALLOWED',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: global var2; //ALLOWED',ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); - end - if (NOutArg ~= 1) - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Unexpected number of output arguments for global function.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Please report this error to:',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: raffaele.nutricato@tiscali.it',ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); - end -end - -// #RNU_RES_B -// -------------------------------------- -// --- Read the function annotations. --- -// -------------------------------------- -// #RNU_RES_E -if (ASTFunName == 'OpEqual') - FunTypeAnnot = ''; - FunSizeAnnot = ''; -else - [FunTypeAnnot,FunSizeAnnot] = FA_GetFunAnn(NInArg,NOutArg,ASTFunName,FileInfo,SharedInfo); -end - -// #RNU_RES_B -// ------------------------------------------------------------------------------------------- -// --- Search for Equal Lhs and precision specifier to be applied to the current function. --- -// ------------------------------------------------------------------------------------------- -// #RNU_RES_E -[LhsArg,NLhsArg,FunPrecSpecifier,SharedInfo] = AST_GetPrecAndLhsArg(OutArg,NOutArg,ASTFunName,FunTypeAnnot,FunSizeAnnot,ASTFunType,FileInfo,SharedInfo); -//NUT: questa funzione contiene troppi parametri e mi sembra disordinata. - -// #RNU_RES_B -// -------------------------------- -// --- Input Arguments Section. --- -// -------------------------------- -// --- Get Input Arguments info from their numerical value or from the symbol table. --- -// #RNU_RES_E -if (ASTFunName == 'global') - [TBFlagfound,TBType,TBSize,TBValue,TBFindLike,TBDimension,TBScope] = ... - ST_GetSymbolInfo(InArg(1).Name,FileInfo,SharedInfo); - if (TBFlagfound == 1) - InArg(1).Type = TBType; - InArg(1).Size = TBSize; - InArg(1).Value = TBValue; - InArg(1).FindLike = TBFindLike; - InArg(1).Dimension = TBDimension; - InArg(1).Scope = TBScope; - IndentLevelGlobal = 0; //NUT: forced always to 1 - FlagExt = 1; - C_GenDeclarations(InArg(1),CGblDeclarFileName,IndentLevelGlobal,ReportFileName,FlagExt,SharedInfo.ResizeApproach); - else - // #RNU_RES_B - // That means it is the first time we encounter - // this global variable and in C this means that - // we don't have to do nothing. - // #RNU_RES_E - // SharedInfo.SkipNextFun = SharedInfo.SkipNextFun + 1; - SharedInfo.SkipNextFun = 1; - - InArg(1).Type = 'GBLToBeDefined'; - InArg(1).Size(1) = 'GBLToBeDefined'; - InArg(1).Size(2) = 'GBLToBeDefined'; - InArg(1).Value = %nan; - InArg(1).FindLike = %nan; - InArg(1).Dimension = %nan; - InArg(1).Scope = 'Global'; - - // #RNU_RES_B - PrintStringInfo('***Putting global variable in the symbol table***',ReportFileName,'file','y'); - PrintStringInfo(' Symbol ""'+InArg(1).Name+'""',ReportFileName,'file','y'); - - PrintStringInfo(' Type: '+InArg(1).Type,ReportFileName,'file','y'); - PrintStringInfo(' Size(1): '+string(InArg(1).Size(1)),ReportFileName,'file','y'); - PrintStringInfo(' Size(2): '+string(InArg(1).Size(2)),ReportFileName,'file','y'); - PrintStringInfo(' Value: '+string(InArg(1).Value),ReportFileName,'file','y'); - PrintStringInfo(' FindLike: '+string(InArg(1).FindLike),ReportFileName,'file','y'); - PrintStringInfo(' Dimension: '+string(InArg(1).Dimension),ReportFileName,'file','y'); - PrintStringInfo(' Scope: '+string(InArg(1).Scope),ReportFileName,'file','y'); - PrintStringInfo(' ',ReportFileName,'file','y'); - // #RNU_RES_E - - ST_Set(InArg(1).Name,... - InArg(1).Type,... - InArg(1).Size,... - InArg(1).Value,... - InArg(1).FindLike,... - InArg(1).Dimension,... - FileInfo.GlobalVarFileName); - end -else - [InArg,SharedInfo] = ST_GetInArgInfo(InArg,NInArg,FileInfo,SharedInfo); -end - -// #RNU_RES_B -// ------------------------------------------------------------------- -// --- Change info of Input Argument according to resize approach. --- -// ------------------------------------------------------------------- -//RNU toglimi nella versione da dare ad hartes. -//RNU per ora gestisco solo la resize all con tutte realloc. -//RNU global variables are still coded with fixed size. -// #RNU_RES_E -if (SharedInfo.ResizeApproach=='REALLOC_ALL_RESIZE_ALL') - for cntin = 1:NInArg - if ((InArg(cntin).Dimension > 0)) - // if ((InArg(cntin).Dimension > 0) & (InArg(cntin).Scope ~= 'Global')) - InArg(cntin).Size(1) = '__'+InArg(cntin).Name+'Size[0]'; - InArg(cntin).Size(2) = '__'+InArg(cntin).Name+'Size[1]'; - end - //#RNUREM_MERNU vedi se la seguente fa casino l'ho aggiunta in modo che agia=ones(1,3) sia generata come realloc ma non ho verificato. - tmpscope = InArg(cntin).Scope; - lengthNumber = length('Number_'); - if (part(tmpscope,1:lengthNumber) == 'Number_') - //#RNUREM_ME RNU il problema e' che ones(3,1) allora l'output e' 3,1 e come faccio a trasformare 3 e 1 in simboli in modo tale che realloco anziche' allocare - InArg(cntin).Value = %nan; //RNU non va bene dove per esempio hai problemi di 1:3:4 se al posto dei numeri metti nan ti impalli - //#RNUREM_ME Credo che dove c'e' uan allocazione secca ones(3,1) non vada lasciata cosi' ma tutto vada ricondotto a realloc - //#RNUREM_ME quindi devo vedere nella dichiarazione delle variabili come forzare la dichiarazione dei null pointer. - //#RNUREM_ME successivamente devo vedere come fare a riscrivere la size dell'output. - else - end - end -end - -// #RNU_RES_B -// --------------------------------- -// --- Output Arguments Section. --- -// --------------------------------- -// --- Update Out arg structure with info stored in the function annotations. --- -// #RNU_RES_E -if (ASTFunName == 'OpEqual') - for cntin = 1:NInArg - OutArg(cntin).Type = InArg(cntin).Type; - OutArg(cntin).Size = InArg(cntin).Size; - OutArg(cntin).Dimension = InArg(cntin).Dimension; - OutArg(cntin).Value = InArg(cntin).Value; - OutArg(cntin).FindLike = InArg(cntin).FindLike; - //NUT: forse qui occorre aggiungere lo scope che dovrebbe essere local or global. - //NUT: per ora lo scope viene settato da AST_ParseEqualStruct - end -elseif ((ASTFunName == 'OpMinus') & (NInArg == 1) & (InArg(1).Dimension == 0)&(InArg(1).Scope == 'Number')) - // #RNU_RES_B - // --- Manage OpMinus when applied to scalars. --- - // -1 is not translated as tmp = OpMinus(1), but - // it is considered as a single entity "-1" - // #RNU_RES_E - SharedInfo.SkipNextFun = 1; //RN: SISTEMAMI - OutArg(1).Type = InArg(1).Type; - OutArg(1).Size = InArg(1).Size; - OutArg(1).Dimension = InArg(1).Dimension; - OutArg(1).Value = -InArg(1).Value; - OutArg(1).FindLike = InArg(1).FindLike; - OutArg(1).Scope = 'Number_'+InArg(1).Type; -elseif ((ASTFunName == 'float') & (NInArg == 1) & (InArg(1).Dimension == 0) & (InArg(1).Scope == 'Number')) - // #RNU_RES_B - // --- Manage OpMinus when applied to scalars. --- - // -1 is not translated as tmp = OpMinus(1), but - // it is considered as a single entity "-1" - // #RNU_RES_E - SharedInfo.SkipNextFun = 1; //RN: SISTEMAMI - OutArg(1).Type = InArg(1).Type; - OutArg(1).Size = InArg(1).Size; - OutArg(1).Dimension = InArg(1).Dimension; - OutArg(1).Value = InArg(1).Value; - OutArg(1).FindLike = InArg(1).FindLike; - OutArg(1).Scope = 'Number_s'; -elseif ((ASTFunName == 'double') & (NInArg == 1) & (InArg(1).Dimension == 0) & (InArg(1).Scope == 'Number')) - // #RNU_RES_B - // --- Manage OpMinus when applied to scalars. --- - // -1 is not translated as tmp = OpMinus(1), but - // it is considered as a single entity "-1" - // #RNU_RES_E - SharedInfo.SkipNextFun = 1; - //RN: SISTEMAMI - SharedInfo.SkipNextFun = 1; //RN: SISTEMAMI - OutArg(1).Type = InArg(1).Type; - OutArg(1).Size = InArg(1).Size; - OutArg(1).Dimension = InArg(1).Dimension; - OutArg(1).Value = InArg(1).Value; - OutArg(1).FindLike = InArg(1).FindLike; - OutArg(1).Scope = 'Number_d'; -else - OutArg = FA_GetOutArgInfo(InArg,NInArg,OutArg,NOutArg,SharedInfo,FunPrecSpecifier,FunTypeAnnot,FunSizeAnnot,ReportFileName); -end - -// #RNU_RES_B -// --- Generate the names for the output arguments. --- -// Update of OutArg.Name and OutArg.Scope fields. -// #RNU_RES_E -if ((ASTFunName == 'OpMinus') & (NInArg == 1) & (InArg(1).Dimension == 0) & (InArg(1).Scope == 'Number')) - OutArg(1).Name = string(OutArg(1).Value); -elseif ((ASTFunName == 'float') & (NInArg == 1) & (InArg(1).Dimension == 0) & (InArg(1).Scope == 'Number')) - OutArg(1).Name = string(OutArg(1).Value); -elseif ((ASTFunName == 'double') & (NInArg == 1) & (InArg(1).Dimension == 0) & (InArg(1).Scope == 'Number')) - OutArg(1).Name = string(OutArg(1).Value); -else - [OutArg,SharedInfo] = GenOutArgNames(ASTFunName,InArg,NInArg,OutArg,NOutArg,LhsArg,NLhsArg,FileInfo,SharedInfo); -end - -// #RNU_RES_B -// --- Push in the AST stack the Output arguments. --- -// #RNU_RES_E -if (ASTFunName == 'OpEqual') - // Do nothing -else - for counteroutargs = 1:NOutArg - tmppushstack = OutArg(counteroutargs).Scope+': '+OutArg(counteroutargs).Name; - // #RNU_RES_B - PrintStringInfo(' Pushing in the AST stack: ""'+tmppushstack+'"".',ReportFileName,'file','y'); - // #RNU_RES_E - AST_PushASTStack(tmppushstack); - end -end - -// #RNU_RES_B -//NUT: verificare se si puo' accorpare qualcosa qui sotto -//RN: non capisco come mai analizzo lo scope dopo che faccio il push nello stack dove lo utilizzo!!! -// --- Scope analysis of the output arguments. --- -// #RNU_RES_E -if (ASTFunName == 'OpMinus' & NInArg == 1 & (InArg(1).Dimension == 0) & (InArg(1).Scope == 'Number')) - // Scope already set above. -elseif (ASTFunName == 'float' & NInArg == 1 & (InArg(1).Dimension == 0) & (InArg(1).Scope == 'Number')) - // Scope already set above. -elseif (ASTFunName == 'double' & NInArg == 1 & (InArg(1).Dimension == 0) & (InArg(1).Scope == 'Number')) - // Scope already set above. -else - OutArg = ST_AnalyzeScope(OutArg,NOutArg,FileInfo,SharedInfo); -end - -//#RNUREM_ME --- Check if the current function is handling for counter variables. --- -[OutArg,SharedInfo] = ST_InsForCntVars(InArg,NInArg,OutArg,NOutArg,ASTFunName,FileInfo,SharedInfo); - -//#RNUREM_ME --- Store the while condition variable (if any). --- -SharedInfo = GetWhileCondVariable(OutArg,NOutArg,ASTFunName,FileInfo,SharedInfo); - -//#RNUREM_ME --- Update Symbol Table with output arguments. --- -if ((ASTFunName == 'OpMinus') & (NInArg == 1) & (InArg(1).Dimension == 0) & (InArg(1).Scope == 'Number')) - //#RNUREM_ME A number is not inserted in the symbol table. -elseif ((ASTFunName == 'float') & (NInArg == 1) & (InArg(1).Dimension == 0) & (InArg(1).Scope == 'Number')) - //#RNUREM_ME A number is not inserted in the symbol table. -elseif ((ASTFunName == 'double') & (NInArg == 1) & (InArg(1).Dimension == 0) & (InArg(1).Scope == 'Number')) - //#RNUREM_ME A number is not inserted in the symbol table. -else - ST_InsOutArg(OutArg,NOutArg,FileInfo,SharedInfo,'all'); -end -//#RNUREM_ME NUT: per risparmiare tempo di esecuzione puoi mettere delle if sulle funzioni che devono -//#RNUREM_ME NUT: essere skippate. - -//#RNU_RES_B -// -------------------------------------------- -// --- Generate the C name of the function. --- -// -------------------------------------------- -//#RNU_RES_E - -CFunName = C_GenerateFunName(ASTFunName,InArg,NInArg,OutArg,NOutArg); -//#RNU_RES_B -PrintStringInfo(' C Function Name: '+CFunName,ReportFileName,'file','y'); -// ------------------------------------------------------------------------- -// --- Determine which library the function belongs to: USER2C or SCI2C. --- -// ------------------------------------------------------------------------- -//#RNU_RES_E -if SCI2Cfileexist(FileInfo.SCI2CLibCAnnFun,ASTFunName+'.ann') - LibTypeInfo = 'SCI2C'; -else - LibTypeInfo = 'USER2C'; -end - -//#RNU_RES_B -// ------------------------------------------------------------------------------------ -// --- Check whether the function has been already called in the current .sci file. --- -// ------------------------------------------------------------------------------------ -//#RNU_RES_E -if (sum(SharedInfo.CFunctsAlreadyCalled == CFunName) == 1) - Flag_FunAlreadyCalled = 1; -else - - //#RNUREM_ME Add the C function name to the list of C functions called in the current .sci file. - SharedInfo.CFunctsAlreadyCalled(size(SharedInfo.CFunctsAlreadyCalled,1)+1) = CFunName; -end - -//#RNU_RES_B -// ---------------------------------- -// --- Generate FunInfo dat file. --- -// ---------------------------------- -//NUT: questo .dat deve essere generato sempre perche' cambiano i nomi degli argomenti mentre il resto dovrebbe -//NUT: essere tutto uguale -//NUT: magari posso fare una funzione che inserisce solo i campi diversi e fa un check su quelli che -//NUT: dovrebbero essere identici. -//#RNU_RES_E -GenCFunDatFiles(ASTFunName,FunPrecSpecifier,FunTypeAnnot,FunSizeAnnot,InArg,NInArg,OutArg,NOutArg,CFunName,LibTypeInfo,FunInfoDatDir); - -//#RNU_RES_B -// ----------------------------------- -// --- Update SCI2C Function List. --- -// ----------------------------------- -// Functions that are not already available in C are stored -// in the SCI2C Function List and converted in C at the end of -// the translation of the current .sci file. -//NUT: il problema della d0d0OpEqual dovrebbe essere legato al fatto che cerco di fare la opequal legata alla ins... -//NUT: devo evitare di scriveral dentro la lsista delle funzioni da tradurre. -//#RNU_RES_E -SharedInfo = FL_UpdateToBeConv(ASTFunName,CFunName,FunPrecSpecifier,FunTypeAnnot,FunSizeAnnot,InArg,NInArg,OutArg,NOutArg,FileInfo,SharedInfo); - -//#RNU_RES_B -// ----------------------------------------------- -// --- Check on common input/output arguments. --- -// ----------------------------------------------- -//#RNU_RES_E -if (((ASTFunName=='OpEqual') & (SharedInfo.SkipNextEqual == 1)) | ... - SharedInfo.SkipNextFun > 0 | ... - ((sum(mtlb_strcmp(ASTFunName,SharedInfo.Annotations.DataPrec)) > 0) & (SharedInfo.SkipNextPrec == 1))) - // Do nothing -else - AST_CheckCommonInOutArgs(InArg,NInArg,OutArg,NOutArg,ReportFileName); -end - -//#RNU_RES_B -// ----------------------------- -// --- C Generation Section. --- -// ----------------------------- -// --- Load FunInfo structure. --- -//#RNU_RES_E -FunInfoDatFileName = fullfile(FunInfoDatDir,CFunName+'.dat'); -load(FunInfoDatFileName,'FunInfo'); - -//#RNU_RES_B -// --- Generate include. --- -//#RNU_RES_E -if ((Flag_FunAlreadyCalled == 0) & (FunInfo.LibTypeInfo == 'USER2C')) - // #RNU_RES_B - PrintStringInfo('Adding include',ReportFileName,'file','y'); - PrintStringInfo('#include ""'+CFunName+'.h""',... - ReportFileName,'file','y'); - // #RNU_RES_E - PrintStringInfo('#include ""'+CFunName+'.h""',... - Pass1HeaderFileName,'file','y'); -end - -//#RNU_RES_B -// --- Generate the C code for the current function. --- -//#RNU_RES_E -FlagCall = 1; -SharedInfo = C_Funcall(FunInfo,FileInfo,SharedInfo,FlagCall); -//#RNU_RES_B -//NUT: anziche farla fare alla cfuncall l'aggiornamento delle skip metti qui una funzione dedicata a cio' -//NUT: e' piu' ordinato. -//#RNU_RES_E - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndProgram.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndProgram.sci deleted file mode 100644 index 2d6d77a9..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndProgram.sci +++ /dev/null @@ -1,62 +0,0 @@ -function SharedInfo = AST_HandleEndProgram(FileInfo,SharedInfo) -// function SharedInfo = AST_HandleEndProgram(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// Handles the EndProgram tag of the AST. -// -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 12-Jun-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1FileName - -IndentLevel = SharedInfo.NIndent; -CCall = ''; -PrintStepInfo('Handling EndProgram',ReportFileName,'file'); -tmpposfirstscalar = SharedInfo.CurrentFunInfo.PosFirstOutScalar; - -if (1==2) - //NUT: disabled because at the moment I am able to decode the return instruction. - if (SharedInfo.CurrentFunInfo.CFunctionName == SharedInfo.CMainFunName) - CCall = CCall+'return(0);'; - else - if (SharedInfo.CurrentFunInfo.PosFirstOutScalar > 0) - CCall = CCall+'return('+SharedInfo.CurrentFunInfo.OutArg(tmpposfirstscalar).Name+');' - end - end - - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); -end - - -SharedInfo.NIndent = SharedInfo.NIndent - 1; -IndentLevel = SharedInfo.NIndent; -PrintStringInfo(' }',ReportFileName,'file','y'); -PrintStringInfo(C_IndentBlanks(IndentLevel)+'}',CPass1FileName,'file','y'); - -// --- Close the copy of the scilab file. --- -PrintStringInfo(' Closing: '+FileInfo.Funct(nxtscifunnumber).SCICopyFileName,ReportFileName,'file','y'); -mclose(FileInfo.Funct(nxtscifunnumber).SCICopyFileFid); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndWhile.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndWhile.sci deleted file mode 100644 index 94649b10..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleEndWhile.sci +++ /dev/null @@ -1,76 +0,0 @@ -function SharedInfo = AST_HandleEndWhile(FileInfo,SharedInfo) -// function SharedInfo = AST_HandleEndWhile(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -//#RNU_RES_B -// Handles the EndWhile tag of the AST. -// -// txt=['While' -// ' WhileExpression:' -// ' '+string(W.expression) -// ' WhileStatements:' -// ' '+objectlist2string(W.statements) -// 'EndWhile'] -//#RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 15-Nov-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; - -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1FileName; -CPass1WhileEpilFileName = FileInfo.Funct(nxtscifunnumber).CPass1WhileEpilFileName(SharedInfo.While.Level); - -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Handling EndWhile***',ReportFileName,'file','y'); -CCall =''; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -//#RNU_RES_B -// ---------------------------- -// --- Generate the C code. --- -// ---------------------------- -// --- Copy Epilogue into C code (Pass1) file. --- -//#RNU_RES_E -[CLinesArray,N_Lines] = File2StringArray(CPass1WhileEpilFileName); -CLinesArray = stripblanks(CLinesArray); - -for tmpcnt = 1:N_Lines-1 - PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+CLinesArray(tmpcnt),CPass1FileName,'file','y'); -end -PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent-1)+CLinesArray(N_Lines),CPass1FileName,'file','y'); - -//#RNU_RES_B -// -------------------------- -// --- Update SharedInfo. --- -// -------------------------- -//#RNU_RES_E -SharedInfo.NIndent = SharedInfo.NIndent - 1; - -// ------------------------------- -// --- Delete temporary files. --- -// ------------------------------- -SCI2Cmdelete(CPass1WhileEpilFileName); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleFor.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleFor.sci deleted file mode 100644 index e96edd4c..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleFor.sci +++ /dev/null @@ -1,84 +0,0 @@ -function FileInfo = AST_HandleFor(FileInfo,SharedInfo) -// function FileInfo = AST_HandleFor(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -//#RNU_RES_B -// Handles the For tag of the AST. -// -// overloading function for "for" type tlist string function -// this is a node of the AST -// fields: -// expression : "expression" type tlist (the loop expression) -// statements : list of "equal" type tlist and list('EOL') (the -// for instructions list) -// txt=['For' -// ' Expression:' -// ' '+string(F.expression) -// ' Statements:' -// ' '+objectlist2string(F.statements) -// 'EndFor'] -// -//#RNU_RES_E -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 10-Nov-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -PfxP1ForProlFileName = FileInfo.Funct(nxtscifunnumber).PfxP1ForProlFileName; -PfxP1ForEpilFileName = FileInfo.Funct(nxtscifunnumber).PfxP1ForEpilFileName; -PrintStepInfo('Handling For',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -//#RNU_RES_B -// --- Signal the entrance in a for expression. --- -//#RNU_RES_E -SharedInfo.ForExpr.OnExec = SharedInfo.ForExpr.OnExec + 1; - -//#RNU_RES_B -// --- Generate the file names for the prologue and epilogue files. --- -//#RNU_RES_E -FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level) = ... - PfxP1ForProlFileName+string(SharedInfo.For.Level)+'.c'; -FileInfo.Funct(nxtscifunnumber).CPass1ForEpilFileName(SharedInfo.For.Level) = ... - PfxP1ForEpilFileName+string(SharedInfo.For.Level)+'.c'; - -//#RNU_RES_B -// --------------------------------------------------------- -// --- Create a copy of the For Prologue/Epilogue Files. --- -// --------------------------------------------------------- -//#RNU_RES_E -PrintStringInfo(' ',FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level),'file'); -PrintStringInfo(' ',FileInfo.Funct(nxtscifunnumber).CPass1ForEpilFileName(SharedInfo.For.Level),'file'); - -//#RNU_RES_B -// ------------------------------------------------------ -// --- Replace the CPass1V1 file with a temp ForFile. --- -// ------------------------------------------------------ -// From now up to Expression: all the C code will be written in a for temporary file. -//#RNU_RES_E -tmpfilename = FileInfo.Funct(nxtscifunnumber).CPass1FileName; -FileInfo.Funct(nxtscifunnumber).CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level); -FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level) = tmpfilename; -PrintStringInfo('Redirecting C code to: '+FileInfo.Funct(nxtscifunnumber).CPass1FileName,FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleForStatem.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleForStatem.sci deleted file mode 100644 index f47538a6..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleForStatem.sci +++ /dev/null @@ -1,87 +0,0 @@ -function [FileInfo,SharedInfo] = AST_HandleForStatem(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -//#RNU_RES_B -// Handles the ForStatements tag of the AST. -// overloading function for "for" type tlist string function -// this is a node of the AST -// fields: -// expression : "expression" type tlist (the loop expression) -// statements : list of "equal" type tlist and list('EOL') (the -// for instructions list) -// txt=['For' -// ' ForExpression:' -// ' '+string(F.expression) -// ' ForStatements:' -// ' '+objectlist2string(F.statements) -// 'EndFor'] -// -//#RNU_RES_E -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 15-Nov-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(2,2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -PrintStepInfo('Handling ForStatements',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -//#RNU_RES_B -// --------------------------------------------- -// --- Resume the correct name for CPass1V1. --- -// --------------------------------------------- -//#RNU_RES_E -tmpfilename = FileInfo.Funct(nxtscifunnumber).CPass1FileName; -FileInfo.Funct(nxtscifunnumber).CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level); -FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level) = tmpfilename; -PrintStringInfo(' Redirecting C code to: '+FileInfo.Funct(nxtscifunnumber).CPass1FileName,FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - -//#RNU_RES_B -// ------------------------ -// --- Generate C code. --- -// ------------------------ -//#RNU_RES_E -SharedInfo = C_ForExpression(FileInfo,SharedInfo); - -//#RNU_RES_B -// -------------------------- -// --- Update SharedInfo. --- -// -------------------------- -// Signal the exit from a for expression. -//#RNU_RES_E -SharedInfo.ForExpr.OnExec = SharedInfo.ForExpr.OnExec - 1; -SharedInfo.ForExpr.IntCntArg = []; -SharedInfo.ForExpr.MtxValCntArg = []; -SharedInfo.ForExpr.SclValCntArg = []; -SharedInfo.ForExpr.OpColonInfoIn1 = ''; -SharedInfo.ForExpr.OpColonInfoIn2 = ''; -SharedInfo.ForExpr.OpColonInfoIn3 = ''; - - -SharedInfo.ForExpr.AssignmentFun = 0; - -// ------------------------------- -// --- Delete temporary files. --- -// ------------------------------- -SCI2Cmdelete(FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level)); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleHeader.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleHeader.sci deleted file mode 100644 index 7439b784..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleHeader.sci +++ /dev/null @@ -1,245 +0,0 @@ -function SharedInfo = AST_HandleHeader(ASTHeader,FileInfo,SharedInfo) -// function SharedInfo = AST_HandleHeader(ASTHeader,FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// Handles the Header of the AST. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; - -FunctionName = ASTHeader.Name; -if (mtlb_strcmp(ASTHeader.Name,SharedInfo.NextSCIFunName) == %F) - SCI2CerrorFile('Very strange! AST Name field ""'+ASTHeader.Name+... - '""is different from function name ""'+SharedInfo.NextSCIFunName+'"".',ReportFileName); -end -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// ------------------------------------- -// --- Extract info from AST header. --- -// ------------------------------------- -TmpInNames = tokens(ASTHeader.Inputs,' '); -TmpOutNames = tokens(ASTHeader.Outputs,' '); - -//#RNU_RES_B -// Remove Variable: Number: or String: specifier. -//#RNU_RES_E -NInArg = 0; -for tmpcnt = 1:size(TmpInNames,1) - TmpSingleName = TmpInNames(tmpcnt); - if ((TmpSingleName == 'Variable:') | ... - (TmpSingleName == 'String:') | ... - (TmpSingleName == 'Number:')) - // Skip the specifier. - else - NInArg = NInArg + 1; - InNames(NInArg) = TmpSingleName; - end -end - -//#RNU_RES_B -// Remove Variable: Number: or String: specifier. -//#RNU_RES_E -NOutArg = 0; -for tmpcnt = 1:size(TmpOutNames,1) - TmpSingleName = TmpOutNames(tmpcnt); - if ((TmpSingleName == 'Variable:') | ... - (TmpSingleName == 'String:') | ... - (TmpSingleName == 'Number_x:') | ... - (TmpSingleName == 'Number_s:') | ... - (TmpSingleName == 'Number_d:') | ... - (TmpSingleName == 'Number_c:') | ... - (TmpSingleName == 'Number_z:')) - // Skip the specifier. - else - NOutArg = NOutArg + 1; - OutNames(NOutArg) = TmpSingleName; - end -end - -if (mtlb_strcmp(InNames(1),'')) - NInArg = 0; -else - NInArg = size(InNames,1); -end - -if ((OutNames(1)=='') | (FunctionName == 'ins')) - //#RNU_RES_B - //NUT: Force ins to have 0 args. Double check it. - //#RNU_RES_E - - NOutArg = 0; -else - NOutArg = size(OutNames,1); -end - - -//#RNU_RES_B -// ------------------------------------- -// --- Load the C function dat file. --- -// ------------------------------------- -//NUT: This load is useful expecially for the second approach. In this case we are not using -//NUT: the size info. -//#RNU_RES_E -load(fullfile(FileInfo.FunctionList.FunInfoDatDir,SharedInfo.NextCFunName+'.dat'),'FunInfo'); - -SharedInfo.CurrentFunInfo = FunInfo; -clear FunInfo - -//#RNU_RES_B -// ----------------------------------------------------------------------------- -// --- Check coherence between In/Out names and In/Out Arg structure loaded. --- -// ----------------------------------------------------------------------------- -//#RNU_RES_E -if (length(SharedInfo.CurrentFunInfo.InArg(1).Name) > 0) - NInArgDat = size(SharedInfo.CurrentFunInfo.InArg,1); -else - NInArgDat = 0; -end - -if (NInArgDat == NInArg) - for tmpcnt = 1:NInArg - SharedInfo.CurrentFunInfo.InArg(tmpcnt).Name = InNames(tmpcnt); - if (SharedInfo.CurrentFunInfo.InArg(tmpcnt).Dimension == 0) - SharedInfo.CurrentFunInfo.InArg(tmpcnt).Size(1) = '1'; - SharedInfo.CurrentFunInfo.InArg(tmpcnt).Size(2) = '1'; - SharedInfo.CurrentFunInfo.InArg(tmpcnt).Value = %nan; - else - //#RNU_RES_B - //NUT: using approach 1: Setting for input and output arguments symbolic sizes. - //#RNU_RES_E - SharedInfo.CurrentFunInfo.InArg(tmpcnt).Size(1) = '__'+SharedInfo.CurrentFunInfo.InArg(tmpcnt).Name+'Size[0]'; - SharedInfo.CurrentFunInfo.InArg(tmpcnt).Size(2) = '__'+SharedInfo.CurrentFunInfo.InArg(tmpcnt).Name+'Size[1]'; - SharedInfo.CurrentFunInfo.InArg(tmpcnt).Value = %nan; - end - end -else - SCI2CerrorFile('Number of input arguments specified in AST is different from the number specified in .dat file.',ReportFileName); -end - - -if (SharedInfo.CurrentFunInfo.NOutArg == NOutArg) - for tmpcnt = 1:NOutArg - SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Name = OutNames(tmpcnt); - end -else - //#RNU_RES_B - PrintStringInfo('N. of output arguments found in the AST: '+string(NOutArg),ReportFileName,'both','y'); - PrintStringInfo('N. of output arguments found in the call (FunInfo structure): '+string(SharedInfo.CurrentFunInfo.NOutArg),ReportFileName,'both','y'); - //#RNU_RES_E - SCI2CerrorFile('Number of output arguments specified in AST is different from the number specified in .dat file.',ReportFileName); -end -//#RNU_RES_B -//NUT: using approach 1: Setting for input and output arguments symbolic sizes. -//#RNU_RES_E -SharedInfo.CurrentFunInfo.OutArg = ... - FA_GetOutArgInfo(SharedInfo.CurrentFunInfo.InArg,NInArg,... - SharedInfo.CurrentFunInfo.OutArg,NOutArg,... - SharedInfo,... - SharedInfo.CurrentFunInfo.FunPrecSpecifier,... - SharedInfo.CurrentFunInfo.FunTypeAnnot,SharedInfo.CurrentFunInfo.FunSizeAnnot,ReportFileName); - -//#RNU_RES_B -// ------------------------------------------------------------------------- -// --- Stores InArg structure into the temporary variables symbol table. --- -// ------------------------------------------------------------------------- -//#RNU_RES_E -SymbTableFileName = FileInfo.Funct(nxtscifunnumber).LocalVarFileName; - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Putting Input and Output arguments in the local symbol table***',ReportFileName,'file','y'); -// #RNU_RES_E -for tmpcnt = 1:NInArg - //#RNU_RES_B - PrintStringInfo(' Symbol ""'+SharedInfo.CurrentFunInfo.InArg(tmpcnt).Name+'""',ReportFileName,'file','y'); - PrintStringInfo(' Setting symbol ""'+SharedInfo.CurrentFunInfo.InArg(tmpcnt).Name+'"" in '+SymbTableFileName+'.',ReportFileName,'file','y'); - //#RNU_RES_E - - ST_Set(SharedInfo.CurrentFunInfo.InArg(tmpcnt).Name,... - SharedInfo.CurrentFunInfo.InArg(tmpcnt).Type,... - SharedInfo.CurrentFunInfo.InArg(tmpcnt).Size,... - SharedInfo.CurrentFunInfo.InArg(tmpcnt).Value,... - SharedInfo.CurrentFunInfo.InArg(tmpcnt).FindLike,... - SharedInfo.CurrentFunInfo.InArg(tmpcnt).Dimension,... - SymbTableFileName); - //#RNU_RES_B - PrintStringInfo(' Type: '+SharedInfo.CurrentFunInfo.InArg(tmpcnt).Type,ReportFileName,'file','y'); - PrintStringInfo(' Size(1): '+string(SharedInfo.CurrentFunInfo.InArg(tmpcnt).Size(1)),ReportFileName,'file','y'); - PrintStringInfo(' Size(2): '+string(SharedInfo.CurrentFunInfo.InArg(tmpcnt).Size(2)),ReportFileName,'file','y'); - PrintStringInfo(' Value: '+string(SharedInfo.CurrentFunInfo.InArg(tmpcnt).Value),ReportFileName,'file','y'); - PrintStringInfo(' FindLike: '+string(SharedInfo.CurrentFunInfo.InArg(tmpcnt).FindLike),ReportFileName,'file','y'); - PrintStringInfo(' Dimension: '+string(SharedInfo.CurrentFunInfo.InArg(tmpcnt).Dimension),ReportFileName,'file','y'); - PrintStringInfo(' ',ReportFileName,'file','y'); - //#RNU_RES_E -end - -// -------------------------------------------------------------------------- -// --- Stores OutArg structure into the temporary variables symbol table. --- -// -------------------------------------------------------------------------- -//NUT: verifica se puoi usare l'outarg2symboltable qui. -for tmpcnt = 1:NOutArg - //#RNU_RES_B - PrintStringInfo(' Symbol ""'+SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Name+'""',ReportFileName,'file','y'); - - PrintStringInfo(' Setting symbol ""'+SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Name+'"" in '+SymbTableFileName+'.',ReportFileName,'file','y'); - //#RNU_RES_E - - ST_Set(SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Name,... - SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Type,... - SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Size,... - SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Value,... - SharedInfo.CurrentFunInfo.OutArg(tmpcnt).FindLike,... - SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Dimension,... - SymbTableFileName); - //#RNU_RES_B - PrintStringInfo(' Type: '+SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Type,ReportFileName,'file','y'); - PrintStringInfo(' Size(1): '+string(SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Size(1)),ReportFileName,'file','y'); - PrintStringInfo(' Size(2): '+string(SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Size(2)),ReportFileName,'file','y'); - PrintStringInfo(' Value: '+string(SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Value),ReportFileName,'file','y'); - PrintStringInfo(' FindLike: '+string(SharedInfo.CurrentFunInfo.OutArg(tmpcnt).FindLike),ReportFileName,'file','y'); - PrintStringInfo(' Dimension: '+string(SharedInfo.CurrentFunInfo.OutArg(tmpcnt).Dimension),ReportFileName,'file','y'); - PrintStringInfo(' ',ReportFileName,'file','y'); - //#RNU_RES_E - -end - -//#RNU_RES_B -// ----------------------------------------------- -// --- Check on common input/output arguments. --- -// ----------------------------------------------- -//#RNU_RES_E -AST_CheckCommonInOutArgs(SharedInfo.CurrentFunInfo.InArg,NInArg,SharedInfo.CurrentFunInfo.OutArg,NOutArg,ReportFileName); - -//#RNU_RES_B -// ------------------------ -// --- Generate C code. --- -// ------------------------ -//#RNU_RES_E -FlagCall = 0; -SharedInfo = C_Funcall(SharedInfo.CurrentFunInfo,FileInfo,SharedInfo,FlagCall); -SharedInfo.NIndent = SharedInfo.NIndent+1; // Increase indentation level. - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleIfElse.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleIfElse.sci deleted file mode 100644 index 5373adf6..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleIfElse.sci +++ /dev/null @@ -1,92 +0,0 @@ -function [FileInfo,SharedInfo] = AST_HandleIfElse(FileInfo,SharedInfo,ASTIfExpType) -// function [FileInfo,SharedInfo] = AST_HandleIfElse(FileInfo,SharedInfo,ASTIfExpType) -// ----------------------------------------------------------------- -//#RNU_RES_B -// Handles the Else If tag of the AST. -// -// overloading function for "ifthenel" type tlist string function -// this is a node of the AST -// fields: -// expression : "expression" type tlist (the if expression) -// then : list of "equal" type tlist and list('EOL') (the -// then instructions list) -// elseifs : a list of tlists -// else : list of "equal" type tlist and list('EOL') (the -// else instructions list) -// txt=['If ' -// ' Expression:' -// ' '+string(I.expression) -// ' If Statements' -// ' '+objectlist2string(I.then)] -// for e=I.elseifs -// txt=[txt; -// ' Else If Expression' -// ' '+string(e.expression) -// ' Else If Statements' -// ' '+objectlist2string(e.then)] -// end -// txt=[txt; -// ' Else Statements' -// ' '+objectlist2string(I.else) -// 'EndIf'] -// -// Input data: -// ASTIfExpType: it specifies if we are handling a if condition (ASTIfExpType='if') -// or an elseif condition (ASTIfExpType='elseif') or else statement (ASTIfExpType='else') -//#RNU_RES_E -// //NUT: add description here -// -// -// Output data: -// //NUT: add description here -// -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -PrintStepInfo('Handling If Statements',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - -global SCI2CSTACK -global StackPosition; -global STACKDEDUG -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -//#RNU_RES_B -// --------------------------------------------------- -// --- Retrieve If Expression Parameters from AST. --- -// --------------------------------------------------- -//#RNU_RES_E -if (ASTIfExpType~='else') - [IfCondArg,NIfCondArg] = AST_ParseIfExprStruct(FileInfo,SharedInfo,ASTIfExpType); -else - // "else" type doesn't contain any condition to test. - IfCondArg = ''; - NIfCondArg = 0; -end - -//#RNU_RES_B -// ----------------------------- -// --- C Generation Section. --- -// ----------------------------- -// --- Generate the C code for if/elseif Expression. --- -//#RNU_RES_E -SharedInfo = C_IfExpression(IfCondArg,NIfCondArg,ASTIfExpType,FileInfo,SharedInfo); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleWhileExpr.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleWhileExpr.sci deleted file mode 100644 index ffcf2f45..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleWhileExpr.sci +++ /dev/null @@ -1,80 +0,0 @@ -function [FileInfo,SharedInfo] = AST_HandleWhileExpr(FileInfo,SharedInfo) -// function [FileInfo,SharedInfo] = AST_HandleWhileExpr(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -//#RNU_RES_B -// Handles the WhileExpression tag of the AST. -// -// txt=['While' -// ' WhileExpression:' -// ' '+string(W.expression) -// ' WhileStatements:' -// ' '+objectlist2string(W.statements) -// 'EndWhile'] -// -//#RNU_RES_E -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 29-Dec-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -PfxP1WhileProlFileName = FileInfo.Funct(nxtscifunnumber).PfxP1WhileProlFileName; -PfxP1WhileEpilFileName = FileInfo.Funct(nxtscifunnumber).PfxP1WhileEpilFileName; -PrintStepInfo('Handling While',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -//#RNU_RES_B -// --- Signal the entrance in a while expression. --- -//#RNU_RES_E -SharedInfo.WhileExpr.OnExec = SharedInfo.WhileExpr.OnExec + 1; - -//#RNU_RES_B -// --- Generate the file names for the prologue and epilogue files. --- -//#RNU_RES_E -FileInfo.Funct(nxtscifunnumber).CPass1WhileProlFileName(SharedInfo.While.Level) = ... - PfxP1WhileProlFileName+string(SharedInfo.While.Level)+'.c'; -FileInfo.Funct(nxtscifunnumber).CPass1WhileEpilFileName(SharedInfo.While.Level) = ... - PfxP1WhileEpilFileName+string(SharedInfo.While.Level)+'.c'; - -//#RNU_RES_B -// ----------------------------------------------------------- -// --- Create a copy of the While Prologue/Epilogue Files. --- -// ----------------------------------------------------------- -//#RNU_RES_E -PrintStringInfo(' ',FileInfo.Funct(nxtscifunnumber).CPass1WhileProlFileName(SharedInfo.While.Level),'file'); -PrintStringInfo(' ',FileInfo.Funct(nxtscifunnumber).CPass1WhileEpilFileName(SharedInfo.While.Level),'file'); - -//#RNU_RES_B -// -------------------------------------------------------- -// --- Replace the CPass1V1 file with a temp WhileFile. --- -// -------------------------------------------------------- -// From now up to Expression: all the C code will be written in a while temporary file. -//#RNU_RES_E -tmpfilename = FileInfo.Funct(nxtscifunnumber).CPass1FileName; -FileInfo.Funct(nxtscifunnumber).CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1WhileProlFileName(SharedInfo.While.Level); -FileInfo.Funct(nxtscifunnumber).CPass1WhileProlFileName(SharedInfo.While.Level) = tmpfilename; -//#RNU_RES_B -PrintStringInfo('Redirecting C code to: '+FileInfo.Funct(nxtscifunnumber).CPass1FileName,FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); -//#RNU_RES_E - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleWhileStatem.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleWhileStatem.sci deleted file mode 100644 index 5c823ab3..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_HandleWhileStatem.sci +++ /dev/null @@ -1,119 +0,0 @@ -function [FileInfo,SharedInfo] = AST_HandleWhileStatem(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -//#RNU_RES_B -// Handles the WhileStatements tag of the AST. -// -// txt=['While' -// ' WhileExpression:' -// ' '+string(W.expression) -// ' WhileStatements:' -// ' '+objectlist2string(W.statements) -// 'EndWhile'] -// -//#RNU_RES_E -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 20-Jan-2008 -- Edoardo Nutricato: Author. -// 20-Jan-2008 -- Rubby Nutricato: Minor Changes. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -//#RNU_RES_B - -//NUT: accertati che l'epilogo e il prologo del while siano effettivamente differenti o se -//NUT: si puo' avere un solo file utilizzato sia per il prologo che per l'epilogo. - -//NUT: da sistemare senza le global -//#RNU_RES_E -global SCI2CSTACK -global StackPosition; -global STACKDEDUG - - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -CPass1WhileProlFileName = FileInfo.Funct(nxtscifunnumber).CPass1WhileProlFileName(SharedInfo.While.Level); -PrintStepInfo('Handling WhileStatements',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -//#RNU_RES_B -// ----------------------------------------------- -// --- Resume the correct name while CPass1V1. --- -// ----------------------------------------------- -//#RNU_RES_E -tmpfilename = FileInfo.Funct(nxtscifunnumber).CPass1FileName; -FileInfo.Funct(nxtscifunnumber).CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1WhileProlFileName(SharedInfo.While.Level); -FileInfo.Funct(nxtscifunnumber).CPass1WhileProlFileName(SharedInfo.While.Level) = tmpfilename; -CPass1WhileProlFileName = FileInfo.Funct(nxtscifunnumber).CPass1WhileProlFileName(SharedInfo.While.Level); -PrintStringInfo(' Redirecting C code to: '+FileInfo.Funct(nxtscifunnumber).CPass1FileName,FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - -//#RNU_RES_B -// ------------------------ -// --- Generate C code. --- -// ------------------------ -//#RNU_RES_E -if(SharedInfo.WhileExpr.CondVar == '') - //#RNU_RES_B - // It means that we are handling something like while(a) or while(1) - // The while condition variable is generated by the HandleEndGenFun. - //#RNU_RES_E - - // --- Pop the name of the condition variable or number. --- - Pop1 = AST_PopASTStack(); - - [ArgName,ArgScope] = AST_ExtractNameAndScope(Pop1); - if (length(ArgName) == 0) - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Expected while(variable) or while(number).','','stdout','y'); - PrintStringInfo('SCI2CERROR: Expected a variable or number in the AST while expression.','','stdout','y'); - PrintStringInfo('SCI2CERROR: Report this error to raffaele.nutricato@tiscali.it.','','stdout','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); - SCI2Cerror('Expected a conditional variable in the while expression'); - end - - SharedInfo.WhileExpr.CondVar = ArgName; - //#RNU_RES_B - // --- Repush strings into the AST stack. --- - //#RNU_RES_E - - AST_PushASTStack(Pop1); - -elseif (SharedInfo.WhileExpr.DimCondVar > 0) - SCI2CerrorFile('Cannot manage while with matrix conditions',ReportFileName); -end -SharedInfo = C_WhileExpression(FileInfo,SharedInfo); - -// -------------------------- -// --- Update SharedInfo. --- -// -------------------------- -// Signal the exit from a while expression. -SharedInfo.WhileExpr.OnExec = SharedInfo.WhileExpr.OnExec - 1; -SharedInfo.WhileExpr.CondVar = ''; -SharedInfo.WhileExpr.DimCondVar = -1; -SharedInfo.WhileExpr.AssignmentFun = 0; //NUT: siamo sicuri che serva? - -// ------------------------------- -// --- Delete temporary files. --- -// ------------------------------- -SCI2Cmdelete(CPass1WhileProlFileName); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseEqualStruct.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseEqualStruct.sci deleted file mode 100644 index 1c86b765..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseEqualStruct.sci +++ /dev/null @@ -1,168 +0,0 @@ -function [FunctionName,InArg,NInArg,OutArg,NOutArg] = AST_ParseEqualStruct(FileInfo,SharedInfo) -// function [FunctionName,InArg,NInArg,OutArg,NOutArg] = AST_ParseEqualStruct(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -//#RNU_RES_B -// Parses the Equal structure of the AST. -// Structure of Equal: -// txt=['Equal' -// ' Expression: ' -// ' '+string(e.expression) -// ' Lhs : ' -// ' '+objectlist2string(e.lhs) -// 'EndEqual' -// ] -//#RNU_RES_E -// -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; - -global SCI2CSTACK -global StackPosition; -global STACKDEDUG - -//#RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Reading AST***',ReportFileName,'file','y'); -//#RNU_RES_E - -// ------------------------------- -// --- Read Output parameters. --- -// ------------------------------- -LhsField = AST_PopASTStack(); -NOutArg = 0; -OutputArgumentNames = []; -OutputArgumentScope = []; -while (LhsField ~= 'Lhs :') - NOutArg = NOutArg + 1; - [OutputArgumentNames(NOutArg),OutputArgumentScope(NOutArg)] = AST_ExtractNameAndScope(LhsField); - LhsField = AST_PopASTStack(); - if (LhsField == 'Expression:') - SCI2Cerror('Found Expression: before Lhs'); - elseif (LhsField == 'Equal') - SCI2Cerror('Found Equal before Lhs'); - end -end -OutputArgumentNames = SCI2Cflipud(OutputArgumentNames); -OutputArgumentScope = SCI2Cflipud(OutputArgumentScope); - -// ------------------------------ -// --- Read input parameters. --- -// ------------------------------ -ExprField = AST_PopASTStack(); -NInArg = 0; -InputArgumentNames = []; -while (ExprField ~= 'Expression:') - NInArg = NInArg + 1; - [InputArgumentNames(NInArg),InputArgumentScope(NInArg)] = AST_ExtractNameAndScope(ExprField); - ExprField = AST_PopASTStack(); - if (ExprField == 'Equal') - SCI2Cerror('Found Equal before Lhs'); - end -end -InputArgumentNames = SCI2Cflipud(InputArgumentNames); -InputArgumentScope = SCI2Cflipud(InputArgumentScope); - -//#RNU_RES_B -// ------------------------------ -// --- Extract function name. --- -// ------------------------------ -//#RNU_RES_E -FunctionName = AST_PopASTStack(); -if (FunctionName ~= 'Equal') then - SCI2Cerror('Problems with Equal, Expected Equal tag.'); -end -FunctionName = 'OpEqual'; - -//#RNU_RES_B -// ------------------------------------- -// --- Generate the InArg structure. --- -// ------------------------------------- -//#RNU_RES_E -InArg = []; -for counterinputargs = 1:NInArg - InArg(counterinputargs).Name=InputArgumentNames(counterinputargs); - InArg(counterinputargs).Scope=InputArgumentScope(counterinputargs); -end - -//#RNU_RES_B -// ------------------------------------- -// --- Generate the InArg structure. --- -// ------------------------------------- -//#RNU_RES_E -OutArg = []; -for counteroutputargs = 1:NOutArg - OutArg(counteroutputargs).Name=OutputArgumentNames(counteroutputargs); - OutArg(counteroutputargs).Scope=OutputArgumentScope(counteroutputargs); -end - -// ------------------------ -// --- Print Some Info. --- -// ------------------------ -//#RNU_RES_B -PrintStringInfo('Function Name: '+FunctionName,ReportFileName,'file','y'); -PrintStringInfo('N Intput Arguments: '+string(NInArg),ReportFileName,'file','y'); -//#RNU_RES_E -if (SharedInfo.Equal.Nins > 0) - //#RNU_RES_B - PrintStringInfo('N ins functions: '+string(SharedInfo.Equal.Nins),ReportFileName,'file','y'); - //#RNU_RES_E - for counterinputargs = 1:NInArg - //#RNU_RES_B - PrintStringInfo('Input Argument Number '+string(counterinputargs)+': '+InArg(counterinputargs).Name,... - ReportFileName,'file','y'); - PrintStringInfo(' Scope: '+InArg(counterinputargs).Scope,... - ReportFileName,'file','y'); - //#RNU_RES_E - end - if (NInArg ~= SharedInfo.Equal.Nins) - SCI2CerrorFile('Number of input arguments must be equal to number of ins functions.',ReportFileName); - end -else - //#RNU_RES_B - PrintStringInfo('N Output Arguments: '+string(NOutArg),ReportFileName,'file','y'); - //#RNU_RES_E - for counterinputargs = 1:NInArg - //#RNU_RES_B - PrintStringInfo('Input Argument Number '+string(counterinputargs)+': '+InArg(counterinputargs).Name,... - ReportFileName,'file','y'); - PrintStringInfo(' Scope: '+InArg(counterinputargs).Scope,... - ReportFileName,'file','y'); - //#RNU_RES_E - end - for counteroutputargs = 1:NOutArg - //#RNU_RES_B - PrintStringInfo('Output Argument Number '+string(counteroutputargs)+': '+OutArg(counteroutputargs).Name,... - ReportFileName,'file','y'); - PrintStringInfo(' Scope: '+OutArg(counterinputargs).Scope,... - ReportFileName,'file','y'); - //#RNU_RES_E - end - if (NInArg ~= NOutArg) - SCI2CerrorFile('Number of input arguments must be equal to number of output arguments.',ReportFileName); - end -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseFuncallStruct.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseFuncallStruct.sci deleted file mode 100644 index 54496597..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseFuncallStruct.sci +++ /dev/null @@ -1,116 +0,0 @@ -function [FunctionName,InArg,NInArg,NOutArg] = AST_ParseFuncallStruct(FileInfo,SharedInfo) -// function [FunctionName,InArg,NInArg,NOutArg] = AST_ParseFuncallStruct(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -//#RNU_RES_B -// Extracts Input Arguments, Output Arguments and Function Name -// from the AST. -// -// Structure of Funcall: -// overloading function for "funcall" type tlist string function -// this is a node of the AST -// fields: -// rhs : a list -// name : string, the name of the function -// lhsnb: number, the number of function lhs -// txt=['Funcall : '+F.name -// ' #lhs : '+string(F.lhsnb) -// ' Rhs : ' -// ' '+objectlist2string(F.rhs) -// 'EndFuncall' -// ] -// -//#RNU_RES_E -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -// #RNU_RES_B -PrintStringInfo(' Parsing Funcall structure',ReportFileName,'file','y'); -// #RNU_RES_E -global SCI2CSTACK -global StackPosition; -global STACKDEDUG - - -// ------------------------------ -// --- Read input parameters. --- -// ------------------------------ -RhsField = AST_PopASTStack(); -NInArg = 0; -while (RhsField ~= 'Rhs :') - NInArg = NInArg + 1; - [InputArgumentNames(NInArg),InputArgumentScope(NInArg)] = AST_ExtractNameAndScope(RhsField); - RhsField = AST_PopASTStack(); - if (RhsField == '#lhs :') - SCI2Cerror('Found #lhs before Rhs'); - elseif (RhsField == 'Funcall :') - SCI2Cerror('Found Funcall before Rhs'); - end -end -if (stripblanks(InputArgumentNames(NInArg)) == '') - NInArg = 0; - InputArgumentNames = []; - InputArgumentScope = []; -end -InputArgumentNames = SCI2Cflipud(InputArgumentNames); -InputArgumentScope = SCI2Cflipud(InputArgumentScope); - -// -------------------------------------------- -// --- Extract number of output parameters. --- -// -------------------------------------------- -buffstring = AST_PopASTStack(); -NOutArg = eval(stripblanks(part(buffstring,10:length(buffstring)))); - -// ------------------------------ -// --- Extract function name. --- -// ------------------------------ -buffstring = AST_PopASTStack(); -FunctionName = stripblanks(part(buffstring,12:length(buffstring))); - -// ------------------------------------- -// --- Generate the InArg structure. --- -// ------------------------------------- -InArg = []; -for counterinputargs = 1:NInArg - if (InputArgumentNames(counterinputargs) == 'r') - InputArgumentNames(counterinputargs) = 'rr'; //NUT: per ora cerco di risolvere cosi' il baco sulla 'r' - end - InArg(counterinputargs).Name=InputArgumentNames(counterinputargs); - InArg(counterinputargs).Scope=InputArgumentScope(counterinputargs); -end - -//#RNU_RES_B -PrintStringInfo('Function Name: '+FunctionName,ReportFileName,'file','y'); -PrintStringInfo('N Intput Arguments: '+string(NInArg),ReportFileName,'file','y'); -PrintStringInfo('N Output Arguments: '+string(NOutArg),ReportFileName,'file','y'); -//#RNU_RES_E -for counterinputargs = 1:NInArg - //#RNU_RES_B - PrintStringInfo('Input Argument Number '+string(counterinputargs)+': '+InArg(counterinputargs).Name,... - ReportFileName,'file','y'); - PrintStringInfo(' Scope: '+InArg(counterinputargs).Scope,... - ReportFileName,'file','y'); - //#RNU_RES_E -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseIfExprStruct.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseIfExprStruct.sci deleted file mode 100644 index 12ad077a..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseIfExprStruct.sci +++ /dev/null @@ -1,119 +0,0 @@ -function [IfCondArg,NIfCondArg] = AST_ParseIfExprStruct(FileInfo,SharedInfo,ASTIfExpType) -// function [IfCondArg,NIfCondArg] = AST_ParseIfExprStruct(FileInfo,SharedInfo,ASTIfExpType) -// ----------------------------------------------------------------- -//#RNU_RES_B -// Parses the IfExpression structure of the AST. -// -// txt=['If ' -// ' Expression:' -// ' '+string(I.expression) -// ' If Statements' -// ' '+objectlist2string(I.then)] -// for e=I.elseifs -// txt=[txt; -// ' Else If Expression' -// ' '+string(e.expression) -// ' Else If Statements' -// ' '+objectlist2string(e.then)] -// end -// txt=[txt; -// ' Else Statements' -// ' '+objectlist2string(I.else) -// 'EndIf'] -// -//#RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -//#RNU_RES_B -PrintStringInfo('***Retrieving '+ASTIfExpType+' expression parameters from AST***',ReportFileName,'file','y'); -//#RNU_RES_E -IfCondArg = []; -NIfCondArg = 0; - -global SCI2CSTACK -global StackPosition; -global STACKDEDUG -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// ------------------------------------ -// --- Read if condition variables. --- -// ------------------------------------ -flagendpop = 0; -IfExprField = AST_PopASTStack(); -if (ASTIfExpType=='if') - if (IfExprField=='Expression:') - flagendpop = 1; - // Pop Again the If tag from the AST. - IfExprField = AST_PopASTStack(); - end -elseif (ASTIfExpType=='elseif') - if (IfExprField=='Else If Expression') - flagendpop = 1; - end -else - SCI2CerrorFile('Unknown ASTIfExpType ""'+ASTIfExpType+'"".',ReportFileName); -end - -while (flagendpop == 0) - if (IfExprField~='') - if (ASTIfExpType=='if') - if (IfExprField=='Expression:') - flagendpop = 1; - // Pop Again the If tag from the AST. - IfExprField = AST_PopASTStack(); - else - NIfCondArg = NIfCondArg + 1; - [IfCondArg(NIfCondArg),tmpscope] = AST_ExtractNameAndScope(IfExprField); - end - elseif (ASTIfExpType=='elseif') - if (IfExprField=='Else If Expression') - flagendpop = 1; - else - NIfCondArg = NIfCondArg + 1; - IfCondArg(NIfCondArg) = IfExprField; - [IfCondArg(NIfCondArg),tmpscope] = AST_ExtractNameAndScope(IfExprField); - end - end - end - IfExprField = AST_PopASTStack(); -end - -//#RNU_RES_B -// ------------------------------------------- -// --- Print some info in the report file. --- -// ------------------------------------------- -PrintStringInfo('N '+ASTIfExpType+' Condition Arguments: '+string(NIfCondArg),ReportFileName,'file','y'); -//#RNU_RES_E -for counterifcondargs = 1:NIfCondArg - //#RNU_RES_B - PrintStringInfo(ASTIfExpType+' Condition Argument Number '+string(counterifcondargs)+': '+IfCondArg(counterifcondargs),... - ReportFileName,'file','y'); - //#RNU_RES_E -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseOperStruct.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseOperStruct.sci deleted file mode 100644 index 179c5578..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_ParseOperStruct.sci +++ /dev/null @@ -1,127 +0,0 @@ -function [FunctionName,InArg,NInArg,NOutArg] = AST_ParseOperStruct(FileInfo,SharedInfo) -// function [FunctionName,InArg,NInArg,NOutArg] = AST_ParseOperStruct(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -//#RNU_RES_B -// Parses the Operation structure of the AST. -// -// Structure of Operation: -//overloading function for "operation" type tlist string function -//this is a node of the AST -//fields: -// operands: a list -// operator: a string -// txt=['Operation' -// ' Operands:' -// ' '+objectlist2string(O.operands) -// ' Operator: '+O.operator -// 'EndOperation' -// ] -// -//#RNU_RES_E -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Reading AST***',ReportFileName,'file','y'); - -global SCI2CSTACK -global StackPosition; -global STACKDEDUG -// --------------------------- -// --- End Initialization. --- -// --------------------------- - - -// ------------------------------ -// --- Extract function name. --- -// ------------------------------ -buffstring = AST_PopASTStack(); -LabelFunctName = 'Operator: '; -FunctionName = stripblanks(part(buffstring,length(LabelFunctName)+1:length(buffstring))); -// Generate the proper function name. -FunctionName = Operator2FunName(FunctionName); - -// ------------------------------ -// --- Read input parameters. --- -// ------------------------------ -RhsField = AST_PopASTStack(); -NInArg = 0; -while (RhsField ~= 'Operands:') - NInArg = NInArg + 1; - [InputArgumentNames(NInArg),InputArgumentScope(NInArg)] = AST_ExtractNameAndScope(RhsField); - RhsField = AST_PopASTStack(); - if (RhsField == 'Operation') - SCI2Cerror('Found Operation before Rhs'); - end -end - -if (stripblanks(InputArgumentNames(NInArg)) == '') - //NUT: forse non serve per l'operation - NInArg = 0; - InputArgumentNames = []; - InputArgumentScope = []; -end -InputArgumentNames = SCI2Cflipud(InputArgumentNames); -InputArgumentScope = SCI2Cflipud(InputArgumentScope); - -//#RNU_RES_B -// Remove tag "Operation" from the stack. -//#RNU_RES_E -OperationField = AST_PopASTStack(); -if (OperationField ~= 'Operation') then - SCI2Cerror('Problems with Operation, Expected Operation tag.'); -end - -// -------------------------------------------- -// --- Extract number of output parameters. --- -// -------------------------------------------- -if (FunctionName == 'ins') - NOutArg = 0; // It is always 1. Double check it! -else - NOutArg = 1; // It is always 1. Double check it! -end -// ------------------------------------- -// --- Generate the InArg structure. --- -// ------------------------------------- -InArg = []; -for counterinputargs = 1:NInArg - InArg(counterinputargs).Name=InputArgumentNames(counterinputargs); - InArg(counterinputargs).Scope=InputArgumentScope(counterinputargs); -end - -//#RNU_RES_B -PrintStringInfo('Operation Name: '+FunctionName,ReportFileName,'file','y'); -PrintStringInfo('N Intput Arguments: '+string(NInArg),ReportFileName,'file','y'); -PrintStringInfo('N Output Arguments: '+string(NOutArg),ReportFileName,'file','y'); -//#RNU_RES_E -for counterinputargs = 1:NInArg - //#RNU_RES_B - PrintStringInfo('Input Argument Number '+string(counterinputargs)+': '+InArg(counterinputargs).Name,... - ReportFileName,'file','y'); - PrintStringInfo(' Scope: '+InArg(counterinputargs).Scope,... - ReportFileName,'file','y'); - //#RNU_RES_E -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_PopSCI2CStack.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_PopSCI2CStack.sci deleted file mode 100644 index bff1d9fa..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_PopSCI2CStack.sci +++ /dev/null @@ -1,40 +0,0 @@ -function stackelement = AST_PopASTStack() -// function stackelement = AST_PopASTStack() -// ----------------------------------------------------------------- -// Pop the AST stack. -// -// Input data: -// --- -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Aug-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),0,0); - -global SCI2CSTACK; -global StackPosition; -global STACKDEDUG; - -if StackPosition == 1 - SCI2Cerror('Stack empty. Cannot pop from stack.'); -end - -stackelement = SCI2CSTACK(StackPosition,1); -SCI2CSTACK = SCI2CSTACK(1:StackPosition-1); -StackPosition = StackPosition - 1; - -if (STACKDEDUG == 1) - AST_DisplayStack(); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_PushSCI2CStack.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_PushSCI2CStack.sci deleted file mode 100644 index 34cd883b..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_PushSCI2CStack.sci +++ /dev/null @@ -1,36 +0,0 @@ -function AST_PushASTStack(stackelement) -// function AST_PushASTStack(stackelement) -// ----------------------------------------------------------------- -// Push the AST stack. -// -// Input data: -// --- -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Aug-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - - -global SCI2CSTACK -global StackPosition; -global STACKDEDUG - -StackPosition = StackPosition + 1; -SCI2CSTACK(StackPosition,1) = stackelement; - -if (STACKDEDUG == 1) - AST_DisplayStack(); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_ReadASTHeader.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_ReadASTHeader.sci deleted file mode 100644 index 3df6cd28..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_ReadASTHeader.sci +++ /dev/null @@ -1,90 +0,0 @@ -function ASTHeader = AST_ReadASTHeader(fidAST,ReportFileName) -// function ASTHeader = AST_ReadASTHeader(fidAST,ReportFileName) -// ----------------------------------------------------------------- -// Reads the AST header -// txt=['Program' -// 'Name : '+p.name -// 'Outputs: '+strcat(objectlist2string(p.outputs),' ') -// 'Inputs : '+strcat(objectlist2string(p.inputs),' ') -// 'Statements ' -// -// Input data: -// //NUT: add description here -// -// -// Output data: -// //NUT: add description here -// -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - - -ASTHeader = []; - -tline = mgetl(fidAST,1); -AST_CheckLineLength(tline); -treeline = stripblanks(tline); -if STACKDEDUG == 1 - disp('Read AST Line: '+treeline); -end -if (SCI2Cstrncmps1size('Program',treeline) == %F) - SCI2CerrorFile('Expected ""Program"" label in the AST',ReportFileName); -end - -tline = mgetl(fidAST,1); -AST_CheckLineLength(tline); -treeline = stripblanks(tline); -if STACKDEDUG == 1 - disp('Read AST Line: '+treeline); -end -if (SCI2Cstrncmps1size('Name : ',treeline) == %F) - SCI2CerrorFile('Expected ""Name : "" label in the AST',ReportFileName); -else - ASTHeader.Name = stripblanks(part(treeline,length('Name : ')+1:length(treeline))); -end - -tline = mgetl(fidAST,1); -AST_CheckLineLength(tline); -treeline = stripblanks(tline); -if STACKDEDUG == 1 - disp('Read AST Line: '+treeline); -end -if (SCI2Cstrncmps1size('Outputs: ',treeline) == %F) - SCI2CerrorFile('Expected ""Outputs: "" label in the AST',ReportFileName); -else - ASTHeader.Outputs = stripblanks(part(treeline,length('Outputs: ')+1:length(treeline))); -end - -tline = mgetl(fidAST,1); -AST_CheckLineLength(tline); -treeline = stripblanks(tline); -if STACKDEDUG == 1 - disp('Read AST Line: '+treeline); -end -if (SCI2Cstrncmps1size('Inputs : ',treeline) == %F) - SCI2CerrorFile('Expected ""Inputs : "" label in the AST',ReportFileName); -else - ASTHeader.Inputs = stripblanks(part(treeline,length('Inputs : ')+1:length(treeline))); -end - -tline = mgetl(fidAST,1); -AST_CheckLineLength(tline); -treeline = stripblanks(tline); -if STACKDEDUG == 1 - disp('Read AST Line: '+treeline); -end -if (SCI2Cstrncmps1size('Statements ',treeline) == %F) - SCI2CerrorFile('Expected ""Statements "" label in the AST',ReportFileName); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/AST_ReadEqualRhsNames.sci b/src/Scilab2C/Scilab2C/ASTManagement/AST_ReadEqualRhsNames.sci deleted file mode 100644 index 96ec3ebe..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/AST_ReadEqualRhsNames.sci +++ /dev/null @@ -1,61 +0,0 @@ -function [RhsNames,RhsScope,NRhs] = AST_ReadEqualRhsNames(FileInfo,SharedInfo) -// function [RhsNames,RhsScope,NRhs] = AST_ReadEqualRhsNames(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; - -global SCI2CSTACK -global StackPosition; -global STACKDEDUG - -//#RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Reading Equal Rhs Names***',ReportFileName,'file','y'); -//#RNU_RES_E - -// ------------------------------- -// --- Read Output parameters. --- -// ------------------------------- -cntpop = 1; -NRhs = 0; -RhsField(cntpop) = AST_PopASTStack(); -RhsNames = []; -while (RhsField(cntpop) ~= 'Expression:') - NRhs = NRhs + 1; - [RhsNames(NRhs),RhsScope(NRhs)] = AST_ExtractNameAndScope(RhsField(cntpop)); - cntpop = cntpop + 1; - RhsField(cntpop) = AST_PopASTStack(); -end -RhsNames = SCI2Cflipud(RhsNames); -RhsScope = SCI2Cflipud(RhsScope); - -// --- Repush everything into the stack. --- -for cntpush = cntpop:-1:1 - AST_PushASTStack(RhsField(cntpush)); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/GenOutArgNames.sci b/src/Scilab2C/Scilab2C/ASTManagement/GenOutArgNames.sci deleted file mode 100644 index d31d4ca5..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/GenOutArgNames.sci +++ /dev/null @@ -1,89 +0,0 @@ -function [OutArg,SharedInfo] = GenOutArgNames(FunctionName,InArg,NInArg,OldOutArg,NOutArg,LhsArg,NLhsArg,FileInfo,SharedInfo) -// function [OutArg,SharedInfo] = GenOutArgNames(FunctionName,OutArg,NOutArg,LhsArg,NLhsArg,FileInfo,SharedInfo) -// ----------------------------------------------------------------- -//#RNU_RES_B -// Generate the names for the temporary variables that store the -// output arguments. -//#RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// OutArg: is the Output arguments structure containing the field -// name that specifies the output argument names. -// //NUT: add description here -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),9,9); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -// #RNU_RES_B -PrintStringInfo(' Generating Out Arg names.',ReportFileName,'file','y'); -// #RNU_RES_E -OutArg = OldOutArg; - -//#RNU_RES_B -// --------------------------------------------------------------------------------------- -// --- Generate the names for the temporary variables that store the output arguments. --- -// --------------------------------------------------------------------------------------- -// At this step only the name of the output arguments can be generated. --- -//#RNU_RES_E -if (NLhsArg > 0) - //#RNU_RES_B - // Use the equal Lhs names. - PrintStringInfo('Using Equal Lhs names.',ReportFileName,'file','y'); - //#RNU_RES_E - if (NLhsArg ~= NOutArg) - SCI2CerrorFile('NLhsArg='+string(NLhsArg)+' must be equal to NOutArg='+string(NOutArg)+'.',ReportFileName); - end - for counteroutputargs = 1:NOutArg - OutArg(counteroutputargs).Name=LhsArg(counteroutputargs).Name; - OutArg(counteroutputargs).Scope=LhsArg(counteroutputargs).Scope; - end -else - //#RNU_RES_B - // Generate temporary variables. - PrintStringInfo('Generating temporary variables.',ReportFileName,'file','y'); - //#RNU_RES_E - if ((sum(mtlb_strcmp(FunctionName,SharedInfo.Annotations.DataPrec)) > 0) & ... - (SharedInfo.SkipNextPrec == 1)) - //#RNU_RES_B - PrintStringInfo(' Skipping code generating because already generated in the previous function.',ReportFileName,'file','y'); - //#RNU_RES_E - for counteroutputargs = 1:NOutArg - OutArg(counteroutputargs).Name = InArg(counteroutputargs).Name; - end - elseif (mtlb_strcmp(FunctionName,'OpEqual')) - // do nothing. - //NUT: verifica questa parte di codice. e' sicuro che se ho equal gli oldoutarg contengono gia' il nome? - else - for counteroutputargs = 1:NOutArg - if ((SharedInfo.ASTReader.EnableTempVarsReuse == 1) & ... - (length(SharedInfo.ASTReader.ReusableTempVars) > 0)) - TmpOutArgName = strcat([SharedInfo.ASTReader.TempVarsName,string(SharedInfo.ASTReader.ReusableTempVars(1))]); - SharedInfo.ASTReader.ReusableTempVars = SharedInfo.ASTReader.ReusableTempVars(2:$); - else - SharedInfo.ASTReader.UsedTempVars = SharedInfo.ASTReader.UsedTempVars + 1; - TmpOutArgName = strcat([SharedInfo.ASTReader.TempVarsName,string(SharedInfo.ASTReader.UsedTempVars)]); - end - OutArg(counteroutputargs).Name=TmpOutArgName; - end - end -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/Operator2FunName.sci b/src/Scilab2C/Scilab2C/ASTManagement/Operator2FunName.sci deleted file mode 100644 index de6aebf7..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/Operator2FunName.sci +++ /dev/null @@ -1,118 +0,0 @@ -function FunName = Operator2FunName(OperatorName); -// ----------------------------------------------------------------- -// Returns the function name corresponding to the input operator. -// From intmacr2tree.c we have: -// char *operators[]={"+","-","*",".*","*.",".*.","/","./","/.","./.", -// "\\",".\\","\\.",".\\.","^","==","<",">","<=",">=","~=", -// ":","rc","ins","ext","'","cc","|","&","~",".^",".'","cceol"}; -// I also added "<>". -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 29-May-2007 -- Nutricato Raffaele: Changed code into a function. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -//NUT: non e' inserito il "\" verifica come mai. -//NUT: il ".\" l'ho inserito io - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -FuncPrefix = 'Op'; -FuncSuffix = ''; - -if (OperatorName == '+') - FunName = FuncPrefix+'Plus'+FuncSuffix; -elseif (OperatorName == '-') - FunName = FuncPrefix+'Minus'+FuncSuffix; -elseif (OperatorName == '*') - FunName = FuncPrefix+'Star'+FuncSuffix; -elseif (OperatorName == '.*') - FunName = FuncPrefix+'DotStar'+FuncSuffix; -elseif (OperatorName == '*.') - PrintStringInfo('SCI2CERROR: Operator ""'+OperatorName+'"" not supported.','','stout','y'); - SCI2Cerror(' '); -elseif (OperatorName == '.*.') - PrintStringInfo('SCI2CERROR: Operator ""'+OperatorName+'"" not supported.','','stout','y'); - SCI2Cerror(' '); -elseif (OperatorName == '/') - FunName = FuncPrefix+'Slash'+FuncSuffix; -elseif (OperatorName == './') - FunName = FuncPrefix+'DotSlash'+FuncSuffix; -elseif (OperatorName == '/.') - PrintStringInfo('SCI2CERROR: Operator ""'+OperatorName+'"" not supported.','','stout','y'); - SCI2Cerror(' '); -elseif (OperatorName == './.') - PrintStringInfo('SCI2CERROR: Operator ""'+OperatorName+'"" not supported.','','stout','y'); - SCI2Cerror(' '); -elseif (OperatorName == '.\') - FunName = FuncPrefix+'DotBackSlash'+FuncSuffix; -elseif (OperatorName == '\\') - PrintStringInfo('SCI2CERROR: Operator ""'+OperatorName+'"" not supported.','','stout','y'); - SCI2Cerror(' '); -elseif (OperatorName == '.\\') - PrintStringInfo('SCI2CERROR: Operator ""'+OperatorName+'"" not supported.','','stout','y'); - SCI2Cerror(' '); -elseif (OperatorName == '\\.') - PrintStringInfo('SCI2CERROR: Operator ""'+OperatorName+'"" not supported.','','stout','y'); - SCI2Cerror(' '); -elseif (OperatorName == '.\\.') - PrintStringInfo('SCI2CERROR: Operator ""'+OperatorName+'"" not supported.','','stout','y'); - SCI2Cerror(' '); -elseif (OperatorName == '^') - FunName = FuncPrefix+'Hat'+FuncSuffix; -elseif (OperatorName == '.^') - FunName = FuncPrefix+'DotHat'+FuncSuffix; -elseif (OperatorName == '''') - FunName = FuncPrefix+'Apex'+FuncSuffix; -elseif (OperatorName == '.''') - FunName = FuncPrefix+'DotApex'+FuncSuffix; -elseif (OperatorName == '==') - FunName = FuncPrefix+'LogEq'+FuncSuffix; -elseif (OperatorName == '<') - FunName = FuncPrefix+'LogLt'+FuncSuffix; -elseif (OperatorName == '>') - FunName = FuncPrefix+'LogGt'+FuncSuffix; -elseif (OperatorName == '<=') - FunName = FuncPrefix+'LogLe'+FuncSuffix; -elseif (OperatorName == '>=') - FunName = FuncPrefix+'LogGe'+FuncSuffix; -elseif (OperatorName == '~=') - FunName = FuncPrefix+'LogNe'+FuncSuffix; -elseif (OperatorName == '<>') - FunName = FuncPrefix+'LogNe'+FuncSuffix; -elseif (OperatorName == '|') - FunName = FuncPrefix+'LogOr'+FuncSuffix; -elseif (OperatorName == '&') - FunName = FuncPrefix+'LogAnd'+FuncSuffix; -elseif (OperatorName == '~') - FunName = FuncPrefix+'LogNot'+FuncSuffix; -elseif (OperatorName == ':') - FunName = FuncPrefix+'Colon'+FuncSuffix; -elseif (OperatorName == 'rc') - FunName = 'OpRc'; -elseif (OperatorName == 'cc') - FunName = 'OpCc'; -elseif (OperatorName == 'ins') - FunName = 'OpIns'; -elseif (OperatorName == 'ext') - FunName = 'OpExt'; -elseif (OperatorName == 'cceol') - PrintStringInfo('SCI2CERROR: Operator ""'+OperatorName+'"" not supported.','','stout','y'); - SCI2Cerror(' '); -else - PrintStringInfo('SCI2CERROR: Unknown Operator ""'+OperatorName+'.','','stout','y'); - SCI2Cerror(' '); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ASTManagement/SciFile2ASTFile.sci b/src/Scilab2C/Scilab2C/ASTManagement/SciFile2ASTFile.sci deleted file mode 100644 index 40bf7605..00000000 --- a/src/Scilab2C/Scilab2C/ASTManagement/SciFile2ASTFile.sci +++ /dev/null @@ -1,36 +0,0 @@ -function SciFile2ASTFile(SciFile,ASTFile); -// function SciFile2ASTFile(SciFile,ASTFile); -// ----------------------------------------------------------------- -// This function makes use of the macr2tree function to generate -// the ASTFile containing the AST (Abstract Syntactic Tree) of the -// input Scilab function (SciFile). -// -// Input data: -// SciFile: full path of the input function. -// ASTFile: full path of the file that will store the AST. -// -// Output data: -// --- -// -// Status: -// 12-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -getf(SciFile); -[tmppath,ScilabFunName,tmpext] = fileparts(SciFile); -AST=eval('macr2tree('+ScilabFunName+')'); - - -[ASTx,ASTierr]=fileinfo(ASTFile); -if ASTierr == 0 - mdelete(ASTFile); -end - -fd = mopen(ASTFile, "wt"); -mputl(string(AST), fd); -mclose(fd); - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_FinalizeCode.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_FinalizeCode.sci deleted file mode 100644 index 2c6b600c..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_FinalizeCode.sci +++ /dev/null @@ -1,86 +0,0 @@ -function C_FinalizeCode(FileInfo,SharedInfo) -// function C_FinalizeCode(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -// --- Load File Info Structure. --- -load(FileInfoDatFile,'FileInfo'); - -// --- Load Shared Info Structure. --- -load(FileInfo.SharedInfoDatFile,'SharedInfo'); - -CPass2FileName = FileInfo.Funct(SharedInfo.NextSCIFunNumber).CPass2FileName; -FinalCFileName = FileInfo.Funct(SharedInfo.NextSCIFunNumber).FinalCFileName; -Pass1HeaderFileName = FileInfo.Funct(SharedInfo.NextSCIFunNumber).Pass1HeaderFileName; -FinalHeaderFileName = FileInfo.Funct(SharedInfo.NextSCIFunNumber).FinalHeaderFileName; -// #RNU_RES_B -PrintStringInfo('Generating the final C code in:'+FinalCFileName,... - FileInfo.Funct(SharedInfo.NextSCIFunNumber).ReportFileName,'file','y'); -// #RNU_RES_E -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// --------------------------------- -// --- Finalize the header file. --- -// --------------------------------- -PrintStringInfo('/*',Pass1HeaderFileName,'file','y'); -PrintStringInfo('** ---------------------------- ',Pass1HeaderFileName,'file','y'); -PrintStringInfo('** --- End USER2C Includes. --- ',Pass1HeaderFileName,'file','y'); -PrintStringInfo('** ---------------------------- ',Pass1HeaderFileName,'file','y'); -PrintStringInfo('*/',Pass1HeaderFileName,'file','y'); -// ------------------------------------- -// --- End Finalize the header file. --- -// ------------------------------------- - -[tmphdrpath,tmphdrname,tmphdrext] = fileparts(Pass1HeaderFileName); - -// #RNU_RES_B -// -------------------------------------------------- -// --- Copy the C code into the C code directory. --- -// -------------------------------------------------- -// #RNU_RES_E -C_SCI2CHeader(FinalCFileName); -PrintStringInfo('/*',FinalCFileName,'file','y'); -PrintStringInfo('** ----------------- ',FinalCFileName,'file','y'); -PrintStringInfo('** --- Includes. --- ',FinalCFileName,'file','y'); -PrintStringInfo('** ----------------- ',FinalCFileName,'file','y'); -PrintStringInfo('*/',FinalCFileName,'file','y'); -PrintStringInfo('#include ""'+tmphdrname+tmphdrext+'""',... - FinalCFileName,'file','y'); -PrintStringInfo('/*',FinalCFileName,'file','y'); -PrintStringInfo('** --------------------- ',FinalCFileName,'file','y'); -PrintStringInfo('** --- End Includes. --- ',FinalCFileName,'file','y'); -PrintStringInfo('** --------------------- ',FinalCFileName,'file','y'); -PrintStringInfo('*/',FinalCFileName,'file','y'); -PrintStringInfo(' ',FinalCFileName,'file','y'); -PrintStringInfo(' ',FinalCFileName,'file','y'); -PrintStringInfo(' ',FinalCFileName,'file','y'); -SCI2Ccopyfile(CPass2FileName,... - FinalCFileName,'append'); -SCI2Ccopyfile(Pass1HeaderFileName,... - FinalHeaderFileName,'append'); - - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_ForExpression.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_ForExpression.sci deleted file mode 100644 index 7afc5526..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_ForExpression.sci +++ /dev/null @@ -1,212 +0,0 @@ -function SharedInfo = C_ForExpression(FileInfo,SharedInfo) -// function SharedInfo = C_ForExpression(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// Get function for a generic SCI2C table. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 15-Nov-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; - -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1FileName; -CPass1ForProlFileName = FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level); -CDeclarationFileName = FileInfo.Funct(nxtscifunnumber).CDeclarationFileName; -CPass1ForEpilFileName = FileInfo.Funct(nxtscifunnumber).CPass1ForEpilFileName(SharedInfo.For.Level); - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Generating C code***',ReportFileName,'file','y'); -// #RNU_RES_E -CCall =''; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// ---------------------------- -// --- Generate the C call. --- -// ---------------------------- - -// ------------------------- -// --- Manage all cases. --- -// ------------------------- -if (SharedInfo.ForExpr.AssignmentFun == SharedInfo.CFunId.EqScalar) - // #RNU_RES_B - // --------------- - // --- Case 1. --- - // --------------- - PrintStringInfo(' Handling For Expression with scalar equal.',ReportFileName,'file','y'); - - // for a = 10 or for a = sin(tan(b)) where b is scalar: - // In this case non for loops are needed.--> Do nothing! - - // ------------------------------------------------------------------------------------- - // --- Generate Prologue and Epilogue -> Copy the first N-1 lines of the for.c code. --- - // ------------------------------------------------------------------------------------- - // #RNU_RES_E - [C_Strings,NumCStrings] = File2StringArray(FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level)); - C_Strings = stripblanks(C_Strings); - - for cntstr = 1:NumCStrings - // #RNU_RES_B - // Prologue - // #RNU_RES_E - PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+C_Strings(cntstr),CPass1FileName,'file','y'); - end - // #RNU_RES_B - // Epilogue - // #RNU_RES_E - PrintStringInfo(' ',CPass1ForEpilFileName ,'file','y'); - -elseif (SharedInfo.ForExpr.AssignmentFun == SharedInfo.CFunId.OpColon) - // #RNU_RES_B - // --------------- - // --- Case 2. --- - // --------------- - // for a = 1:10 - PrintStringInfo(' Handling For Expression with OpColon.',ReportFileName,'file','y'); - // #RNU_RES_E - - // #RNU_RES_B - // ------------------------------------------------------------------------------------- - // --- Generate Prologue and Epilogue -> Copy the first N-1 lines of the for.c code. --- - // ------------------------------------------------------------------------------------- - // #RNU_RES_E - [C_Strings,NumCStrings] = File2StringArray(FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level)); - C_Strings = stripblanks(C_Strings); - for cntstr = 1:NumCStrings - // #RNU_RES_B - // Prologue - // #RNU_RES_E - PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+C_Strings(cntstr),CPass1FileName,'file','y'); - // #RNU_RES_B - // Epilogue - // #RNU_RES_E - PrintStringInfo(C_Strings(cntstr),CPass1ForEpilFileName ,'file','y'); - end - // #RNU_RES_B - // ---------------------------------------- - // --- Insert "}" in the epilogue file. --- - // ---------------------------------------- - // #RNU_RES_E - PrintStringInfo('}',CPass1ForEpilFileName ,'file','y'); - - // #RNU_RES_B - // ------------------------------ - // --- Insert for expression. --- - // ------------------------------ - // #RNU_RES_E - CCall = 'for('+SharedInfo.ForExpr.SclValCntArg.Name+' = '+SharedInfo.ForExpr.OpColonInfoIn1+'; '... - +SharedInfo.ForExpr.SclValCntArg.Name+' <= '+SharedInfo.ForExpr.OpColonInfoIn3+'; '... - +SharedInfo.ForExpr.SclValCntArg.Name+' += '+SharedInfo.ForExpr.OpColonInfoIn2+')'; - PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+CCall,CPass1FileName,'file','y'); - - // #RNU_RES_B - // ------------------- - // --- Insert "{". --- - // ------------------- - // #RNU_RES_E - CCall = '{'; - PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+CCall,CPass1FileName,'file','y'); - - // --------------------------------- - // --- Update Indentation Level. --- - // --------------------------------- - SharedInfo.NIndent = SharedInfo.NIndent + 1; - -elseif (SharedInfo.ForExpr.AssignmentFun == SharedInfo.CFunId.EqMatrix | ... - SharedInfo.ForExpr.AssignmentFun == SharedInfo.CFunId.GenFunMtx) - // #RNU_RES_B - // --------------- - // --- Case 3. --- - // --------------- - PrintStringInfo(' Handling For Expression with Matrix Equal/Function.',ReportFileName,'file','y'); - - // for cnt = TMP where TMP is a matrix - // for cnt = fun(TMP) where TMP is a matrix - // Conversion is performed as shown in the following example: - // init code for temp vars --> copy all for.c code (up to last-1 line) into C pass1 code. - // intSCI2C __forcnt1; --> declaration file. - // replace in the last C line CntArg.Name with '__TmpVal'+CntArg.Name - // for (__forcnt1 = 0; __forcnt1 < CntArg.Size(1)*CntArg.Size(2); __forcnt1++) - // { - // CntArg.Name = '__TmpVal'+CntArg.Name[__forcnt1]; - // init code for temp vars - // } - - // ------------------------------------------------------------------------------------- - // --- Generate Prologue and Epilogue -> Copy the first N-1 lines of the for.c code. --- - // ------------------------------------------------------------------------------------- - // #RNU_RES_E - [C_Strings,NumCStrings] = File2StringArray(FileInfo.Funct(nxtscifunnumber).CPass1ForProlFileName(SharedInfo.For.Level)); - C_Strings = stripblanks(C_Strings); - - for cntstr = 1:NumCStrings - // Prologue - PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+C_Strings(cntstr),CPass1FileName,'file','y'); - // Epilogue - PrintStringInfo(C_Strings(cntstr),CPass1ForEpilFileName ,'file','y'); - end - - // #RNU_RES_B - // ---------------------------------------- - // --- Insert "}" in the epilogue file. --- - // ---------------------------------------- - // #RNU_RES_E - PrintStringInfo('}',CPass1ForEpilFileName ,'file','y'); - - // ------------------------------ - // --- Insert for expression. --- - // ------------------------------ - CCall = 'for('+SharedInfo.ForExpr.IntCntArg.Name+' = 0'+'; '+... - SharedInfo.ForExpr.IntCntArg.Name+' < '+SharedInfo.ForExpr.MtxValCntArg.Size(1)+'*'+SharedInfo.ForExpr.MtxValCntArg.Size(2)+'; '+... - SharedInfo.ForExpr.IntCntArg.Name+'++)'; - PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+CCall,CPass1FileName,'file','y'); - - // ------------------- - // --- Insert "{". --- - // ------------------- - CCall = '{'; - PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+CCall,CPass1FileName,'file','y'); - - // --------------------------------- - // --- Update Indentation Level. --- - // --------------------------------- - SharedInfo.NIndent = SharedInfo.NIndent + 1; - - // #RNU_RES_B - // ---------------------------------------------------- - // --- Add code to read the element of CntArg.Name. --- - // ---------------------------------------------------- - // #RNU_RES_E - CCall = SharedInfo.ForExpr.SclValCntArg.Name+' = '+SharedInfo.ForExpr.MtxValCntArg.Name+'['+SharedInfo.ForExpr.IntCntArg.Name+'];'; - PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+CCall,CPass1FileName,'file','y'); - -else - // --------------- - // --- Case 5. --- - // --------------- - - SCI2Cerror('Could not manage the for expression.'); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_Funcall.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_Funcall.sci deleted file mode 100644 index f68d7c82..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_Funcall.sci +++ /dev/null @@ -1,389 +0,0 @@ -function SharedInfo = C_Funcall(FunInfo,FileInfo,SharedInfo,FlagCall) -// function SharedInfo = C_Funcall(FunInfo,FileInfo,SharedInfo,FlagCall) -// ----------------------------------------------------------------- -// Get function for a generic SCI2C table. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),4,4); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; - -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1FileName; -CPass1FreeFileName = FileInfo.Funct(nxtscifunnumber).CPass1FreeFileName; -HeaderFileName = FileInfo.Funct(nxtscifunnumber).Pass1HeaderFileName; -CDeclarationFileName = FileInfo.Funct(nxtscifunnumber).CDeclarationFileName; -CInitVarsFileName = FileInfo.Funct(nxtscifunnumber).CInitVarsFileName; -IndentLevel = SharedInfo.NIndent; -CCall = ''; - -// --- Extract Function Info. --- -FunctionName = FunInfo.SCIFunctionName; -CFunName = FunInfo.CFunctionName; -InArg = FunInfo.InArg; -NInArg = FunInfo.NInArg; -OutArg = FunInfo.OutArg; -NOutArg = FunInfo.NOutArg; -PosFirstOutScalar = FunInfo.PosFirstOutScalar; - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Generating C code***',ReportFileName,'file','y'); -// #RNU_RES_E -// --------------------------- -// --- End Initialization. --- -// --------------------------- - - -// -------------------------------------------------- -// --- Manage anticipated exit from the function. --- -// -------------------------------------------------- -if (SharedInfo.SkipNextFun > 0) - SharedInfo.SkipNextFun = SharedInfo.SkipNextFun - 1; - return; -end - -// #RNU_RES_B -// Exit if the function is a precision specifier and the corresponding flag is 1. -// #RNU_RES_E -if ((sum(mtlb_strcmp(FunctionName,SharedInfo.Annotations.DataPrec)) > 0) & ... - (SharedInfo.SkipNextPrec == 1)) - // #RNU_RES_B - PrintStringInfo(' Skipping code generating because already generated in the previous function.',ReportFileName,'file','y'); - // #RNU_RES_E - SharedInfo.SkipNextPrec = SharedInfo.SkipNextPrec - 1; - return; -end - -// #RNU_RES_B -// Exit if the function is OpEqual and the corresponding skip flag is enabled. -// #RNU_RES_E -if ((mtlb_strcmp(FunctionName,'OpEqual')) & ... - (SharedInfo.SkipNextEqual == 1)) - // #RNU_RES_B - PrintStringInfo(' Skipping code generating because already generated in the previous function.',ReportFileName,'file','y'); - // #RNU_RES_E - SharedInfo.SkipNextEqual = SharedInfo.SkipNextEqual - 1; - return; -end - -// #RNU_RES_B -// Exit if the function is size. -// #RNU_RES_E -if ((mtlb_strcmp(FunctionName,'size'))) - // #RNU_RES_B - PrintStringInfo(' Anticipated exit for the size function.',ReportFileName,'file','y'); - // #RNU_RES_E - CCall =''; - if (NInArg == 1) - if (NOutArg == 1) - CCall = CCall+OutArg(1).Name+'[0] = __'+InArg(1).Name+'Size[0];'; - // #RNU_RES_B - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - // #RNU_RES_E - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); - - CCall =''; - CCall = CCall+OutArg(1).Name+'[1] = __'+InArg(1).Name+'Size[1];'; - // #RNU_RES_B - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - // #RNU_RES_E - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); - elseif (NOutArg == 2) - CCall = CCall+OutArg(1).Name+' = __'+InArg(1).Name+'Size[0];'; - // #RNU_RES_B - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - // #RNU_RES_E - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); - - CCall =''; - CCall = CCall+OutArg(2).Name+' = __'+InArg(1).Name+'Size[1];'; - // #RNU_RES_B - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - // #RNU_RES_E - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); - else - SCI2Cerror('Don''t know how to manage size function with number of output args different from 1 and 2.'); - end - elseif (NInArg == 2) - if (NOutArg == 1) - if (InArg(2).Value == 1) - CCall = CCall+OutArg(1).Name+' = __'+InArg(1).Name+'Size[0];'; - // #RNU_RES_B - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - // #RNU_RES_E - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); - elseif (InArg(2).Value == 2) - CCall = CCall+OutArg(1).Name+' = __'+InArg(1).Name+'Size[1];'; - // #RNU_RES_B - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - // #RNU_RES_E - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); - else - SCI2Cerror('Not known the value of the second input arg for the size function.'); - end - else - SCI2Cerror('Don''t know how to manage size function with number of output args different from 1.'); - end - else - SCI2Cerror('Don''t know how to manage size function with number of input args different from 1 and 2.'); - end - return; -end -// ------------------------------------------------------ -// --- End Manage anticipated exit from the function. --- -// ------------------------------------------------------ - -// #RNU_RES_B -// ------------------------------------------------------------ -// --- Allocate memory and size array for output arguments. --- -// ------------------------------------------------------------ -// #RNU_RES_E -if (FlagCall == 1) -// #RNU_RES_B -//RNU qui va tolto tutto una volta sicuri che la memallocout puo' essere fatta dentro la st_insoutarg -// C_MemAllocOutTempVars(OutArg,NOutArg,CPass1FileName,CPass1FreeFileName,IndentLevel,ReportFileName); -// #RNU_RES_E -end - -// ---------------------------- -// --- Generate the C call. --- -// ---------------------------- -CCall =''; -if (FunInfo.CFunctionName == SharedInfo.CMainFunName) - if (FlagCall == 1) - SCI2Cerror('main function called in a source code!'); - else - CCall =CCall+'SCI2Cint '; - end -else - if (PosFirstOutScalar >= 1) - if (FlagCall == 1) - CCall = CCall+OutArg(PosFirstOutScalar).Name+' = '; - else - CCall = CCall+C_Type(OutArg(PosFirstOutScalar).Type)+' '; - end - else - if (FlagCall == 0) - CCall = CCall+'void '; - end - end -end - - -CCall = CCall+CFunName+'('; -// #RNU_RES_B -PrintStringInfo(' C call after output scalar args check: '+CCall,ReportFileName,'file','y'); -// #RNU_RES_E -clear counterin -for counterin = 1:NInArg - - if (InArg(counterin).Type == 'g' & InArg(counterin).Scope == 'String') - TmpInArgName = '""'+InArg(counterin).Name+'""'; - elseif (InArg(counterin).Type == 'z' & (InArg(counterin).Scope == 'Number')) - TmpInArgName = 'DoubleComplex('+SCI2Cstring(real(InArg(counterin).Value))+','+SCI2Cstring(imag(InArg(counterin).Value))+')'; - elseif (InArg(counterin).Type == 'c' & (InArg(counterin).Scope == 'Number')) - TmpInArgName = 'FloatComplex('+SCI2Cstring(real(InArg(counterin).Value))+','+SCI2Cstring(imag(InArg(counterin).Value))+')'; - else - TmpInArgName = InArg(counterin).Name; - end - - TmpInArgType = C_Type(InArg(counterin).Type); - - //if (FunctionName == 'OpEqual') - // TmpInArgSizeVar = '__'+OutArg(counterin).Name+'Size'; - // else - TmpInArgSizeVar = '__'+InArg(counterin).Name+'Size'; - //end - - if (InArg(counterin).Dimension == 0) - if (FlagCall == 0) - CCall = CCall+TmpInArgType+' '; - end - CCall = CCall+TmpInArgName+','; - else - if (FlagCall == 0) - CCall = CCall+TmpInArgType+'* '+TmpInArgName+', SCI2Cint* __'+TmpInArgName+'Size,'; - else - CCall = CCall+TmpInArgName+', '+TmpInArgSizeVar+','; - end - end -end -// #RNU_RES_B -PrintStringInfo(' C call after input args analysis: '+CCall,ReportFileName,'file','y'); -// #RNU_RES_E -for counterout = 1:NOutArg - TmpOutArgName = OutArg(counterout).Name; - TmpOutArgType = C_Type(OutArg(counterout).Type); - if (counterout == PosFirstOutScalar) - if (FlagCall == 0) - // #RNU_RES_B - // --- Write in the declaration file the returned output scalar (if any). --- - // #RNU_RES_E - outscalardeclaration = TmpOutArgType+' '+TmpOutArgName+';'; - // #RNU_RES_B - PrintStringInfo(outscalardeclaration,ReportFileName,'file','y'); - // #RNU_RES_E - PrintStringInfo(C_IndentBlanks(1)+outscalardeclaration,CDeclarationFileName,'file','y'); - PrintStringInfo(' ',CDeclarationFileName,'file','y'); - end - else - if (OutArg(counterout).Dimension == 0) - if (FlagCall == 0) - // --- Write in the declaration file the returned output scalar (if any). --- - outscalardeclaration = TmpOutArgType+' '+TmpOutArgName+';'; - PrintStringInfo(outscalardeclaration,ReportFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(1)+outscalardeclaration,CDeclarationFileName,'file','y'); - PrintStringInfo(' ',CDeclarationFileName,'file','y'); - CCall = CCall+TmpOutArgType+'* __ptr'+TmpOutArgName+', '; - else - CCall = CCall+'&'+TmpOutArgName+', ';//NUT: verifica se ci vuole l'& - end - else - if (FlagCall == 0) - CCall = CCall+TmpOutArgType+'* '+TmpOutArgName+','; - if (OutArg(counterout).FindLike == 1) - CCall = CCall+'SCI2Cint* __'+TmpOutArgName+'Size'+','; - end - // #RNU_RES_B - //NUT prova a sostituire le variabili strutture con variabili dichiarate all'inizio del codice. - // --- Declare the size of the output arguments. --- - // #RNU_RES_E - outscalardeclaration = 'SCI2Cint __'+TmpOutArgName+'Size[2];'; - PrintStringInfo(outscalardeclaration,ReportFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(1)+outscalardeclaration,CDeclarationFileName,'file','y'); - outscalardeclaration = '__'+TmpOutArgName+'Size[0] = '+(OutArg(counterout).Size(1))+';'; - PrintStringInfo(outscalardeclaration,ReportFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(1)+outscalardeclaration,CInitVarsFileName,'file','y'); - outscalardeclaration = '__'+TmpOutArgName+'Size[1] = '+(OutArg(counterout).Size(2))+';'; - PrintStringInfo(outscalardeclaration,ReportFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(1)+outscalardeclaration,CInitVarsFileName,'file','y'); - PrintStringInfo(' ',CInitVarsFileName,'file','y'); - else - CCall = CCall+OutArg(counterout).Name+','; - if (OutArg(counterout).FindLike == 1) - CCall = CCall+'(SCI2Cint* ) __'+TmpOutArgName+'Size'+','; - end - end - end - end -end -PrintStringInfo(' C call after output args analysis: '+CCall,ReportFileName,'file','y'); -// Remove the last " " and "," -if (part(CCall,length(CCall):length(CCall)) == ' ') - CCall = part(CCall,1:length(CCall)-1); -end -if (part(CCall,length(CCall):length(CCall)) == ',') - CCall = part(CCall,1:length(CCall)-1); -end - -CCall = CCall+')'; -if (FlagCall == 1) - CCall = CCall+';'; -end -//NUT: la parte di generazione della C call va inserita in una funzione a parte. -//NUT: tale funzione deve avere anche uno switch che consenta di generare differenti versioni -//NUT: delle chiamate C in accordo con la libreria disponibile, fermo restando che -//NUT: e' sempre possibile fornire la lista delle macro. -if mtlb_strcmp(FunctionName,'return') - // Here I introduce the pointer assignment for output scalar arguments. - for cntout = 1:SharedInfo.CurrentFunInfo.NOutArg - if (cntout ~= SharedInfo.CurrentFunInfo.PosFirstOutScalar & ... - SharedInfo.CurrentFunInfo.OutArg(cntout).Dimension == 0) - CCall = ''; - CCall = CCall+'*__ptr'+SharedInfo.CurrentFunInfo.OutArg(cntout).Name+' = '+... - SharedInfo.CurrentFunInfo.OutArg(cntout).Name+';'; - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); - end - end - // --- Then I free the memory dinamically allocated. --- - // ---------------------------- - // --- Handle Free section. --- - // ---------------------------- - PrintStringInfo(C_IndentBlanks(1)+'/*',CPass1FreeFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(1)+'** ------------------------- ',CPass1FreeFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(1)+'** --- End Free Section. --- ',CPass1FreeFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(1)+'** ------------------------- ',CPass1FreeFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(1)+'*/',CPass1FreeFileName,'file','y'); - PrintStringInfo(' ',CPass1FreeFileName,'file','y'); - SCI2Ccopyfile(CPass1FreeFileName,... - CPass1FileName,'append'); - // -------------------------------- - // --- End Handle Free section. --- - // -------------------------------- - - // --- Then I introduce the return to the first scalar output arguments. --- - CCall = ''; - // #RNU_RES_B - //NUT: non capisco questo skip a questo punto. - //NUT: perche' la return finale la sto gestendo nella AST_HandleEndProgram. - PrintStringInfo(' return function of the AST is skipped.',ReportFileName,'file','y'); - //RN provo a non skippare e a mettere la return. - // #RNU_RES_E - if (SharedInfo.CurrentFunInfo.CFunctionName == SharedInfo.CMainFunName) - CCall = CCall+'return(0);'; - else - if (SharedInfo.CurrentFunInfo.PosFirstOutScalar > 0) - CCall = CCall+'return('+SharedInfo.CurrentFunInfo.OutArg(SharedInfo.CurrentFunInfo.PosFirstOutScalar).Name+');' - end - end - // #RNU_RES_B - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - // #RNU_RES_E - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); -else - // #RNU_RES_B - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - // #RNU_RES_E - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); - if (FlagCall == 0) - // Add prototype to the header file - C_InitHeader(CCall+';',HeaderFileName,SharedInfo.Sci2CLibMainHeaderFName); - - // Add { at the beginning of the function. - PrintStringInfo(' {',ReportFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(IndentLevel)+'{',CPass1FileName,'file','y'); - - end -end - -// #RNU_RES_B -// Add in the C code the new size of the output argument when SCI2Cresize function is called. -// #RNU_RES_E -if (FunctionName == 'SCI2Cresize') - // #RNU_RES_B - PrintStringInfo(' Found SCI2Cresize -> Changing the size of the output argument.',ReportFileName,'file','y'); - // #RNU_RES_E - OutArgName = OutArg(counterout).Name; - tmpcode = '__'+OutArgName+'Size[0]='+OutArg(counterout).Size(1)+';'; - PrintStringInfo(C_IndentBlanks(IndentLevel)+tmpcode,CPass1FileName,'file','y'); - // #RNU_RES_B - PrintStringInfo(' '+tmpcode,ReportFileName,'file','y'); - // #RNU_RES_E - tmpcode = '__'+OutArgName+'Size[1]='+OutArg(counterout).Size(2)+';'; - PrintStringInfo(C_IndentBlanks(IndentLevel)+tmpcode,CPass1FileName,'file','y'); - // #RNU_RES_B - PrintStringInfo(' '+tmpcode,ReportFileName,'file','y'); - // #RNU_RES_E -end -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenDeclarations.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenDeclarations.sci deleted file mode 100644 index d63fcf41..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenDeclarations.sci +++ /dev/null @@ -1,132 +0,0 @@ -function Cdeclaration = C_GenDeclarations(ArgStruct,CDeclarationFileName,IndentLevel,ReportFileName,FlagExt,ResizeApproach) -// function Cdeclaration = C_GenDeclarations(ArgStruct,CDeclarationFileName,IndentLevel,ReportFileName,FlagExt,ResizeApproach) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// 10-Jun-2008 -- Raffaele Nutricato: adapted to work with realloc function. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),6,6); - -// #RNU_RES_B -//NUT: ilnome di questa funzione va cambiato perche' le dichiarazioni le fanno anche i for e i while. - -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Generating C declaration***',ReportFileName,'file','y'); -// #RNU_RES_E - -Cdeclaration = ''; -NDeclarations = 0; -if (ArgStruct.Dimension > 0) - if (FlagExt == 1) - Cdeclaration(1) = 'extern '; - Cdeclaration(2) = 'extern '; - else - Cdeclaration(1) = ''; - Cdeclaration(2) = ''; - end - // #RNU_RES_B - //NUT: vedi Mem_Alloc_Out per maggiori info sulla rimozione della temp nella if - // if ((ArgStruct.Scope=='Temp') | (ArgStruct.FindLike == -1) | (SCI2Cisnum(ArgStruct.Size(1))==%F) | (SCI2Cisnum(ArgStruct.Size(2))==%F)) - // #RNU_RES_E - if (ArgStruct.Type=='g') - if (isnan(ArgStruct.Value)) - Cdeclaration(1) = Cdeclaration(1)+C_Type(ArgStruct.Type)+... - ' * '+ArgStruct.Name+';'; - else - if (FlagExt == 1) - Cdeclaration(1) = Cdeclaration(1)+C_Type(ArgStruct.Type)+... - ' '+ArgStruct.Name+'['+ArgStruct.Size(1)+'*'+ArgStruct.Size(2)+'];'; - else - Cdeclaration(1) = Cdeclaration(1)+C_Type(ArgStruct.Type)+... - ' '+ArgStruct.Name+'['+ArgStruct.Size(1)+'*'+ArgStruct.Size(2)+'] = {'+ArgStruct.Value+'};'; - end - end - Cdeclaration(2) = Cdeclaration(2)+C_Type('i')+' __'+ArgStruct.Name+'Size[2] = {'+ArgStruct.Size(1)+','+ArgStruct.Size(2)+'};'; - NDeclarations = 2; - elseif ((ArgStruct.FindLike == -1) | ... - (SCI2Cisnum(ArgStruct.Size(1))==%F) | (SCI2Cisnum(ArgStruct.Size(2))==%F) | ... - (ResizeApproach=='REALLOC_ALL_RESIZE_ALL' & ArgStruct.Type~='g')) - // #RNU_RES_B - //RNU sulle stringhe non ho ancora deciso se applicare la realloc. - // Generate only the pointer that will be used by the malloc function. - // #RNU_RES_E - if (FlagExt == 1) - Cdeclaration(1) = Cdeclaration(1)+C_Type(ArgStruct.Type)+'* '+... - ArgStruct.Name+';'; - else - Cdeclaration(1) = Cdeclaration(1)+C_Type(ArgStruct.Type)+'* '+... - ArgStruct.Name+' = NULL;'; - end - // Declare the Size array - Cdeclaration(2) = Cdeclaration(2)+C_Type('i')+' __'+ArgStruct.Name+'Size[2];'; - NDeclarations = 2; - else - // Declare the array with its size. - Cdeclaration(1) = Cdeclaration(1)+C_Type(ArgStruct.Type)+... - ' '+ArgStruct.Name+'['+ArgStruct.Size(1)+'*'+ArgStruct.Size(2)+'];'; - if (FlagExt == 1) - Cdeclaration(2) = Cdeclaration(2)+C_Type('i')+' __'+ArgStruct.Name+'Size[2];'; - else - Cdeclaration(2) = Cdeclaration(2)+C_Type('i')+' __'+ArgStruct.Name+'Size[2] = {'+ArgStruct.Size(1)+','+ArgStruct.Size(2)+'};'; - end - NDeclarations = 2; - end -else - if (FlagExt == 1) - Cdeclaration(1) = 'extern '; - else - Cdeclaration(1) = ''; - end - Cdeclaration(1) = Cdeclaration(1)+C_Type(ArgStruct.Type)+' '+ArgStruct.Name; - if (~isnan(ArgStruct.Value) & (FlagExt == 0)) - if isreal(ArgStruct.Value) - Cdeclaration(1) = Cdeclaration(1)+' = '+SCI2Cstring(ArgStruct.Value); - else - if (ArgStruct.Type == 'z') - Cdeclaration(1) = Cdeclaration(1)+' = DoubleComplex('+SCI2Cstring(real(ArgStruct.Value))+','+SCI2Cstring(imag(ArgStruct.Value))+')'; - else - Cdeclaration(1) = Cdeclaration(1)+' = FloatComplex('+SCI2Cstring(real(ArgStruct.Value))+','+SCI2Cstring(imag(ArgStruct.Value))+')'; - end - end - end - Cdeclaration(1) = Cdeclaration(1)+';'; - NDeclarations = 1; -end - - -// -------------------------------------------- -// --- Write C declaration into the C file. --- -// -------------------------------------------- -for cntdecl = 1:NDeclarations - // #RNU_RES_B - PrintStringInfo(' '+Cdeclaration(cntdecl),ReportFileName,'file','y'); - // #RNU_RES_E -end -// #RNU_RES_B -PrintStringInfo(' Writing C declaration in: '+CDeclarationFileName,ReportFileName,'file','y'); -// #RNU_RES_E -for cntdecl = 1:NDeclarations - PrintStringInfo(C_IndentBlanks(IndentLevel)+Cdeclaration(cntdecl),CDeclarationFileName,'file','y'); -end -PrintStringInfo(' ',CDeclarationFileName,'file','y'); - -endfunction -// #RNU_RES_B -//NUT: dove sta il controllo che verifica se dopo aver dichiarato una local A[10] essa viene utilizzata -//NUT: per memorizzare un A = sin(B) dove B[11]?? -// #RNU_RES_E diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateFunName.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateFunName.sci deleted file mode 100644 index b5b8c12d..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateFunName.sci +++ /dev/null @@ -1,45 +0,0 @@ -function CFunName = C_GenerateFunName(FunctionName,InArg,NInArg,OutArg,NOutArg) -// function CFunName = C_GenerateFunName(FunctionName,InArg,NInArg,OutArg,NOutArg) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// 11-Nov-2007 -- Raffaele Nutricato: changed naming rule. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),5,5); -CFunName = ''; - -for tmpcnt = 1:NInArg - if (InArg(tmpcnt).Dimension == 1) - CFunName = CFunName+InArg(tmpcnt).Type+'2'; - else - CFunName = CFunName+InArg(tmpcnt).Type+SCI2Cstring(InArg(tmpcnt).Dimension); - end -end - -CFunName = CFunName+FunctionName; - -for tmpcnt = 1:NOutArg - if (OutArg(tmpcnt).Dimension == 1) - CFunName = CFunName+OutArg(tmpcnt).Type+'2'; - else - CFunName = CFunName+OutArg(tmpcnt).Type+SCI2Cstring(OutArg(tmpcnt).Dimension); - end -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateLaunchScript.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateLaunchScript.sci deleted file mode 100644 index 027d4c70..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateLaunchScript.sci +++ /dev/null @@ -1,86 +0,0 @@ -function C_GenerateLaunchScript(OutDir,ListSCI2CInputPrmFiles) -// function C_GenerateLaunchScript(OutDir,ListSCI2CInputPrmFiles) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Generate the script that can be used to compile all the regression -// tests and to run them and finally to write results in the report -// file. -// #RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Jan-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -ScriptFileName = fullfile(OutDir,'LaunchRegressionTests.rc'); -NTranslations = size(ListSCI2CInputPrmFiles,1); -// --------------------------- -// --- End Initialization. --- -// --------------------------- -SCI2Cmdelete(ScriptFileName); -PrintStringInfo('#! /bin/bash ',ScriptFileName,'file','y'); -PrintStringInfo(' ',ScriptFileName,'file','y'); -PrintStringInfo('maindir=$PWD',ScriptFileName,'file','y'); -PrintStringInfo(' ',ScriptFileName,'file','y'); -PrintStringInfo('INTIALIZE()',ScriptFileName,'file','y'); -PrintStringInfo('{',ScriptFileName,'file','y'); -PrintStringInfo(' reportfile=$maindir/RegressionTestsReport.txt',ScriptFileName,'file','y'); -PrintStringInfo(' echo ""#############'+'#################"" > $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo ""REPORT OF THE REGRESSION TESTS"" > $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo ""#############'+'#################"" > $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo ""Author: Raffaele Nutricato"" > $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo ""Copyright 2008 Raffaele Nutricato"" > $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo "" "" > $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' cd $maindir ',ScriptFileName,'file','y'); -PrintStringInfo('}',ScriptFileName,'file','y'); -PrintStringInfo(' ',ScriptFileName,'file','y'); -PrintStringInfo('EXECUTE()',ScriptFileName,'file','y'); -PrintStringInfo('{',ScriptFileName,'file','y'); -PrintStringInfo(' echo ""xxxxxxxxxxxxxx'+'xxxxxxxxxxxxxxxxxx'+'xxxxxxxxxxxx""',ScriptFileName,'file','y'); -PrintStringInfo(' echo "" "" >> $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo "" "" >> $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo "" "" >> $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo ""xxxxxxxxxxxxxx'+'xxxxxxxxxxxxxxxxxxxxxxx'+'xxxxxxx"" >> $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo $testname ',ScriptFileName,'file','y'); -PrintStringInfo(' echo $testname >> $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo ""xxxxxxxxxxxxxxx'+'xxxxxxxxxxxxxxxxx'+'xxxxxxxxxxxx"" ',ScriptFileName,'file','y'); -PrintStringInfo(' echo ""xxxxxxxxxxxxxxxx'+'xxxxxxxxxxxxxxxxxxxx'+'xxxxxxxx"" >> $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' cd $testname/C_Code',ScriptFileName,'file','y'); -PrintStringInfo(' make >> $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' cd $maindir',ScriptFileName,'file','y'); -PrintStringInfo(' echo "" "" >> $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo "" "" >> $reportfile',ScriptFileName,'file','y'); -PrintStringInfo(' echo "" "" >> $reportfile',ScriptFileName,'file','y'); -PrintStringInfo('}',ScriptFileName,'file','y'); -PrintStringInfo(' ',ScriptFileName,'file','y'); -PrintStringInfo('#############'+'##############',ScriptFileName,'file','y'); -PrintStringInfo('### ADD YOUR TESTS HERE ###',ScriptFileName,'file','y'); -PrintStringInfo('##############'+'#############',ScriptFileName,'file','y'); -PrintStringInfo('INTIALIZE',ScriptFileName,'file','y'); -PrintStringInfo(' ',ScriptFileName,'file','y'); - -for cnttransl = 1:NTranslations - [testpath,tmpname,tmpext] = fileparts(ListSCI2CInputPrmFiles(cnttransl)); - testpath = ConvertPathMat2C(testpath,'cygwin'); - PrintStringInfo('testname=""'+testpath+'""',ScriptFileName,'file','y'); - PrintStringInfo('EXECUTE $testname',ScriptFileName,'file','y'); - PrintStringInfo(' ',ScriptFileName,'file','y'); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateMakefile.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateMakefile.sci deleted file mode 100644 index 1ef7385c..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_GenerateMakefile.sci +++ /dev/null @@ -1,93 +0,0 @@ -function C_GenerateMakefile(FileInfo,SharedInfo) -// function C_GenerateMakefile(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// Generate the makefile. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Jan-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -PrintStepInfo('Generating Makefile '+FileInfo.MakefileFilename,... - FileInfo.GeneralReport,'both'); -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -PrintStringInfo('# SCI2C Makefile',FileInfo.MakefileFilename,'file','y'); -PrintStringInfo('# hArtes EU Project.',FileInfo.MakefileFilename,'file','y'); -PrintStringInfo('# Authors: PoliBa & Inria',FileInfo.MakefileFilename,'file','y'); -PrintStringInfo('# -----------------------',FileInfo.MakefileFilename,'file','y'); -PrintStringInfo('# --- USER PARAMETERS ---',FileInfo.MakefileFilename,'file','y'); -PrintStringInfo('# -----------------------',FileInfo.MakefileFilename,'file','y'); -PrintStringInfo('# --- DIRECTORIES AND FILES ---',FileInfo.MakefileFilename,'file','y'); -if (SharedInfo.CCompilerPathStyle == 'windows') - makeobjpath = '..\..\..\Scilab2C\CFiles\sci2cobj'; - // makeobjpath = FileInfo.CStyleSCI2CMainDir+'\CFiles\sci2cobj'; - makecsrcdir = '..\..\..\Scilab2C\CFiles\sci2ccode'; - // makecsrcdir = FileInfo.CStyleSCI2CMainDir+'\CFiles\sci2ccode'; - makehsrcdir = '..\..\..\Scilab2C\CFiles\sci2cincludes'; - // makehsrcdir = FileInfo.CStyleSCI2CMainDir+'\CFiles\sci2cincludes'; - makeisrcdir = '..\..\..\Scilab2C\CFiles\sci2cinterfaces'; - // makeisrcdir = FileInfo.CStyleSCI2CMainDir+'\CFiles\sci2cinterfaces'; - makesci2cdir = FileInfo.CStyleOutCCCodeDir; - // makesci2cdir = FileInfo.CStyleOutCCCodeDir; -elseif (SharedInfo.CCompilerPathStyle == 'unix' | ... - SharedInfo.CCompilerPathStyle == 'cygwin') - makeobjpath = '../../../Scilab2C/CFiles/sci2cobj'; - // makeobjpath = FileInfo.CStyleSCI2CMainDir+'/CFiles/sci2cobj'; - makecsrcdir = '../../../Scilab2C/CFiles/sci2ccode'; - // makecsrcdir = FileInfo.CStyleSCI2CMainDir+'/CFiles/sci2ccode'; - makehsrcdir = '../../../Scilab2C/CFiles/sci2cincludes'; - // makehsrcdir = FileInfo.CStyleSCI2CMainDir+'/CFiles/sci2cincludes'; - makeisrcdir = '../../../Scilab2C/CFiles/sci2cinterfaces'; - // makeisrcdir = FileInfo.CStyleSCI2CMainDir+'/CFiles/sci2cinterfaces'; - makesci2cdir = FileInfo.CStyleOutCCCodeDir; -else - PrintStringInfo(' ',ReportFileName,'stdout','y'); - PrintStringInfo('SCI2CERROR: Unkwnown option for CCompilerPathStyle','','both','y'); - PrintStringInfo('SCI2CERROR: Please check SCI2CInputParameters.sce file.','','both','y'); - SCI2Cerror(' '); -end - -PrintStringInfo('OBJDIR = '+makeobjpath,FileInfo.MakefileFilename,'file','y'); -PrintStringInfo('CSRCDIR = '+makecsrcdir,FileInfo.MakefileFilename,'file','y'); -PrintStringInfo('HSRCDIR = '+makehsrcdir,FileInfo.MakefileFilename,'file','y'); -PrintStringInfo('ISRCDIR = '+makeisrcdir,FileInfo.MakefileFilename,'file','y'); -//PrintStringInfo('SCI2CDIR = '+makesci2cdir,FileInfo.MakefileFilename,'file','y'); -PrintStringInfo('SCI2CDIR = .',FileInfo.MakefileFilename,'file','y'); -PrintStringInfo('EXEFILENAME = mytest.exe',FileInfo.MakefileFilename,'file','y'); - -// ------------------------------- -// --- Open template makefile. --- -// ------------------------------- -fidfile = SCI2COpenFileRead(FileInfo.MakefileTemplate); - -// ------------------- -// --- Read lines. --- -// ------------------- -tmpline = mgetl(fidfile,1); -while (meof(fidfile) == 0) - PrintStringInfo(tmpline,FileInfo.MakefileFilename,'file','y'); - tmpline = mgetl(fidfile,1); -end - -mclose(fidfile); - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_IfElseBlocks.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_IfElseBlocks.sci deleted file mode 100644 index 71b45966..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_IfElseBlocks.sci +++ /dev/null @@ -1,68 +0,0 @@ -function SharedInfo = C_IfElseBlocks(FileInfo,SharedInfo,InOutStatements) -// function SharedInfo = C_IfElseBlocks(FileInfo,SharedInfo,InOutStatements) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; - -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1FileName; - -IndentLevel = SharedInfo.NIndent; - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo(' Generate ""{"" or ""}"" code for if/else statement',ReportFileName,'file','y'); -// #RNU_RES_E -CCall = ''; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// #RNU_RES_B -// ----------------------------------------------------- -// --- Generate the C call/Update indentation level. --- -// ----------------------------------------------------- -// #RNU_RES_E -if (InOutStatements=='in') - CCall = CCall+'{'; - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); - IndentLevel = IndentLevel + 1; -elseif (InOutStatements=='out') - CCall = CCall+'}'; - IndentLevel = IndentLevel - 1; - PrintStringInfo(' '+CCall,ReportFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(IndentLevel)+CCall,CPass1FileName,'file','y'); -else - SCI2CerrorFile('Unknown setting for InOutStatements: '+InOutStatements'.',ReportFileName); -end - -// #RNU_RES_B -PrintStringInfo(' Updating indentation level to:'+string(IndentLevel),ReportFileName,'file','y'); -// #RNU_RES_E -SharedInfo.NIndent = IndentLevel; - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_IfExpression.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_IfExpression.sci deleted file mode 100644 index 772f24ff..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_IfExpression.sci +++ /dev/null @@ -1,91 +0,0 @@ -function SharedInfo = C_IfExpression(IfCondArg,NIfCondArg,ASTIfExpType,FileInfo,SharedInfo) -// function SharedInfo = C_IfExpression(IfCondArg,NIfCondArg,ASTIfExpType,FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),5,5); - -// --- Check NIfCondArg value. --- -if ((NIfCondArg ~= 1) & (ASTIfExpType~='else')) - SCI2CerrorFile('Cannot manage ""if/elseif"" with a number of condition variables not equal to 1.',ReportFileName); -end - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; - -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1FileName; - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Generating C code***',ReportFileName,'file','y'); -// #RNU_RES_E -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// -------------------------------------------- -// --- Generate the C name of the function. --- -// -------------------------------------------- -if (ASTIfExpType=='if') - CFunName = 'if'; -elseif (ASTIfExpType=='elseif') - CFunName = 'if'; -elseif (ASTIfExpType=='else') - CFunName = 'else'; -else - SCI2CerrorFile('Unknown ASTIfExpType ""'+ASTIfExpType+'"".',ReportFileName); -end - -// ---------------------------- -// --- Generate the C call. --- -// ---------------------------- -if SCI2Cstrncmps1size(ASTIfExpType,'else') - // #RNU_RES_B - // before opening a new C block, closes the previous one. - // #RNU_RES_E - SharedInfo = C_IfElseBlocks(FileInfo,SharedInfo,'out'); -end - -CCall =''; -CCall = CCall+CFunName; -if (ASTIfExpType~='else') - CCall = CCall+'('+IfCondArg(1)+')'; -end -PrintStringInfo(' '+CCall,ReportFileName,'file','y'); -PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+CCall,CPass1FileName,'file','y'); - -SharedInfo = C_IfElseBlocks(FileInfo,SharedInfo,'in'); - -// #RNU_RES_B -// --------------------------------- -// --- Update counter nested if. --- -// --------------------------------- -// #RNU_RES_E -if (ASTIfExpType=='elseif') - // #RNU_RES_B - // every elseif statement a new } is required. - // #RNU_RES_E - SharedInfo.CountNestedIf = SharedInfo.CountNestedIf + 1; -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_IndentBlanks.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_IndentBlanks.sci deleted file mode 100644 index 9304aefb..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_IndentBlanks.sci +++ /dev/null @@ -1,31 +0,0 @@ -function OutBlanksString = C_IndentBlanks(IndentLevel) -// function OutBlanksString = C_IndentBlanks(IndentLevel) -// ----------------------------------------------------------------- -// Delete function for a generic SCI2C table. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -OutBlanksString = ''; -BlanksPerLevel = ' '; -for cntind = 1:IndentLevel - OutBlanksString = OutBlanksString + BlanksPerLevel; -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_InitHeader.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_InitHeader.sci deleted file mode 100644 index 8d088939..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_InitHeader.sci +++ /dev/null @@ -1,65 +0,0 @@ -function C_InitHeader(C_Prototype,HeaderFileName,Sci2CLibMainHeaderFName) -// function C_InitHeader(C_Prototype,HeaderFileName,Sci2CLibMainHeaderFName) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -// --------------------------- -// --- End Initialization. --- -// --------------------------- - - -C_SCI2CHeader(HeaderFileName); -PrintStringInfo('/*',HeaderFileName,'file','y'); -PrintStringInfo('** ----------------------- ',HeaderFileName,'file','y'); -PrintStringInfo('** --- SCI2C Includes. --- ',HeaderFileName,'file','y'); -PrintStringInfo('** ----------------------- ',HeaderFileName,'file','y'); -PrintStringInfo('*/',HeaderFileName,'file','y'); -PrintStringInfo('#include ""'+Sci2CLibMainHeaderFName+'""',HeaderFileName,'file','y'); -PrintStringInfo('/*',HeaderFileName,'file','y'); -PrintStringInfo('** --------------------------- ',HeaderFileName,'file','y'); -PrintStringInfo('** --- End SCI2C Includes. --- ',HeaderFileName,'file','y'); -PrintStringInfo('** --------------------------- ',HeaderFileName,'file','y'); -PrintStringInfo('*/',HeaderFileName,'file','y'); -PrintStringInfo(' ',HeaderFileName,'file','y'); -PrintStringInfo(' ',HeaderFileName,'file','y'); -PrintStringInfo('/*',HeaderFileName,'file','y'); -PrintStringInfo('** ------------------- ',HeaderFileName,'file','y'); -PrintStringInfo('** --- Prototypes. --- ',HeaderFileName,'file','y'); -PrintStringInfo('** ------------------- ',HeaderFileName,'file','y'); -PrintStringInfo('*/',HeaderFileName,'file','y'); -PrintStringInfo(C_IndentBlanks(0)+C_Prototype,HeaderFileName,'file','y'); -PrintStringInfo('/*',HeaderFileName,'file','y'); -PrintStringInfo('** ----------------------- ',HeaderFileName,'file','y'); -PrintStringInfo('** --- End Prototypes. --- ',HeaderFileName,'file','y'); -PrintStringInfo('** ----------------------- ',HeaderFileName,'file','y'); -PrintStringInfo('*/',HeaderFileName,'file','y'); -PrintStringInfo(' ',HeaderFileName,'file','y'); -PrintStringInfo(' ',HeaderFileName,'file','y'); -PrintStringInfo('/*',HeaderFileName,'file','y'); -PrintStringInfo('** ------------------------ ',HeaderFileName,'file','y'); -PrintStringInfo('** --- USER2C Includes. --- ',HeaderFileName,'file','y'); -PrintStringInfo('** ------------------------ ',HeaderFileName,'file','y'); -PrintStringInfo('*/',HeaderFileName,'file','y'); - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_MemAllocOutTempVars.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_MemAllocOutTempVars.sci deleted file mode 100644 index 5d92d4c8..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_MemAllocOutTempVars.sci +++ /dev/null @@ -1,64 +0,0 @@ -function C_MemAllocOutTempVars(OutArg,NOutArg,CPass1FileName,CPass1FreeFileName,IndentLevel,ReportFileName,ResizeApproach) -// function C_MemAllocOutTempVars(OutArg,NOutArg,CPass1FileName,CPass1FreeFileName,IndentLevel,ReportFileName,ResizeApproach) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// 10-Jun-2008 -- Raffaele Nutricato: replaced malloc with realloc. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),7,7); - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Allocating memory for temp variables***',ReportFileName,'file','y'); -// #RNU_RES_E - -// #RNU_RES_B -// --- Allocate memory and size array for output arguments. --- -// #RNU_RES_E -for counterout = 1:NOutArg - if (OutArg(counterout).Dimension > 0) - // #RNU_RES_B - // if ((OutArg(counterout).Scope == 'Temp') | (OutArg(counterout).FindLike == -1) | ... - // (SCI2Cisnum(OutArg(counterout).Size(1))==%F) | (SCI2Cisnum(OutArg(counterout).Size(2))==%F)) - //NUT: qui forse ci vuole un check per verificare se per caso la variabile e' globale e non se ne conosce la size numerica. - //NUT infatti. Per ora se la size numerica assumo che la variabile globale e' da reallocare. Secondo me occorre aggiungere - //NUT un campo negli argomenti che specifichi la presenza di realloc da fare. - //NUT: ho tolto il check sulle temp perche' se una temp ha size numerica non voglio fare malloc. - //RNU sulle stringhe ancora non applico realloc - // #RNU_RES_E - if ((OutArg(counterout).FindLike == -1) | ... - (SCI2Cisnum(OutArg(counterout).Size(1))==%F) | (SCI2Cisnum(OutArg(counterout).Size(2))==%F)| ... - (ResizeApproach=='REALLOC_ALL_RESIZE_ALL' & OutArg(counterout).Type ~= 'g')) - OutArgName = OutArg(counterout).Name; - tmpcode = '__'+OutArgName+'Size[0]='+OutArg(counterout).Size(1)+';'; - PrintStringInfo(C_IndentBlanks(IndentLevel)+tmpcode,CPass1FileName,'file','y'); - PrintStringInfo(' '+tmpcode,ReportFileName,'file','y'); - tmpcode = '__'+OutArgName+'Size[1]='+OutArg(counterout).Size(2)+';'; - PrintStringInfo(C_IndentBlanks(IndentLevel)+tmpcode,CPass1FileName,'file','y'); - PrintStringInfo(' '+tmpcode,ReportFileName,'file','y'); - //a->val = (double *) malloc(nnz * sizeof(double)); - // numbers = (int*) realloc (numbers, count * sizeof(int)); - tmpcode = OutArgName+' = ('+C_Type(OutArg(counterout).Type)+'*) realloc('+OutArgName+',('+OutArg(counterout).Size(1)+')*('+OutArg(counterout).Size(2)+')*sizeof('+C_Type(OutArg(counterout).Type)+'));'; - PrintStringInfo(C_IndentBlanks(IndentLevel)+tmpcode,CPass1FileName,'file','y'); - PrintStringInfo(' '+tmpcode,ReportFileName,'file','y'); - PrintStringInfo(C_IndentBlanks(1)+'free('+OutArgName+');',CPass1FreeFileName,'file','y'); - end - end -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_SCI2CHeader.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_SCI2CHeader.sci deleted file mode 100644 index 5e8acd5d..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_SCI2CHeader.sci +++ /dev/null @@ -1,41 +0,0 @@ -function C_SCI2CHeader(FileName) -// function C_SCI2CHeader(FileName) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 21-Dec-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -// --------------------------- -// --- End Initialization. --- -// --------------------------- - - -PrintStringInfo('/*',FileName,'file','y'); -PrintStringInfo('** ************************************************',FileName,'file','y'); -PrintStringInfo('** hArtes/POLIBA SCILAB2C',FileName,'file','y'); -PrintStringInfo('** Contact: raffaele.nutricato@tiscali.it',FileName,'file','y'); -PrintStringInfo('** ************************************************',FileName,'file','y'); -PrintStringInfo('*/',FileName,'file','y'); -PrintStringInfo(' ',FileName,'file','y'); -PrintStringInfo(' ',FileName,'file','y'); - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_Type.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_Type.sci deleted file mode 100644 index f49dd9b1..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_Type.sci +++ /dev/null @@ -1,41 +0,0 @@ -function OutC_Type = C_Type(ArgType) -// function OutC_Type = C_Type(ArgType) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -if (ArgType == 's') - OutC_Type = 'float'; -elseif (ArgType == 'd') - OutC_Type = 'double'; -elseif (ArgType == 'c') - OutC_Type = 'floatComplex'; -elseif (ArgType == 'z') - OutC_Type = 'doubleComplex'; -elseif (ArgType == 'i') - OutC_Type = 'SCI2Cint'; -elseif (ArgType == 'g') - OutC_Type = 'char'; -elseif (ArgType == 'f') - OutC_Type = 'SCI2CFILEID'; -else - SCI2Cerror('Unknown Argument Type: ""'+ArgType+'"".'); -end -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/C_WhileExpression.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/C_WhileExpression.sci deleted file mode 100644 index 24898a1b..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/C_WhileExpression.sci +++ /dev/null @@ -1,90 +0,0 @@ -function SharedInfo = C_WhileExpression(FileInfo,SharedInfo) -// function SharedInfo = C_WhileExpression(FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 15-Nov-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; - -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1FileName; - -CPass1WhileProlFileName = FileInfo.Funct(nxtscifunnumber).CPass1WhileProlFileName(SharedInfo.While.Level); -CPass1WhileEpilFileName = FileInfo.Funct(nxtscifunnumber).CPass1WhileEpilFileName(SharedInfo.While.Level); -CDeclarationFileName = FileInfo.Funct(nxtscifunnumber).CDeclarationFileName; - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Generating C code***',ReportFileName,'file','y'); -// #RNU_RES_E -CCall =''; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// ---------------------------- -// --- Generate the C call. --- -// ---------------------------- - -// ------------------------- -// --- Manage all cases. --- -// ------------------------- -PrintStringInfo(' Handling While Expression with OpColon.',ReportFileName,'file','y'); //NUT: sistema il commento. - -// #RNU_RES_B -// ------------------------------------------------------------------------------------- -// --- Generate Prologue and Epilogue -> Copy the first N-1 lines of the for.c code. --- -// ------------------------------------------------------------------------------------- -// #RNU_RES_E -[C_Strings,NumCStrings] = File2StringArray(CPass1WhileProlFileName); -C_Strings = stripblanks(C_Strings); -for cntstr = 1:NumCStrings - // Prologue - PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+C_Strings(cntstr),CPass1FileName,'file','y'); - // Epilogue - PrintStringInfo(C_Strings(cntstr),CPass1WhileEpilFileName ,'file','y'); -end -// ---------------------------------------- -// --- Insert "}" in the epilogue file. --- -// ---------------------------------------- -PrintStringInfo('}',CPass1WhileEpilFileName ,'file','y'); - -// ------------------------------ -// --- Insert for expression. --- -// ------------------------------ -CCall = 'while('+SharedInfo.WhileExpr.CondVar+')'; -PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+CCall,CPass1FileName,'file','y'); - -// ------------------- -// --- Insert "{". --- -// ------------------- -CCall = '{'; -PrintStringInfo(C_IndentBlanks(SharedInfo.NIndent)+CCall,CPass1FileName,'file','y'); - -// --------------------------------- -// --- Update Indentation Level. --- -// --------------------------------- -SharedInfo.NIndent = SharedInfo.NIndent + 1; - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/GenCFunDatFiles.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/GenCFunDatFiles.sci deleted file mode 100644 index 62c8f4bc..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/GenCFunDatFiles.sci +++ /dev/null @@ -1,73 +0,0 @@ -function GenCFunDatFiles(FunctionName,FunPrecSpecifier,FunTypeAnnot,FunSizeAnnot,InArg,NInArg,OutArg,NOutArg,CFunName,LibTypeInfo,FunInfoDatDir) -// function GenCFunDatFiles(FunctionName,FunPrecSpecifier,FunTypeAnnot,FunSizeAnnot,InArg,NInArg,OutArg,NOutArg,CFunName,LibTypeInfo,FunInfoDatDir) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 30-Oct-2007 -- Raffaele Nutricato: Author. -// 30-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// #RNU_RES_B -//NUT Nella fun info posso mettere le size simboliche per out arg e non quelle numeriche -//NUT che non usero' mai, anche perche' se un giorno decidero' di cambiare approccio e usero' funzioni -//NUT differenti per size differenti allora dovro' cambiare anche il loro nome per distinguerle -//NUT e di conseguenza avro' funinfo differenti. -// #RNU_RES_E -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),11,11); - - -// ----------------------- -// --- Initialization. --- -// ----------------------- -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// #RNU_RES_B -// ---------------------------------------------------------- -// --- Find Position of the first output scalar argument. --- -// ---------------------------------------------------------- -// #RNU_RES_E -PosFirstOutScalar = 0; -FoundOutScalar = 0; -for counterout = 1:NOutArg - if (OutArg(counterout).Dimension == 0) - if (FoundOutScalar==0) - PosFirstOutScalar = counterout; - FoundOutScalar = 1; - end - end -end - -// ------------------------------------ -// --- Update C function dat files. --- -// ------------------------------------ -clear FunInfo -FunInfo.SCIFunctionName = FunctionName; -FunInfo.CFunctionName = CFunName; -FunInfo.FunPrecSpecifier = FunPrecSpecifier; -FunInfo.FunTypeAnnot = FunTypeAnnot; -FunInfo.FunSizeAnnot = FunSizeAnnot; -FunInfo.InArg = InArg; -FunInfo.NInArg = NInArg; -FunInfo.OutArg = OutArg; -FunInfo.NOutArg = NOutArg; -FunInfo.PosFirstOutScalar = PosFirstOutScalar; -FunInfo.LibTypeInfo = LibTypeInfo; -save(fullfile(FunInfoDatDir,CFunName+'.dat'),FunInfo); -clear FunInfo - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/GetClsFileName.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/GetClsFileName.sci deleted file mode 100644 index ec9ce5b9..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/GetClsFileName.sci +++ /dev/null @@ -1,95 +0,0 @@ -function SCI2CClassFileName = GetClsFileName(FunName,FileInfo,SharedInfo) -// function SCI2CClassFileName = GetClsFileName(FunName,FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Jul-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -// //NUT: verifica che il nome sia accettabile e che non -// //NUT: occorra spezzettarla in piu funzioni. - -// --- Extraction of the function name and number. --- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; - -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; - -// --- Initialization. --- -tmpannfilename = FunName+'.ann'; -tmpscifilename = FunName+'.sci'; -AnnFileName = ''; -ClsFileName = '' - -SCI2CClassSpecifier = SharedInfo.Annotations.FUNCLASS; -FlagFoundAnnFile = 0; -// #RNU_RES_B -//NUT: qui e' presente la lista delle priorita' di accesso alle annotazioni. -// #RNU_RES_E -if SCI2Cfileexist(FileInfo.USER2CLibCAnnFun,tmpannfilename) - // #RNU_RES_B - // It is a C function of the USER2C library. - // #RNU_RES_E - FlagFoundAnnFile = 1; - AnnFileName = fullfile(FileInfo.USER2CLibCAnnFun,tmpannfilename); - SCI2CClassName = FL_GetFunctionClass(AnnFileName,SCI2CClassSpecifier,ReportFileName); - SCI2CClassFileName = fullfile(FileInfo.USER2CLibCAnnCls,SCI2CClassName+'.acls'); -elseif SCI2Cfileexist(FileInfo.USER2CLibSCIAnnFun,tmpannfilename) - // #RNU_RES_B - // It is a scilab function of the USER2C library. - // #RNU_RES_E - FlagFoundAnnFile = 1; - AnnFileName = fullfile(FileInfo.USER2CLibSCIAnnFun,tmpannfilename); - SCI2CClassName = FL_GetFunctionClass(AnnFileName,SCI2CClassSpecifier,ReportFileName); - SCI2CClassFileName = fullfile(FileInfo.USER2CLibSCIAnnCls,SCI2CClassName+'.acls'); -elseif (SCI2Cfileexist(FileInfo.SCI2CLibCAnnFun,tmpannfilename)) - // #RNU_RES_B - // It is a C function of the SCI2C library. - // #RNU_RES_E - FlagFoundAnnFile = 1; - AnnFileName = fullfile(FileInfo.SCI2CLibCAnnFun,tmpannfilename); - SCI2CClassName = FL_GetFunctionClass(AnnFileName,SCI2CClassSpecifier,ReportFileName); - SCI2CClassFileName = fullfile(FileInfo.SCI2CLibCAnnCls,SCI2CClassName+'.acls'); -elseif (SCI2Cfileexist(FileInfo.SCI2CLibSCIAnnFun,tmpannfilename)) - // #RNU_RES_B - // It is a scilab function of the SCI2C library. - // #RNU_RES_E - FlagFoundAnnFile = 1; - AnnFileName = fullfile(FileInfo.SCI2CLibSCIAnnFun,tmpannfilename); - SCI2CClassName = FL_GetFunctionClass(AnnFileName,SCI2CClassSpecifier,ReportFileName); - SCI2CClassFileName = fullfile(FileInfo.SCI2CLibSCIAnnCls,SCI2CClassName+'.acls'); -end - -if (FlagFoundAnnFile == 0) - [FlagFoundAnnFile,fullpathscifilename] = SCI2CFindFile(FileInfo.UserSciFilesPaths,FunName+'.sci'); - if (FlagFoundAnnFile == 0) - // #RNU_RES_B - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Missing function annotation. Could not find',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: an associated .sci or .ann file for function: '+FunName,ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - // #RNU_RES_E - SCI2Cerror(' '); - end - AnnFileName = fullfile(FileInfo.USER2CLibSCIAnnFun,tmpannfilename); - SCI2CClassName = FunName; - SCI2CClassFileName = fullfile(FileInfo.USER2CLibSCIAnnCls,SCI2CClassName+'.acls'); - Sci2AnnotationFile(fullpathscifilename,SCI2CClassFileName,AnnFileName,... - SharedInfo.Annotations.USERFUN,ReportFileName); -end -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/GetSymbolDimension.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/GetSymbolDimension.sci deleted file mode 100644 index 6f4010ac..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/GetSymbolDimension.sci +++ /dev/null @@ -1,70 +0,0 @@ -function symboldimension = GetSymbolDimension(Field_Size) -// function symboldimension = GetSymbolDimension(Field_Size) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Get the dimesion (0D,1D,2D) of a symbol given its size. -// -// Input data: -// Field_Size: it is the Size field of the InArg or OutArg structures. -// It is a 2-element array. N-dim array are not supported -// in this release. -// -// Output data: -// symboldimension: number specifying the dimension of the symbol. -// 0 = scalar; 1 = column or row; 2 = matrix. -// -// #RNU_RES_E -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// Size is expressed as an array of two strings. -Nelem = max(size(Field_Size)); -if (Nelem < 2) - SCI2Cerror('The size of a symbol cannot be expressed with one or zero numbers.'); -end -for countersize = 1:Nelem - // #RNU_RES_B - // Field_Type = 1; if Size is Symbol or a number > 1 - // Field_Type = 0; if Size is a number == 1 - // error if Size is 0. - // A symbol is scalar if the sum of the Field_Type elements is zero. - // A symbol is column or row if the sum of the Field_Type elements is one. - // A symbol is a matrix if the sum of the Field_Type elements is > 1. - // #RNU_RES_E - if (SCI2Cisnum(Field_Size(countersize))) - tmpnum = eval(Field_Size(countersize)); - if (tmpnum == 0) - SCI2Cerror('Found a symbol that has zeros elements. 0xN or Nx0 matrices are not allowed.'); - elseif (tmpnum == 1) - Field_Type(countersize) = 0; - else - Field_Type(countersize) = 1; - end - else - Field_Type(countersize) = 1; - end -end - -Sum_Field_Type = sum(Field_Type); -if (Sum_Field_Type == 0) - symboldimension = 0; -elseif (Sum_Field_Type == 1) - // #RNU_RES_B - // symboldimension = 1; //NUT for this release there will not be difference between vectors and matrices. - // #RNU_RES_E - symboldimension = 2; -else - symboldimension = 2; -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/GetWhileCondVariable.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/GetWhileCondVariable.sci deleted file mode 100644 index ba4c7e92..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/GetWhileCondVariable.sci +++ /dev/null @@ -1,72 +0,0 @@ -function SharedInfo = GetWhileCondVariable(OutArg,NOutArg,FunctionName,FileInfo,SharedInfo) -// function SharedInfo = GetWhileCondVariable(OutArg,NOutArg,FunctionName,FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -//NUT: secondo me questa funzione non serve a nulla - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),5,5); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Checking if the current function is handling while counter variables.***',ReportFileName,'file','y'); -// #RNU_RES_E - -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// #RNU_RES_B -// ----------------------------------------------- -// --- Initial Check on While counter variables. --- -// ----------------------------------------------- -// #RNU_RES_E -if ((SharedInfo.WhileExpr.OnExec > 0) & (NOutArg==1)) - // #RNU_RES_B - //NUT: se sono in una while expression devo memorizzarmi l'ultima variabile di output - //NUT: perche' e' quella che contiene la condizione da testare, - //NUT: allora io me le salvo tutte e l'ultima salvata sara' quella che andra' a finire - //NUT: nella while. - // #RNU_RES_E - SharedInfo.WhileExpr.CondVar = OutArg(1).Name; - // #RNU_RES_B - //if (SharedInfo.WhileExpr.AssignmentFun == 0) - //NUT: Test also that SharedInfo.WhileExpr.AssignmentFun because sometimes Equal are dummy! - //NUT: verifica se e' giusta questa mia affermazione. - //RNU il seguente test e' stato spostato nella AST_HandleWhileStatem.c perche' - //RNU: secondo me la matrice finale non e' supportata dalla while, ma while(det(M)>0) - //RNU: puo' essere benissimo supportato. - // if (OutArg.Dimension > 0) - // SCI2CerrorFile('Cannot manage while with matrix conditions',ReportFileName); - // SharedInfo.SkipNextFun = 0; //NUT verifica se serve - // end - // #RNU_RES_E - SharedInfo.WhileExpr.DimCondVar = OutArg(1).Dimension; - ///end -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/JoinDeclarAndCcode.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/JoinDeclarAndCcode.sci deleted file mode 100644 index ebbf0023..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/JoinDeclarAndCcode.sci +++ /dev/null @@ -1,168 +0,0 @@ -function JoinDeclarAndCcode(FileInfoDatFile) -// function JoinDeclarAndCcode(FileInfoDatFile) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 07-Nov-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// --------------------- -// --- Load section. --- -// --------------------- -// --- Load File Info Structure. --- -load(FileInfoDatFile,'FileInfo'); - -// --- Load Shared Info Structure. --- -load(FileInfo.SharedInfoDatFile,'SharedInfo'); -// ------------------------- -// --- End load section. --- -// ------------------------- - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -funnumber = SharedInfo.NextSCIFunNumber; - -CPass1FileName = FileInfo.Funct(funnumber).CPass1FileName; -CPass2FileName = FileInfo.Funct(funnumber).CPass2FileName; -CDeclarationFileName = FileInfo.Funct(funnumber).CDeclarationFileName; -CGblDeclarFileName = FileInfo.Funct(funnumber).CGblDeclarFileName; -CInitVarsFileName = FileInfo.Funct(funnumber).CInitVarsFileName; -ReportFileName = FileInfo.Funct(funnumber).ReportFileName; - -CPass1V1FileFid = SCI2COpenFileRead(CPass1FileName); -CDeclarationFileFid = SCI2COpenFileRead(CDeclarationFileName); -CGblDeclarFileFid = SCI2COpenFileRead(CGblDeclarFileName); -CInitVarsFileFid = SCI2COpenFileRead(CInitVarsFileName); -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -PrintStepInfo('Joining declaration and C-call files',ReportFileName,'file'); - -PrintStringInfo('/*',CPass2FileName,'file','y'); -PrintStringInfo('** -------------------------------------',CPass2FileName,'file','y'); -PrintStringInfo('** --- Global Variables Declaration. ---',CPass2FileName,'file','y'); -PrintStringInfo('** -------------------------------------',CPass2FileName,'file','y'); -PrintStringInfo('*/',CPass2FileName,'file','y'); -// #RNU_RES_B -// --- Copy in V2 the global declaration file. --- -// #RNU_RES_E -while (~meof(CGblDeclarFileFid)) - // Read a line from C Global Declaration file. - tmpcline = mgetl(CGblDeclarFileFid,1); - if (length(tmpcline) == 0) - tmpcline = ' '; - end - - noblkstmpcline = stripblanks(tmpcline); - PrintStringInfo(tmpcline,CPass2FileName,'file','y'); -end -PrintStringInfo('/*',CPass2FileName,'file','y'); -PrintStringInfo('** -----------------------------------------',CPass2FileName,'file','y'); -PrintStringInfo('** --- End Global Variables Declaration. ---',CPass2FileName,'file','y'); -PrintStringInfo('** -----------------------------------------',CPass2FileName,'file','y'); -PrintStringInfo('*/',CPass2FileName,'file','y'); -PrintStringInfo(' ',CPass2FileName,'file','y'); - -// #RNU_RES_B -// --- Copy in V2 the first part of V1 up to "{". --- -// #RNU_RES_E -FoundCurlyBracket = 0; -while ((~meof(CPass1V1FileFid)) & (FoundCurlyBracket == 0)) - // Read a line from C Pass1 file. - tmpcline = mgetl(CPass1V1FileFid,1); - noblkstmpcline = stripblanks(tmpcline); - if (length(noblkstmpcline) > 0) - if (SCI2Cstrncmps1size('{',noblkstmpcline)) - FoundCurlyBracket = 1; - end - else - tmpcline = ' '; - end - PrintStringInfo(tmpcline,CPass2FileName,'file','y'); -end - -if (FoundCurlyBracket == 0) - SCI2CerrorFile('""{"" char not found in:'+CPass1FileName,ReportFileName); -end - -PrintStringInfo('/*',CPass2FileName,'file','y'); -PrintStringInfo('** -----------------------------',CPass2FileName,'file','y'); -PrintStringInfo('** --- Variable Declaration. ---',CPass2FileName,'file','y'); -PrintStringInfo('** -----------------------------',CPass2FileName,'file','y'); -PrintStringInfo('*/',CPass2FileName,'file','y'); -// --- Copy in V2 the declaration file. --- -while (~meof(CDeclarationFileFid)) - // Read a line from C Declaration file. - tmpcline = mgetl(CDeclarationFileFid,1); - if (length(tmpcline) == 0) - tmpcline = ' '; - end - - noblkstmpcline = stripblanks(tmpcline); - PrintStringInfo(tmpcline,CPass2FileName,'file','y'); -end - -// #RNU_RES_B -// --- Copy in V2 the variable initialization file. --- -// #RNU_RES_E -while (~meof(CInitVarsFileFid)) - // Read a line from C Declaration file. - tmpcline = mgetl(CInitVarsFileFid,1); - if (length(tmpcline) == 0) - tmpcline = ' '; - end - - noblkstmpcline = stripblanks(tmpcline); - PrintStringInfo(tmpcline,CPass2FileName,'file','y'); -end -PrintStringInfo('/*',CPass2FileName,'file','y'); -PrintStringInfo('** ---------------------------------',CPass2FileName,'file','y'); -PrintStringInfo('** --- End Variable Declaration. ---',CPass2FileName,'file','y'); -PrintStringInfo('** ---------------------------------',CPass2FileName,'file','y'); -PrintStringInfo('*/',CPass2FileName,'file','y'); - - -PrintStringInfo('/*',CPass2FileName,'file','y'); -PrintStringInfo('** ---------------',CPass2FileName,'file','y'); -PrintStringInfo('** --- C code. ---',CPass2FileName,'file','y'); -PrintStringInfo('** ---------------',CPass2FileName,'file','y'); -PrintStringInfo('*/',CPass2FileName,'file','y'); -// --- Copy the remaining part of V1 in V2. --- -while (~meof(CPass1V1FileFid)) - // #RNU_RES_B - // Read a line from C Pass1 file. - // #RNU_RES_E - tmpcline = mgetl(CPass1V1FileFid,1); - if (length(tmpcline) == 0) - tmpcline = ' '; - end - PrintStringInfo(tmpcline,CPass2FileName,'file','y'); -end - -// -------------------- -// --- Close Files. --- -// -------------------- -mclose(CPass1V1FileFid); -mclose(CDeclarationFileFid); -mclose(CGblDeclarFileFid); -mclose(CInitVarsFileFid); - -endfunction diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp b/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp deleted file mode 100644 index 65184df1..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp +++ /dev/null @@ -1,230 +0,0 @@ - -# --- C COMPILER --- -CC = gcc -CFLAGS = -Wall -pedantic -O3 -I $(HSRCDIR) -# --------------------------- -# --- END USER PARAMETERS --- -# --------------------------- - -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# DON'T TOUCH ANYTHING BELOW THIS LINE -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ - -ELEMENTARY_FUNCTIONS_DIR = $(CSRCDIR)/src/elementaryFunctions -CFLAGS_ELEMENTARY_FUNCTIONS = -I $(ELEMENTARY_FUNCTIONS_DIR)/includes -I $(ELEMENTARY_FUNCTIONS_DIR)/interfaces - - -EXEFILE = $(SCI2CDIR)/$(EXEFILENAME) - -objects = \ - $(OBJDIR)/doubleComplex.o \ - $(OBJDIR)/floatComplex.o \ - $(OBJDIR)/RealToComplex.o \ - $(OBJDIR)/conj.o \ - $(OBJDIR)/disp.o \ - $(OBJDIR)/ones.o \ - $(OBJDIR)/zeros.o \ - $(OBJDIR)/OpApex.o \ - $(OBJDIR)/OpColon.o \ - $(OBJDIR)/OpDotStar.o \ - $(OBJDIR)/OpDotHat.o \ - $(OBJDIR)/OpDotSlash.o \ - $(OBJDIR)/OpEqual.o \ - $(OBJDIR)/OpPlus.o \ - $(OBJDIR)/OpMinus.o \ - $(OBJDIR)/OpStar.o \ - $(OBJDIR)/OpIns.o \ - $(OBJDIR)/OpExt.o \ - $(OBJDIR)/OpRc.o \ - $(OBJDIR)/OpCc.o \ - $(OBJDIR)/cos.o \ - $(OBJDIR)/cosh.o \ - $(OBJDIR)/sin.o \ - $(OBJDIR)/sinh.o \ - $(OBJDIR)/FileManagement.o \ - $(OBJDIR)/OpLogLt.o \ - $(OBJDIR)/OpLogGt.o \ - $(OBJDIR)/OpLogGe.o \ - $(OBJDIR)/OpLogLe.o \ - $(OBJDIR)/OpLogEq.o \ - $(OBJDIR)/Find.o \ - $(OBJDIR)/ConvertPrecision.o \ - $(OBJDIR)/SCI2Cfft.o \ - $(OBJDIR)/SCI2Cconvol.o \ - $(OBJDIR)/ssqrts.o \ - $(OBJDIR)/dsqrts.o \ - $(OBJDIR)/csqrts.o \ - $(OBJDIR)/zsqrts.o \ - $(OBJDIR)/ssqrta.o \ - $(OBJDIR)/dsqrta.o \ - $(OBJDIR)/csqrta.o \ - $(OBJDIR)/zsqrta.o - -# --------------- -# --- TARGETS --- -# --------------- -compileexecute: $(objects) - @echo " " - @echo "============================" - @echo "Generation of the executable" - @echo "============================" - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) $(objects) $(SCI2CDIR)/*.c -o $(EXEFILE) - @echo " " - @echo "==============" - @echo "Executing code" - @echo "==============" - $(EXEFILE) - -clean: - @echo " " - @echo "=============================" - @echo "Removing only exe + obj files" - @echo "=============================" - rm -rf $(EXEFILE) - rm -rf $(objects) - @echo " " - -cleanexe: - @echo " " - @echo "==========================" - @echo "Removing only the exe file" - @echo "==========================" - rm -rf $(EXEFILE) - @echo " " - -$(OBJDIR)/doubleComplex.o: $(CSRCDIR)/doubleComplex.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/doubleComplex.c -o $(OBJDIR)/doubleComplex.o - -$(OBJDIR)/floatComplex.o: $(CSRCDIR)/floatComplex.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/floatComplex.c -o $(OBJDIR)/floatComplex.o - -$(OBJDIR)/RealToComplex.o: $(CSRCDIR)/RealToComplex.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/RealToComplex.c -o $(OBJDIR)/RealToComplex.o - -$(OBJDIR)/conj.o: $(CSRCDIR)/conj.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/conj.c -o $(OBJDIR)/conj.o - -$(OBJDIR)/disp.o: $(CSRCDIR)/disp.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/disp.c -o $(OBJDIR)/disp.o - -$(OBJDIR)/zeros.o: $(CSRCDIR)/zeros.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/zeros.c -o $(OBJDIR)/zeros.o - -$(OBJDIR)/ones.o: $(CSRCDIR)/ones.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/ones.c -o $(OBJDIR)/ones.o - -$(OBJDIR)/OpApex.o: $(CSRCDIR)/OpApex.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpApex.c -o $(OBJDIR)/OpApex.o - -$(OBJDIR)/OpColon.o: $(CSRCDIR)/OpColon.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpColon.c -o $(OBJDIR)/OpColon.o - -$(OBJDIR)/OpDotStar.o: $(CSRCDIR)/OpDotStar.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpDotStar.c -o $(OBJDIR)/OpDotStar.o - -$(OBJDIR)/OpDotHat.o: $(CSRCDIR)/OpDotHat.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpDotHat.c -o $(OBJDIR)/OpDotHat.o - -$(OBJDIR)/OpDotSlash.o: $(CSRCDIR)/OpDotSlash.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpDotSlash.c -o $(OBJDIR)/OpDotSlash.o - -$(OBJDIR)/OpEqual.o: $(CSRCDIR)/OpEqual.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpEqual.c -o $(OBJDIR)/OpEqual.o - -$(OBJDIR)/OpPlus.o: $(CSRCDIR)/OpPlus.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpPlus.c -o $(OBJDIR)/OpPlus.o - -$(OBJDIR)/OpMinus.o: $(CSRCDIR)/OpMinus.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpMinus.c -o $(OBJDIR)/OpMinus.o - -$(OBJDIR)/OpStar.o: $(CSRCDIR)/OpStar.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpStar.c -o $(OBJDIR)/OpStar.o - -$(OBJDIR)/OpIns.o: $(CSRCDIR)/OpIns.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpIns.c -o $(OBJDIR)/OpIns.o - -$(OBJDIR)/OpExt.o: $(CSRCDIR)/OpExt.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpExt.c -o $(OBJDIR)/OpExt.o - -$(OBJDIR)/OpRc.o: $(CSRCDIR)/OpRc.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpRc.c -o $(OBJDIR)/OpRc.o - -$(OBJDIR)/OpCc.o: $(CSRCDIR)/OpCc.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpCc.c -o $(OBJDIR)/OpCc.o - -$(OBJDIR)/cos.o: $(CSRCDIR)/cos.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/cos.c -o $(OBJDIR)/cos.o - -$(OBJDIR)/cosh.o: $(CSRCDIR)/cosh.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/cosh.c -o $(OBJDIR)/cosh.o - -$(OBJDIR)/sin.o: $(CSRCDIR)/sin.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/sin.c -o $(OBJDIR)/sin.o - -$(OBJDIR)/sinh.o: $(CSRCDIR)/sinh.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/sinh.c -o $(OBJDIR)/sinh.o - -$(OBJDIR)/FileManagement.o: $(CSRCDIR)/FileManagement.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/FileManagement.c -o $(OBJDIR)/FileManagement.o - -$(OBJDIR)/OpLogLt.o: $(CSRCDIR)/OpLogLt.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpLogLt.c -o $(OBJDIR)/OpLogLt.o - -$(OBJDIR)/OpLogGt.o: $(CSRCDIR)/OpLogGt.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpLogGt.c -o $(OBJDIR)/OpLogGt.o - -$(OBJDIR)/OpLogLe.o: $(CSRCDIR)/OpLogLe.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpLogLe.c -o $(OBJDIR)/OpLogLe.o - -$(OBJDIR)/OpLogGe.o: $(CSRCDIR)/OpLogGe.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpLogGe.c -o $(OBJDIR)/OpLogGe.o - -$(OBJDIR)/OpLogEq.o: $(CSRCDIR)/OpLogEq.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpLogEq.c -o $(OBJDIR)/OpLogEq.o - -$(OBJDIR)/Find.o: $(CSRCDIR)/Find.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/Find.c -o $(OBJDIR)/Find.o - -$(OBJDIR)/ConvertPrecision.o: $(CSRCDIR)/ConvertPrecision.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/ConvertPrecision.c -o $(OBJDIR)/ConvertPrecision.o - -$(OBJDIR)/SCI2Cfft.o: $(CSRCDIR)/SCI2Cfft.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/SCI2Cfft.c -o $(OBJDIR)/SCI2Cfft.o - -$(OBJDIR)/SCI2Cconvol.o: $(CSRCDIR)/SCI2Cconvol.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/SCI2Cconvol.c -o $(OBJDIR)/SCI2Cconvol.o - -$(OBJDIR)/sqrt.o: $(CSRCELEMFUNDIR)/sqrt/*sqrt*.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCELEMFUNDIR)/sqrt/*sqrt*.c -o $(OBJDIR)/sqrt.o - -$(OBJDIR)/ssqrts.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/ssqrts.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/ssqrts.c -o $(OBJDIR)/ssqrts.o - -$(OBJDIR)/dsqrts.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/dsqrts.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/dsqrts.c -o $(OBJDIR)/dsqrts.o - -$(OBJDIR)/csqrts.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/csqrts.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/csqrts.c -o $(OBJDIR)/csqrts.o - -$(OBJDIR)/zsqrts.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/zsqrts.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/zsqrts.c -o $(OBJDIR)/zsqrts.o - -$(OBJDIR)/ssqrta.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/ssqrta.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/ssqrta.c -o $(OBJDIR)/ssqrta.o - -$(OBJDIR)/dsqrta.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/dsqrta.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/dsqrta.c -o $(OBJDIR)/dsqrta.o - -$(OBJDIR)/csqrta.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/csqrta.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/csqrta.c -o $(OBJDIR)/csqrta.o - -$(OBJDIR)/zsqrta.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/zsqrta.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/zsqrta.c -o $(OBJDIR)/zsqrta.o diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp1 b/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp1 deleted file mode 100644 index 65184df1..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp1 +++ /dev/null @@ -1,230 +0,0 @@ - -# --- C COMPILER --- -CC = gcc -CFLAGS = -Wall -pedantic -O3 -I $(HSRCDIR) -# --------------------------- -# --- END USER PARAMETERS --- -# --------------------------- - -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# DON'T TOUCH ANYTHING BELOW THIS LINE -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ - -ELEMENTARY_FUNCTIONS_DIR = $(CSRCDIR)/src/elementaryFunctions -CFLAGS_ELEMENTARY_FUNCTIONS = -I $(ELEMENTARY_FUNCTIONS_DIR)/includes -I $(ELEMENTARY_FUNCTIONS_DIR)/interfaces - - -EXEFILE = $(SCI2CDIR)/$(EXEFILENAME) - -objects = \ - $(OBJDIR)/doubleComplex.o \ - $(OBJDIR)/floatComplex.o \ - $(OBJDIR)/RealToComplex.o \ - $(OBJDIR)/conj.o \ - $(OBJDIR)/disp.o \ - $(OBJDIR)/ones.o \ - $(OBJDIR)/zeros.o \ - $(OBJDIR)/OpApex.o \ - $(OBJDIR)/OpColon.o \ - $(OBJDIR)/OpDotStar.o \ - $(OBJDIR)/OpDotHat.o \ - $(OBJDIR)/OpDotSlash.o \ - $(OBJDIR)/OpEqual.o \ - $(OBJDIR)/OpPlus.o \ - $(OBJDIR)/OpMinus.o \ - $(OBJDIR)/OpStar.o \ - $(OBJDIR)/OpIns.o \ - $(OBJDIR)/OpExt.o \ - $(OBJDIR)/OpRc.o \ - $(OBJDIR)/OpCc.o \ - $(OBJDIR)/cos.o \ - $(OBJDIR)/cosh.o \ - $(OBJDIR)/sin.o \ - $(OBJDIR)/sinh.o \ - $(OBJDIR)/FileManagement.o \ - $(OBJDIR)/OpLogLt.o \ - $(OBJDIR)/OpLogGt.o \ - $(OBJDIR)/OpLogGe.o \ - $(OBJDIR)/OpLogLe.o \ - $(OBJDIR)/OpLogEq.o \ - $(OBJDIR)/Find.o \ - $(OBJDIR)/ConvertPrecision.o \ - $(OBJDIR)/SCI2Cfft.o \ - $(OBJDIR)/SCI2Cconvol.o \ - $(OBJDIR)/ssqrts.o \ - $(OBJDIR)/dsqrts.o \ - $(OBJDIR)/csqrts.o \ - $(OBJDIR)/zsqrts.o \ - $(OBJDIR)/ssqrta.o \ - $(OBJDIR)/dsqrta.o \ - $(OBJDIR)/csqrta.o \ - $(OBJDIR)/zsqrta.o - -# --------------- -# --- TARGETS --- -# --------------- -compileexecute: $(objects) - @echo " " - @echo "============================" - @echo "Generation of the executable" - @echo "============================" - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) $(objects) $(SCI2CDIR)/*.c -o $(EXEFILE) - @echo " " - @echo "==============" - @echo "Executing code" - @echo "==============" - $(EXEFILE) - -clean: - @echo " " - @echo "=============================" - @echo "Removing only exe + obj files" - @echo "=============================" - rm -rf $(EXEFILE) - rm -rf $(objects) - @echo " " - -cleanexe: - @echo " " - @echo "==========================" - @echo "Removing only the exe file" - @echo "==========================" - rm -rf $(EXEFILE) - @echo " " - -$(OBJDIR)/doubleComplex.o: $(CSRCDIR)/doubleComplex.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/doubleComplex.c -o $(OBJDIR)/doubleComplex.o - -$(OBJDIR)/floatComplex.o: $(CSRCDIR)/floatComplex.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/floatComplex.c -o $(OBJDIR)/floatComplex.o - -$(OBJDIR)/RealToComplex.o: $(CSRCDIR)/RealToComplex.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/RealToComplex.c -o $(OBJDIR)/RealToComplex.o - -$(OBJDIR)/conj.o: $(CSRCDIR)/conj.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/conj.c -o $(OBJDIR)/conj.o - -$(OBJDIR)/disp.o: $(CSRCDIR)/disp.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/disp.c -o $(OBJDIR)/disp.o - -$(OBJDIR)/zeros.o: $(CSRCDIR)/zeros.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/zeros.c -o $(OBJDIR)/zeros.o - -$(OBJDIR)/ones.o: $(CSRCDIR)/ones.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/ones.c -o $(OBJDIR)/ones.o - -$(OBJDIR)/OpApex.o: $(CSRCDIR)/OpApex.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpApex.c -o $(OBJDIR)/OpApex.o - -$(OBJDIR)/OpColon.o: $(CSRCDIR)/OpColon.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpColon.c -o $(OBJDIR)/OpColon.o - -$(OBJDIR)/OpDotStar.o: $(CSRCDIR)/OpDotStar.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpDotStar.c -o $(OBJDIR)/OpDotStar.o - -$(OBJDIR)/OpDotHat.o: $(CSRCDIR)/OpDotHat.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpDotHat.c -o $(OBJDIR)/OpDotHat.o - -$(OBJDIR)/OpDotSlash.o: $(CSRCDIR)/OpDotSlash.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpDotSlash.c -o $(OBJDIR)/OpDotSlash.o - -$(OBJDIR)/OpEqual.o: $(CSRCDIR)/OpEqual.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpEqual.c -o $(OBJDIR)/OpEqual.o - -$(OBJDIR)/OpPlus.o: $(CSRCDIR)/OpPlus.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpPlus.c -o $(OBJDIR)/OpPlus.o - -$(OBJDIR)/OpMinus.o: $(CSRCDIR)/OpMinus.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpMinus.c -o $(OBJDIR)/OpMinus.o - -$(OBJDIR)/OpStar.o: $(CSRCDIR)/OpStar.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpStar.c -o $(OBJDIR)/OpStar.o - -$(OBJDIR)/OpIns.o: $(CSRCDIR)/OpIns.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpIns.c -o $(OBJDIR)/OpIns.o - -$(OBJDIR)/OpExt.o: $(CSRCDIR)/OpExt.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpExt.c -o $(OBJDIR)/OpExt.o - -$(OBJDIR)/OpRc.o: $(CSRCDIR)/OpRc.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpRc.c -o $(OBJDIR)/OpRc.o - -$(OBJDIR)/OpCc.o: $(CSRCDIR)/OpCc.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpCc.c -o $(OBJDIR)/OpCc.o - -$(OBJDIR)/cos.o: $(CSRCDIR)/cos.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/cos.c -o $(OBJDIR)/cos.o - -$(OBJDIR)/cosh.o: $(CSRCDIR)/cosh.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/cosh.c -o $(OBJDIR)/cosh.o - -$(OBJDIR)/sin.o: $(CSRCDIR)/sin.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/sin.c -o $(OBJDIR)/sin.o - -$(OBJDIR)/sinh.o: $(CSRCDIR)/sinh.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/sinh.c -o $(OBJDIR)/sinh.o - -$(OBJDIR)/FileManagement.o: $(CSRCDIR)/FileManagement.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/FileManagement.c -o $(OBJDIR)/FileManagement.o - -$(OBJDIR)/OpLogLt.o: $(CSRCDIR)/OpLogLt.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpLogLt.c -o $(OBJDIR)/OpLogLt.o - -$(OBJDIR)/OpLogGt.o: $(CSRCDIR)/OpLogGt.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpLogGt.c -o $(OBJDIR)/OpLogGt.o - -$(OBJDIR)/OpLogLe.o: $(CSRCDIR)/OpLogLe.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpLogLe.c -o $(OBJDIR)/OpLogLe.o - -$(OBJDIR)/OpLogGe.o: $(CSRCDIR)/OpLogGe.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpLogGe.c -o $(OBJDIR)/OpLogGe.o - -$(OBJDIR)/OpLogEq.o: $(CSRCDIR)/OpLogEq.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/OpLogEq.c -o $(OBJDIR)/OpLogEq.o - -$(OBJDIR)/Find.o: $(CSRCDIR)/Find.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/Find.c -o $(OBJDIR)/Find.o - -$(OBJDIR)/ConvertPrecision.o: $(CSRCDIR)/ConvertPrecision.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/ConvertPrecision.c -o $(OBJDIR)/ConvertPrecision.o - -$(OBJDIR)/SCI2Cfft.o: $(CSRCDIR)/SCI2Cfft.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/SCI2Cfft.c -o $(OBJDIR)/SCI2Cfft.o - -$(OBJDIR)/SCI2Cconvol.o: $(CSRCDIR)/SCI2Cconvol.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCDIR)/SCI2Cconvol.c -o $(OBJDIR)/SCI2Cconvol.o - -$(OBJDIR)/sqrt.o: $(CSRCELEMFUNDIR)/sqrt/*sqrt*.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) -c $(CSRCELEMFUNDIR)/sqrt/*sqrt*.c -o $(OBJDIR)/sqrt.o - -$(OBJDIR)/ssqrts.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/ssqrts.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/ssqrts.c -o $(OBJDIR)/ssqrts.o - -$(OBJDIR)/dsqrts.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/dsqrts.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/dsqrts.c -o $(OBJDIR)/dsqrts.o - -$(OBJDIR)/csqrts.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/csqrts.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/csqrts.c -o $(OBJDIR)/csqrts.o - -$(OBJDIR)/zsqrts.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/zsqrts.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/zsqrts.c -o $(OBJDIR)/zsqrts.o - -$(OBJDIR)/ssqrta.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/ssqrta.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/ssqrta.c -o $(OBJDIR)/ssqrta.o - -$(OBJDIR)/dsqrta.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/dsqrta.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/dsqrta.c -o $(OBJDIR)/dsqrta.o - -$(OBJDIR)/csqrta.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/csqrta.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/csqrta.c -o $(OBJDIR)/csqrta.o - -$(OBJDIR)/zsqrta.o: $(CSRCDIR)/src/elementaryFunctions/sqrt/zsqrta.c $(HSRCDIR)/*.h - $(CC) $(CFLAGS) $(CFLAGS_ELEMENTARY_FUNCTIONS) -c $(ELEMENTARY_FUNCTIONS_DIR)/sqrt/zsqrta.c -o $(OBJDIR)/zsqrta.o diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp2 b/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp2 deleted file mode 100644 index c6ba2a9c..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.bkp2 +++ /dev/null @@ -1,126 +0,0 @@ - -# --- C COMPILER --- -CC = gcc -CFLAGS = -Wall -pedantic -O3 -I $(HSRCDIR) -I $(ISRCDIR) -# --------------------------- -# --- END USER PARAMETERS --- -# --------------------------- - -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# DON'T TOUCH ANYTHING BELOW THIS LINE -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ - -EXEFILE = $(SCI2CDIR)/$(EXEFILENAME) - -SWSRCS = \ - $(CSRCDIR)/doubleComplex.c \ - $(CSRCDIR)/floatComplex.c \ - $(CSRCDIR)/RealToComplex.c \ - $(CSRCDIR)/conj.c \ - $(CSRCDIR)/disp.c \ - $(CSRCDIR)/ones.c \ - $(CSRCDIR)/zeros.c \ - $(CSRCDIR)/OpApex.c \ - $(CSRCDIR)/OpColon.c \ - $(CSRCDIR)/OpDotStar.c \ - $(CSRCDIR)/OpDotHat.c \ - $(CSRCDIR)/OpDotSlash.c \ - $(CSRCDIR)/OpEqual.c \ - $(CSRCDIR)/OpPlus.c \ - $(CSRCDIR)/OpMinus.c \ - $(CSRCDIR)/OpStar.c \ - $(CSRCDIR)/OpIns.c \ - $(CSRCDIR)/OpExt.c \ - $(CSRCDIR)/OpRc.c \ - $(CSRCDIR)/OpCc.c \ - $(CSRCDIR)/cos.c \ - $(CSRCDIR)/cosh.c \ - $(CSRCDIR)/sin.c \ - $(CSRCDIR)/sinh.c \ - $(CSRCDIR)/FileManagement.c \ - $(CSRCDIR)/OpLogLt.c \ - $(CSRCDIR)/OpLogGt.c \ - $(CSRCDIR)/OpLogGe.c \ - $(CSRCDIR)/OpLogLe.c \ - $(CSRCDIR)/OpLogEq.c \ - $(CSRCDIR)/OpLogOr.c \ - $(CSRCDIR)/OpLogAnd.c \ - $(CSRCDIR)/Find.c \ - $(CSRCDIR)/ConvertPrecision.c \ - $(CSRCDIR)/SCI2Cfft.c \ - $(CSRCDIR)/SCI2Cconvol.c \ - $(CSRCDIR)/ssqrts.c \ - $(CSRCDIR)/dsqrts.c \ - $(CSRCDIR)/csqrts.c \ - $(CSRCDIR)/zsqrts.c \ - $(CSRCDIR)/ssqrta.c \ - $(CSRCDIR)/dsqrta.c \ - $(CSRCDIR)/csqrta.c \ - $(CSRCDIR)/zsqrta.c \ - $(CSRCDIR)/sabss.c \ - $(CSRCDIR)/dabss.c \ - $(CSRCDIR)/cabss.c \ - $(CSRCDIR)/zabss.c \ - $(CSRCDIR)/sabsa.c \ - $(CSRCDIR)/dabsa.c \ - $(CSRCDIR)/cabsa.c \ - $(CSRCDIR)/zabsa.c \ - $(CSRCDIR)/sexps.c \ - $(CSRCDIR)/dexps.c \ - $(CSRCDIR)/cexps.c \ - $(CSRCDIR)/zexps.c \ - $(CSRCDIR)/sexpa.c \ - $(CSRCDIR)/dexpa.c \ - $(CSRCDIR)/cexpa.c \ - $(CSRCDIR)/zexpa.c - -SWOBJS = $(SWSRCS:.c=.o) - -# --------------- -# --- TARGETS --- -# --------------- -compileexecute: $(SWOBJS) - @echo " " - @echo "============================" - @echo "Generation of the executable" - @echo "============================" - $(CC) $(CFLAGS) $(SWOBJS) $(SCI2CDIR)/*.c -o $(EXEFILE) - @echo " " - @echo "==============" - @echo "Executing code" - @echo "==============" - $(EXEFILE) - -clean: - @echo " " - @echo "=============================" - @echo "Removing only exe + obj files" - @echo "=============================" - rm -rf $(EXEFILE) - rm -rf $(SWOBJS) - @echo " " - -cleanexe: - @echo " " - @echo "==========================" - @echo "Removing only the exe file" - @echo "==========================" - rm -rf $(EXEFILE) - @echo " " - -# how to compile object code .o from C source files .c (general rule) -# space between -o and filename for SUN make -.c.o: - $(CC) $(CFLAGS) -c -o $(@) $< - -# Make object code from source -swobjs: $(SWOBJS) - diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.rc b/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.rc deleted file mode 100644 index 3787172a..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/SCI2CMakefileTemplate.rc +++ /dev/null @@ -1,548 +0,0 @@ - -# --- C COMPILER --- -CC = gcc -CFLAGS = -Wall -pedantic -O3 -I $(HSRCDIR) -I $(ISRCDIR) -lm -# --------------------------- -# --- END USER PARAMETERS --- -# --------------------------- - -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# DON'T TOUCH ANYTHING BELOW THIS LINE -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ -# ------------------------------------ - -EXEFILE = $(SCI2CDIR)/$(EXEFILENAME) - -SWSRCS = \ - $(CSRCDIR)/doubleComplex.c \ - $(CSRCDIR)/floatComplex.c \ - $(CSRCDIR)/RealToComplex.c \ - $(CSRCDIR)/OpIns.c \ - $(CSRCDIR)/OpExt.c \ - $(CSRCDIR)/FileManagement.c \ - $(CSRCDIR)/OpLogLt.c \ - $(CSRCDIR)/OpLogGt.c \ - $(CSRCDIR)/OpLogGe.c \ - $(CSRCDIR)/OpLogLe.c \ - $(CSRCDIR)/OpLogOr.c \ - $(CSRCDIR)/OpLogAnd.c \ - $(CSRCDIR)/ConvertPrecision.c \ - $(CSRCDIR)/ssqrts.c \ - $(CSRCDIR)/dsqrts.c \ - $(CSRCDIR)/csqrts.c \ - $(CSRCDIR)/zsqrts.c \ - $(CSRCDIR)/ssqrta.c \ - $(CSRCDIR)/dsqrta.c \ - $(CSRCDIR)/csqrta.c \ - $(CSRCDIR)/zsqrta.c \ - $(CSRCDIR)/sabss.c \ - $(CSRCDIR)/dabss.c \ - $(CSRCDIR)/cabss.c \ - $(CSRCDIR)/zabss.c \ - $(CSRCDIR)/sabsa.c \ - $(CSRCDIR)/dabsa.c \ - $(CSRCDIR)/cabsa.c \ - $(CSRCDIR)/zabsa.c \ - $(CSRCDIR)/smeana.c \ - $(CSRCDIR)/dmeana.c \ - $(CSRCDIR)/cmeana.c \ - $(CSRCDIR)/zmeana.c \ - $(CSRCDIR)/slog1ps.c \ - $(CSRCDIR)/dlog1ps.c \ - $(CSRCDIR)/slog1pa.c \ - $(CSRCDIR)/dlog1pa.c \ - $(CSRCDIR)/dfinda.c \ - $(CSRCDIR)/sfinda.c \ - $(CSRCDIR)/cfinda.c \ - $(CSRCDIR)/zfinda.c\ - $(CSRCDIR)/dfind2da.c \ - $(CSRCDIR)/sfind2da.c \ - $(CSRCDIR)/cfind2da.c \ - $(CSRCDIR)/zfind2da.c\ - $(CSRCDIR)/scats.c \ - $(CSRCDIR)/scata.c \ - $(CSRCDIR)/dcats.c \ - $(CSRCDIR)/dcata.c \ - $(CSRCDIR)/ccats.c \ - $(CSRCDIR)/ccata.c \ - $(CSRCDIR)/zcats.c \ - $(CSRCDIR)/zcata.c \ - $(CSRCDIR)/sdisps.c \ - $(CSRCDIR)/sdispa.c \ - $(CSRCDIR)/ddisps.c \ - $(CSRCDIR)/ddispa.c\ - $(CSRCDIR)/cdisps.c \ - $(CSRCDIR)/cdispa.c\ - $(CSRCDIR)/zdisps.c \ - $(CSRCDIR)/zdispa.c\ - $(CSRCDIR)/cmuls.c\ - $(CSRCDIR)/cmula.c \ - $(CSRCDIR)/dmuls.c\ - $(CSRCDIR)/dmula.c \ - $(CSRCDIR)/smuls.c\ - $(CSRCDIR)/smula.c \ - $(CSRCDIR)/zmuls.c\ - $(CSRCDIR)/zmula.c \ - $(CSRCDIR)/cadds.c\ - $(CSRCDIR)/cadda.c \ - $(CSRCDIR)/dadds.c\ - $(CSRCDIR)/dadda.c \ - $(CSRCDIR)/sadds.c\ - $(CSRCDIR)/sadda.c \ - $(CSRCDIR)/zadds.c\ - $(CSRCDIR)/zadda.c\ - $(CSRCDIR)/cdiffs.c\ - $(CSRCDIR)/cdiffa.c \ - $(CSRCDIR)/ddiffs.c\ - $(CSRCDIR)/ddiffa.c \ - $(CSRCDIR)/sdiffs.c\ - $(CSRCDIR)/sdiffa.c \ - $(CSRCDIR)/zdiffs.c\ - $(CSRCDIR)/zdiffa.c \ - $(CSRCDIR)/cfilla.c\ - $(CSRCDIR)/dfilla.c\ - $(CSRCDIR)/sfilla.c\ - $(CSRCDIR)/zfilla.c \ - $(CSRCDIR)/conesa.c\ - $(CSRCDIR)/donesa.c\ - $(CSRCDIR)/sonesa.c\ - $(CSRCDIR)/zonesa.c\ - $(CSRCDIR)/crdivs.c\ - $(CSRCDIR)/crdiva.c \ - $(CSRCDIR)/drdivs.c\ - $(CSRCDIR)/drdiva.c \ - $(CSRCDIR)/srdivs.c\ - $(CSRCDIR)/srdiva.c \ - $(CSRCDIR)/zrdivs.c\ - $(CSRCDIR)/zrdiva.c\ - $(CSRCDIR)/cldivs.c\ - $(CSRCDIR)/cldiva.c \ - $(CSRCDIR)/dldivs.c\ - $(CSRCDIR)/dldiva.c \ - $(CSRCDIR)/sldivs.c\ - $(CSRCDIR)/sldiva.c \ - $(CSRCDIR)/zldivs.c\ - $(CSRCDIR)/zldiva.c\ - $(CSRCDIR)/cconjs.c\ - $(CSRCDIR)/cconja.c\ - $(CSRCDIR)/zconjs.c\ - $(CSRCDIR)/zconja.c\ - $(CSRCDIR)/ceyea.c\ - $(CSRCDIR)/deyea.c\ - $(CSRCDIR)/seyea.c\ - $(CSRCDIR)/zeyea.c\ - $(CSRCDIR)/ctracea.c\ - $(CSRCDIR)/dtracea.c\ - $(CSRCDIR)/stracea.c\ - $(CSRCDIR)/ztracea.c\ - $(CSRCDIR)/srowmeana.c \ - $(CSRCDIR)/drowmeana.c \ - $(CSRCDIR)/crowmeana.c \ - $(CSRCDIR)/zrowmeana.c \ - $(CSRCDIR)/scolumnmeana.c \ - $(CSRCDIR)/dcolumnmeana.c \ - $(CSRCDIR)/ccolumnmeana.c \ - $(CSRCDIR)/zcolumnmeana.c \ - $(CSRCDIR)/ssuma.c \ - $(CSRCDIR)/dsuma.c \ - $(CSRCDIR)/csuma.c \ - $(CSRCDIR)/zsuma.c \ - $(CSRCDIR)/srowsuma.c \ - $(CSRCDIR)/drowsuma.c \ - $(CSRCDIR)/crowsuma.c \ - $(CSRCDIR)/zrowsuma.c \ - $(CSRCDIR)/scolumnsuma.c \ - $(CSRCDIR)/dcolumnsuma.c \ - $(CSRCDIR)/ccolumnsuma.c \ - $(CSRCDIR)/zcolumnsuma.c\ - $(CSRCDIR)/cmulma.c\ - $(CSRCDIR)/dmulma.c\ - $(CSRCDIR)/smulma.c\ - $(CSRCDIR)/zmulma.c\ - $(CSRCDIR)/svariancea.c \ - $(CSRCDIR)/dvariancea.c \ - $(CSRCDIR)/cvariancea.c \ - $(CSRCDIR)/zvariancea.c \ - $(CSRCDIR)/srowvariancea.c \ - $(CSRCDIR)/drowvariancea.c \ - $(CSRCDIR)/crowvariancea.c \ - $(CSRCDIR)/zrowvariancea.c \ - $(CSRCDIR)/scolumnvariancea.c \ - $(CSRCDIR)/dcolumnvariancea.c \ - $(CSRCDIR)/ccolumnvariancea.c \ - $(CSRCDIR)/zcolumnvariancea.c \ - $(CSRCDIR)/cpows.c \ - $(CSRCDIR)/cpowa.c \ - $(CSRCDIR)/dpows.c \ - $(CSRCDIR)/dpowa.c \ - $(CSRCDIR)/spows.c \ - $(CSRCDIR)/spowa.c \ - $(CSRCDIR)/zpows.c \ - $(CSRCDIR)/zpowa.c \ - $(CSRCDIR)/ctransposea.c \ - $(CSRCDIR)/dtransposea.c \ - $(CSRCDIR)/stransposea.c \ - $(CSRCDIR)/ztransposea.c \ - $(CSRCDIR)/clogs.c \ - $(CSRCDIR)/cloga.c \ - $(CSRCDIR)/dlogs.c \ - $(CSRCDIR)/dloga.c \ - $(CSRCDIR)/slogs.c \ - $(CSRCDIR)/sloga.c \ - $(CSRCDIR)/zlogs.c \ - $(CSRCDIR)/zloga.c \ - $(CSRCDIR)/cpythags.c\ - $(CSRCDIR)/dpythags.c \ - $(CSRCDIR)/spythags.c\ - $(CSRCDIR)/zpythags.c \ - $(CSRCDIR)/cacoss.c \ - $(CSRCDIR)/cacosa.c \ - $(CSRCDIR)/dacoss.c \ - $(CSRCDIR)/dacosa.c \ - $(CSRCDIR)/sacoss.c \ - $(CSRCDIR)/sacosa.c \ - $(CSRCDIR)/zacoss.c \ - $(CSRCDIR)/zacosa.c \ - $(CSRCDIR)/catans.c \ - $(CSRCDIR)/catana.c \ - $(CSRCDIR)/datans.c \ - $(CSRCDIR)/datana.c \ - $(CSRCDIR)/satans.c \ - $(CSRCDIR)/satana.c \ - $(CSRCDIR)/zatans.c \ - $(CSRCDIR)/zatana.c \ - $(CSRCDIR)/dlnp1m1s.c \ - $(CSRCDIR)/slnp1m1s.c\ - $(CSRCDIR)/cacoshs.c \ - $(CSRCDIR)/cacosha.c \ - $(CSRCDIR)/dacoshs.c \ - $(CSRCDIR)/dacosha.c \ - $(CSRCDIR)/sacoshs.c \ - $(CSRCDIR)/sacosha.c \ - $(CSRCDIR)/zacoshs.c \ - $(CSRCDIR)/zacosha.c\ - $(CSRCDIR)/crdivma.c \ - $(CSRCDIR)/drdivma.c \ - $(CSRCDIR)/srdivma.c \ - $(CSRCDIR)/zrdivma.c\ - $(CSRCDIR)/cldivma.c \ - $(CSRCDIR)/dldivma.c \ - $(CSRCDIR)/sldivma.c \ - $(CSRCDIR)/zldivma.c \ - $(CSRCDIR)/cinverma.c \ - $(CSRCDIR)/dinverma.c \ - $(CSRCDIR)/sinverma.c \ - $(CSRCDIR)/zinverma.c \ - $(CSRCDIR)/cexps.c \ - $(CSRCDIR)/dexps.c \ - $(CSRCDIR)/sexps.c \ - $(CSRCDIR)/zexps.c \ - $(CSRCDIR)/cexpa.c \ - $(CSRCDIR)/dexpa.c \ - $(CSRCDIR)/sexpa.c \ - $(CSRCDIR)/zexpa.c \ - $(CSRCDIR)/cexpma.c \ - $(CSRCDIR)/dexpma.c \ - $(CSRCDIR)/sexpma.c \ - $(CSRCDIR)/zexpma.c \ - $(CSRCDIR)/dfrexps.c \ - $(CSRCDIR)/sfrexps.c \ - $(CSRCDIR)/cinfnorma.c \ - $(CSRCDIR)/dinfnorma.c \ - $(CSRCDIR)/sinfnorma.c \ - $(CSRCDIR)/zinfnorma.c \ - $(CSRCDIR)/csigns.c \ - $(CSRCDIR)/csigna.c \ - $(CSRCDIR)/dsigns.c \ - $(CSRCDIR)/dsigna.c \ - $(CSRCDIR)/ssigns.c \ - $(CSRCDIR)/ssigna.c \ - $(CSRCDIR)/zsigns.c \ - $(CSRCDIR)/zsigna.c \ - $(CSRCDIR)/cdeterma.c \ - $(CSRCDIR)/ddeterma.c \ - $(CSRCDIR)/sdeterma.c \ - $(CSRCDIR)/zdeterma.c \ - $(CSRCDIR)/csins.c \ - $(CSRCDIR)/csina.c \ - $(CSRCDIR)/dsins.c \ - $(CSRCDIR)/dsina.c \ - $(CSRCDIR)/ssins.c \ - $(CSRCDIR)/ssina.c \ - $(CSRCDIR)/zsins.c \ - $(CSRCDIR)/zsina.c \ - $(CSRCDIR)/csinhs.c \ - $(CSRCDIR)/csinha.c \ - $(CSRCDIR)/dsinhs.c \ - $(CSRCDIR)/dsinha.c \ - $(CSRCDIR)/ssinhs.c \ - $(CSRCDIR)/ssinha.c \ - $(CSRCDIR)/zsinhs.c \ - $(CSRCDIR)/zsinha.c \ - $(CSRCDIR)/ccoshs.c \ - $(CSRCDIR)/ccosha.c \ - $(CSRCDIR)/dcoshs.c \ - $(CSRCDIR)/dcosha.c \ - $(CSRCDIR)/scoshs.c \ - $(CSRCDIR)/scosha.c \ - $(CSRCDIR)/zcoshs.c \ - $(CSRCDIR)/zcosha.c\ - $(CSRCDIR)/ccoss.c \ - $(CSRCDIR)/ccosa.c \ - $(CSRCDIR)/dcoss.c \ - $(CSRCDIR)/dcosa.c \ - $(CSRCDIR)/scoss.c \ - $(CSRCDIR)/scosa.c \ - $(CSRCDIR)/zcoss.c \ - $(CSRCDIR)/zcosa.c \ - $(CSRCDIR)/casins.c \ - $(CSRCDIR)/casina.c \ - $(CSRCDIR)/dasins.c \ - $(CSRCDIR)/dasina.c \ - $(CSRCDIR)/sasins.c \ - $(CSRCDIR)/sasina.c \ - $(CSRCDIR)/zasins.c \ - $(CSRCDIR)/zasina.c \ - $(CSRCDIR)/casinhs.c \ - $(CSRCDIR)/casinha.c \ - $(CSRCDIR)/dasinhs.c \ - $(CSRCDIR)/dasinha.c \ - $(CSRCDIR)/sasinhs.c \ - $(CSRCDIR)/sasinha.c \ - $(CSRCDIR)/zasinhs.c \ - $(CSRCDIR)/zasinha.c \ - $(CSRCDIR)/datan2s.c \ - $(CSRCDIR)/datan2a.c \ - $(CSRCDIR)/satan2s.c \ - $(CSRCDIR)/satan2a.c \ - $(CSRCDIR)/catanhs.c \ - $(CSRCDIR)/catanha.c \ - $(CSRCDIR)/datanhs.c \ - $(CSRCDIR)/datanha.c \ - $(CSRCDIR)/satanhs.c \ - $(CSRCDIR)/satanha.c \ - $(CSRCDIR)/zatanhs.c \ - $(CSRCDIR)/zatanha.c \ - $(CSRCDIR)/clog10s.c \ - $(CSRCDIR)/clog10a.c \ - $(CSRCDIR)/dlog10s.c \ - $(CSRCDIR)/dlog10a.c \ - $(CSRCDIR)/slog10s.c \ - $(CSRCDIR)/slog10a.c \ - $(CSRCDIR)/zlog10s.c \ - $(CSRCDIR)/zlog10a.c \ - $(CSRCDIR)/ctans.c \ - $(CSRCDIR)/ctana.c \ - $(CSRCDIR)/dtans.c \ - $(CSRCDIR)/dtana.c \ - $(CSRCDIR)/stans.c \ - $(CSRCDIR)/stana.c \ - $(CSRCDIR)/ztans.c \ - $(CSRCDIR)/ztana.c \ - $(CSRCDIR)/ctanhs.c \ - $(CSRCDIR)/ctanha.c \ - $(CSRCDIR)/dtanhs.c \ - $(CSRCDIR)/dtanha.c \ - $(CSRCDIR)/stanhs.c \ - $(CSRCDIR)/stanha.c \ - $(CSRCDIR)/ztanhs.c \ - $(CSRCDIR)/ztanha.c \ - $(CSRCDIR)/cisnans.c \ - $(CSRCDIR)/cisnana.c \ - $(CSRCDIR)/disnans.c \ - $(CSRCDIR)/disnana.c \ - $(CSRCDIR)/sisnans.c \ - $(CSRCDIR)/sisnana.c \ - $(CSRCDIR)/zisnans.c \ - $(CSRCDIR)/zisnana.c \ - $(CSRCDIR)/cconva.c \ - $(CSRCDIR)/dconva.c \ - $(CSRCDIR)/sconva.c \ - $(CSRCDIR)/zconva.c \ - $(CSRCDIR)/cconv2da.c \ - $(CSRCDIR)/dconv2da.c \ - $(CSRCDIR)/sconv2da.c \ - $(CSRCDIR)/zconv2da.c \ - $(CSRCDIR)/sfftma.c \ - $(CSRCDIR)/dfftma.c \ - $(CSRCDIR)/cfftma.c \ - $(CSRCDIR)/zfftma.c \ - $(CSRCDIR)/dfft2.c \ - $(CSRCDIR)/dfftbi.c \ - $(CSRCDIR)/dfftmx.c \ - $(CSRCDIR)/fft842.c \ - $(CSRCDIR)/r2tx.c \ - $(CSRCDIR)/r4tx.c \ - $(CSRCDIR)/r8tx.c \ - $(CSRCDIR)/sifftma.c \ - $(CSRCDIR)/difftma.c \ - $(CSRCDIR)/cifftma.c \ - $(CSRCDIR)/zifftma.c \ - $(CSRCDIR)/difft2.c \ - $(CSRCDIR)/difftbi.c \ - $(CSRCDIR)/difftmx.c \ - $(CSRCDIR)/ifft842.c \ - $(CSRCDIR)/ir2tx.c \ - $(CSRCDIR)/ir4tx.c \ - $(CSRCDIR)/ir8tx.c \ - $(CSRCDIR)/cchola.c \ - $(CSRCDIR)/dchols.c \ - $(CSRCDIR)/dchola.c \ - $(CSRCDIR)/schols.c \ - $(CSRCDIR)/schola.c \ - $(CSRCDIR)/zchola.c \ - $(CSRCDIR)/cleva.c \ - $(CSRCDIR)/dleva.c \ - $(CSRCDIR)/sleva.c \ - $(CSRCDIR)/zleva.c \ - $(CSRCDIR)/cleva2.c \ - $(CSRCDIR)/dleva2.c \ - $(CSRCDIR)/sleva2.c \ - $(CSRCDIR)/zleva2.c \ - $(CSRCDIR)/cimplicitLists.c \ - $(CSRCDIR)/dimplicitLists.c \ - $(CSRCDIR)/simplicitLists.c \ - $(CSRCDIR)/zimplicitLists.c \ - $(CSRCDIR)/czerosa.c \ - $(CSRCDIR)/dzerosa.c \ - $(CSRCDIR)/szerosa.c \ - $(CSRCDIR)/zzerosa.c \ - $(CSRCDIR)/cspeca.c \ - $(CSRCDIR)/dspeca.c \ - $(CSRCDIR)/sspeca.c \ - $(CSRCDIR)/zspeca.c \ - $(CSRCDIR)/cspec2a.c \ - $(CSRCDIR)/dspec2a.c \ - $(CSRCDIR)/sspec2a.c \ - $(CSRCDIR)/zspec2a.c \ - $(CSRCDIR)/smina.c \ - $(CSRCDIR)/smaxa.c \ - $(CSRCDIR)/srowmina.c \ - $(CSRCDIR)/srowmaxa.c \ - $(CSRCDIR)/scolumnmina.c \ - $(CSRCDIR)/scolumnmaxa.c \ - $(CSRCDIR)/dmina.c \ - $(CSRCDIR)/dmaxa.c \ - $(CSRCDIR)/drowmina.c \ - $(CSRCDIR)/drowmaxa.c \ - $(CSRCDIR)/dcolumnmina.c \ - $(CSRCDIR)/dcolumnmaxa.c \ - $(CSRCDIR)/cpowma.c \ - $(CSRCDIR)/dpowma.c \ - $(CSRCDIR)/spowma.c \ - $(CSRCDIR)/zpowma.c \ - $(CSRCDIR)/cfftshifta.c \ - $(CSRCDIR)/dfftshifta.c \ - $(CSRCDIR)/sfftshifta.c \ - $(CSRCDIR)/zfftshifta.c \ - $(CSRCDIR)/crowfftshifta.c \ - $(CSRCDIR)/drowfftshifta.c \ - $(CSRCDIR)/srowfftshifta.c \ - $(CSRCDIR)/zrowfftshifta.c \ - $(CSRCDIR)/ccolumnfftshifta.c \ - $(CSRCDIR)/dcolumnfftshifta.c \ - $(CSRCDIR)/scolumnfftshifta.c \ - $(CSRCDIR)/zcolumnfftshifta.c \ - $(CSRCDIR)/cceils.c \ - $(CSRCDIR)/cceila.c \ - $(CSRCDIR)/dceils.c \ - $(CSRCDIR)/dceila.c \ - $(CSRCDIR)/sceils.c \ - $(CSRCDIR)/sceila.c \ - $(CSRCDIR)/zceils.c \ - $(CSRCDIR)/zceila.c \ - $(CSRCDIR)/cfixs.c \ - $(CSRCDIR)/cfixa.c \ - $(CSRCDIR)/dfixs.c \ - $(CSRCDIR)/dfixa.c \ - $(CSRCDIR)/sfixs.c \ - $(CSRCDIR)/sfixa.c \ - $(CSRCDIR)/zfixs.c \ - $(CSRCDIR)/zfixa.c \ - $(CSRCDIR)/cfloors.c \ - $(CSRCDIR)/cfloora.c \ - $(CSRCDIR)/dfloors.c \ - $(CSRCDIR)/dfloora.c \ - $(CSRCDIR)/sfloors.c \ - $(CSRCDIR)/sfloora.c \ - $(CSRCDIR)/zfloors.c \ - $(CSRCDIR)/zfloora.c \ - $(CSRCDIR)/cints.c \ - $(CSRCDIR)/cinta.c \ - $(CSRCDIR)/dints.c \ - $(CSRCDIR)/dinta.c \ - $(CSRCDIR)/sints.c \ - $(CSRCDIR)/sinta.c \ - $(CSRCDIR)/zints.c \ - $(CSRCDIR)/zinta.c \ - $(CSRCDIR)/crounds.c \ - $(CSRCDIR)/crounda.c \ - $(CSRCDIR)/drounds.c \ - $(CSRCDIR)/drounda.c \ - $(CSRCDIR)/srounds.c \ - $(CSRCDIR)/srounda.c \ - $(CSRCDIR)/zrounds.c \ - $(CSRCDIR)/zrounda.c - - - - - - - - - -# $(CSRCDIR)/clog1ps.c \ -# $(CSRCDIR)/zlog1ps.c \ -# $(CSRCDIR)/clog1pa.c \ -# $(CSRCDIR)/zlog1pa.c - -SWOBJS = $(SWSRCS:.c=.o) - -# --------------- -# --- TARGETS --- -# --------------- -compileexecute: $(SWOBJS) - @echo " " - @echo "============================" - @echo "Generation of the executable" - @echo "============================" - $(CC) $(CFLAGS) $(SWOBJS) $(SCI2CDIR)/*.c -llapack -lblas -o $(EXEFILE) - @echo " " - @echo "==============" - @echo "Executing code" - @echo "==============" - $(EXEFILE) - -clean: - @echo " " - @echo "=============================" - @echo "Removing only exe + obj files" - @echo "=============================" - rm -rf $(EXEFILE) - rm -rf $(SWOBJS) - @echo " " - -cleanexe: - @echo " " - @echo "==========================" - @echo "Removing only the exe file" - @echo "==========================" - rm -rf $(EXEFILE) - @echo " " - -# how to compile object code .o from C source files .c (general rule) -# space between -o and filename for SUN make -.c.o: - $(CC) $(CFLAGS) -c -o $(@) $< - -# Make object code from source -swobjs: $(SWOBJS) - diff --git a/src/Scilab2C/Scilab2C/CCodeGeneration/Sci2AnnotationFile.sci b/src/Scilab2C/Scilab2C/CCodeGeneration/Sci2AnnotationFile.sci deleted file mode 100644 index 001ed250..00000000 --- a/src/Scilab2C/Scilab2C/CCodeGeneration/Sci2AnnotationFile.sci +++ /dev/null @@ -1,55 +0,0 @@ -function Sci2AnnotationFile(SciFileName,ClsFileName,AnnFileName,AnnSpecifier,ReportFileName) -// function Sci2AnnotationFile(SciFileName,ClsFileName,AnnFileName,AnnSpecifier,ReportFileName) -// -------------------------------------------------------------------------------- -// #RNU_RES_B -// This function reads the .sci input file and generates the correspondig .ann -// and .acls files. -// #RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 25-Jun-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),5,5); - -[tmppath,tmpfunname,tmpext] = fileparts(SciFileName); - -// --------------------------------------- -// --- Open the .sci file (read only). --- -// --------------------------------------- -inscifid = SCI2COpenFileRead(SciFileName); - -// ---------------------------------------------- -// --- Loop over the lines of the input file. --- -// ---------------------------------------------- -line_position = 0; -L_AnnSpecifierP1 = length(AnnSpecifier)+1; -while (meof(inscifid) == 0) - check_string = stripblanks(mgetl(inscifid,1)); - line_position = line_position + 1; - L_string = length(check_string); - if (L_string >= 1) - if (SCI2Cstrncmps1size(AnnSpecifier,check_string)) - tmpannotation = stripblanks(part(check_string,L_AnnSpecifierP1:L_string)); - PrintStringInfo(tmpannotation,ClsFileName,'file','y'); - end - end -end -mclose(inscifid); -// -------------------------------------------------- -// --- End loop over the lines of the input file. --- -// -------------------------------------------------- -PrintStringInfo('CLASS: '+tmpfunname,AnnFileName,'file','y'); -endfunction diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ConvertPrecision.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ConvertPrecision.c deleted file mode 100644 index ee3ecc3a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ConvertPrecision.c +++ /dev/null @@ -1,41 +0,0 @@ -/* -** -*- C -*- -** -** ConvertPrecision.c -** Made by Raffaele Nutricato -** -** Copyright Raffaele Nutricato 2008 -*/ - - -double s0doubled0(float in) -{ - double out; - out = (double) in; - return (out); -} - -void s2doubled2(float* in, int* inSize, double* out) -{ - int i; - for (i=0; i -** -** -** Copyright Rubby Nutricato 2007 -*/ - -#include "FileManagement.h" - diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpEqual.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpEqual.c deleted file mode 100644 index 70f3d504..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpEqual.c +++ /dev/null @@ -1,90 +0,0 @@ -/* -** -*- C -*- -** -** OpEqual.c -** Made by Raffaele Nutricato -** -** -** Copyright Raffaele Nutricato 2007 -*/ - -#include "OpEqual.h" - -float sOpEquals1(float x) -{ - return (x); -} - -double dOpEquals1(double x) -{ - return x; -} - -floatComplex c0OpEqualc0(floatComplex x) -{ - return x; -} - -doubleComplex z0OpEqualz0(doubleComplex x) -{ - return x; -} - -char g0OpEqualg0(char x) -{ - return x; -} - -void sOpEquala1(float* x, int size, float* y) -{ - int i = 0; - for (i = 0; i < size; ++i) - { - y[i] = x[i]; - } -} - -void dOpEquala1(double* x, int size, double* y) -{ - int i = 0; - for (i = 0; i < size; ++i) - { - y[i] = x[i]; - } -} - -void c2OpEqualc2(floatComplex* x, int* xSize, floatComplex* y) -{ - int i = 0; - int size; - size = xSize[0]*xSize[1]; - - for (i = 0; i < size; ++i) - { - y[i] = x[i]; - } -} - -void z2OpEqualz2(doubleComplex* x, int* xSize, doubleComplex* y) -{ - int i = 0; - int size; - size = xSize[0]*xSize[1]; - - for (i = 0; i < size; ++i) - { - y[i] = x[i]; - } -} - -void g2OpEqualg2(char* x, int* xSize, char* y) -{ - int i = 0; - int size; - size = xSize[0]*xSize[1]; - - for (i = 0; i < size; ++i) - { - y[i] = x[i]; - } -} diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpExt.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpExt.c deleted file mode 100644 index 0b137b14..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpExt.c +++ /dev/null @@ -1,11 +0,0 @@ -/* -** -*- C -*- -** -** -** Made by Raffaele.Nutricato@tiscali.it -** -** Copyright Raffaele Nutricato -*/ - -#include "OpExt.h" - diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpIns.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpIns.c deleted file mode 100644 index df386894..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpIns.c +++ /dev/null @@ -1,11 +0,0 @@ -/* -** -*- C -*- -** -** -** Made by Raffaele.Nutricato@tiscali.it -** -** Copyright Raffaele Nutricato -*/ - -#include "OpIns.h" - diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogAnd.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogAnd.c deleted file mode 100644 index 86deee72..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogAnd.c +++ /dev/null @@ -1,38 +0,0 @@ -/* -** -*- C -*- -** -** OpLogAnd.c -** Made by Raffaele Nutricato -** -** -** Copyright Raffaele Nutricato 2007 -*/ - -#include "OpLogAnd.h" - -void s2s0OpLogAnds2(float* in1, int* in1Size, float in2, float* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (float) (in1[rows*in1Size[1]+cols] && in2); - } - } -} - -void d2d0OpLogAndd2(double* in1, int* in1Size, double in2, double* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (double) (in1[rows*in1Size[1]+cols] && in2); - } - } -} - diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogGe.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogGe.c deleted file mode 100644 index 3664f2e1..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogGe.c +++ /dev/null @@ -1,37 +0,0 @@ -/* -** -*- C -*- -** -** OpDotSlash.c -** Made by Raffaele Nutricato -** -** -** Copyright Raffaele Nutricato 2007 -*/ - -#include "OpLogGe.h" - -void s2s0OpLogGes2(float* in1, int* in1Size, float in2, float* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (float) (in1[rows*in1Size[1]+cols] >= in2); - } - } -} - -void d2d0OpLogGed2(double* in1, int* in1Size, double in2, double* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (double) (in1[rows*in1Size[1]+cols] >= in2); - } - } -} diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogGt.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogGt.c deleted file mode 100644 index 25e4bd96..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogGt.c +++ /dev/null @@ -1,37 +0,0 @@ -/* -** -*- C -*- -** -** OpDotSlash.c -** Made by Raffaele Nutricato -** -** -** Copyright Raffaele Nutricato 2007 -*/ - -#include "OpLogGt.h" - -void s2s0OpLogGts2(float* in1, int* in1Size, float in2, float* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (float) (in1[rows*in1Size[1]+cols] > in2); - } - } -} - -void d2d0OpLogGtd2(double* in1, int* in1Size, double in2, double* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (double) (in1[rows*in1Size[1]+cols] > in2); - } - } -} diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogLe.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogLe.c deleted file mode 100644 index a1544489..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogLe.c +++ /dev/null @@ -1,37 +0,0 @@ -/* -** -*- C -*- -** -** OpDotSlash.c -** Made by Raffaele Nutricato -** -** -** Copyright Raffaele Nutricato 2007 -*/ - -#include "OpLogLe.h" - -void s2s0OpLogLes2(float* in1, int* in1Size, float in2, float* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (float) (in1[rows*in1Size[1]+cols] <= in2); - } - } -} - -void d2d0OpLogLed2(double* in1, int* in1Size, double in2, double* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (double) (in1[rows*in1Size[1]+cols] <= in2); - } - } -} diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogLt.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogLt.c deleted file mode 100644 index a7e6d774..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogLt.c +++ /dev/null @@ -1,37 +0,0 @@ -/* -** -*- C -*- -** -** OpDotSlash.c -** Made by Raffaele Nutricato -** -** -** Copyright Raffaele Nutricato 2007 -*/ - -#include "OpLogLt.h" - -void s2s0OpLogLts2(float* in1, int* in1Size, float in2, float* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (float) (in1[rows*in1Size[1]+cols] < in2); - } - } -} - -void d2d0OpLogLtd2(double* in1, int* in1Size, double in2, double* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (double) (in1[rows*in1Size[1]+cols] < in2); - } - } -} diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogOr.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogOr.c deleted file mode 100644 index eb553b33..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogOr.c +++ /dev/null @@ -1,38 +0,0 @@ -/* -** -*- C -*- -** -** OpLogOr.c -** Made by Raffaele Nutricato -** -** -** Copyright Raffaele Nutricato 2007 -*/ - -#include "OpLogOr.h" - -void s2s0OpLogOrs2(float* in1, int* in1Size, float in2, float* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (float) (in1[rows*in1Size[1]+cols] || in2); - } - } -} - -void d2d0OpLogOrd2(double* in1, int* in1Size, double in2, double* out) -{ - int rows = 0; - int cols = 0; - for (rows = 0; rows < in1Size[0];rows++) - { - for (cols = 0; cols < in1Size[1];cols++) - { - out[rows*in1Size[1]+cols] = (double) (in1[rows*in1Size[1]+cols] || in2); - } - } -} - diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/RealToComplex.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/RealToComplex.c deleted file mode 100644 index dd7b5ecf..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/RealToComplex.c +++ /dev/null @@ -1,134 +0,0 @@ -/* -** -*- C -*- -** -** -** Made by Raffaele.Nutricato@tiscali.it -** -** Copyright Raffaele Nutricato -*/ - -#include "RealToComplex.h" - -floatComplex s0floatcomplexc0(float in) -{ - floatComplex out; - out = FloatComplex(in,0); - return out; -} - -floatComplex d0floatcomplexc0(double in) -{ - floatComplex out; - out = FloatComplex(in,0); - return out; -} - -floatComplex c0floatcomplexc0(floatComplex in) -{ - return in; -} - -floatComplex z0floatcomplexc0(doubleComplex in) -{ - floatComplex out; - out = FloatComplex((float)zreals(in),(float)zimags(in)); - return out; -} - -void s2floatcomplexc2(float* in, int* inSize, floatComplex* out) -{ - int i = 0; - for (i=0;i -** -** -** Copyright Raffaele Nutricato 2007 -*/ - -#include "SCI2Cfft.h" - - diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cabsa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cabsa.c deleted file mode 120000 index 5813de5e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cabsa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/abs/cabsa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cabss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cabss.c deleted file mode 120000 index d5dc08b4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cabss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/abs/cabss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacosa.c deleted file mode 120000 index 7b772651..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acos/cacosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacosha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacosha.c deleted file mode 120000 index 53d953b0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacosha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acosh/cacosha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacoshs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacoshs.c deleted file mode 120000 index fb9b8785..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacoshs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acosh/cacoshs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacoss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacoss.c deleted file mode 120000 index 2f1d414b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cacoss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acos/cacoss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cadda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cadda.c deleted file mode 120000 index 46fc562d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cadda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/addition/cadda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cadds.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cadds.c deleted file mode 120000 index ff38005a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cadds.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/addition/cadds.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casina.c deleted file mode 120000 index f7c3fb8e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asin/casina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casinha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casinha.c deleted file mode 120000 index 7ba7e1cc..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casinha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asinh/casinha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casinhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casinhs.c deleted file mode 120000 index c1a94792..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casinhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asinh/casinhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casins.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casins.c deleted file mode 120000 index 05b29992..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/casins.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asin/casins.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catana.c deleted file mode 120000 index 3fee4937..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan/catana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catanha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catanha.c deleted file mode 120000 index 9411fd2d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catanha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atanh/catanha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catanhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catanhs.c deleted file mode 120000 index 99490ad7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catanhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atanh/catanhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catans.c deleted file mode 120000 index 416e4e7b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/catans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan/catans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccata.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccata.c deleted file mode 120000 index 0a05090c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccata.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/cat/ccata.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccats.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccats.c deleted file mode 120000 index 6833bc91..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccats.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/cat/ccats.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cceila.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cceila.c deleted file mode 120000 index 79aa6129..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cceila.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/ceil/cceila.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cceils.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cceils.c deleted file mode 120000 index 34f48f26..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cceils.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/ceil/cceils.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cchola.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cchola.c deleted file mode 120000 index 3e6fb51d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cchola.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/chol/cchola.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnfftshifta.c deleted file mode 120000 index f335621b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/ccolumnfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnmeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnmeana.c deleted file mode 120000 index 1e4fc66c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnmeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/ccolumnmeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnsuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnsuma.c deleted file mode 120000 index 099605c8..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnsuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/ccolumnsuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnvariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnvariancea.c deleted file mode 120000 index b2f5ea9e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccolumnvariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/ccolumnvariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconja.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconja.c deleted file mode 120000 index c6d40923..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconja.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/conj/cconja.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconjs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconjs.c deleted file mode 120000 index 432c68c1..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconjs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/conj/cconjs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconv2da.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconv2da.c deleted file mode 120000 index 992d0f57..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconv2da.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/conv2d/cconv2da.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconva.c deleted file mode 120000 index 00381230..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cconva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/conv/cconva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccosa.c deleted file mode 120000 index 435b434a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cos/ccosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccosha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccosha.c deleted file mode 120000 index c8266a68..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccosha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cosh/ccosha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccoshs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccoshs.c deleted file mode 120000 index ea0e606e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccoshs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cosh/ccoshs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccoss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccoss.c deleted file mode 120000 index 3f81b692..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ccoss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cos/ccoss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdeterma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdeterma.c deleted file mode 120000 index b56695e9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdeterma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/determ/cdeterma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdiffa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdiffa.c deleted file mode 120000 index 716e3e9e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdiffa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/subtraction/cdiffa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdiffs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdiffs.c deleted file mode 120000 index c9adba0e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdiffs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/subtraction/cdiffs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdispa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdispa.c deleted file mode 120000 index 154bc8d7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdispa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../string/disp/cdispa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdisps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdisps.c deleted file mode 120000 index 3081061e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cdisps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../string/disp/cdisps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexpa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexpa.c deleted file mode 120000 index bf5c9dd4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexpa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/exp/cexpa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexpma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexpma.c deleted file mode 120000 index d1e89eb3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexpma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/expm/cexpma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexps.c deleted file mode 120000 index 76427200..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cexps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/exp/cexps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ceyea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ceyea.c deleted file mode 120000 index e0dd6546..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ceyea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/eye/ceyea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfftma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfftma.c deleted file mode 120000 index d56271c9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfftma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/cfftma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfftshifta.c deleted file mode 120000 index dd9d615a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/cfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfilla.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfilla.c deleted file mode 120000 index 23d25e61..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfilla.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/fill/cfilla.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfind2da.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfind2da.c deleted file mode 120000 index 21c7188a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfind2da.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/find2d/cfind2da.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfinda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfinda.c deleted file mode 120000 index 05d57606..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfinda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/find/cfinda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfixa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfixa.c deleted file mode 120000 index a87b9d5a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfixa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/fix/cfixa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfixs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfixs.c deleted file mode 120000 index c6a4ef93..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfixs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/fix/cfixs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfloora.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfloora.c deleted file mode 120000 index 97f2a216..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfloora.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/floor/cfloora.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfloors.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfloors.c deleted file mode 120000 index a1966a36..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cfloors.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/floor/cfloors.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cifftma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cifftma.c deleted file mode 120000 index 8b4835f7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cifftma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/cifftma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cimplicitLists.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cimplicitLists.c deleted file mode 120000 index 66ecd8e1..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cimplicitLists.c +++ /dev/null @@ -1 +0,0 @@ -../../../../implicitList/cimplicitLists.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinfnorma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinfnorma.c deleted file mode 120000 index 66306a7e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinfnorma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/infiniteNorm/cinfnorma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinta.c deleted file mode 120000 index 490b55e2..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/int/cinta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cints.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cints.c deleted file mode 120000 index df8a24e7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cints.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/int/cints.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinverma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinverma.c deleted file mode 120000 index eb6154dc..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cinverma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/inversion/cinverma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cisnana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cisnana.c deleted file mode 120000 index 9b2fbb64..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cisnana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/isnan/cisnana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cisnans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cisnans.c deleted file mode 120000 index 2430e2ff..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cisnans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/isnan/cisnans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldiva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldiva.c deleted file mode 120000 index 00dd57d3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldiva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/cldiva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldivma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldivma.c deleted file mode 120000 index 6e981f19..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldivma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/division/cldivma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldivs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldivs.c deleted file mode 120000 index 97024760..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cldivs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/cldivs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cleva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cleva.c deleted file mode 120000 index ee94f0db..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cleva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/lev/cleva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cleva2.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cleva2.c deleted file mode 120000 index a97f60ff..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cleva2.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/lev/cleva2.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog10a.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog10a.c deleted file mode 120000 index 7593e252..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog10a.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log10/clog10a.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog10s.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog10s.c deleted file mode 120000 index 4d132bb0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog10s.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log10/clog10s.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog1pa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog1pa.c deleted file mode 120000 index a6e211a4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog1pa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log1p/clog1pa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog1ps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog1ps.c deleted file mode 120000 index 41847766..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clog1ps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log1p/clog1ps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cloga.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cloga.c deleted file mode 120000 index 97057b24..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cloga.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log/cloga.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clogs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clogs.c deleted file mode 120000 index 63d7773b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/clogs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log/clogs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmeana.c deleted file mode 120000 index 960722e4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/cmeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmula.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmula.c deleted file mode 120000 index 65e27522..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmula.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/multiplication/cmula.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmulma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmulma.c deleted file mode 120000 index d33aa7ad..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmulma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/multiplication/cmulma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmuls.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmuls.c deleted file mode 120000 index 25ae8a64..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cmuls.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/multiplication/cmuls.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/conesa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/conesa.c deleted file mode 120000 index 11697d7f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/conesa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/ones/conesa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpowa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpowa.c deleted file mode 120000 index 505b0831..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpowa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/pow/cpowa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpowma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpowma.c deleted file mode 120000 index e9742363..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpowma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/powm/cpowma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpows.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpows.c deleted file mode 120000 index 51328f02..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpows.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/pow/cpows.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpythags.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpythags.c deleted file mode 120000 index 6ed53c7b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cpythags.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/pythag/cpythags.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdiva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdiva.c deleted file mode 120000 index 519b124c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdiva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/crdiva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdivma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdivma.c deleted file mode 120000 index 5e6eb807..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdivma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/division/crdivma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdivs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdivs.c deleted file mode 120000 index f06cabd0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crdivs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/crdivs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crounda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crounda.c deleted file mode 120000 index 61500647..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crounda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/round/crounda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crounds.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crounds.c deleted file mode 120000 index 955458f3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crounds.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/round/crounds.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowfftshifta.c deleted file mode 120000 index f4439e88..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/crowfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowmeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowmeana.c deleted file mode 120000 index 1ec7ca95..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowmeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/crowmeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowsuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowsuma.c deleted file mode 120000 index 6b7f381f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowsuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/crowsuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowvariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowvariancea.c deleted file mode 120000 index 1afa7eee..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/crowvariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/crowvariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csigna.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csigna.c deleted file mode 120000 index 3297fef8..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csigna.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/sign/csigna.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csigns.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csigns.c deleted file mode 120000 index 481f9b1d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csigns.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/sign/csigns.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csina.c deleted file mode 120000 index 4fad25ae..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sin/csina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csinha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csinha.c deleted file mode 120000 index a292345a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csinha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sinh/csinha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csinhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csinhs.c deleted file mode 120000 index f0579965..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csinhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sinh/csinhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csins.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csins.c deleted file mode 120000 index e0bbaefa..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csins.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sin/csins.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cspec2a.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cspec2a.c deleted file mode 120000 index 27ac3c56..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cspec2a.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/spec2/cspec2a.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cspeca.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cspeca.c deleted file mode 120000 index a97798cf..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cspeca.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/spec/cspeca.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csqrta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csqrta.c deleted file mode 120000 index 7ec18f89..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csqrta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sqrt/csqrta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csqrts.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csqrts.c deleted file mode 120000 index c1b1d314..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csqrts.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sqrt/csqrts.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csuma.c deleted file mode 120000 index 6c24e622..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/csuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/csuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctana.c deleted file mode 120000 index 548757b9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tan/ctana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctanha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctanha.c deleted file mode 120000 index cde22a16..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctanha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tanh/ctanha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctanhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctanhs.c deleted file mode 120000 index e8001311..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctanhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tanh/ctanhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctans.c deleted file mode 120000 index 4c5e8281..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tan/ctans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctracea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctracea.c deleted file mode 120000 index 8542803d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctracea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/trace/ctracea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctransposea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctransposea.c deleted file mode 120000 index a68c8f24..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ctransposea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/transpose/ctransposea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cvariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cvariancea.c deleted file mode 120000 index 2369ac32..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/cvariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/cvariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/czerosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/czerosa.c deleted file mode 120000 index fb24f2b5..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/czerosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/zeros/czerosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dabsa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dabsa.c deleted file mode 120000 index ff6d9fa6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dabsa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/abs/dabsa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dabss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dabss.c deleted file mode 120000 index c9008262..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dabss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/abs/dabss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacosa.c deleted file mode 120000 index 69479dfd..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acos/dacosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacosha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacosha.c deleted file mode 120000 index 1acb8f93..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacosha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acosh/dacosha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacoshs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacoshs.c deleted file mode 120000 index 2324d0a7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacoshs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acosh/dacoshs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacoss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacoss.c deleted file mode 120000 index 2bfd46d0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dacoss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acos/dacoss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dadda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dadda.c deleted file mode 120000 index a593117a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dadda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/addition/dadda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dadds.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dadds.c deleted file mode 120000 index 0b4410d6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dadds.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/addition/dadds.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasina.c deleted file mode 120000 index add865b2..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asin/dasina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasinha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasinha.c deleted file mode 120000 index 2da6d874..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasinha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asinh/dasinha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasinhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasinhs.c deleted file mode 120000 index a58d3556..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasinhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asinh/dasinhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasins.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasins.c deleted file mode 120000 index 741d648d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dasins.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asin/dasins.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datan2a.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datan2a.c deleted file mode 120000 index 8f242d86..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datan2a.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan2/datan2a.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datan2s.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datan2s.c deleted file mode 120000 index 212c2f22..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datan2s.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan2/datan2s.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datana.c deleted file mode 120000 index b221a0cd..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan/datana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datanha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datanha.c deleted file mode 120000 index ed3ad18f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datanha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atanh/datanha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datanhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datanhs.c deleted file mode 120000 index 7b8d47e9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datanhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atanh/datanhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datans.c deleted file mode 120000 index 65471309..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/datans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan/datans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcata.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcata.c deleted file mode 120000 index b2968d88..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcata.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/cat/dcata.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcats.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcats.c deleted file mode 120000 index 2f67a50c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcats.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/cat/dcats.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dceila.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dceila.c deleted file mode 120000 index 6c763a40..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dceila.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/ceil/dceila.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dceils.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dceils.c deleted file mode 120000 index 30776925..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dceils.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/ceil/dceils.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dchola.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dchola.c deleted file mode 120000 index 58264932..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dchola.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/chol/dchola.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dchols.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dchols.c deleted file mode 120000 index da61820f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dchols.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/chol/dchols.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnfftshifta.c deleted file mode 120000 index 70ced617..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/dcolumnfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmaxa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmaxa.c deleted file mode 120000 index 21967f6b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmaxa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/max/dcolumnmaxa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmeana.c deleted file mode 120000 index e96f409c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/dcolumnmeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmina.c deleted file mode 120000 index e820a662..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnmina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/min/dcolumnmina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnsuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnsuma.c deleted file mode 120000 index 070d4b9c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnsuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/dcolumnsuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnvariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnvariancea.c deleted file mode 120000 index f655e79d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcolumnvariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/dcolumnvariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dconv2da.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dconv2da.c deleted file mode 120000 index 8a755708..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dconv2da.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/conv2d/dconv2da.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dconva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dconva.c deleted file mode 120000 index 57f0f8cb..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dconva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/conv/dconva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcosa.c deleted file mode 120000 index 94b5d550..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cos/dcosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcosha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcosha.c deleted file mode 120000 index f17e2b7e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcosha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cosh/dcosha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcoshs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcoshs.c deleted file mode 120000 index c68c5860..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcoshs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cosh/dcoshs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcoss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcoss.c deleted file mode 120000 index a42b26d9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dcoss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cos/dcoss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddeterma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddeterma.c deleted file mode 120000 index 6319e5c2..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddeterma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/determ/ddeterma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddiffa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddiffa.c deleted file mode 120000 index 70833bc3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddiffa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/subtraction/ddiffa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddiffs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddiffs.c deleted file mode 120000 index 17d486d2..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddiffs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/subtraction/ddiffs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddispa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddispa.c deleted file mode 120000 index bd918067..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddispa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../string/disp/ddispa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddisps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddisps.c deleted file mode 120000 index 5dc6a00d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ddisps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../string/disp/ddisps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpa.c deleted file mode 120000 index c05364fa..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/exp/dexpa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpma.c deleted file mode 120000 index 9f906cae..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/expm/dexpma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexps.c deleted file mode 120000 index fee9eb75..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/exp/dexps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/deyea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/deyea.c deleted file mode 120000 index e06233a0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/deyea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/eye/deyea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfft2.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfft2.c deleted file mode 120000 index b17f04f8..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfft2.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/dfft2.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftbi.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftbi.c deleted file mode 120000 index 4820b423..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftbi.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/dfftbi.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftma.c deleted file mode 120000 index d430e08d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/dfftma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftmx.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftmx.c deleted file mode 120000 index 8ccfe56d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftmx.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/dfftmx.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftshifta.c deleted file mode 120000 index 850297b4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/dfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfilla.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfilla.c deleted file mode 120000 index 929358b4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfilla.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/fill/dfilla.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfind2da.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfind2da.c deleted file mode 120000 index ef4ea6bc..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfind2da.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/find2d/dfind2da.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfinda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfinda.c deleted file mode 120000 index ba18f244..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfinda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/find/dfinda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfixa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfixa.c deleted file mode 120000 index 8af6b57e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfixa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/fix/dfixa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfixs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfixs.c deleted file mode 120000 index 327fa9c0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfixs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/fix/dfixs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfloora.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfloora.c deleted file mode 120000 index 80f5c1c9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfloora.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/floor/dfloora.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfloors.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfloors.c deleted file mode 120000 index 45d31c5f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfloors.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/floor/dfloors.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfrexps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfrexps.c deleted file mode 120000 index bf4a0882..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dfrexps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/frexp/dfrexps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difft2.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difft2.c deleted file mode 120000 index 87a42685..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difft2.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/difft2.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftbi.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftbi.c deleted file mode 120000 index 4abc9226..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftbi.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/difftbi.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftma.c deleted file mode 120000 index 93d546d7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/difftma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftmx.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftmx.c deleted file mode 120000 index 6d212b2d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/difftmx.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/difftmx.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dimplicitLists.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dimplicitLists.c deleted file mode 120000 index 66ba1e22..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dimplicitLists.c +++ /dev/null @@ -1 +0,0 @@ -../../../../implicitList/dimplicitLists.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinfnorma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinfnorma.c deleted file mode 120000 index 15b43712..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinfnorma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/infiniteNorm/dinfnorma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinta.c deleted file mode 120000 index f6583a27..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/int/dinta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dints.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dints.c deleted file mode 120000 index cc9af93f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dints.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/int/dints.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinverma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinverma.c deleted file mode 120000 index 37ed6122..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dinverma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/inversion/dinverma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/disnana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/disnana.c deleted file mode 120000 index 75ae6a5f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/disnana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/isnan/disnana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/disnans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/disnans.c deleted file mode 120000 index 1eff649a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/disnans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/isnan/disnans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldiva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldiva.c deleted file mode 120000 index 1a8793a0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldiva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/dldiva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldivma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldivma.c deleted file mode 120000 index 3d75ab48..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldivma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/division/dldivma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldivs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldivs.c deleted file mode 120000 index 40d62b8d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dldivs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/dldivs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dleva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dleva.c deleted file mode 120000 index a5d85bd1..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dleva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/lev/dleva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dleva2.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dleva2.c deleted file mode 120000 index 16a77247..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dleva2.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/lev/dleva2.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlnp1m1s.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlnp1m1s.c deleted file mode 120000 index ac00bf81..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlnp1m1s.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/lnp1m1/dlnp1m1s.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog10a.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog10a.c deleted file mode 120000 index 8f50eb66..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog10a.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log10/dlog10a.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog10s.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog10s.c deleted file mode 120000 index b19a6df2..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog10s.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log10/dlog10s.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog1pa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog1pa.c deleted file mode 120000 index 327a802c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog1pa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log1p/dlog1pa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog1ps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog1ps.c deleted file mode 120000 index b3485004..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlog1ps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log1p/dlog1ps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dloga.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dloga.c deleted file mode 120000 index 33a55eb5..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dloga.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log/dloga.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlogs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlogs.c deleted file mode 120000 index a39071ad..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dlogs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log/dlogs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmaxa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmaxa.c deleted file mode 120000 index 8af066c7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmaxa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/max/dmaxa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmeana.c deleted file mode 120000 index 4c59b510..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/dmeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmina.c deleted file mode 120000 index b71afee1..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/min/dmina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmula.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmula.c deleted file mode 120000 index 1e35dcdc..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmula.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/multiplication/dmula.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmulma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmulma.c deleted file mode 120000 index c3a89817..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmulma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/multiplication/dmulma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmuls.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmuls.c deleted file mode 120000 index 6b1e3f49..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dmuls.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/multiplication/dmuls.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/donesa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/donesa.c deleted file mode 120000 index 03b89633..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/donesa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/ones/donesa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/doubleComplex.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/doubleComplex.c deleted file mode 120000 index 1201c929..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/doubleComplex.c +++ /dev/null @@ -1 +0,0 @@ -../../../../type/doubleComplex.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpowa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpowa.c deleted file mode 120000 index c2e31a09..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpowa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/pow/dpowa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpowma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpowma.c deleted file mode 120000 index a29dbb24..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpowma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/powm/dpowma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpows.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpows.c deleted file mode 120000 index bf25b3e5..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpows.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/pow/dpows.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpythags.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpythags.c deleted file mode 120000 index 6b71fd9b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dpythags.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/pythag/dpythags.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdiva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdiva.c deleted file mode 120000 index bec676e0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdiva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/drdiva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdivma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdivma.c deleted file mode 120000 index d201e0fb..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdivma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/division/drdivma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdivs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdivs.c deleted file mode 120000 index c71ab8a6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drdivs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/drdivs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drounda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drounda.c deleted file mode 120000 index d2599a70..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drounda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/round/drounda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drounds.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drounds.c deleted file mode 120000 index 7476f2e0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drounds.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/round/drounds.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowfftshifta.c deleted file mode 120000 index 1ee1c6c9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/drowfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmaxa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmaxa.c deleted file mode 120000 index 45203964..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmaxa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/max/drowmaxa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmeana.c deleted file mode 120000 index e3ae517a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/drowmeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmina.c deleted file mode 120000 index 5e3af02c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowmina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/min/drowmina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowsuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowsuma.c deleted file mode 120000 index 18a103de..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowsuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/drowsuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowvariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowvariancea.c deleted file mode 120000 index c3bb726d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/drowvariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/drowvariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsigna.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsigna.c deleted file mode 120000 index 6c2b8956..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsigna.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/sign/dsigna.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsigns.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsigns.c deleted file mode 120000 index 8d69312e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsigns.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/sign/dsigns.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsina.c deleted file mode 120000 index a36a7648..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sin/dsina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsinha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsinha.c deleted file mode 120000 index d6148fe6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsinha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sinh/dsinha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsinhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsinhs.c deleted file mode 120000 index 211a0b1c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsinhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sinh/dsinhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsins.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsins.c deleted file mode 120000 index a64207d0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsins.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sin/dsins.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dspec2a.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dspec2a.c deleted file mode 120000 index 7552425f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dspec2a.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/spec2/dspec2a.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dspeca.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dspeca.c deleted file mode 120000 index dac72d63..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dspeca.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/spec/dspeca.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsqrta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsqrta.c deleted file mode 120000 index dbb2e358..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsqrta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sqrt/dsqrta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsqrts.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsqrts.c deleted file mode 120000 index 244740f5..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsqrts.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sqrt/dsqrts.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsuma.c deleted file mode 120000 index f4172a80..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dsuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/dsuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtana.c deleted file mode 120000 index 94fc7bd0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tan/dtana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtanha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtanha.c deleted file mode 120000 index 12ee60d9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtanha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tanh/dtanha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtanhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtanhs.c deleted file mode 120000 index 6ff2d8b7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtanhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tanh/dtanhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtans.c deleted file mode 120000 index 09f19915..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tan/dtans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtracea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtracea.c deleted file mode 120000 index f1376569..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtracea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/trace/dtracea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtransposea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtransposea.c deleted file mode 120000 index a283d76d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dtransposea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/transpose/dtransposea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dvariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dvariancea.c deleted file mode 120000 index bb1b5fe9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dvariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/dvariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dzerosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dzerosa.c deleted file mode 120000 index 06fef93b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dzerosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/zeros/dzerosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/fft842.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/fft842.c deleted file mode 120000 index 086aaca6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/fft842.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/fft842.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/floatComplex.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/floatComplex.c deleted file mode 120000 index 66e2fe5d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/floatComplex.c +++ /dev/null @@ -1 +0,0 @@ -../../../../type/floatComplex.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ifft842.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ifft842.c deleted file mode 120000 index 4d89e127..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ifft842.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/ifft842.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir2tx.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir2tx.c deleted file mode 120000 index 590f9559..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir2tx.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/ir2tx.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir4tx.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir4tx.c deleted file mode 120000 index 65e17097..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir4tx.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/ir4tx.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir8tx.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir8tx.c deleted file mode 120000 index 8c8591cf..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ir8tx.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/ir8tx.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/r2tx.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/r2tx.c deleted file mode 120000 index 54621e6b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/r2tx.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/r2tx.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/r4tx.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/r4tx.c deleted file mode 120000 index d0c663e9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/r4tx.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/r4tx.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/r8tx.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/r8tx.c deleted file mode 120000 index 29caa15b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/r8tx.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/r8tx.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sabsa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sabsa.c deleted file mode 120000 index 9d0e3057..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sabsa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/abs/sabsa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sabss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sabss.c deleted file mode 120000 index 2a9bea73..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sabss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/abs/sabss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacosa.c deleted file mode 120000 index 5ba4c750..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acos/sacosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacosha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacosha.c deleted file mode 120000 index b94a09b3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacosha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acosh/sacosha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacoshs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacoshs.c deleted file mode 120000 index bd2b77e9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacoshs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acosh/sacoshs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacoss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacoss.c deleted file mode 120000 index a7ae85fd..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sacoss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acos/sacoss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sadda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sadda.c deleted file mode 120000 index b48dd880..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sadda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/addition/sadda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sadds.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sadds.c deleted file mode 120000 index b07d1954..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sadds.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/addition/sadds.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasina.c deleted file mode 120000 index 10842ec2..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asin/sasina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasinha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasinha.c deleted file mode 120000 index e5cf591b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasinha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asinh/sasinha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasinhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasinhs.c deleted file mode 120000 index 776e7fa6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasinhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asinh/sasinhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasins.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasins.c deleted file mode 120000 index 4357b118..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sasins.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asin/sasins.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satan2a.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satan2a.c deleted file mode 120000 index ea6a0ef9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satan2a.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan2/satan2a.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satan2s.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satan2s.c deleted file mode 120000 index 7f4510a5..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satan2s.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan2/satan2s.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satana.c deleted file mode 120000 index f85c665f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan/satana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satanha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satanha.c deleted file mode 120000 index 2c0dc656..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satanha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atanh/satanha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satanhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satanhs.c deleted file mode 120000 index ee7f153d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satanhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atanh/satanhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satans.c deleted file mode 120000 index 29eab3a9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/satans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan/satans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scata.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scata.c deleted file mode 120000 index a85d4065..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scata.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/cat/scata.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scats.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scats.c deleted file mode 120000 index ec11bd25..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scats.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/cat/scats.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sceila.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sceila.c deleted file mode 120000 index cb736a1b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sceila.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/ceil/sceila.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sceils.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sceils.c deleted file mode 120000 index 6053dec2..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sceils.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/ceil/sceils.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/schola.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/schola.c deleted file mode 120000 index 23615e34..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/schola.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/chol/schola.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/schols.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/schols.c deleted file mode 120000 index e7976c4d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/schols.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/chol/schols.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnfftshifta.c deleted file mode 120000 index 9e99fccd..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/scolumnfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmaxa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmaxa.c deleted file mode 120000 index 457b95cd..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmaxa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/max/scolumnmaxa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmeana.c deleted file mode 120000 index 4aad8e47..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/scolumnmeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmina.c deleted file mode 120000 index ea6a0cf6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnmina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/min/scolumnmina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnsuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnsuma.c deleted file mode 120000 index f251f103..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnsuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/scolumnsuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnvariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnvariancea.c deleted file mode 120000 index 8392325c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scolumnvariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/scolumnvariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sconv2da.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sconv2da.c deleted file mode 120000 index b003858e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sconv2da.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/conv2d/sconv2da.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sconva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sconva.c deleted file mode 120000 index 633c413f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sconva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/conv/sconva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scosa.c deleted file mode 120000 index f61b7967..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cos/scosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scosha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scosha.c deleted file mode 120000 index 4ab2ebc0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scosha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cosh/scosha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scoshs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scoshs.c deleted file mode 120000 index 3bb1554e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scoshs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cosh/scoshs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scoss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scoss.c deleted file mode 120000 index c365b981..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/scoss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cos/scoss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdeterma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdeterma.c deleted file mode 120000 index 7f53e703..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdeterma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/determ/sdeterma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdiffa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdiffa.c deleted file mode 120000 index 9d91ac6f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdiffa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/subtraction/sdiffa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdiffs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdiffs.c deleted file mode 120000 index 87e0a2dc..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdiffs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/subtraction/sdiffs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdispa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdispa.c deleted file mode 120000 index f9ada8f4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdispa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../string/disp/sdispa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdisps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdisps.c deleted file mode 120000 index 3b2e092f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sdisps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../string/disp/sdisps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexpa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexpa.c deleted file mode 120000 index 5a2bdda3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexpa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/exp/sexpa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexpma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexpma.c deleted file mode 120000 index e4e183f6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexpma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/expm/sexpma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexps.c deleted file mode 120000 index 81fd1207..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sexps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/exp/sexps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/seyea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/seyea.c deleted file mode 120000 index 4ddc4969..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/seyea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/eye/seyea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfftma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfftma.c deleted file mode 120000 index 9c010dfb..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfftma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/sfftma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfftshifta.c deleted file mode 120000 index bcacd9b1..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/sfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfilla.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfilla.c deleted file mode 120000 index d7d1c23c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfilla.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/fill/sfilla.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfind2da.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfind2da.c deleted file mode 120000 index 716cb56a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfind2da.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/find2d/sfind2da.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfinda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfinda.c deleted file mode 120000 index 975c714c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfinda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/find/sfinda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfixa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfixa.c deleted file mode 120000 index 7ebd77cd..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfixa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/fix/sfixa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfixs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfixs.c deleted file mode 120000 index 1eca82a3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfixs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/fix/sfixs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfloora.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfloora.c deleted file mode 120000 index cbc48243..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfloora.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/floor/sfloora.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfloors.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfloors.c deleted file mode 120000 index 793ebe33..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfloors.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/floor/sfloors.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfrexps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfrexps.c deleted file mode 120000 index 7131385b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sfrexps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/frexp/sfrexps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sifftma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sifftma.c deleted file mode 120000 index a325e685..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sifftma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/sifftma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/simplicitLists.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/simplicitLists.c deleted file mode 120000 index 0bbfaf5a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/simplicitLists.c +++ /dev/null @@ -1 +0,0 @@ -../../../../implicitList/simplicitLists.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinfnorma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinfnorma.c deleted file mode 120000 index f806c84a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinfnorma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/infiniteNorm/sinfnorma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinta.c deleted file mode 120000 index 4206c469..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/int/sinta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sints.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sints.c deleted file mode 120000 index 1e809a8a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sints.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/int/sints.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinverma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinverma.c deleted file mode 120000 index c31cd983..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sinverma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/inversion/sinverma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sisnana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sisnana.c deleted file mode 120000 index 0a6f0662..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sisnana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/isnan/sisnana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sisnans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sisnans.c deleted file mode 120000 index 0d42f7da..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sisnans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/isnan/sisnans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldiva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldiva.c deleted file mode 120000 index a8da9829..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldiva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/sldiva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldivma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldivma.c deleted file mode 120000 index 5a8815db..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldivma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/division/sldivma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldivs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldivs.c deleted file mode 120000 index 2110326a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sldivs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/sldivs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sleva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sleva.c deleted file mode 120000 index e84106d0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sleva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/lev/sleva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sleva2.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sleva2.c deleted file mode 120000 index 6df9bec3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sleva2.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/lev/sleva2.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slnp1m1s.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slnp1m1s.c deleted file mode 120000 index 19983433..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slnp1m1s.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/lnp1m1/slnp1m1s.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog10a.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog10a.c deleted file mode 120000 index 9eaadf77..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog10a.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log10/slog10a.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog10s.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog10s.c deleted file mode 120000 index 18b92eb1..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog10s.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log10/slog10s.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog1pa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog1pa.c deleted file mode 120000 index 7e51d593..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog1pa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log1p/slog1pa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog1ps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog1ps.c deleted file mode 120000 index 7c1bbe24..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slog1ps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log1p/slog1ps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sloga.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sloga.c deleted file mode 120000 index aeb99fbf..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sloga.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log/sloga.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slogs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slogs.c deleted file mode 120000 index 7eb61789..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/slogs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log/slogs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smaxa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smaxa.c deleted file mode 120000 index 33cfa76c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smaxa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/max/smaxa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smeana.c deleted file mode 120000 index 128d009d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/smeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smina.c deleted file mode 120000 index dc7879dc..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/min/smina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smula.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smula.c deleted file mode 120000 index 64d6762c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smula.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/multiplication/smula.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smulma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smulma.c deleted file mode 120000 index 5a04e66a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smulma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/multiplication/smulma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smuls.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smuls.c deleted file mode 120000 index e779efa3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/smuls.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/multiplication/smuls.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sonesa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sonesa.c deleted file mode 120000 index a64dc948..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sonesa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/ones/sonesa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spowa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spowa.c deleted file mode 120000 index 34bb3c64..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spowa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/pow/spowa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spowma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spowma.c deleted file mode 120000 index fedab942..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spowma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/powm/spowma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spows.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spows.c deleted file mode 120000 index 15dfba67..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spows.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/pow/spows.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spythags.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spythags.c deleted file mode 120000 index d5231904..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/spythags.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/pythag/spythags.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdiva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdiva.c deleted file mode 120000 index f45e8e8c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdiva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/srdiva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdivma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdivma.c deleted file mode 120000 index 22f5837e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdivma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/division/srdivma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdivs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdivs.c deleted file mode 120000 index c01810dc..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srdivs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/srdivs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srounda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srounda.c deleted file mode 120000 index bcb36899..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srounda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/round/srounda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srounds.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srounds.c deleted file mode 120000 index 5f4dd874..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srounds.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/round/srounds.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowfftshifta.c deleted file mode 120000 index cdc21c5c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/srowfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmaxa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmaxa.c deleted file mode 120000 index 1ded10bd..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmaxa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/max/srowmaxa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmeana.c deleted file mode 120000 index 92b7bc50..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/srowmeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmina.c deleted file mode 120000 index 7800af39..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowmina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/min/srowmina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowsuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowsuma.c deleted file mode 120000 index daacd6e9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowsuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/srowsuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowvariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowvariancea.c deleted file mode 120000 index 156fde3d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/srowvariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/srowvariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssigna.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssigna.c deleted file mode 120000 index 90de0dc0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssigna.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/sign/ssigna.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssigns.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssigns.c deleted file mode 120000 index e7971eb8..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssigns.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/sign/ssigns.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssina.c deleted file mode 120000 index 751b6cfa..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sin/ssina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssinha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssinha.c deleted file mode 120000 index 50140041..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssinha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sinh/ssinha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssinhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssinhs.c deleted file mode 120000 index 6cd08ea3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssinhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sinh/ssinhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssins.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssins.c deleted file mode 120000 index a2395114..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssins.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sin/ssins.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sspec2a.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sspec2a.c deleted file mode 120000 index c3b7ff4b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sspec2a.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/spec2/sspec2a.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sspeca.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sspeca.c deleted file mode 120000 index 18131f46..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/sspeca.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/spec/sspeca.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssqrta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssqrta.c deleted file mode 120000 index f1fab625..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssqrta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sqrt/ssqrta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssqrts.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssqrts.c deleted file mode 120000 index 4c9506b0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssqrts.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sqrt/ssqrts.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssuma.c deleted file mode 120000 index 556a5c0d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ssuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/ssuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stana.c deleted file mode 120000 index 3184ee3a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tan/stana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stanha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stanha.c deleted file mode 120000 index 6b75e088..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stanha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tanh/stanha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stanhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stanhs.c deleted file mode 120000 index 456a2d10..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stanhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tanh/stanhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stans.c deleted file mode 120000 index 783a6398..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tan/stans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stracea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stracea.c deleted file mode 120000 index f44f824c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stracea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/trace/stracea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stransposea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stransposea.c deleted file mode 120000 index f760334c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/stransposea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/transpose/stransposea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/svariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/svariancea.c deleted file mode 120000 index dba5c828..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/svariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/svariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/szerosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/szerosa.c deleted file mode 120000 index b4d40ecf..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/szerosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/zeros/szerosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zabsa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zabsa.c deleted file mode 120000 index 5e7ceb5e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zabsa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/abs/zabsa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zabss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zabss.c deleted file mode 120000 index 186261f8..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zabss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/abs/zabss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacosa.c deleted file mode 120000 index 0cb8acb3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acos/zacosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacosha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacosha.c deleted file mode 120000 index 77baae14..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacosha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acosh/zacosha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacoshs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacoshs.c deleted file mode 120000 index 99b8f459..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacoshs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acosh/zacoshs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacoss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacoss.c deleted file mode 120000 index 724bb1b7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zacoss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/acos/zacoss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zadda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zadda.c deleted file mode 120000 index 7ced992b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zadda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/addition/zadda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zadds.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zadds.c deleted file mode 120000 index 4545c1aa..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zadds.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/addition/zadds.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasina.c deleted file mode 120000 index df5f1d55..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asin/zasina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasinha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasinha.c deleted file mode 120000 index 36123c2b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasinha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asinh/zasinha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasinhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasinhs.c deleted file mode 120000 index 215d5ef6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasinhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asinh/zasinhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasins.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasins.c deleted file mode 120000 index fc9ed815..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zasins.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/asin/zasins.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatana.c deleted file mode 120000 index a83d4e99..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan/zatana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatanha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatanha.c deleted file mode 120000 index 1d3de403..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatanha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atanh/zatanha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatanhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatanhs.c deleted file mode 120000 index 394f6a85..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatanhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atanh/zatanhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatans.c deleted file mode 120000 index f8193d9a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zatans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/atan/zatans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcata.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcata.c deleted file mode 120000 index 311241c3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcata.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/cat/zcata.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcats.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcats.c deleted file mode 120000 index 984840a7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcats.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/cat/zcats.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zceila.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zceila.c deleted file mode 120000 index db3ea623..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zceila.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/ceil/zceila.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zceils.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zceils.c deleted file mode 120000 index 4cb0fa27..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zceils.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/ceil/zceils.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zchola.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zchola.c deleted file mode 120000 index 499b0688..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zchola.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/chol/zchola.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnfftshifta.c deleted file mode 120000 index 5200f8df..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/zcolumnfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnmeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnmeana.c deleted file mode 120000 index 6ad156f1..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnmeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/zcolumnmeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnsuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnsuma.c deleted file mode 120000 index 645a06e9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnsuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/zcolumnsuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnvariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnvariancea.c deleted file mode 120000 index 34e64fac..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcolumnvariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/zcolumnvariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconja.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconja.c deleted file mode 120000 index 5db06d50..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconja.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/conj/zconja.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconjs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconjs.c deleted file mode 120000 index 045f63a4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconjs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/conj/zconjs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconv2da.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconv2da.c deleted file mode 120000 index 4b2ed527..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconv2da.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/conv2d/zconv2da.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconva.c deleted file mode 120000 index 24d799db..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zconva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/conv/zconva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcosa.c deleted file mode 120000 index d812ded9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cos/zcosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcosha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcosha.c deleted file mode 120000 index 64a31d28..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcosha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cosh/zcosha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcoshs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcoshs.c deleted file mode 120000 index 053fe39b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcoshs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cosh/zcoshs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcoss.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcoss.c deleted file mode 120000 index af81b771..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zcoss.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/cos/zcoss.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdeterma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdeterma.c deleted file mode 120000 index 4e340e78..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdeterma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/determ/zdeterma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdiffa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdiffa.c deleted file mode 120000 index 02fb3ef7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdiffa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/subtraction/zdiffa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdiffs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdiffs.c deleted file mode 120000 index 0188cf45..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdiffs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/subtraction/zdiffs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdispa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdispa.c deleted file mode 120000 index 272aef34..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdispa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../string/disp/zdispa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdisps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdisps.c deleted file mode 120000 index 1b230c79..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zdisps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../string/disp/zdisps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexpa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexpa.c deleted file mode 120000 index 33c2f7b9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexpa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/exp/zexpa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexpma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexpma.c deleted file mode 120000 index 87a2a584..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexpma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/expm/zexpma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexps.c deleted file mode 120000 index 186c1398..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zexps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/exp/zexps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zeyea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zeyea.c deleted file mode 120000 index a181c1ce..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zeyea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/eye/zeyea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfftma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfftma.c deleted file mode 120000 index dd450010..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfftma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/zfftma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfftshifta.c deleted file mode 120000 index 85bfa625..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/zfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfilla.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfilla.c deleted file mode 120000 index f5be1c11..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfilla.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/fill/zfilla.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfind2da.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfind2da.c deleted file mode 120000 index 4a4d5e86..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfind2da.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/find2d/zfind2da.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfinda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfinda.c deleted file mode 120000 index eb455966..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfinda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/find/zfinda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfixa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfixa.c deleted file mode 120000 index dfb3ea86..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfixa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/fix/zfixa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfixs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfixs.c deleted file mode 120000 index f0b111e9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfixs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/fix/zfixs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfloora.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfloora.c deleted file mode 120000 index a12defe6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfloora.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/floor/zfloora.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfloors.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfloors.c deleted file mode 120000 index 3a844d94..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zfloors.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/floor/zfloors.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zifftma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zifftma.c deleted file mode 120000 index 9256d17c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zifftma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/zifftma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zimplicitLists.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zimplicitLists.c deleted file mode 120000 index 0d29358c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zimplicitLists.c +++ /dev/null @@ -1 +0,0 @@ -../../../../implicitList/zimplicitLists.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinfnorma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinfnorma.c deleted file mode 120000 index 3d8a8cfd..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinfnorma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/infiniteNorm/zinfnorma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinta.c deleted file mode 120000 index 5ccd6ffb..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/int/zinta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zints.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zints.c deleted file mode 120000 index a1c651ba..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zints.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/int/zints.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinverma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinverma.c deleted file mode 120000 index 3c60cc42..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zinverma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/inversion/zinverma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zisnana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zisnana.c deleted file mode 120000 index ab41da71..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zisnana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/isnan/zisnana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zisnans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zisnans.c deleted file mode 120000 index ab5c2992..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zisnans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/isnan/zisnans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldiva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldiva.c deleted file mode 120000 index 717daa66..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldiva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/zldiva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldivma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldivma.c deleted file mode 120000 index 1bae6dbe..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldivma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/division/zldivma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldivs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldivs.c deleted file mode 120000 index 22c86261..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zldivs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/zldivs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zleva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zleva.c deleted file mode 120000 index 95624244..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zleva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/lev/zleva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zleva2.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zleva2.c deleted file mode 120000 index 786add44..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zleva2.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/lev/zleva2.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog10a.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog10a.c deleted file mode 120000 index 0c548119..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog10a.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log10/zlog10a.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog10s.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog10s.c deleted file mode 120000 index a8671922..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog10s.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log10/zlog10s.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog1pa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog1pa.c deleted file mode 120000 index 7cc8c6b4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog1pa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log1p/zlog1pa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog1ps.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog1ps.c deleted file mode 120000 index 27dc9eb2..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlog1ps.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log1p/zlog1ps.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zloga.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zloga.c deleted file mode 120000 index 4dc8f437..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zloga.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log/zloga.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlogs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlogs.c deleted file mode 120000 index eb2add10..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zlogs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/log/zlogs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmeana.c deleted file mode 120000 index fa20c218..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/zmeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmula.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmula.c deleted file mode 120000 index 762ab912..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmula.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/multiplication/zmula.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmulma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmulma.c deleted file mode 120000 index f132f325..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmulma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/multiplication/zmulma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmuls.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmuls.c deleted file mode 120000 index f10cee6b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zmuls.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/multiplication/zmuls.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zonesa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zonesa.c deleted file mode 120000 index aafb5533..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zonesa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/ones/zonesa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpowa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpowa.c deleted file mode 120000 index 8843e900..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpowa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/pow/zpowa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpowma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpowma.c deleted file mode 120000 index 1f056952..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpowma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/powm/zpowma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpows.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpows.c deleted file mode 120000 index ab81249d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpows.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/pow/zpows.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpythags.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpythags.c deleted file mode 120000 index ca855fd8..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zpythags.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/pythag/zpythags.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdiva.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdiva.c deleted file mode 120000 index cd1ee28a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdiva.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/zrdiva.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdivma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdivma.c deleted file mode 120000 index 1a07baf6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdivma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/division/zrdivma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdivs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdivs.c deleted file mode 120000 index 0f3ecd18..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrdivs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/division/zrdivs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrounda.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrounda.c deleted file mode 120000 index f1215998..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrounda.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/round/zrounda.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrounds.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrounds.c deleted file mode 120000 index 055fba75..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrounds.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/round/zrounds.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowfftshifta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowfftshifta.c deleted file mode 120000 index 97508d24..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowfftshifta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fftshift/zrowfftshifta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowmeana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowmeana.c deleted file mode 120000 index 2442c97b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowmeana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/mean/zrowmeana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowsuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowsuma.c deleted file mode 120000 index 9fd46843..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowsuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/zrowsuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowvariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowvariancea.c deleted file mode 120000 index e1694944..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zrowvariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/zrowvariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsigna.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsigna.c deleted file mode 120000 index 24f6a8d7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsigna.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/sign/zsigna.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsigns.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsigns.c deleted file mode 120000 index e43ca4f8..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsigns.c +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/sign/zsigns.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsina.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsina.c deleted file mode 120000 index 60d3abe5..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsina.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sin/zsina.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsinha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsinha.c deleted file mode 120000 index 694d1f8f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsinha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sinh/zsinha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsinhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsinhs.c deleted file mode 120000 index 5bd6310b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsinhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sinh/zsinhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsins.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsins.c deleted file mode 120000 index c5ddb61c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsins.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sin/zsins.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zspec2a.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zspec2a.c deleted file mode 120000 index a79c7d50..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zspec2a.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/spec2/zspec2a.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zspeca.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zspeca.c deleted file mode 120000 index 30b973a7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zspeca.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/spec/zspeca.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsqrta.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsqrta.c deleted file mode 120000 index 00589be8..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsqrta.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sqrt/zsqrta.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsqrts.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsqrts.c deleted file mode 120000 index 45315968..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsqrts.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/sqrt/zsqrts.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsuma.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsuma.c deleted file mode 120000 index 9b68ffbf..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zsuma.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/sum/zsuma.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztana.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztana.c deleted file mode 120000 index 9da69c99..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztana.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tan/ztana.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztanha.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztanha.c deleted file mode 120000 index 51b91f90..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztanha.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tanh/ztanha.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztanhs.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztanhs.c deleted file mode 120000 index e754b5f9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztanhs.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tanh/ztanhs.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztans.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztans.c deleted file mode 120000 index 1d41d675..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztans.c +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/tan/ztans.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztracea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztracea.c deleted file mode 120000 index 05030a62..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztracea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/trace/ztracea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztransposea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztransposea.c deleted file mode 120000 index 26a4dab5..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/ztransposea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/transpose/ztransposea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zvariancea.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zvariancea.c deleted file mode 120000 index 3281cf17..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zvariancea.c +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/variance/zvariancea.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zzerosa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zzerosa.c deleted file mode 120000 index fd0f2025..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/zzerosa.c +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/zeros/zzerosa.c \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ConvertPrecision.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ConvertPrecision.h deleted file mode 100644 index 0546432d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ConvertPrecision.h +++ /dev/null @@ -1,18 +0,0 @@ -/* -** -*- C -*- -** -** ConvertPrecision.h -** Made by Raffaele Nutricato -** -** Copyright Raffaele Nutricato 2008 -*/ - -#ifndef __ConvertPrecision_H__ -#define __ConvertPrecision_H__ - - -double s0doubled0(float in); -void s2doubled2(float* in, int* inSize, double* out); -float d0floats0(double in); -void d2floats2(double* in, int* inSize, float* out); -#endif /* !__ConvertPrecision_H__ */ diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/FileManagement.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/FileManagement.h deleted file mode 100644 index 937a66ef..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/FileManagement.h +++ /dev/null @@ -1,13 +0,0 @@ -/* -** -*- C -*- -** -** FileManagement.c -** Made by Raffaele Nutricato -** -** -** Copyright Rubby Nutricato 2007 -** 31-dec-2007 -*/ - -#include -#include diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpEqual.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpEqual.h deleted file mode 100644 index da36059a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpEqual.h +++ /dev/null @@ -1,33 +0,0 @@ -/* -** -*- C -*- -** -** OpEqual.h -** Made by Raffaele Nutricato -** -** -*/ - -#ifndef __OPEQUAL_H__ -#define __OPEQUAL_H__ - -#include -#include "floatComplex.h" -#include "doubleComplex.h" - -/* -** Compute Opequal for different types . -*/ - -float sOpEquals1(float x); -double dOpEquals1(double x); -floatComplex c0OpEqualc0(floatComplex x); -doubleComplex z0OpEqualz0(doubleComplex x); -char g0OpEqualg0(char x); - -void sOpEquala1(float* x, int size, float* y); -void dOpEquala1(double* x, int size, double* y); -void c2OpEqualc2(floatComplex* x, int* xSize, floatComplex* y); -void z2OpEqualz2(doubleComplex* x, int* xSize, doubleComplex* y); -void g2OpEqualg2(char* x, int* xSize, char* y); - -#endif /* !__OPEQUAL_H__ */ diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpExt.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpExt.h deleted file mode 100644 index 7d8a77f7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/OpExt.h +++ /dev/null @@ -1,108 +0,0 @@ -/* -** -*- C -*- -** -** -** Made by Raffaele.Nutricato@tiscali.it -** -** Copyright Raffaele Nutricato -*/ - -/* - Modify by Arnaud Torset : 20/02/09 -*/ - -#ifndef __OPEXT_H__ -#define __OPEXT_H__ - -#define s2s0OpExts0(in1,size,in2) in1[in2-1]; -#define d2d0OpExtd0(in1,size,in2) in1[in2-1]; -#define c2s0OpExtc0(in1,size,in2) in1[in2-1]; -#define z2d0OpExtz0(in1,size,in2) in1[in2-1]; - - -#define s2s0s0OpExts0(in1,size,row,col) in1[(col-1)*size[0]+row-1]; -#define d2d0d0OpExtd0(in1,size,row,col) in1[(col-1)*size[0]+row-1]; -#define c2s0s0OpExtc0(in1,size,row,col) in1[(col-1)*size[0]+row-1]; -#define z2d0d0OpExtz0(in1,size,row,col) in1[(col-1)*size[0]+row-1]; - - -#define s2s2OpExts2(in1,size1,in2,size2,out) {int i;\ - for (i=0;i ok, we just have put the imaginary part to 0 - we assign a complex in a real array => ko, we can't enlarge the input matrix. So we just replace by the real part of the complex -*/ - -/* a(3)=2 */ -#define s2s0c0OpIns(in,size,indice,newVal) s2s0s0OpIns(in,size,indice,creals(newVal)) - -#define d2d0z0OpIns(in,size,indice,newVal) d2d0d0OpIns(in,size,indice,zreals(newVal)) - -#define c2s0s0OpIns(in,size,indice,newVal) c2s0c0OpIns(in,size,indice,FloatComplex(newVal,0)) - -#define z2d0d0OpIns(in,size,indice,newVal) z2d0z0OpIns(in,size,indice,DoubleComplex(newVal,0)) - - -/* a([1 2])=2 */ -#define s2s2c0OpIns(in,size1,indices,size2,newVal) s2s2s0OpIns(in,size1,indices,size2,creals(newVal)) - -#define d2d2z0OpIns(in,size1,indices,size2,newVal) d2d2d0OpIns(in,size1,indices,size2,zreals(newVal)) - -#define c2s2s0OpIns(in,size1,indices,size2,newVal) c2s2c0OpIns(in,size1,indices,size2,FloatComplex(newVal,0)) - -#define z2d2d0OpIns(in,size1,indices,size2,newVal) z2d2z0OpIns(in,size1,indices,size2,DoubleComplex(newVal,0)) - - -/* a([1 2])=[3,1] */ -#define s2s2c2OpIns(in,size1,indices,size2,newVals,size3) {int i;\ - for (i=0;i= in2) -void s2s0OpLogGes2(float* in1, int* in1Size, float in2, float* out); - -#define d0d0OpLogGed0(in1,in2) \ - (double) (in1 >= in2) -void d2d0OpLogGed2(double* in1, int* in1Size, double in2, double* out); - -/* we must have size1=size2 */ - -#define s2s2OpLogGes2(in1,size1,in2,size2,out) {int i;\ - for (i=0;i in2) -void s2s0OpLogGts2(float* in1, int* in1Size, float in2, float* out); - -#define d0d0OpLogGtd0(in1,in2) \ - (double) (in1 > in2) -void d2d0OpLogGtd2(double* in1, int* in1Size, double in2, double* out); - -/* we must have size1=size2 */ - -#define s2s2OpLogGts2(in1,size1,in2,size2,out) {int i;\ - for (i=0;i -** -** -** Copyright Raffaele Nutricato 2007 -*/ - -#ifndef __CONVOL_H__ -#define __CONVOL_H__ - -#include "SCI2CMacroInterface.h" -#endif /* !__CONVOL_H__ */ diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/SCI2Cfft.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/SCI2Cfft.h deleted file mode 100644 index f82b74b4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/SCI2Cfft.h +++ /dev/null @@ -1,16 +0,0 @@ -/* -** -*- C -*- -** -** OpDotSlash.c -** Made by Raffaele Nutricato -** -** -** Copyright Raffaele Nutricato 2007 -*/ - -#ifndef __SCI2CFFT_H__ -#define __SCI2CFFT_H__ - -#include "SCI2CMacroInterface.h" - -#endif /* !__SCI2CFFT_H__ */ diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/abs.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/abs.h deleted file mode 120000 index 1387cc9f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/abs.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/abs.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/acos.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/acos.h deleted file mode 120000 index cbfc40d5..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/acos.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/acos.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/acosh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/acosh.h deleted file mode 120000 index 929d11bd..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/acosh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/acosh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/addition.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/addition.h deleted file mode 120000 index 8c89d64c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/addition.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/includes/addition.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/asin.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/asin.h deleted file mode 120000 index 5736632f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/asin.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/asin.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/asinh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/asinh.h deleted file mode 120000 index 7b1f9484..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/asinh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/asinh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atan.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atan.h deleted file mode 120000 index cf79c5c6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atan.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/atan.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atan2.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atan2.h deleted file mode 120000 index d1ca9e00..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atan2.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/atan2.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atanh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atanh.h deleted file mode 120000 index f21af4bb..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/atanh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/atanh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/blas.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/blas.h deleted file mode 120000 index 9498a284..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/blas.h +++ /dev/null @@ -1 +0,0 @@ -../../../../includes/blas.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cat.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cat.h deleted file mode 120000 index 54b922f0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cat.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/cat.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ceil.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ceil.h deleted file mode 120000 index 78114a87..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ceil.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/ceil.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/chol.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/chol.h deleted file mode 120000 index 0b393ed6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/chol.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/chol.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conj.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conj.h deleted file mode 120000 index def5c5a5..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conj.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/conj.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/constant.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/constant.h deleted file mode 100644 index 9eb49544..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/constant.h +++ /dev/null @@ -1,27 +0,0 @@ -/* -** -*- C -*- -** -** constant.h -** Made by Bruno JOFRET -** -** Started on Fri Mar 30 12:03:14 2007 jofret -** Last update Mon Oct 22 17:23:08 2007 bruno -** -** Copyright INRIA 2007 -*/ - -#ifndef __CONSTANT_H__ -#define __CONSTANT_H__ - -#include -#define PI 3.1415826535 -#define SCI2C_PI 3.1415826535 -#define SCI2C_T 1 -#define SCI2C_F 0 -#define SCI2C_NAN nan("") -#define SCI2C_INF 1e100000 -#define SCI2C_IMG_C FloatComplex(0,1) -#define SCI2C_IMG_Z DoubleComplex(0,1) - -#endif /* !__CONSTANT_H__ */ - diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conv.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conv.h deleted file mode 120000 index d323a3e6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conv.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/includes/conv.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conv2d.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conv2d.h deleted file mode 120000 index f3e01eb8..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/conv2d.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/includes/conv2d.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cos.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cos.h deleted file mode 120000 index e409c8da..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cos.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/cos.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cosh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cosh.h deleted file mode 120000 index b7db43fb..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/cosh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/cosh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/determ.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/determ.h deleted file mode 120000 index d4c62a0b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/determ.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/determ.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/disp.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/disp.h deleted file mode 120000 index c4c72096..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/disp.h +++ /dev/null @@ -1 +0,0 @@ -../../../../string/includes/disp.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/division.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/division.h deleted file mode 120000 index 0d87390a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/division.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/includes/division.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/doubleComplex.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/doubleComplex.h deleted file mode 120000 index 7f90dd41..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/doubleComplex.h +++ /dev/null @@ -1 +0,0 @@ -../../../../type/doubleComplex.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/exp.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/exp.h deleted file mode 120000 index 5344e792..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/exp.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/exp.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/eye.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/eye.h deleted file mode 120000 index e1867359..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/eye.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/eye.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fft.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fft.h deleted file mode 120000 index ef9f3d6b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fft.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/includes/fft.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fft_internal.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fft_internal.h deleted file mode 120000 index 29af7eac..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fft_internal.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/fft/fft_internal.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fftshift.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fftshift.h deleted file mode 120000 index 8ecc2d06..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fftshift.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/includes/fftshift.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fill.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fill.h deleted file mode 120000 index 4c641311..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fill.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/fill.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/find.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/find.h deleted file mode 120000 index 098fd52c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/find.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/find.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/find2d.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/find2d.h deleted file mode 120000 index a5ea1dc7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/find2d.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/find2d.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fix.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fix.h deleted file mode 120000 index cd0aabc8..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/fix.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/fix.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/floatComplex.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/floatComplex.h deleted file mode 120000 index 77e12f4c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/floatComplex.h +++ /dev/null @@ -1 +0,0 @@ -../../../../type/floatComplex.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/floor.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/floor.h deleted file mode 120000 index cd651884..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/floor.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/floor.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/frexp.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/frexp.h deleted file mode 120000 index 2a84b770..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/frexp.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/frexp.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ifft.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ifft.h deleted file mode 120000 index ba21dc8b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ifft.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/includes/ifft.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ifft_internal.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ifft_internal.h deleted file mode 120000 index 61a2163b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ifft_internal.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/ifft/ifft_internal.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/implicitList.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/implicitList.h deleted file mode 120000 index 59caf9a3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/implicitList.h +++ /dev/null @@ -1 +0,0 @@ -../../../../implicitList/implicitList.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/infiniteNorm.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/infiniteNorm.h deleted file mode 120000 index 49a1772b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/infiniteNorm.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/infiniteNorm.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/int.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/int.h deleted file mode 120000 index 44e78980..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/int.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/int.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/isempty.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/isempty.h deleted file mode 120000 index 178edb0b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/isempty.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/isempty.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/isnan.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/isnan.h deleted file mode 120000 index f844341e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/isnan.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/isnan.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lapack.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lapack.h deleted file mode 120000 index b21af188..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lapack.h +++ /dev/null @@ -1 +0,0 @@ -../../../../includes/lapack.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/length.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/length.h deleted file mode 120000 index e091b460..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/length.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/length.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lev.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lev.h deleted file mode 120000 index d4ca1d58..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lev.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/includes/lev.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lnp1m1.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lnp1m1.h deleted file mode 120000 index c2b5f880..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/lnp1m1.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/lnp1m1.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log.h deleted file mode 120000 index 23706d33..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/log.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log10.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log10.h deleted file mode 120000 index 6aa0c2f9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log10.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/log10.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log1p.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log1p.h deleted file mode 120000 index 3ae03e9f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/log1p.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/log1p.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/machine.h.in b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/machine.h.in deleted file mode 100644 index 52ed2d07..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/machine.h.in +++ /dev/null @@ -1,141 +0,0 @@ -/* includes/machine.h.in. Generated from configure.ac by autoheader. */ - -#ifndef MACHINE_H -#define MACHINE_H - - - -/* Define C2F without Trailing Underscore */ -#undef C2F - -/* Cname */ -#undef CNAME - -/* Define C2F without Trailing Underscore */ -#undef F2C - -/* Define to 1 if your Fortran compiler doesn't accept -c and -o together. */ -#undef F77_NO_MINUS_C_MINUS_O - -/* Define to 1 if you have the header file. */ -#undef HAVE_COMPLEX_H - -/* Define to 1 if you have the header file. */ -#undef HAVE_INTTYPES_H - -/* Define to 1 if you have the header file. */ -#undef HAVE_MEMORY_H - -/* Define to 1 if stdbool.h conforms to C99. */ -#undef HAVE_STDBOOL_H - -/* Define to 1 if you have the header file. */ -#undef HAVE_STDINT_H - -/* Define to 1 if you have the header file. */ -#undef HAVE_STDLIB_H - -/* Define to 1 if you have the header file. */ -#undef HAVE_STRINGS_H - -/* Define to 1 if you have the header file. */ -#undef HAVE_STRING_H - -/* Define to 1 if you have the header file. */ -#undef HAVE_SYS_STAT_H - -/* Define to 1 if you have the header file. */ -#undef HAVE_SYS_TYPES_H - -/* Define to 1 if you have the header file. */ -#undef HAVE_UNISTD_H - -/* Define to 1 if the system has the type `_Bool'. */ -#undef HAVE__BOOL - -/* Define to 1 if your C compiler doesn't accept -c and -o together. */ -#undef NO_MINUS_C_MINUS_O - -/* Name of package */ -#undef PACKAGE - -/* Define to the address where bug reports for this package should be sent. */ -#undef PACKAGE_BUGREPORT - -/* Define to the full name of this package. */ -#undef PACKAGE_NAME - -/* Define to the full name and version of this package. */ -#undef PACKAGE_STRING - -/* Define to the one symbol short name of this package. */ -#undef PACKAGE_TARNAME - -/* Define to the version of this package. */ -#undef PACKAGE_VERSION - -/* Define to 1 if you have the ANSI C header files. */ -#undef STDC_HEADERS - -/* Version number of package */ -#undef VERSION - -/* With the Atlas Lib */ -#undef WITH_ATLAS - -/* If leading underscores */ -#undef WLU - -/* If trailing underscores */ -#undef WTU - - -/* - Define integer C type which must fit Fortran integer - For Scilab to work, the rule is: - size of Fortran double precision = 2 * size of Fortran integer - - At the present time, we suppose: - size of Fortran integer = 4 bytes - size of Fortran double precision = 8 bytes - size of C int = 4 bytes -*/ - -typedef int integer; - -/* define boolean type */ -#ifdef BOOL - #undef BOOL -#endif - -typedef int BOOL ; - -#ifdef TRUE - #undef TRUE -#endif -#define TRUE 1 - -#ifdef FALSE - #undef FALSE -#endif -#define FALSE 0 - -/* params.h */ -#ifdef __STDC__ -#ifndef __PARAMS -#define __PARAMS(paramlist) paramlist -#endif -#ifndef _PARAMS -#define _PARAMS(paramlist) paramlist -#endif -#else -#ifndef __PARAMS -#define __PARAMS(paramlist) () -#endif -#ifndef _PARAMS -#define _PARAMS(paramlist) () -#endif -#endif - -#endif /* MACHINE_H */ - diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixDivision.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixDivision.h deleted file mode 120000 index acb3c0b4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixDivision.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/matrixDivision.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixExponential.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixExponential.h deleted file mode 120000 index b40adde2..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixExponential.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/matrixExponential.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixInversion.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixInversion.h deleted file mode 120000 index e090fdd0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixInversion.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/matrixInversion.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixMultiplication.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixMultiplication.h deleted file mode 120000 index 54998c7c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixMultiplication.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/matrixMultiplication.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixPow.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixPow.h deleted file mode 120000 index af620797..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixPow.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/matrixPow.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixTrace.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixTrace.h deleted file mode 120000 index f539ff4d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixTrace.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/matrixTrace.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixTranspose.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixTranspose.h deleted file mode 120000 index cfddaffc..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/matrixTranspose.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/matrixTranspose.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/max.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/max.h deleted file mode 120000 index 08554e0f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/max.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/max.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/mean.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/mean.h deleted file mode 120000 index d2b1fa00..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/mean.h +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/includes/mean.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/min.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/min.h deleted file mode 120000 index df4d6df9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/min.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/min.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/multiplication.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/multiplication.h deleted file mode 120000 index 9365ff9b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/multiplication.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/includes/multiplication.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/notFound.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/notFound.h deleted file mode 100644 index 59d8c2fe..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/notFound.h +++ /dev/null @@ -1,18 +0,0 @@ -/* -** -*- C -*- -** -** notFound.h -** Made by Bruno JOFRET -** -** Started on Thu Feb 8 10:12:17 2007 jofret -** Last update Tue Feb 13 17:16:47 2007 jofret -** -** Copyright INRIA 2007 -*/ - -#ifndef __NOT_FOUND_H__ -#define __NOT_FOUND_H__ - -#define NOT_FOUND -1 - -#endif /* !__NOT_FOUND_H__ */ diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ones.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ones.h deleted file mode 120000 index f33d47f2..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/ones.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/ones.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/pow.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/pow.h deleted file mode 120000 index 0cd50149..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/pow.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/pow.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/pythag.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/pythag.h deleted file mode 120000 index 17f53062..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/pythag.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/pythag.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/round.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/round.h deleted file mode 120000 index d0c7ce4a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/round.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/round.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sci2clib.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sci2clib.h deleted file mode 100644 index 7c1e9dcc..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sci2clib.h +++ /dev/null @@ -1,264 +0,0 @@ -#define SCI2Cint int -#include -#include -#include -#include "SCI2CMacroInterface.h" -#include "constant.h" -#include "notFound.h" -#include "doubleComplex.h" -#include "floatComplex.h" -#include "RealToComplex.h" -#include "OpEqual.h" -#include "OpIns.h" -#include "OpExt.h" -#include "FileManagement.h" -#include "OpLogNe.h" -#include "OpLogGt.h" -#include "OpLogLt.h" -#include "OpLogGe.h" -#include "OpLogLe.h" -#include "OpLogEq.h" -#include "OpLogOr.h" -#include "OpLogAnd.h" -#include "OpLogNot.h" -#include "ConvertPrecision.h" - - -/* LIB */ -/* interfacing lapack */ -#include "lapack.h" -/* interfacing blas */ -#include "blas.h" - -/* AUXILIARY FUNCTIONS */ - -/* interfacing abs */ -#include "abs.h" -#include "int_abs.h" -/* interfacing conj */ -#include "conj.h" -#include "int_conj.h" -/* interfacing disp */ -#include "disp.h" -#include "int_disp.h" -/* interfacing find */ -#include "find.h" -#include "find2d.h" -#include "int_find.h" -/* interfacing frexp */ -#include "frexp.h" -/* interfacing isempty */ -#include "isempty.h" -#include "int_isempty.h" -/* interfacing isnan */ -#include "isnan.h" -#include "int_isnan.h" -/* interfacing length */ -#include "length.h" -#include "int_length.h" -/* interfacing max */ -#include "max.h" -#include "int_max.h" -/* interfacing min */ -#include "min.h" -#include "int_min.h" -/* interfacing pythag */ -#include "pythag.h" -/* interfacing sign */ -#include "sign.h" -#include "int_sign.h" -/* interfacing size */ -#include "size.h" -#include "int_size.h" -/* interfacing type */ -#include "type.h" -#include "int_type.h" - -/* ELEMENTARY FUNCTIONS */ - -/* interfacing acos */ -#include "acos.h" -#include "int_acos.h" -/* interfacing acosh */ -#include "acosh.h" -#include "int_acosh.h" -/* interfacing asin */ -#include "asin.h" -#include "int_asin.h" -/* interfacing asinh */ -#include "asinh.h" -#include "int_asinh.h" -/* interfacing atan */ -#include "atan.h" -#include "atan2.h" -#include "int_atan.h" -/* interfacing atanh */ -#include "atanh.h" -#include "int_atanh.h" -/* interfacing cos */ -#include "cos.h" -#include "int_cos.h" -/* interfacing ceil */ -#include "ceil.h" -#include "int_ceil.h" -/* interfacing cosh */ -#include "cosh.h" -#include "int_cosh.h" -/* interfacing exp */ -#include "exp.h" -#include "int_exp.h" -/* interfacing fix */ -#include "fix.h" -#include "int_fix.h" -/* interfacing floor */ -#include "floor.h" -#include "int_floor.h" -/* interfacing int */ -#include "int.h" -#include "int_int.h" -/* interfacing lnp1m1 */ -#include "lnp1m1.h" -/* interfacing log */ -#include "log.h" -#include "int_log.h" -/* interfacing log10 */ -#include "log10.h" -#include "int_log10.h" -/* interfacing log1p */ -#include "log1p.h" -#include "int_log1p.h" -/* interfacing pow */ -#include "pow.h" -#include "matrixPow.h" -#include "int_OpHat.h" -#include "int_OpDotHat.h" -/* interfacing round */ -#include "round.h" -#include "int_round.h" -/* interfacing sin */ -#include "sin.h" -#include "int_sin.h" -/* interfacing sinh */ -#include "sinh.h" -#include "int_sinh.h" -/* interfacing sqrt */ -#include "sqrt.h" -#include "int_sqrt.h" -/* interfacing tan */ -#include "tan.h" -#include "int_tan.h" -/* interfacing tanh */ -#include "tanh.h" -#include "int_tanh.h" - -/* IMPLICIT LISTS */ -/* interfacing implicitList/OpColon */ -#include "implicitList.h" -#include "int_OpColon.h" - - -/* OPERATIONS */ -/* interfacing addition */ -#include "addition.h" -#include "int_OpPlus.h" /* interfacing subtraction */ -#include "subtraction.h" -#include "int_OpMinus.h" /* interfacing multiplication */ -#include "multiplication.h" -#include "matrixMultiplication.h" -#include "int_OpStar.h" -#include "int_OpDotStar.h" -/* interfacing division */ -#include "division.h" -#include "matrixDivision.h" -#include "int_OpSlash.h" -#include "int_OpDotSlash.h" -#include "int_OpBackSlash.h" -#include "int_OpDotBackSlash.h" - - - -/* MATRIX OPERATIONS */ -/* interfacing cat */ -#include "cat.h" -#include "int_OpRc.h" -#include "int_OpCc.h" -/* interfacing chol */ -#include "chol.h" -#include "int_chol.h" -/* interfacing determinant */ -#include "determ.h" -#include "int_det.h" -/* interfacing expm */ -#include "matrixExponential.h" -#include "int_expm.h" -/* interfacing eye */ -#include "eye.h" -#include "int_eye.h" -/* interfacing fill */ -#include "fill.h" -/* interfacing inversion */ -#include "matrixInversion.h" -#include "int_invert.h" -/* interfacing infinite norm */ -#include "infiniteNorm.h" /* interfacing ones */ -#include "ones.h" -#include "int_ones.h" -/* interfacing spec */ -#include "spec.h" -#include "int_spec.h" -/* interfacing trace */ -#include "matrixTrace.h" -#include "int_trace.h" -/* interfacing tranpose */ -#include "matrixTranspose.h" -#include "int_OpApex.h" -#include "int_OpDotApex.h" /* interfacing zeros */ -#include "zeros.h" -#include "int_zeros.h" - - - -/* SIGNAL PROCESSING */ -/* interfacing convol */ -#include "conv.h" -#include "conv2d.h" -#include "int_convol.h" -/* interfacing fft */ -#include "fft.h" -#include "fft_internal.h" -#include "int_fft.h" -/* interfacing fftshift */ -#include "fftshift.h" -#include "int_fftshift.h" -/* interfacing ifft */ -#include "ifft.h" -#include "ifft_internal.h" -#include "int_ifft.h" -/* interfacing lev */ -#include "lev.h" -#include "int_lev.h" - - - -/* STATISTICS FUNCTIONS */ - -/* interfacing max */ -#include "statMax.h" -/* interfacing min */ -#include "statMin.h" -/* interfacing mean */ -#include "mean.h" -#include "int_mean.h" -/* interfacing sum */ -#include "sum.h" -#include "int_sum.h" -/* interfacing variance */ -#include "variance.h" -#include "int_variance.h" - -/* TYPE */ -/* interfacing real */ -#include "int_real.h" -/* interfacing imag */ -#include "int_imag.h" - diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sign.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sign.h deleted file mode 120000 index 8d716662..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sign.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/sign.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sin.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sin.h deleted file mode 120000 index f2f41de3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sin.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/sin.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sinh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sinh.h deleted file mode 120000 index fda6cad4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sinh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/sinh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/size.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/size.h deleted file mode 120000 index a3c8a9c9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/size.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/size.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/spec.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/spec.h deleted file mode 120000 index 371b2959..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/spec.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/spec.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sqrt.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sqrt.h deleted file mode 120000 index 9a74c930..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sqrt.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/sqrt.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/statMax.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/statMax.h deleted file mode 120000 index ec2724f6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/statMax.h +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/includes/statMax.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/statMin.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/statMin.h deleted file mode 120000 index 9d970e76..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/statMin.h +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/includes/statMin.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/subtraction.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/subtraction.h deleted file mode 120000 index b25d3844..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/subtraction.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/includes/subtraction.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sum.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sum.h deleted file mode 120000 index 12ea21d1..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/sum.h +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/includes/sum.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/tan.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/tan.h deleted file mode 120000 index b38d0d84..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/tan.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/tan.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/tanh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/tanh.h deleted file mode 120000 index dfa8dbbd..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/tanh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/includes/tanh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/type.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/type.h deleted file mode 120000 index d17faeab..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/type.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/includes/type.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/variance.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/variance.h deleted file mode 120000 index 1a578cdd..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/variance.h +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/includes/variance.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/zeros.h b/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/zeros.h deleted file mode 120000 index 2756152b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cincludes/zeros.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/includes/zeros.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpApex.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpApex.h deleted file mode 120000 index d28683e9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpApex.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_OpApex.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpBackSlash.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpBackSlash.h deleted file mode 120000 index c0d3714d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpBackSlash.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/interface/int_OpBackSlash.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpCc.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpCc.h deleted file mode 120000 index 03e9de7e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpCc.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_OpCc.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpColon.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpColon.h deleted file mode 120000 index 2f77a3d2..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpColon.h +++ /dev/null @@ -1 +0,0 @@ -../../../../implicitList/int_OpColon.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotApex.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotApex.h deleted file mode 120000 index f34768f0..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotApex.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_OpDotApex.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotBackSlash.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotBackSlash.h deleted file mode 120000 index eb488541..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotBackSlash.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/interface/int_OpDotBackSlash.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotHat.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotHat.h deleted file mode 120000 index 44bc6191..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotHat.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_OpDotHat.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotSlash.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotSlash.h deleted file mode 120000 index 503bdb6b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotSlash.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/interface/int_OpDotSlash.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotStar.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotStar.h deleted file mode 120000 index 0c98273c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpDotStar.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/interface/int_OpDotStar.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpHat.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpHat.h deleted file mode 120000 index 56152d0e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpHat.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_OpHat.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpMinus.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpMinus.h deleted file mode 120000 index 9d45ad34..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpMinus.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/interface/int_OpMinus.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpPlus.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpPlus.h deleted file mode 120000 index 738e0dfe..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpPlus.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/interface/int_OpPlus.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpRc.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpRc.h deleted file mode 120000 index dab90e02..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpRc.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_OpRc.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpSlash.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpSlash.h deleted file mode 120000 index 6b2f8b80..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpSlash.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/interface/int_OpSlash.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpStar.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpStar.h deleted file mode 120000 index dc50199d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_OpStar.h +++ /dev/null @@ -1 +0,0 @@ -../../../../operations/interface/int_OpStar.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_abs.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_abs.h deleted file mode 120000 index 4297d73c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_abs.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/interfaces/int_abs.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_acos.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_acos.h deleted file mode 120000 index 281b1eb7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_acos.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_acos.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_acosh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_acosh.h deleted file mode 120000 index 8d7e0b27..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_acosh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_acosh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_asin.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_asin.h deleted file mode 120000 index e89b55ad..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_asin.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_asin.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_asinh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_asinh.h deleted file mode 120000 index 6e317d78..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_asinh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_asinh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_atan.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_atan.h deleted file mode 120000 index 90ebef80..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_atan.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_atan.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_atanh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_atanh.h deleted file mode 120000 index e0df5492..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_atanh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_atanh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ceil.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ceil.h deleted file mode 120000 index 8ba81886..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ceil.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_ceil.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_chol.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_chol.h deleted file mode 120000 index 84e4dbb8..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_chol.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_chol.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_conj.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_conj.h deleted file mode 120000 index badd484b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_conj.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/interfaces/int_conj.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_convol.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_convol.h deleted file mode 120000 index 836535ba..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_convol.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/interfaces/int_convol.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_cos.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_cos.h deleted file mode 120000 index d294ae2f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_cos.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_cos.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_cosh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_cosh.h deleted file mode 120000 index e054a9c4..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_cosh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_cosh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_det.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_det.h deleted file mode 120000 index 9f97d9ee..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_det.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_det.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_disp.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_disp.h deleted file mode 120000 index 3188b71e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_disp.h +++ /dev/null @@ -1 +0,0 @@ -../../../../string/interfaces/int_disp.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_exp.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_exp.h deleted file mode 120000 index dea183c6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_exp.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_exp.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_expm.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_expm.h deleted file mode 120000 index acbbfc3e..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_expm.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_expm.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_eye.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_eye.h deleted file mode 120000 index 81a0b2c6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_eye.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_eye.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fft.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fft.h deleted file mode 120000 index 29e925a7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fft.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/interfaces/int_fft.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fftshift.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fftshift.h deleted file mode 120000 index fddc314c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fftshift.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/interfaces/int_fftshift.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_find.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_find.h deleted file mode 120000 index f53da5aa..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_find.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/interfaces/int_find.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fix.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fix.h deleted file mode 120000 index 0066a7b6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_fix.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_fix.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_floor.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_floor.h deleted file mode 120000 index a588e912..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_floor.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_floor.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ifft.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ifft.h deleted file mode 120000 index e422746b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ifft.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/interfaces/int_ifft.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_imag.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_imag.h deleted file mode 120000 index 3fcea215..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_imag.h +++ /dev/null @@ -1 +0,0 @@ -../../../../type/int_imag.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_int.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_int.h deleted file mode 120000 index 97b92282..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_int.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_int.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_invert.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_invert.h deleted file mode 120000 index b2c93931..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_invert.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_invert.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_isempty.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_isempty.h deleted file mode 120000 index 80ea1968..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_isempty.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/interfaces/int_isempty.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_isnan.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_isnan.h deleted file mode 120000 index 2fbc5064..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_isnan.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/interfaces/int_isnan.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_length.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_length.h deleted file mode 120000 index c1960e1c..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_length.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/interfaces/int_length.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_lev.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_lev.h deleted file mode 120000 index ff49b4d3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_lev.h +++ /dev/null @@ -1 +0,0 @@ -../../../../signalProcessing/interfaces/int_lev.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log.h deleted file mode 120000 index ebd51cae..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_log.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log10.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log10.h deleted file mode 120000 index e8c603fb..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log10.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_log10.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log1p.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log1p.h deleted file mode 120000 index 14b599b3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_log1p.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_log1p.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_max.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_max.h deleted file mode 120000 index 42598690..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_max.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/interfaces/int_max.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_mean.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_mean.h deleted file mode 120000 index ec090d8b..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_mean.h +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/interfaces/int_mean.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_min.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_min.h deleted file mode 120000 index 0ac089e9..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_min.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/interfaces/int_min.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ones.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ones.h deleted file mode 120000 index 8fffa016..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_ones.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_ones.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_real.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_real.h deleted file mode 120000 index 5651ef5d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_real.h +++ /dev/null @@ -1 +0,0 @@ -../../../../type/int_real.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_round.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_round.h deleted file mode 120000 index 57b722a3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_round.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_round.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sign.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sign.h deleted file mode 120000 index 925a77b7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sign.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/interfaces/int_sign.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sin.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sin.h deleted file mode 120000 index a9341189..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sin.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_sin.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sinh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sinh.h deleted file mode 120000 index c52f9e72..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sinh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_sinh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_size.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_size.h deleted file mode 120000 index 04565716..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_size.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/interfaces/int_size.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_spec.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_spec.h deleted file mode 120000 index 91cbc52f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_spec.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_spec.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sqrt.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sqrt.h deleted file mode 120000 index 0dab9c85..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sqrt.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_sqrt.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sum.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sum.h deleted file mode 120000 index e4a8a952..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_sum.h +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/interfaces/int_sum.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_tan.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_tan.h deleted file mode 120000 index 19ffff9d..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_tan.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_tan.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_tanh.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_tanh.h deleted file mode 120000 index d4f8b910..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_tanh.h +++ /dev/null @@ -1 +0,0 @@ -../../../../elementaryFunctions/interfaces/int_tanh.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_trace.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_trace.h deleted file mode 120000 index b8b9dfc3..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_trace.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_trace.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_type.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_type.h deleted file mode 120000 index 95f80b5a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_type.h +++ /dev/null @@ -1 +0,0 @@ -../../../../auxiliaryFunctions/interfaces/int_type.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_variance.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_variance.h deleted file mode 120000 index c7c33e2a..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_variance.h +++ /dev/null @@ -1 +0,0 @@ -../../../../statisticsFunctions/interfaces/int_variance.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_zeros.h b/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_zeros.h deleted file mode 120000 index ed9a9da6..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cinterfaces/int_zeros.h +++ /dev/null @@ -1 +0,0 @@ -../../../../matrixOperations/interfaces/int_zeros.h \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2cobj/readme.txt b/src/Scilab2C/Scilab2C/CFiles/sci2cobj/readme.txt deleted file mode 100644 index 54f467f7..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2cobj/readme.txt +++ /dev/null @@ -1,2 +0,0 @@ -for the moment the makefile generates the obj files in -the source directory where .c files are stored. \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/ErrorMessages/EM_NanSize.sci b/src/Scilab2C/Scilab2C/ErrorMessages/EM_NanSize.sci deleted file mode 100644 index 2595a32b..00000000 --- a/src/Scilab2C/Scilab2C/ErrorMessages/EM_NanSize.sci +++ /dev/null @@ -1,82 +0,0 @@ -function EM_NanSize(ReportFileName) -// function EM_NanSize(ReportFileName) -// ----------------------------------------------------------------- -// -// Input data: -// //NUT: Add description here -// -// Output data: -// //NUT: Add description here -// -// Status: -// 13-Feb-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -PrintStringInfo(' ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Cannot initialize a local or global variable with a variable value',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: coming from a function or an operation.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: See code below:',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: a = 10;',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: b = 10;',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: c = a+b;',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: D = zeros(a,b); // Allowed',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: E = zeros(10,b); // Allowed',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: F = zeros(10,5); // Allowed',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: G = zeros(10,c); // Not Allowed because c value is not known at transation time.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: H = 10:c:9;// Not Allowed because c value is not known at transation time.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: The same problem arises in for loops.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: SCI2C forbids use of step values in ""for"" loops which come from ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: a function or an operation.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Always specify its value.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Example: ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Scilab Code:',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: unkstep = 2*cos(0); // It means that unkstep is not known at translation time.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for cnt=10:unkstep:1',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: end',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: The code above is not allowed. You can change it as shown below:',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: unkstep = 2; // This time the value of unkstep is known at translation time.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for cnt=10:unkstep:1',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: end',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: The reason for this limitation is related to the impossibility to generate optimized C code.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: when the step is unknown.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Look at the following example for more details,',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Scilab Code:;',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for cnt=10:unkstep:1',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: end',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: If unkstep variable value is unkwnown it is not possible to generate',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: optimized C code.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Infact, if unkstep is >= 0, the correct C code is:',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for (cnt=10;cnt<=1;cnt+=unkstep)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt);',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: If unkstep is < 0 the correct C code is:',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for (cnt=10; cnt>=1; cnt+=unkstep)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt);',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Note how the condition cnt<=1 changes to cnt>=1.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: In order to take into account of this possibility ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: SCI2C translator should generate both codes and then ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: insert them into an if/else block as shown here: ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: if (unkstep >= 0)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: {',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for (cnt=10;cnt<=1;cnt+=unkstep)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt);',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: }',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: else{',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: {',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for (cnt=10;cnt<=1;cnt+=unkstep)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt);',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: }',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Of course it is not optimized C code.',ReportFileName,'both','y'); -PrintStringInfo(' ',ReportFileName,'both','y'); -SCI2Cerror(' '); -endfunction diff --git a/src/Scilab2C/Scilab2C/ErrorMessages/EM_UnknownStep.sci b/src/Scilab2C/Scilab2C/ErrorMessages/EM_UnknownStep.sci deleted file mode 100644 index 9f8d39e7..00000000 --- a/src/Scilab2C/Scilab2C/ErrorMessages/EM_UnknownStep.sci +++ /dev/null @@ -1,70 +0,0 @@ -function EM_UnknownStep(ReportFileName) -// function EM_UnknownStep(ReportFileName) -// ----------------------------------------------------------------- -// -// Input data: -// //NUT: Add description here -// -// Output data: -// //NUT: Add description here -// -// Status: -// 13-Feb-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -PrintStringInfo(' ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: SCI2C forbids use of step values in ""for"" loops which come from ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: a function or an operation.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Always specify its value.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Example: ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Scilab Code:',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: unkstep = 2*cos(0); // It means that unkstep is not known at translation time.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for cnt=10:unkstep:1',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: end',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: The code above is not allowed. You can change it as shown below:',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: unkstep = 2; // This time the value of unkstep is known at translation time.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for cnt=10:unkstep:1',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: end',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: The reason for this limitation is related to the impossibility to generate optimized C code.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: when the step is unknown.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Look at the following example for more details,',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Scilab Code:;',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for cnt=10:unkstep:1',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: end',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: If unkstep variable value is unkwnown it is not possible to generate',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: optimized C code.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Infact, if unkstep is >= 0, the correct C code is:',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for (cnt=10;cnt<=1;cnt+=unkstep)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt);',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: If unkstep is < 0 the correct C code is:',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for (cnt=10; cnt>=1; cnt+=unkstep)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt);',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Note how the condition cnt<=1 changes to cnt>=1.',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: In order to take into account of this possibility ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: SCI2C translator should generate both codes and then ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: insert them into an if/else block as shown here: ',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: if (unkstep >= 0)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: {',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for (cnt=10;cnt<=1;cnt+=unkstep)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt);',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: }',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: else{',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: {',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: for (cnt=10;cnt<=1;cnt+=unkstep)',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: disp(cnt);',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: }',ReportFileName,'both','y'); -PrintStringInfo('SCI2CERROR: Of course it is not optimized C code.',ReportFileName,'both','y'); -PrintStringInfo(' ',ReportFileName,'both','y'); -SCI2Cerror(' '); -endfunction diff --git a/src/Scilab2C/Scilab2C/ErrorMessages/EM_ZeroSize.sci b/src/Scilab2C/Scilab2C/ErrorMessages/EM_ZeroSize.sci deleted file mode 100644 index fede8f0d..00000000 --- a/src/Scilab2C/Scilab2C/ErrorMessages/EM_ZeroSize.sci +++ /dev/null @@ -1,27 +0,0 @@ -function EM_ZeroSize(ReportFileName) -// function EM_ZeroSize(ReportFileName) -// ----------------------------------------------------------------- -// -// Input data: -// //NUT: Add description here -// -// Output data: -// //NUT: Add description here -// -// Status: -// 13-Feb-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -PrintStringInfo('SCI2CERROR: Cannot handle zero-size arrays.',ReportFileName,'both','y'); -PrintStringInfo(' ',ReportFileName,'both','y'); -SCI2Cerror(' '); - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_ADD.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_ADD.sci deleted file mode 100644 index 1973f8d7..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_ADD.sci +++ /dev/null @@ -1,43 +0,0 @@ -function opout = FA_ADD(in1,in2) -// function opout = FA_ADD(in1,in2) -// ----------------------------------------------------------------- -// Addition function for Function Annotations. -// -// Input data: -// in1: string specifying a number or a symbol. -// in2: string specifying a number or a symbol. -// -// Output data: -// opout: string containing the computed result. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -if (SCI2Cisnum(in1) & SCI2Cisnum(in2)) - in1num = eval(in1); - in2num = eval(in2); - outnum = in1num+in2num; - if isnan(outnum) - opout = '__SCI2CNANSIZE'; - else - opout = string(outnum); - end -else - opout = string('('+in1+'+'+in2+')'); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_DIV.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_DIV.sci deleted file mode 100644 index bce6966d..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_DIV.sci +++ /dev/null @@ -1,41 +0,0 @@ -function opout = FA_DIV(in1,in2) -// function opout = FA_DIV(in1,in2) -// ----------------------------------------------------------------- -// Division function for Function Annotations. -// -// Input data: -// in1: string specifying a number or a symbol. -// in2: string specifying a number or a symbol. -// -// Output data: -// opout: string containing the computed result. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -if (SCI2Cisnum(in1) & SCI2Cisnum(in2)) - in1num = eval(in1); - in2num = eval(in2); - outnum = in1num/in2num; - if isnan(outnum) - opout = '__SCI2CNANSIZE'; - else - opout = string(outnum); - end -else - opout = '('+string(in1)+'/'+string(in2)+')'; -end -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetDefaultPrecision.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetDefaultPrecision.sci deleted file mode 100644 index 3afe2648..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetDefaultPrecision.sci +++ /dev/null @@ -1,86 +0,0 @@ -function defaultprecision = FA_GetDefaultPrecision(scifilename,ReportFileName) -// function defaultprecision = FA_GetDefaultPrecision(scifilename,ReportFileName) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Extracts the default precision for the file .sci passed in input. -// The following annotation will be searched in the scilab code: -// //SCI2C: DEFAULT_PRECISION= FLOAT -// //SCI2C: DEFAULT_PRECISION= DOUBLE -// If the annotation is missing the default DOUBLE precision will be -// implicitly used. -// #RNU_RES_E -// -// Input data: -// --- -// -// Output data: -// defaultprecision: string which specifies the default precision to be -// used in the translation of scifilename. -// -// Status: -// 12-Feb-2008 -- Raffaele Nutricato: Author. -// 12-Feb-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -defaultprecision = 'd'; -annotationstring = '//SCI2C: DEFAULT_PRECISION=' -// #RNU_RES_B -PrintStringInfo('***Get default precision from: '+scifilename,ReportFileName,'file','y'); -// #RNU_RES_E -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// --- Open the .sci file (read only). --- -scifid = SCI2COpenFileRead(scifilename); - -// #RNU_RES_B -// --- Loop over the lines of the input file. --- -// Position file pointer to the desired NInArg/NOutArg section, -// and read the NOutArg annotation. -// #RNU_RES_E -foundannotation = 0; -line_position = 0; -while ((meof(scifid) == 0) & (foundannotation == 0)) - check_string = stripblanks(mgetl(scifid,1)); - line_position = line_position + 1; - if (~isempty(check_string)) - - if (SCI2Cstrncmps1size(annotationstring,check_string)) - tmpprecision = stripblanks(part(check_string,length(annotationstring)+1:length(check_string))); - // #RNU_RES_B - PrintStringInfo(' Line '+string(line_position)+... - ' - Found annotation for default precision'+' ""'+check_string+' ""',... - ReportFileName,'file','y'); - // #RNU_RES_E - foundannotation = 1; - end - end -end - -if (foundannotation == 0) - // #RNU_RES_B - PrintStringInfo('Annotation for default precision not found.',ReportFileName,'file','y'); - PrintStringInfo('Using the ""DOUBLE"" default precision.',ReportFileName,'file','y'); - // #RNU_RES_E -else - if (tmpprecision == 'FLOAT') - defaultprecision = 's'; - elseif (tmpprecision == 'DOUBLE') - defaultprecision = 'd'; - end -end - -mclose(scifid); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetFunAnn.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetFunAnn.sci deleted file mode 100644 index b3d842ab..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetFunAnn.sci +++ /dev/null @@ -1,206 +0,0 @@ -function [FunTypeAnnot,FunSizeAnnot] = ... - FA_GetFunAnn(NInArg,NOutArg,FunName,FileInfo,SharedInfo) -// function [FunTypeAnnot,FunSizeAnnot] = ... -// FA_GetFunAnn(NInArg,NOutArg,FunName,FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// #RNU_RES_B -// This function extracts the TYPE and SIZE annotations from the -// input .ann file. -// No blank lines are allowed between function annotations. -// -// #RNU_RES_E -// Input data: -// //NUT: Add description here -// -// Output data: -// //NUT: Add description here -// -// Status: -// 11-Jul-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -//NUT: consider the possibility to split this function into more functions. - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),5,5); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Reading function annotations***',ReportFileName,'file','y'); -// #RNU_RES_E -SCI2CClassFileName = GetClsFileName(FunName,FileInfo,SharedInfo); -FunTypeAnnot = ''; -FunSizeAnnot = ''; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - - -// --------------------------------------------- -// --- Read the annotations of the function. --- -// --------------------------------------------- -// --- Open the .sci file (read only). --- -inclsfid = SCI2COpenFileRead(SCI2CClassFileName); - -// #RNU_RES_B -// --- Loop over the lines of the input file. --- -// Position file pointer to the desired NInArg/NOutArg section, -// and read the NOutArg annotation. -// #RNU_RES_E -FoundNIn = 0; -FoundNOut = 0; -line_position = 0; -while ((meof(inclsfid) == 0) & (FoundNIn == 0) & (FoundNOut == 0)) - check_string = stripblanks(mgetl(inclsfid,1)); - line_position = line_position + 1; - if (~isempty(check_string)) - - // #RNU_RES_B - // --- Search for the NIN annotation. --- - // #RNU_RES_E - if (SCI2Cstrncmps1size(SharedInfo.Annotations.FUNNIN,check_string)) - FUNNINAnnot = part(check_string,length(SharedInfo.Annotations.FUNNIN)+1:length(check_string)); - // #RNU_RES_B - // --- Check NIN value. --- - // #RNU_RES_E - if (eval(FUNNINAnnot) == NInArg) - // #RNU_RES_B - PrintStringInfo(' Line '+string(line_position)+' - Function NInArg Annotation: '+' ""'+check_string+' ""',... - ReportFileName,'file','y'); - // #RNU_RES_E - FoundNIn = 1; - check_string = stripblanks(mgetl(inclsfid,1)); - line_position = line_position + 1; - if (~isempty(check_string)) - - // #RNU_RES_B - // --- Search for the NOUT annotation. --- - // #RNU_RES_E - if (SCI2Cstrncmps1size(SharedInfo.Annotations.FUNNOUT,check_string)) - FUNNOUTAnnot = part(check_string,length(SharedInfo.Annotations.FUNNOUT)+1:length(check_string)); - - // #RNU_RES_B - // --- Check NOUT value. --- - // #RNU_RES_E - if (eval(FUNNOUTAnnot) == NOutArg) - // #RNU_RES_B - PrintStringInfo(' Line '+string(line_position)+' - Function NOutArg Annotation: '+' ""'+check_string+' ""',... - ReportFileName,'file','y'); - // #RNU_RES_E - FoundNOut = 1; - else - FoundNIn = 0; - end - else - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Incorrect format for function annotation.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Expected '+SharedInfo.Annotations.FUNNIN+' field in the annotations of the function.',ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); - end - else - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Incorrect format for function annotation.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Expected '+SharedInfo.Annotations.FUNNIN+' field in the annotations of the function.',ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); - end - end - end - end -end - -if (FoundNOut*FoundNIn == 0) - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Please check file: '+SCI2CClassFileName,ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Incorrect function annotation.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: There are two possibilities:',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: 1. Syntax error in function annotations.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: 2. Missing the right combination of NIN/NOUT annotations: ""'+SharedInfo.Annotations.FUNNIN+string(NInArg)+','+SharedInfo.Annotations.FUNNOUT+' '+string(NOutArg)+'"".',ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); -else - for cntout = 1:NOutArg - SCI2C_nout=cntout; // Useful for eval. - - // #RNU_RES_B - // Read the Fun type annotation. - // #RNU_RES_E - check_string = stripblanks(mgetl(inclsfid,1)); - line_position = line_position + 1; - if (isempty(check_string) == %F) - tmpannstring = eval(SharedInfo.Annotations.FUNTYPE); - if (SCI2Cstrncmps1size(tmpannstring,check_string)) - // #RNU_RES_B - PrintStringInfo(' Line '+string(line_position)+' - Function Type Annotation: '+' ""'+check_string+' ""',... - ReportFileName,'file','y'); - // #RNU_RES_E - FunTypeAnnot(cntout) = ... - stripblanks(part(check_string,length(tmpannstring)+1:length(check_string))); - end - else - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Line '+string(line_position)+' Function type annotation not found in file: '+SCI2CClassFileName,ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); - end - - // #RNU_RES_B - // --- Read the Fun size annotation. --- - // #RNU_RES_E - SCI2C_nelem = 1; // Useful for eval. - line_position = line_position + 1; - if (isempty(check_string) == %F) - tmpannstring = eval(SharedInfo.Annotations.FUNSIZE); - check_string = stripblanks(mgetl(inclsfid,1)); - if (SCI2Cstrncmps1size(tmpannstring,check_string)) - // #RNU_RES_B - PrintStringInfo(' Line '+string(line_position)+' - Function Size Annotation: '+' ""'+check_string+' ""',... - ReportFileName,'file','y'); - // #RNU_RES_E - FunSizeAnnot(cntout,1) = ... - stripblanks(part(check_string,length(tmpannstring)+1:length(check_string))); - end - else - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Line '+string(line_position)+' Function size annotation not found in file: '+SCI2CClassFileName,ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); - end - SCI2C_nelem = 2; // Useful for eval. - line_position = line_position + 1; - if (isempty(check_string) == %F) - tmpannstring = eval(SharedInfo.Annotations.FUNSIZE); - check_string = stripblanks(mgetl(inclsfid,1)); - if (SCI2Cstrncmps1size(tmpannstring,check_string)) - PrintStringInfo(' Line '+string(line_position)+' - Function Size Annotation: '+' ""'+check_string+' ""',... - ReportFileName,'file','y'); - FunSizeAnnot(cntout,2) = ... - stripblanks(part(check_string,length(tmpannstring)+1:length(check_string))); - end - else - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Line '+string(line_position)+' Function type annotation (//_SCI2C_FUNSIZE:) not found in file: '+SCI2CClassFileName,ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); - end - end -end -// --- End loop over the lines of the input file. --- -mclose(inclsfid); -// ------------------------------------------------- -// --- End Read the annotations of the function. --- -// ------------------------------------------------- - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetOutArgInfo.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetOutArgInfo.sci deleted file mode 100644 index 6566b2ee..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetOutArgInfo.sci +++ /dev/null @@ -1,142 +0,0 @@ -function UpdatedOutArg = ... - FA_GetOutArgInfo(InArg,NInArg,OutArg,NOutArg,SharedInfo,FunPrecSpecifier,FunTypeAnnot,FunSizeAnnot,ReportFileName) -// function UpdatedOutArg = ... -// FA_GetOutArgInfo(InArg,NInArg,OutArg,NOutArg,SharedInfo,FunPrecSpecifier,FunTypeAnnot,FunSizeAnnot,ReportFileName) -// ----------------------------------------------------------------- -// #RNU_RES_B -// InArg is used by eval don't remove it from the function call. -// -// #RNU_RES_E -// Input data: -// //NUT: Add description here -// -// Output data: -// //NUT: Add description here -// -// Status: -// 25-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),9,9); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -UpdatedOutArg = OutArg; -for cntin = 1:NInArg - IN(cntin).TP = InArg(cntin).Type; - IN(cntin).SZ(1) = InArg(cntin).Size(1); - IN(cntin).SZ(2) = InArg(cntin).Size(2); - if ((isnan(InArg(cntin).Value)) & (GetSymbolDimension(InArg(cntin).Size) == 0)) - // #RNU_RES_B - // IN(cntin).VAL = '__SCI2CNANSIZE'; //RNU: toglimi - //RNU: Replace the value of the variable with its name, in case it is a scalar variable. - // #RNU_RES_E - IN(cntin).VAL = InArg(cntin).Name; - else - IN(cntin).VAL = string(InArg(cntin).Value); - end -end -DefaultPrecision = SharedInfo.DefaultPrecision; - -// --------------------------- -// --- End Initialization. --- -// --------------------------- -if (mtlb_strcmp(FunTypeAnnot(1),'')) - NOutArg = 0; -else - NOutArg = max(size(FunTypeAnnot)); -end - -flagfindlike = 0; -for counterin = 1:NInArg - if (InArg(counterin).FindLike == 1 | InArg(counterin).FindLike == -1) - // #RNU_RES_B - // Then we must assume that the output will be findlike - // 0 = no find-like - // 1 = pure find-like - //-1 = similar to find-like (out=fun(in)) where in is find-like. - // #RNU_RES_E - flagfindlike = -1; - end -end - -for counterout = 1:NOutArg - if(mtlb_strcmp(FunTypeAnnot,'FA_TP_USER')) - UpdatedOutArg(counterout).Type = FA_TP_USER(FunPrecSpecifier,DefaultPrecision); - else - UpdatedOutArg(counterout).Type = eval(FunTypeAnnot(counterout)); - end - UpdatedOutArg(counterout).FindLike = 0; - lengthFA_SZ_RTMAX = length('FA_SZ_RTMAX'); - - if (SCI2Cstrncmps1size('FA_SZ_RTMAX',FunSizeAnnot(counterout,1))) - UpdatedOutArg(counterout).FindLike = 1; - FunSizeAnnot(counterout,1) = part(FunSizeAnnot(counterout,1),lengthFA_SZ_RTMAX+1:length(FunSizeAnnot(counterout,1))); - end - - if (SCI2Cstrncmps1size('FA_SZ_RTMAX',FunSizeAnnot(counterout,2))) - UpdatedOutArg(counterout).FindLike = 1; - FunSizeAnnot(counterout,2) = part(FunSizeAnnot(counterout,2),lengthFA_SZ_RTMAX+1:length(FunSizeAnnot(counterout,2))); - end - - if (flagfindlike == -1) - UpdatedOutArg(counterout).FindLike = -1; - end - - // #RNU_RES_B - // When the size is given by e IN(x).VAL annotation we can have two cases: - // IN(x).VAL is a number or IN(x).VAL is %nan. When it is %nan the - // size is equal to the name of IN(x). - // This is a dynamic memory extension of a local variable and for the moment - // we issue an error according to SCI2C specifications - // #RNU_RES_E - tmpeval = eval(FunSizeAnnot(counterout,1)); - if (IsNanSize(tmpeval)) - if SharedInfo.ForExpr.OnExec == 0 - EM_NanSize(ReportFileName); - else - UpdatedOutArg(counterout).Size(1) = string(tmpeval); - end - elseif(SCI2Cisnum(tmpeval)) - if (eval(tmpeval) <= 0) - EM_ZeroSize(ReportFileName); - else - UpdatedOutArg(counterout).Size(1) = string(tmpeval); - end - else - UpdatedOutArg(counterout).Size(1) = string(tmpeval); - end - - tmpeval = eval(FunSizeAnnot(counterout,2)); - if (IsNanSize(tmpeval)) - if SharedInfo.ForExpr.OnExec == 0 - EM_NanSize(ReportFileName); - else - // #RNU_RES_B - // If we are in for expression I prefer to issue the error later. - // #RNU_RES_E - UpdatedOutArg(counterout).Size(2) = string(tmpeval); - end - elseif(SCI2Cisnum(tmpeval)) - if (eval(tmpeval) <= 0) - EM_ZeroSize(ReportFileName); - else - UpdatedOutArg(counterout).Size(2) = string(tmpeval); - end - else - UpdatedOutArg(counterout).Size(2) = string(tmpeval); - end - - UpdatedOutArg(counterout).Value = %nan; - UpdatedOutArg(counterout).Dimension = GetSymbolDimension(UpdatedOutArg(counterout).Size); - UpdatedOutArg(counterout).Scope = 'Temp';//NUT anche su questo si puo' ragionare verifica anche la handleoperation. -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetResizeApproach.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetResizeApproach.sci deleted file mode 100644 index 95427001..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_GetResizeApproach.sci +++ /dev/null @@ -1,79 +0,0 @@ -function ResizeApproach = FA_GetResizeApproach(scifilename,ReportFileName) - -// function ResizeApproach = FA_GetResizeApproach(scifilename,ReportFileName) -// ----------------------------------------------------------------- -// Extracts the resize approach from the file .sci passed in input. -// The following annotation will be searched in the scilab code: -// //SCI2C: RESIZE_APPROACH= NO_RESIZE -// //SCI2C: RESIZE_APPROACH= RESIZE_ALL -// //SCI2C: RESIZE_APPROACH= REALLOC_ALL_RESIZE_ALL -// //SCI2C: RESIZE_APPROACH= RESIZE_TEMP -// //SCI2C: RESIZE_APPROACH= RESIZE_LOCAL -// //SCI2C: RESIZE_APPROACH= RESIZE_GLOBAL -// If the annotation is missing the default NO_RESIZE approach will be -// implicitly used. -// -// Input data: -// --- -// -// Output data: -// ResizeApproach: string which specifies the resize approach -// used in the translation of scifilename. -// -// Status: -// 12-Jul-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -ResizeApproach = 'NO_RESIZE'; -annotationstring = '//SCI2C: RESIZE_APPROACH=' -PrintStringInfo('***Get resize approach from: '+scifilename,ReportFileName,'file','y'); // #RNUREM_ME -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// --- Open the .sci file (read only). --- -scifid = SCI2COpenFileRead(scifilename); - -// --- Loop over the lines of the input file. --- -// Position file pointer to the desired NInArg/NOutArg section, -// and read the NOutArg annotation. -foundannotation = 0; -line_position = 0; - -while ((meof(scifid) == 0) & (foundannotation == 0)) - check_string = stripblanks(mgetl(scifid,1)); - line_position = line_position + 1; - if (~isempty(check_string)) - if (SCI2Cstrncmps1size(annotationstring,check_string)) - tmpresize = stripblanks(part(check_string,length(annotationstring)+1:length(check_string))); - // #RNU_RES_B - PrintStringInfo(' Line '+string(line_position)+... - ' - Found annotation for resize approach'+' ""'+check_string+' ""',... - ReportFileName,'file','y'); - // #RNU_RES_E - foundannotation = 1; - end - end -end - -if (foundannotation == 0) - // #RNU_RES_B - PrintStringInfo('Annotation for resize approach not found.',ReportFileName,'file','y'); - PrintStringInfo('Using the ''NO_RESIZE'' resize approach.',ReportFileName,'file','y'); - // #RNU_RES_E -else - ResizeApproach = tmpresize; -end -mclose(scifid); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_INT.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_INT.sci deleted file mode 100644 index c4e2cc3d..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_INT.sci +++ /dev/null @@ -1,40 +0,0 @@ -function opout = FA_INT(in1) -// function opout = FA_INT(in1) -// ----------------------------------------------------------------- -// Int function for Function Annotations. -// When in1 is a number opout = int(in1); where int truncates in1 -// to integer. If in1 is string opout = in1. -// -// Input data: -// in1: string specifying a number or a symbol. -// -// Output data: -// opout: string containing the computed result. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -if (SCI2Cisnum(in1)) - outnum = int(eval(in1)); - if isnan(outnum) - opout = '__SCI2CNANSIZE'; - else - opout = string(outnum); - end -else - opout = in1; -end -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_MAX.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_MAX.sci deleted file mode 100644 index 8b947cec..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_MAX.sci +++ /dev/null @@ -1,51 +0,0 @@ -function opout = FA_MAX(in1,in2) -// function opout = FA_MAX(in1,in2) -// ----------------------------------------------------------------- -// Maximum function for Function Annotations. -// When in1 and in2 are both symbols this function returns -// in1. -// -// Input data: -// in1: string specifying a number or a symbol. -// in2: string specifying a number or a symbol. -// -// Output data: -// opout: string containing the computed result. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -SCI2Cerror('Not allowed to use FA_MAX in this release.'); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -if (SCI2Cisnum(in1)) - in1num = eval(in1); - if (SCI2Cisnum(in2)) - in2num = eval(in2); - outnum = max(in1num,in2num); - if isnan(outnum) - opout = '__SCI2CNANSIZE'; - else - opout = string(outnum); - end - else - if (in1num == 1) - opout = string(in2); - end - end -else - opout = string(in1); -end -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_MUL.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_MUL.sci deleted file mode 100644 index d3495a02..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_MUL.sci +++ /dev/null @@ -1,42 +0,0 @@ -function opout = FA_MUL(in1,in2) -// function opout = FA_MUL(in1,in2) -// ----------------------------------------------------------------- -// Multiplication function for Function Annotations. -// -// Input data: -// in1: string specifying a number or a symbol. -// in2: string specifying a number or a symbol. -// -// Output data: -// opout: string containing the computed result. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -if (SCI2Cisnum(in1) & SCI2Cisnum(in2)) - in1num = eval(in1); - in2num = eval(in2); - outnum = in1num*in2num; - if isnan(outnum) - opout = '__SCI2CNANSIZE'; - else - opout = string(outnum); - end -else - opout = '('+string(in1)+'*'+string(in2)+')'; -end -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SUB.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SUB.sci deleted file mode 100644 index 039ff1af..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SUB.sci +++ /dev/null @@ -1,41 +0,0 @@ -function opout = FA_SUB(in1,in2) -// function opout = FA_SUB(in1,in2) -// ----------------------------------------------------------------- -// Subtraction function for Function Annotations. -// -// Input data: -// in1: string specifying a number or a symbol. -// in2: string specifying a number or a symbol. -// -// Output data: -// opout: string containing the computed result. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -if (SCI2Cisnum(in1) & SCI2Cisnum(in2)) - in1num = eval(in1); - in2num = eval(in2); - outnum = in1num-in2num; - if isnan(outnum) - opout = '__SCI2CNANSIZE'; - else - opout = string(outnum); - end -else - opout = '('+string(in1)+'-'+string(in2)+')'; -end -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_1.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_1.sci deleted file mode 100644 index d9a481ce..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_1.sci +++ /dev/null @@ -1,20 +0,0 @@ -function outsize = FA_SZ_1(insize) -// function outsize = FA_SZ_1(insize) -// ----------------------------------------------------------------- -// Returns the first element of the size array. -// -// Input data: -// insize: size of input argument. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Output data: -// outsize: first element of the insize array. -// -// Status: -// 08-Dec-2007 -- Raffaele Nutricato: Author. -// 08-Dec-2007 -- Alberto Morea: Test Ok. -// ----------------------------------------------------------------- - -outsize = insize(1); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_2.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_2.sci deleted file mode 100644 index 64fdac10..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_2.sci +++ /dev/null @@ -1,20 +0,0 @@ -function outsize = FA_SZ_2(insize) -// function outsize = FA_SZ_2(insize) -// ----------------------------------------------------------------- -// Returns the second element of the size array. -// -// Input data: -// insize: size of input argument. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Output data: -// outsize: second element of the insize array. -// -// Status: -// 08-Dec-2007 -- Raffaele Nutricato: Author. -// 08-Dec-2007 -- Alberto Morea: Test Ok. -// ----------------------------------------------------------------- - -outsize = insize(2); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPAPEX.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPAPEX.sci deleted file mode 100644 index a93e8c50..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPAPEX.sci +++ /dev/null @@ -1,26 +0,0 @@ -function opoutsize = FA_SZ_OPAPEX(in1size) -// function opoutsize = FA_SZ_OPAPEX(in1size) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPAPEX operator. -// -// -// Status: -// 08-Jan-2008 -- Raffaele Nutricato: Author. -// 08-Jan-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -opoutsize(1) = string(in1size(2)); -opoutsize(2) = string(in1size(1)); - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPBACKSLASH.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPBACKSLASH.sci deleted file mode 100644 index 9d0625bd..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPBACKSLASH.sci +++ /dev/null @@ -1,39 +0,0 @@ -function opoutsize = FA_SZ_OPBACKSLASH(in1size,in2size) -// function opoutsize = FA_SZ_OPBACKSLASH(in1size,in2size) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPBACKSLASH operator. -// -// -// Status: -// 08-Mar-2008 -- Alberto Morea: Author. -// 08-Mar-2008 -- Raffaele Nutricato: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -in1size=string(in1size); -in2size=string(in2size); - -// --- Get dimensions of input arguments. --- -in1dim = GetSymbolDimension(in1size); -in2dim = GetSymbolDimension(in2size); - -if (in1dim == 0) - opoutsize = in2size; -elseif (in2dim == 0) - opoutsize = in1size; -else - opoutsize(1) = in1size(2); - opoutsize(2) = in2size(2); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPCC.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPCC.sci deleted file mode 100644 index cc532e24..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPCC.sci +++ /dev/null @@ -1,40 +0,0 @@ -function opoutsize = FA_SZ_OPCC(in1size,in2size) -// function opoutsize = FA_SZ_OPCC(in1size,in2size) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPCC operator. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -in1size = string(in1size); -in2size = string(in2size); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -// --- Get dimensions of input arguments. --- -in1dim = GetSymbolDimension(in1size); -in2dim = GetSymbolDimension(in2size); - -if (SCI2Cisnum(in1size(1)) & SCI2Cisnum(in2size(1))) - in1num = eval(in1size(1)); - in2num = eval(in2size(1)); - opoutsize(1) = string(in1num+in2num); -else - opoutsize(1) = '('+string(in1size(1))+'+'+string(in2size(1))+')'; -end - -opoutsize(2) = in1size(2); - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTAPEX.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTAPEX.sci deleted file mode 100644 index 64e8030e..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTAPEX.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPDOTAPEX(in1size) -// function opoutsize = FA_SZ_OPDOTAPEX(in1size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTAPEX. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTAPEX(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTBACKSLASH.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTBACKSLASH.sci deleted file mode 100644 index 75f4d5c3..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTBACKSLASH.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPDOTBACKSLASH(in1size,in2size) -// function opoutsize = FA_SZ_OPDOTBACKSLASH(in1size,in2size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTSTAR. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTHAT.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTHAT.sci deleted file mode 100644 index af522bac..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTHAT.sci +++ /dev/null @@ -1,43 +0,0 @@ -function opoutsize = FA_SZ_OPDOTHAT(in1size,in2size) -// function opoutsize = FA_SZ_OPDOTHAT(in1size,in2size) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPDOTHAT operator. -// -// Assuming: -// size(in1) = [in1r,in1c] -// size(in2) = [in2r,in2c] -// size(out) = [outr,outc] -// -// we have the following combinations: -// in1 in2 outr outc -// ----------------------- -// S S in2r in2c -// S M in2r in2c -// M S in1r in1c -// M M in1r in1c -// -// Where S means that the input is a scalar -// and M means that the input is a matrix. -// -// Input data: -// in1size: size of input number 1. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// in2size: size of input number 2. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Output data: -// opoutsize: size of output. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Status: -// 10-Dec-2007 -- Raffaele Nutricato: Author. -// 10-Dec-2007 -- Alberto Morea: Test Ok. -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTSLASH.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTSLASH.sci deleted file mode 100644 index 2a071f27..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTSLASH.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPDOTSLASH(in1size,in2size) -// function opoutsize = FA_SZ_OPDOTSLASH(in1size,in2size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTSTAR. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTSTAR.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTSTAR.sci deleted file mode 100644 index 3fbae19a..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPDOTSTAR.sci +++ /dev/null @@ -1,32 +0,0 @@ -function opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size) -// function opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPDOTSTAR operator. -// -// -// Status: -// 08-Jan-2008 -- Raffaele Nutricato: Author. -// 08-Jan-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -// --- Get dimensions of input arguments. --- -in1dim = GetSymbolDimension(in1size); - -if (in1dim == 0) - opoutsize = string(in2size); -else - opoutsize = string(in1size); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPHAT.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPHAT.sci deleted file mode 100644 index 31174511..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPHAT.sci +++ /dev/null @@ -1,43 +0,0 @@ -function opoutsize = FA_SZ_OPHAT(in1size,in2size) -// function opoutsize = FA_SZ_OPHAT(in1size,in2size) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPHAT operator. -// -// Assuming: -// size(in1) = [in1r,in1c] -// size(in2) = [in2r,in2c] -// size(out) = [outr,outc] -// -// we have the following combinations: -// in1 in2 outr outc -// ----------------------- -// S S in2r in2c -// S M in2r in2c -// M S in1r in1c -// M M in1r in1c -// -// Where S means that the input is a scalar -// and M means that the input is a matrix. -// -// Input data: -// in1size: size of input number 1. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// in2size: size of input number 2. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Output data: -// opoutsize: size of output. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Status: -// 10-Dec-2007 -- Raffaele Nutricato: Author. -// 10-Dec-2007 -- Alberto Morea: Test Ok. -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGAND.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGAND.sci deleted file mode 100644 index 099bb9ac..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGAND.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPLOGAND(in1size,in2size) -// function opoutsize = FA_SZ_OPLOGAND(in1size,in2size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTSTAR. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGEQ.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGEQ.sci deleted file mode 100644 index 4ade6a0f..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGEQ.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPLOGEQ(in1size,in2size) -// function opoutsize = FA_SZ_OPLOGEQ(in1size,in2size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTSTAR. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGGE.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGGE.sci deleted file mode 100644 index c6d6ee3f..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGGE.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPLOGGE(in1size,in2size) -// function opoutsize = FA_SZ_OPLOGGE(in1size,in2size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTSTAR. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGGT.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGGT.sci deleted file mode 100644 index 0f6493c9..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGGT.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPLOGGT(in1size,in2size) -// function opoutsize = FA_SZ_OPLOGGT(in1size,in2size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTSTAR. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGLE.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGLE.sci deleted file mode 100644 index edda359f..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGLE.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPLOGLE(in1size,in2size) -// function opoutsize = FA_SZ_OPLOGLE(in1size,in2size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTSTAR. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGLT.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGLT.sci deleted file mode 100644 index 81b1b256..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGLT.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPLOGLT(in1size,in2size) -// function opoutsize = FA_SZ_OPLOGLT(in1size,in2size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTSTAR. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGNE.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGNE.sci deleted file mode 100644 index ff62abbf..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGNE.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPLOGNE(in1size,in2size) -// function opoutsize = FA_SZ_OPLOGNE(in1size,in2size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTSTAR. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGNOT.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGNOT.sci deleted file mode 100644 index 3b0c6549..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGNOT.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPLOGNOT(in1size) -// function opoutsize = FA_SZ_OPLOGNOT(in1size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTAPEX. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTAPEX(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGOR.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGOR.sci deleted file mode 100644 index f28eec2f..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPLOGOR.sci +++ /dev/null @@ -1,16 +0,0 @@ -function opoutsize = FA_SZ_OPLOGOR(in1size,in2size) -// function opoutsize = FA_SZ_OPLOGOR(in1size,in2size) -// ----------------------------------------------------------------- -// Alias of FA_SZ_OPDOTSTAR. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size); -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPMINUS.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPMINUS.sci deleted file mode 100644 index 5f7fc96a..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPMINUS.sci +++ /dev/null @@ -1,51 +0,0 @@ -function opoutsize = FA_SZ_OPMINUS(in1size,in2size) -// function opoutsize = FA_SZ_OPMINUS(in1size,in2size) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPMINUS operator. -// -// Assuming: -// size(in1) = [in1r,in1c] -// size(in2) = [in2r,in2c] -// size(out) = [outr,outc] -// -// we have the following combinations: -// in1 in2 outr outc -// ----------------------- -// S S in2r in2c -// S M in2r in2c -// M S in1r in1c -// M M in1r in1c -// -// Where S means that the input is a scalar -// and M means that the input is a matrix. -// -// Input data: -// in1size: size of input number 1. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// in2size: size of input number 2. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Output data: -// opoutsize: size of output. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Status: -// 08-Dec-2007 -- Raffaele Nutricato: Author. -// 08-Dec-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -opoutsize = FA_SZ_OPPLUSA(in1size,in2size); - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPPLUS.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPPLUS.sci deleted file mode 100644 index d0df4c6c..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPPLUS.sci +++ /dev/null @@ -1,93 +0,0 @@ -function opoutsize = FA_SZ_OPPLUS(in1size,in2size,in1type,in2type) -// function opoutsize = FA_SZ_OPPLUS(in1size,in2size,in1type,in2type) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPPLUS operator, -// including the string operations. -// -// Assuming: -// size(in1) = [in1r,in1c] -// size(in2) = [in2r,in2c] -// size(out) = [outr,outc] -// -// we have the following combinations: -// in1 in2 outr outc -// ----------------------- -// S S in2r in2c -// S M in2r in2c -// M S in1r in1c -// M M in1r in1c -// -// Where S means that the input is a scalar -// and M means that the input is a matrix. -// There is also the case related to the string catenation! -// This is the main difference between - and + operators. -// -// Input data: -// in1size: size of input number 1. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// in2size: size of input number 2. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Output data: -// opoutsize: size of output. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Status: -// 08-Dec-2007 -- Raffaele Nutricato: Author. -// 08-Dec-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),4,4); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -// --- Get dimensions of input arguments. --- -in1size = string(in1size); -in2size = string(in2size); -in1type = string(in1type); -in2type = string(in2type); -in1dim = GetSymbolDimension(in1size); - -if ((in1type ~= 'g') & (in2type ~= 'g')) - opoutsize = FA_SZ_OPPLUSA(in1size,in2size); -elseif ((in1type == 'g') & (in2type == 'g')) - opoutsize(1) = '1'; - if (SCI2Cisnum(in1size(1)) & SCI2Cisnum(in2size(1))) - in1num = eval(in1size(1)); - in2num = eval(in2size(1)); - if (in1num > 1 | in2num > 1) - SCI2Cerror('String catenation can be performed only on strings of 1 x N size not N x 1 size'); - //NUT: mi pare che non possano proprio esistere stringe di dimensione Nx1 perche' in - //NUT: scilab esiste il tipo string che e' di size 1x1 e sono io a trasformarlo in - //NUT: 1xN per cui se uso sempre questa convenzione non sbaglio mai. - //NUT: ho provato in scilab a fare la trasposta di una stringa e ottengo sempre 1x1. - end - end - if (SCI2Cisnum(in1size(2)) & SCI2Cisnum(in2size(2))) - in1num = eval(in1size(2)); - in2num = eval(in2size(2)); - opoutsize(2) = string(in1num+in2num-1); - if isnan(opoutsize(2)) - opoutsize(2) = '__SCI2CNANSIZE'; - else - opoutsize(2) = string(opoutsize(2)); - end - else - opoutsize(2) = '('+string(in1size(2))+'+'+string(in2size(2))+'-1)'; - end -else - SCI2Cerror('Unexpected type combination for ""+"" operator (type1,type2): ('+in1type+in2type+').'); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPPLUSA.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPPLUSA.sci deleted file mode 100644 index 42ba90d5..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPPLUSA.sci +++ /dev/null @@ -1,66 +0,0 @@ -function opoutsize = FA_SZ_OPPLUSA(in1size,in2size) -// function opoutsize = FA_SZ_OPPLUSA(in1size,in2size) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPPLUS operator -// restricted to arithmetic operations (string operations not supported.) -// -// Assuming: -// size(in1) = [in1r,in1c] -// size(in2) = [in2r,in2c] -// size(out) = [outr,outc] -// -// we have the following combinations: -// in1 in2 outr outc -// ----------------------- -// S S in2r in2c -// S M in2r in2c -// M S in1r in1c -// M M in1r in1c -// -// Where S means that the input is a scalar -// and M means that the input is a matrix. -// There is also the case related to the string catenation! -// This is the main difference between - and + operators. -// -// Input data: -// in1size: size of input number 1. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// in2size: size of input number 2. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Output data: -// opoutsize: size of output. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Status: -// 18-Mar-2008 -- Raffaele Nutricato: Author. -// 18-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -// --- Get dimensions of input arguments. --- -in1size = string(in1size); -in2size = string(in2size); -in1dim = GetSymbolDimension(in1size); - -if (in1dim == 0) - opoutsize = in2size; -else - opoutsize = in1size; -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPRC.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPRC.sci deleted file mode 100644 index 2c9f1c18..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPRC.sci +++ /dev/null @@ -1,40 +0,0 @@ -function opoutsize = FA_SZ_OPRC(in1size,in2size) -// function opoutsize = FA_SZ_OPRC(in1size,in2size) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPRC operator. -// -// -// Status: -// 08-Mar-2008 -- Raffaele Nutricato: Author. -// 08-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -in1size = string(in1size); -in2size = string(in2size); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -// --- Get dimensions of input arguments. --- -in1dim = GetSymbolDimension(in1size); -in2dim = GetSymbolDimension(in2size); - -opoutsize(1) = in1size(1); - -if (SCI2Cisnum(in1size(2)) & SCI2Cisnum(in2size(2))) - in1num = eval(in1size(2)); - in2num = eval(in2size(2)); - opoutsize(2) = string(in1num+in2num); -else - opoutsize(2) = '('+string(in1size(2))+'+'+string(in2size(2))+')'; -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPSLASH.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPSLASH.sci deleted file mode 100644 index 78ddecec..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPSLASH.sci +++ /dev/null @@ -1,45 +0,0 @@ -function opoutsize = FA_SZ_OPSLASH(in1size,in2size) -// function opoutsize = FA_SZ_OPSLASH(in1size,in2size) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPSLASH operator. -// -// -// Status: -// 28-May-2008 -- Alberto Morea: Author. -// 28-May-2008 -- Raffaele Nutricato: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -in1size=string(in1size); -in2size=string(in2size); - -// knowing that -// b/a = (a' \ b')' - -// a' -in1sizetmp(1) = in1size(2); -in1sizetmp(2) = in1size(1); - -// b' -in2sizetmp(1) = in2size(2); -in2sizetmp(2) = in2size(1); - -// a'\b' -opoutsizetmp = FA_SZ_OPBACKSLASH(in2sizetmp,in1sizetmp); - -// (a'\b')' -opoutsize(1) = opoutsizetmp(2); -opoutsize(2) = opoutsizetmp(1); - - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPSTAR.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPSTAR.sci deleted file mode 100644 index 12190d38..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_OPSTAR.sci +++ /dev/null @@ -1,68 +0,0 @@ -function opoutsize = FA_SZ_OPSTAR(in1size,in2size) -// function opoutsize = FA_SZ_OPSTAR(in1size,in2size) -// ----------------------------------------------------------------- -// Returns the size of the output computed by OPSTAR operator. -// -// Assuming: -// size(in1) = [in1r,in1c] -// size(in2) = [in2r,in2c] -// size(out) = [outr,outc] -// -// we have the following combinations: -// in1 in2 outr outc -// ----------------------- -// S S in2r in2c -// S M in2r in2c -// M S in1r in1c -// M M in1r in2c -// -// Where S means that the input is a scalar -// and M means that the input is a matrix. -// -// Input data: -// in1size: size of input number 1. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// in2size: size of input number 2. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Output data: -// opoutsize: size of output. It is an array of 2 strings. -// The first string specifies the number of rows. -// The second string specifies the number of columns. -// -// Status: -// 08-Dec-2007 -- Raffaele Nutricato: Author. -// 08-Dec-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -in1size = string(in1size); -in2size = string(in2size); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -// --- Get dimensions of input arguments. --- -in1dim = GetSymbolDimension(in1size); -in2dim = GetSymbolDimension(in2size); - -if (in1dim == 0) - opoutsize = in2size; -elseif (in2dim == 0) - opoutsize = in1size; -else - opoutsize(1) = in1size(1); - opoutsize(2) = in2size(2); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_SEL1.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_SEL1.sci deleted file mode 100644 index 4f52c536..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_SEL1.sci +++ /dev/null @@ -1,44 +0,0 @@ -function opout = FA_SZ_SEL1(in1,in2) -// function opout = FA_SZ_SEL1(in1,in2) -// ----------------------------------------------------------------- -// Determines the number of rows of the output arguments -// according to the number of rows of the first input argument and -// the specifier in2 which can be 1,2 or 'r','c' and 'm'. -// In this release the 'm' specifier is not supported so when it is -// used SCI2C will issue an error. -// -// Input data: -// in1: string specifying a number or a symbol. -// in2: string specifying a number or a symbol. -// -// Output data: -// opout: string containing the computed result. -// -// Status: -// 16-Mar-2008 -- Raffaele Nutricato: Author. -// 16-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); -ReportFileName = ''; -in2 = string(in2); - -if (in2 == '1') - opout = '1'; -elseif (in2 == '2') - opout = in1; -else - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Cannot associate the second input argument to a known specifier.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Please rearrange your code by using one of the following specifiers:',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: 1 or 2.',ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); -end -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_SEL2.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_SEL2.sci deleted file mode 100644 index ebf74282..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_SZ_SEL2.sci +++ /dev/null @@ -1,44 +0,0 @@ -function opout = FA_SZ_SEL2(in1,in2) -// function opout = FA_SZ_SEL2(in1,in2) -// ----------------------------------------------------------------- -// Determines the number of columns of the output arguments -// according to the number of columns of the first input argument and -// the specifier in2 which can be 1,2 or 'r','c' and 'm'. -// In this release the 'm' specifier is not supported so when it is -// used SCI2C will issue an error. -// -// Input data: -// in1: string specifying a number or a symbol. -// in2: string specifying a number or a symbol. -// -// Output data: -// opout: string containing the computed result. -// -// Status: -// 16-Mar-2008 -- Raffaele Nutricato: Author. -// 16-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); -ReportFileName = ''; -in2 = string(in2); - -if (in2 == '1') - opout = in1; -elseif (in2 == '2') - opout = '1'; -else - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Cannot associate the second input argument to a known specifier.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Please rearrange your code by using one of the following specifiers:',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: 1 or 2.',ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); -end -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_C.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_C.sci deleted file mode 100644 index b383b5ac..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_C.sci +++ /dev/null @@ -1,32 +0,0 @@ -function typeout = FA_TP_C() -// function typeout = FA_TP_C() -// ----------------------------------------------------------------- -// Returns the "single complex" type specifier -// for Function Annotations. -// -// Input data: -// --- -// -// Output data: -// typeout: string containing the type specifier. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),0,0); - - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -typeout = 'c'; - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_COMPLEX.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_COMPLEX.sci deleted file mode 100644 index bf3f2f9f..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_COMPLEX.sci +++ /dev/null @@ -1,42 +0,0 @@ -function typeout = FA_TP_COMPLEX(in1) -// function typeout = FA_TP_COMPLEX(in1) -// ----------------------------------------------------------------- -// Converts into complex data type the input argument, by preserving -// the precision of the input argument. -// See following examples: -// FA_TP_COMPLEX('s') = 'c' -// FA_TP_COMPLEX('d') = 'z' -// FA_TP_COMPLEX('c') = 'c' -// FA_TP_COMPLEX('z') = 'z' -// -// Input data: -// in1: string specifying the data type number 1. -// -// Output data: -// typeout: string containing the type specifier. -// -// Status: -// 26-Jan-2008 -- Raffaele Nutricato: Author. -// 26-Jan-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -if (in1 == 's') - typeout = 'c'; -elseif (in1 == 'd') - typeout = 'z'; -else - typeout = in1; -end -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_D.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_D.sci deleted file mode 100644 index 788a03fe..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_D.sci +++ /dev/null @@ -1,32 +0,0 @@ -function typeout = FA_TP_D() -// function typeout = FA_TP_D() -// ----------------------------------------------------------------- -// Returns the "double" type specifier -// for Function Annotations. -// -// Input data: -// --- -// -// Output data: -// typeout: string containing the type specifier. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),0,0); - - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -typeout = 'd'; - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_I.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_I.sci deleted file mode 100644 index 94f383f4..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_I.sci +++ /dev/null @@ -1,32 +0,0 @@ -function typeout = FA_TP_I() -// function typeout = FA_TP_I() -// ----------------------------------------------------------------- -// Returns the "int" type specifier -// for Function Annotations. -// -// Input data: -// --- -// -// Output data: -// typeout: string containing the type specifier. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),0,0); - - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -typeout = 'i'; - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_MAX.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_MAX.sci deleted file mode 100644 index 0b78f9e3..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_MAX.sci +++ /dev/null @@ -1,45 +0,0 @@ -function opout = FA_TP_MAX(in1,in2) -// function opout = FA_TP_MAX(in1,in2) -// ----------------------------------------------------------------- -// Type-Maximum function for Function Annotations. -// Returns the maximum between the two data types in input according -// to a predefined priority. For example z(double complex) is -// greater that c(single complex). -// -// Input data: -// in1: string specifying the data type number 1. -// in2: string specifying the data type number 2. -// -// Output data: -// opout: string containing the computed result. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -in1Pin2 = in1+in2; -opout = in1; - -if (in2 == 'z') - opout = 'z'; -elseif (in1Pin2 == 'sd') - opout = 'd'; -elseif (in1Pin2 == 'sc') - opout = 'c'; -elseif (in1Pin2 == 'dc') - opout = 'z'; -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_MIN_REAL.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_MIN_REAL.sci deleted file mode 100644 index 43fc7926..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_MIN_REAL.sci +++ /dev/null @@ -1,35 +0,0 @@ -function opout = FA_TP_MIN_REAL(in1,in2) -// Status: -// 2009 -- Arnaud Torset: Author. -// -// ----------------------------------------------------------------- -// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab -// Copyright (C) INRIA -// -// 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 - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -//SCI2CNInArgCheck(argn(2),2,2); - -in1Pin2 = in1+in2; -opout = in1; - -if (opout == 'c') - opout = 's'; -elseif (opout == 'z') - opout = 'd'; -end - -if (in2 == 'c') - opout = 's'; -elseif (in2 == 's') - opout = 's'; -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_REAL.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_REAL.sci deleted file mode 100644 index 67a946dc..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_REAL.sci +++ /dev/null @@ -1,38 +0,0 @@ -function opout = FA_TP_REAL(in1) -// function opout = FA_TP_REAL(in1) -// ----------------------------------------------------------------- -// Type-Real function for Function Annotations. -// Returns the real precision corresponding to the precision of -// the input operand. -// -// Input data: -// in1: string specifying the data type number 1. -// -// Output data: -// opout: string containing the computed result. -// -// Status: -// 26-Mar-2008 -- Raffaele Nutricato: Author. -// 26-Mar-2008 -- Alberto Morea: Test Ok. -// -// Copyright 2008 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -opout = in1; - -if (in1 == 'c') - opout = 's'; -elseif (in1 == 'z') - opout = 'd'; -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_S.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_S.sci deleted file mode 100644 index 3de4c20c..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_S.sci +++ /dev/null @@ -1,32 +0,0 @@ -function typeout = FA_TP_S() -// function typeout = FA_TP_S() -// ----------------------------------------------------------------- -// Returns the "float" type specifier -// for Function Annotations. -// -// Input data: -// --- -// -// Output data: -// typeout: string containing the type specifier. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),0,0); - - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -typeout = 's'; - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_USER.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_USER.sci deleted file mode 100644 index 3b306a9f..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_USER.sci +++ /dev/null @@ -1,38 +0,0 @@ -function type_out = FA_TP_USER(PrecisionSpecifier,DefaultType) -// function type_out = FA_TP_USER(PrecisionSpecifier,DefaultType) -// ----------------------------------------------------------------- -// Generate the output type of the output argument by using the -// output (AnnotationFnc) generated by CheckAnnotationFunction. -// double and float functions can be used to specify the type -// of the output argument. They are typically used in combination -// with zeros-like function. -// -// Input data: -// PrecisionSpecifier: it can be 'double' or 'float'. -// -// Output data: -// type_out: specifies the type of the output argument. It can be -// 's' for float precision or 'd' for double precision. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -if (mtlb_strcmp(PrecisionSpecifier,'int')) - type_out = 'i'; -elseif (mtlb_strcmp(PrecisionSpecifier,'float')) - type_out = 's'; -elseif (mtlb_strcmp(PrecisionSpecifier,'double')) - type_out = 'd'; -elseif (mtlb_strcmp(PrecisionSpecifier,'default')) - type_out = DefaultType; -else - SCI2Cerror('Unknown precision function: ""'+AnnotationFnc+'"".'); -end -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_Z.sci b/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_Z.sci deleted file mode 100644 index 2ac18dea..00000000 --- a/src/Scilab2C/Scilab2C/FunctionAnnotation/FA_TP_Z.sci +++ /dev/null @@ -1,32 +0,0 @@ -function typeout = FA_TP_Z() -// function typeout = FA_TP_Z() -// ----------------------------------------------------------------- -// Returns the "double complex" type specifier -// for Function Annotations. -// -// Input data: -// --- -// -// Output data: -// typeout: string containing the type specifier. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),0,0); - - -// ------------------------ -// --- Generate Output. --- -// ------------------------ -typeout = 'z'; - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionList/FL_ExistCFunction.sci b/src/Scilab2C/Scilab2C/FunctionList/FL_ExistCFunction.sci deleted file mode 100644 index 5b63ec5b..00000000 --- a/src/Scilab2C/Scilab2C/FunctionList/FL_ExistCFunction.sci +++ /dev/null @@ -1,106 +0,0 @@ -function flagexist = FL_ExistCFunction(CFunName,USER2CAvailableCDat,SCI2CAvailableCDat,ConvertedDat,ToBeConvertedDat,ReportFileName) -// function flagexist = FL_ExistCFunction(CFunName,USER2CAvailableCDat,SCI2CAvailableCDat,ConvertedDat,ToBeConvertedDat,ReportFileName) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 30-Oct-2007 -- Raffaele Nutricato: Author. -// 30-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),6,6); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -flagexist = %F; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - - -AvailableDat = USER2CAvailableCDat; -load(AvailableDat,'Available'); -NAvail = size(Available,1); - -tmpcnt = 1; -while ((tmpcnt <=NAvail) & (flagexist == %F)) - if mtlb_strcmp(Available(tmpcnt),CFunName) - flagexist = %T; - // #RNU_RES_B - PrintStringInfo(' Found C Function Name in : '+AvailableDat,ReportFileName,'file','y'); - // #RNU_RES_E - end - tmpcnt = tmpcnt + 1; -end -clear Available - -if (flagexist == %F) - AvailableDat = SCI2CAvailableCDat; - load(AvailableDat,'Available'); - NAvail = size(Available,1); - - tmpcnt = 1; - while ((tmpcnt <=NAvail) & (flagexist == %F)) - if mtlb_strcmp(Available(tmpcnt),CFunName) - flagexist = %T; - // #RNU_RES_B - PrintStringInfo(' Found C Function Name in : '+AvailableDat,ReportFileName,'file','y'); - // #RNU_RES_E - end - tmpcnt = tmpcnt + 1; - end - clear Available -end - -if (flagexist == %F) - load(ConvertedDat,'Converted'); - NConv = size(Converted,1); - tmpcnt = 1; - while ((tmpcnt <=NConv) & (flagexist == %F)) - if mtlb_strcmp(Converted(tmpcnt),CFunName) - flagexist = %T; - // #RNU_RES_B - PrintStringInfo(' Found C Function Name in : '+ConvertedDat,ReportFileName,'file','y'); - // #RNU_RES_E - end - tmpcnt = tmpcnt + 1; - end - clear Converted -end - -if (flagexist == %F) - load(ToBeConvertedDat,'ToBeConverted'); - NToBeConv = size(ToBeConverted,1); - tmpcnt = 1; - while ((tmpcnt <=NToBeConv) & (flagexist == %F)) - if mtlb_strcmp(ToBeConverted(tmpcnt).CFunctionName,CFunName) - flagexist = %T; - // #RNU_RES_B - PrintStringInfo(' Found C Function Name in : '+ToBeConvertedDat,ReportFileName,'file','y'); - // #RNU_RES_E - end - tmpcnt = tmpcnt + 1; - end - clear ToBeConverted -end - -if (flagexist == %F) - // #RNU_RES_B - PrintStringInfo(' C Function Name not found in the ""Available"" , ""Converted"" and ""ToBeConverted"" function lists.',ReportFileName,'file','y'); - // #RNU_RES_E -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionList/FL_ExtractFuncList.sci b/src/Scilab2C/Scilab2C/FunctionList/FL_ExtractFuncList.sci deleted file mode 100644 index 9e951d9c..00000000 --- a/src/Scilab2C/Scilab2C/FunctionList/FL_ExtractFuncList.sci +++ /dev/null @@ -1,62 +0,0 @@ -function [CFuncList,NElements] = FL_ExtractFuncList(FunctionDir,ClassDir,SCI2CClassSpecifier,ExtFLCls,ReportFileName) -// function [CFuncList,NElements] = FL_ExtractFuncList(FunctionDir,ClassDir,SCI2CClassSpecifier,ExtFLCls,ReportFileName) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Extracts the list of the C functions available. To do that -// this function enters in the directories where the .clst and -// .lst files are stored. -// #RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 05-Jan-2008 -- Nutricato Raffaele: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),5,5); - -// #RNU_RES_B -// --------------------------------------------------------- -// --- Extract the list of files in Functions directory. --- -// --------------------------------------------------------- -// #RNU_RES_E -tmppwd = pwd(); -cd(FunctionDir); -// funfiles = ls(); -funfiles = listfiles(); -cd(tmppwd); -NFunFiles = size(funfiles,1); - -// #RNU_RES_B -// ----------------------------------------------------------- -// --- Extract the C function list from Classes directory. --- -// ----------------------------------------------------------- -// #RNU_RES_E -CFuncList = ''; -NElements = 0; - -for cntfun = 1:NFunFiles - FunFileName = fullfile(FunctionDir,funfiles(cntfun)); - ClassName = FL_GetFunctionClass(FunFileName,SCI2CClassSpecifier,ReportFileName); - ClassFileName = fullfile(ClassDir,ClassName); - [tmpfunlist,tmpnelem] = File2StringArray(ClassFileName+ExtFLCls); - [tmppath,tmpfunname,tmpext] = fileparts(FunFileName); - tmpfunlist = FL_InOutArgs2CFunNames(tmpfunname,tmpfunlist,tmpnelem); - for cnttmpfun = 1:tmpnelem - NElements = NElements + 1; - CFuncList(NElements) = tmpfunlist(cnttmpfun); - end -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionList/FL_GetFunctionClass.sci b/src/Scilab2C/Scilab2C/FunctionList/FL_GetFunctionClass.sci deleted file mode 100644 index 41ec2ea4..00000000 --- a/src/Scilab2C/Scilab2C/FunctionList/FL_GetFunctionClass.sci +++ /dev/null @@ -1,54 +0,0 @@ -function SCI2CClassName = FL_GetFunctionClass(FunFileName,SCI2CClassSpecifier,ReportFileName) -// function SCI2CClassName = FL_GetFunctionClass(FunFileName,SCI2CClassSpecifier,ReportFileName) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Jul-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -// --------------------------------------- -// --- Read the class of the function. --- -// --------------------------------------- -// --- Open the .sci file (read only). --- -inannfid = SCI2COpenFileRead(FunFileName); - -FoundClass = 0; -if (meof(inannfid) == 0) - check_string = stripblanks(mgetl(inannfid,1)); - if (~isempty(check_string)) - if (SCI2Cstrncmps1size(SCI2CClassSpecifier,check_string)) - SCI2CClassName = part(check_string,length(SCI2CClassSpecifier)+1:length(check_string)); - // #RNU_RES_B - PrintStringInfo(' Function belongs to class: '+SCI2CClassName+'.',ReportFileName,'file','y'); - // #RNU_RES_E - FoundClass = 1; - else - SCI2CerrorFile('Could not find ""'+SCI2CClassSpecifier+'"" in '+FunFileName+'.',ReportFileName); - end - end -end -mclose(inannfid); -if (FoundClass == 0) - SCI2CerrorFile('Could not find ""'+SCI2CClassSpecifier+'"" specifier.',ReportFileName); -end - -// ------------------------------------------- -// --- End read the class of the function. --- -// ------------------------------------------- -endfunction - \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/FunctionList/FL_InOutArgs2CFunNames.sci b/src/Scilab2C/Scilab2C/FunctionList/FL_InOutArgs2CFunNames.sci deleted file mode 100644 index 9305c48e..00000000 --- a/src/Scilab2C/Scilab2C/FunctionList/FL_InOutArgs2CFunNames.sci +++ /dev/null @@ -1,52 +0,0 @@ -function FunNameCFuncList = FL_InOutArgs2CFunNames(FunctionName,CommaSepCFuncList,CFuncListNElem) -// function FunNameCFuncList = FL_InOutArgs2CFunNames(FunctionName,CommaSepCFuncList,CFuncListNElem) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Reads a Comma Separated Function List and converts it into the -// corresponding list of C function. In the Comma Separated -// Function List only input and output arguments are specified -// and they are separated by a comma. -// #RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 05-Jan-2008 -- Nutricato Raffaele: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - - -FunNameCFuncList = ''; -SepChar = ','; -for cntelem = 1:CFuncListNElem - tmptokens = tokens(CommaSepCFuncList(cntelem),SepChar); - if (size(tmptokens,1) == 0) - FunNameCFuncList(cntelem) = FunctionName; - elseif (size(tmptokens,1) == 1) - if part(tmptokens,1:1) == ',' - FunNameCFuncList(cntelem) = FunctionName+tmptokens(2); - else - FunNameCFuncList(cntelem) = tmptokens(1)+FunctionName; - end - elseif (size(tmptokens,1) == 2) - FunNameCFuncList(cntelem) = tmptokens(1)+FunctionName+tmptokens(2); - else - disp('Incorrect format for the function list class.'); - disp('Check the following function list class item: ""'+CommaSepCFuncList(cntelem)+'"".'); - SCI2Cerror(' '); - end -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionList/FL_UpdateConverted.sci b/src/Scilab2C/Scilab2C/FunctionList/FL_UpdateConverted.sci deleted file mode 100644 index 5f4637e8..00000000 --- a/src/Scilab2C/Scilab2C/FunctionList/FL_UpdateConverted.sci +++ /dev/null @@ -1,46 +0,0 @@ -function Converted = FL_UpdateConverted(NFilesToTranslate,ConvertedDatFile) -// function Converted = FL_UpdateConverted(NFilesToTranslate,ConvertedDatFile) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -// --- Load Converted .dat file. --- -load(ConvertedDatFile,'Converted'); -// --------------------------- -// --- End Initialization. --- -// --------------------------- - - -if (NFilesToTranslate >= 1) - // --------------------------------------- - // --- Update Converted Function List. --- - // --------------------------------------- - // --- Insert the current function into the converted function list. --- - NConvP1 = size(Converted,1)+1; - Converted(NConvP1) = SharedInfo.NextCFunName; - // ------------------------------------------- - // --- End Update Converted Function List. --- - // ------------------------------------------- -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/FunctionList/FL_UpdateToBeConv.sci b/src/Scilab2C/Scilab2C/FunctionList/FL_UpdateToBeConv.sci deleted file mode 100644 index 456467da..00000000 --- a/src/Scilab2C/Scilab2C/FunctionList/FL_UpdateToBeConv.sci +++ /dev/null @@ -1,114 +0,0 @@ -function SharedInfo = FL_UpdateToBeConv(ASTFunName,CFunName,FunPrecSpecifier,FunTypeAnnot,FunSizeAnnot,InArg,NInArg,OutArg,NOutArg,FileInfo,SharedInfo) -// function SharedInfo = FL_UpdateToBeConv(ASTFunName,CFunName,FunPrecSpecifier,FunTypeAnnot,FunSizeAnnot,InArg,NInArg,OutArg,NOutArg,FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),11,11); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; - -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -SCI2CAvailableCDat = FileInfo.FunctionList.SCI2CAvailableCDat; -USER2CAvailableCDat = FileInfo.FunctionList.USER2CAvailableCDat; -ConvertedDat = FileInfo.FunctionList.ConvertedDat; -ToBeConvertedDat = FileInfo.FunctionList.ToBeConvertedDat; -FunInfoDatDir = FileInfo.FunctionList.FunInfoDatDir; - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Updating C Function List***',ReportFileName,'file','y'); -PrintStringInfo(' C Function Name: '+CFunName,ReportFileName,'file','y'); -// #RNU_RES_E -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// #RNU_RES_B -// -------------------------------------------------- -// --- Manage anticipated exit from the function. --- -// -------------------------------------------------- -//NUT: questo codice e' identico quasi a quello della CFunCall, si pu0 pensare di -//NUT: di fare un'unica funzione. -// #RNU_RES_E - -if (SharedInfo.SkipNextFun > 0) - // #RNU_RES_B - PrintStringInfo(' Current function will not be inserted in the Function List.',ReportFileName,'file','y'); - // #RNU_RES_E - return; -end - -// #RNU_RES_B -// Exit if the function is a precision specifier and the corresponding flag is 1. -// #RNU_RES_E -if ((sum(mtlb_strcmp(ASTFunName,SharedInfo.Annotations.DataPrec)) > 0) & ... - (SharedInfo.SkipNextPrec == 1)) - // #RNU_RES_B - PrintStringInfo(' Current function will not be inserted in the Function List.',ReportFileName,'file','y'); - // #RNU_RES_E - return; -end - -// #RNU_RES_B -// Exit if the function is OpEqual and the corresponding skip flag is enabled. -// #RNU_RES_E -if ((mtlb_strcmp(ASTFunName,'OpEqual')) & ... - (SharedInfo.SkipNextEqual == 1)) - // #RNU_RES_B - PrintStringInfo(' Current function will not be inserted in the Function List.',ReportFileName,'file','y'); - // #RNU_RES_E - return; -end - -// #RNU_RES_B -// --------------------------------------- -// --- If the function is not skipped. --- -// --------------------------------------- -// --- Check existence of the C function. --- -// #RNU_RES_E -flagexist = FL_ExistCFunction(CFunName,USER2CAvailableCDat,SCI2CAvailableCDat,ConvertedDat,ToBeConvertedDat,ReportFileName); - -// #RNU_RES_B -// --- Update C function list and dat files. --- -// #RNU_RES_E -if (flagexist == %F) - - // #RNU_RES_B - // --- Add C function to the "ToBeConverted" function list. --- - // #RNU_RES_E - load(ToBeConvertedDat,'ToBeConverted'); - - NToConvP1 = size(ToBeConverted,1)+1; - ToBeConverted(NToConvP1).SCIFunctionName = ASTFunName; - ToBeConverted(NToConvP1).CFunctionName = CFunName; - - save(ToBeConvertedDat,ToBeConverted); - SharedInfo.NFilesToTranslate = SharedInfo.NFilesToTranslate + 1; - - // #RNU_RES_B - // --- Generate C Function dat file. --- - PrintStringInfo(' Add C Function ""'+CFunName+'"" to: '+ToBeConvertedDat,ReportFileName,'file','y'); - // #RNU_RES_E -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/Array2String.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/Array2String.sci deleted file mode 100644 index 27e9aa15..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/Array2String.sci +++ /dev/null @@ -1,40 +0,0 @@ -function [StringArray] = Array2String(InArray); -// function [StringArray] = Array2String(InArray); -// ----------------------------------------------------------------- -// #RNU_RES_B -// Converts an input array into a string. Maximum 2D array are allowed. -// Ex.: InArray = [10, 4]; -// StringArray = "[10, 4]"; -// #RNU_RES_E -// -// Input data: -// InArray: Input array. -// -// Output data: -// StringArray: array converted into a string. -// -// Status: -// 13-May-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -[Nrows,Ncols] = size(InArray); - -StringArray = '['; -for counterrows = 1:Nrows - for countercols = 1:Ncols - StringArray = StringArray + string(InArray(counterrows,countercols)) + ','; - end - StringArray = part(StringArray,1:(length(StringArray)-1)); // Remove the last ',' - StringArray = StringArray+';'; -end -StringArray = part(StringArray,1:(length(StringArray)-1)); // Remove the last ';' -StringArray = StringArray+']'; -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/ConvertPathMat2C.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/ConvertPathMat2C.sci deleted file mode 100644 index d73d22c7..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/ConvertPathMat2C.sci +++ /dev/null @@ -1,61 +0,0 @@ -function OutPath = ConvertPathMat2C(InPath,CPathStyle) -// function OutPath = ConvertPathMat2C(InPath,CPathStyle) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Converts the input path InPath into a path by using the path -// style specified by CPathStyle. -// #RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Jan-2008 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); -if (CPathStyle == 'windows') - OutPath=strsubst(InPath,'/','\'); -elseif (CPathStyle == 'unix') - OutPath=strsubst(InPath,'\','/'); -elseif (CPathStyle == 'cygwin') - OutPath=strsubst(InPath,'\','/'); - OutPath=strsubst(OutPath,'A:','/cygdrive/a'); - OutPath=strsubst(OutPath,'B:','/cygdrive/b'); - OutPath=strsubst(OutPath,'C:','/cygdrive/c'); - OutPath=strsubst(OutPath,'D:','/cygdrive/d'); - OutPath=strsubst(OutPath,'E:','/cygdrive/e'); - OutPath=strsubst(OutPath,'F:','/cygdrive/f'); - OutPath=strsubst(OutPath,'G:','/cygdrive/g'); - OutPath=strsubst(OutPath,'H:','/cygdrive/h'); - OutPath=strsubst(OutPath,'I:','/cygdrive/i'); - OutPath=strsubst(OutPath,'J:','/cygdrive/j'); - OutPath=strsubst(OutPath,'K:','/cygdrive/k'); - OutPath=strsubst(OutPath,'L:','/cygdrive/l'); - OutPath=strsubst(OutPath,'M:','/cygdrive/m'); - OutPath=strsubst(OutPath,'N:','/cygdrive/n'); - OutPath=strsubst(OutPath,'O:','/cygdrive/o'); - OutPath=strsubst(OutPath,'P:','/cygdrive/p'); - OutPath=strsubst(OutPath,'Q:','/cygdrive/q'); - OutPath=strsubst(OutPath,'R:','/cygdrive/r'); - OutPath=strsubst(OutPath,'S:','/cygdrive/s'); - OutPath=strsubst(OutPath,'T:','/cygdrive/t'); - OutPath=strsubst(OutPath,'U:','/cygdrive/u'); - OutPath=strsubst(OutPath,'V:','/cygdrive/v'); - OutPath=strsubst(OutPath,'W:','/cygdrive/w'); - OutPath=strsubst(OutPath,'X:','/cygdrive/x'); - OutPath=strsubst(OutPath,'Y:','/cygdrive/y'); - OutPath=strsubst(OutPath,'Z:','/cygdrive/z'); -else - OutPath = InPath; -end -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/File2StringArray.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/File2StringArray.sci deleted file mode 100644 index 626cb6ce..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/File2StringArray.sci +++ /dev/null @@ -1,54 +0,0 @@ -function [String_Array,N_Strings] = File2StringArray(InFileName) -// function [String_Array,N_Strings] = File2StringArray(InFileName) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Reads a text file and stores every line into a string array. -// #RNU_RES_E -// -// Input data: -// InFileName: path+filename of the input file. -// -// Output data: -// String_Array: array of strings containing the lines of the input -// text file. -// N_Strings: number of strings stored in String_Array. -// -// Status: -// 10-Nov-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - - -// ----------------------- -// --- Initialization. --- -// ----------------------- -N_Strings = 0; -String_Array = ''; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// -------------------- -// --- Open C file. --- -// -------------------- -fidfile = SCI2COpenFileRead(InFileName); - -// ------------------- -// --- Read lines. --- -// ------------------- -tmpline = mgetl(fidfile,1); -while (meof(fidfile) == 0) - N_Strings = N_Strings + 1; - String_Array(N_Strings) = tmpline; - tmpline = mgetl(fidfile,1); -end - -mclose(fidfile); -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/FunName2SciFileName.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/FunName2SciFileName.sci deleted file mode 100644 index 8c473001..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/FunName2SciFileName.sci +++ /dev/null @@ -1,56 +0,0 @@ -function ScilabFileName = FunName2SciFileName(DirList,InFunName); -// function ScilabFileName = FunName2SciFileName(DirList,InFunName); -// ----------------------------------------------------------------- -// #RNU_RES_B -// This function generates the full path of the scilab file -// related to the function name (InFunName) specified. -// In more detail the file "eval(InFunName).sci" file is searched -// in the directories specified in DirList. -// #RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 16-Apr-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -if (prod(size(DirList)) == 0) - SCI2Cerror('Incorrect DirList parameter.'); -end - -if (prod(size(InFunName)) == 0) - SCI2Cerror('Incorrect InFunName parameter.'); -end - -// --- Generate the PathList. --- -for tmpcounter = 1:max(size(DirList)) - PathList(tmpcounter) = fullfile(DirList(tmpcounter),(InFunName+'.sci')); -end - -// --- Search the .sci file. --- -ScilabFileName = listfiles(PathList); - -// --- Check on the number of .sci files found. --- -if ((prod(size(ScilabFileName))) > 1) - disp(ScilabFileName); - SCI2Cerror('Found more than one scilab file.'); -end - -if ((prod(size(ScilabFileName))) < 1) - disp(ScilabFileName); - SCI2Cerror('Scilab file ""'+InFunName+'.sci"", not found'); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/IsNanSize.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/IsNanSize.sci deleted file mode 100644 index 486f6fcc..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/IsNanSize.sci +++ /dev/null @@ -1,39 +0,0 @@ -function outbool = IsNanSize(instring) -// function outbool = IsNanSize(instring) -// ----------------------------------------------------------------- -// #RNU_RES_B -// It searches for __SCI2CNANSIZE string in the string which specifies the -// size of the argument. Useful to find if a given size contains -// a nan value. In this case an error is issued. -// IsNanSize = '__SCI2CNANSIZE' -> True -// IsNanSize = 'c*__SCI2CNANSIZE' -> True -// IsNanSize = 'c+b' -> False -// #RNU_RES_E -// -// Input data: -// instring: string to analyze. -// -// Output data: -// outbool: %T if nan string has been found. -// -// Status: -// 11-Feb-2008 -- Nutricato Raffaele: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - - -outbool = %F; -indexval = strindex(instring,'__SCI2CNANSIZE'); - -if(length(indexval)>=1) - outbool = %T; -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/KeyStr2FileStrPos.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/KeyStr2FileStrPos.sci deleted file mode 100644 index e9fb1c48..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/KeyStr2FileStrPos.sci +++ /dev/null @@ -1,83 +0,0 @@ -function [flag_found,requested_line,line_position] = KeyStr2FileStrPos(filename,key_string,method) -// function [flag_found,requested_line,line_position] = KeyStr2FileStrPos(filename,key_string,method) -// -------------------------------------------------------------------------------- -// #RNU_RES_B -// This function returns a line and its position from a specified ASCII file. -// The line and the position returned starts with a key string specified in the -// input parameters. -// -// Input data: -// filename: path + name of the ASCII file. -// key_string: string that specifies the initial portion of the line to return. -// method: 'cut': in the returned line will be removed the key_string -// 'no_cut': (default), in the returned line will not be removed the key_string -// -// Output data: -// flag_found: 0 if the line is not found or an error occured. -// 1 if the search succeed. -// requested_line: is the line in the file which contains as first characters those -// specified in the key_string. -// line_position: position of the line in the file; the first line in the file -// is the line number 1. -// #RNU_RES_E -// -// -// Status: -// 08-Jul-2002 -- Author: Raffaele Nutricato -// 08-Jul-2002 -- Raffaele Nutricato: Revision OK -// 23-Nov-2004 -- Raffaele Nutricato: Changed disp to warning in if (flag_found == 0). -// It allows to disable the message it generates -// by using warning off. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,3); - - -if (argn(2) == 2) - method = 'no_cut'; -end -method = convstr(method, 'u'); - -// Initialize output parameters -flag_found = 0; -requested_line = ''; -line_position = 0; - -// Open the text file (read only) -[fid,mess] = mopen(filename,'r'); -if ( fid == -1 ) - disp(['Cannot open: '+filename]) - disp(mess); - flag_found = 0; - return; -end - -// loop on the lines of the file -num_chars = length(key_string); -while (meof(fid) == 0) - check_string = fgetl(fid); - line_position = line_position + 1; - if (key_string == check_string) & (key_string == num_chars) then - flag_found = 1; - requested_line = check_string; - if (method =='cut') then - requested_line(1:num_chars) = []; - end - mclose(fid); - return; - end -end - -if (flag_found == 0) - warning('Warning: string ' + key_string + ' not found in file: ' + filename); - mclose(fid); -end - -mclose(fid); -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/PrintStepInfo.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/PrintStepInfo.sci deleted file mode 100644 index f4a17926..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/PrintStepInfo.sci +++ /dev/null @@ -1,67 +0,0 @@ -function PrintStepInfo(inputstring,filename,outputtype) -// function PrintStepInfo(inputstring,filename,outputtype) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Prints a string by using a predefined format into a file or on -// the stdout. -// -// Input data: -// filename: optional parameter, that specifies the output file. -// If filename is '' or it is not provided to the function, -// the string will be printed on the stdout. -// outputtype: 'file' -> prints only on file. -// 'stdout' -> prints only on the stdout. -// 'both' -> prints on both file and stdoud. -// Default is 'stdout'. -// Output data: -// -// #RNU_RES_E -// Status: -// 02-Jan-2006 -- Nutricato Raffaele: Author. -// 02-Jan-2006 -- Nutricato Raffaele: TEST OK. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,3); - - -if argn(2) < 3 - bothout = 'n'; - if argn(2) < 2 - filename = ''; - end -end -if (length(filename) == 0) - outputtype = 'stdout'; // Prints only on the stdout. -end - -Nstars = length(inputstring); -starstring = []; -for counterstars = 1:Nstars - starstring = starstring+'*'; -end -blankstring = [' ']; - -if ((outputtype=='both') | (outputtype=='stdout')) - // disp(' ') - // disp(' ') - disp(blankstring+' '+starstring); - disp(blankstring+'==> '+inputstring); - disp(blankstring+' '+starstring); - // disp(' ') -end - -if ((outputtype=='both') | (outputtype=='file')) - filenamefprintf(filename,'y',' '); - filenamefprintf(filename,'y',' '); - filenamefprintf(filename,'y',blankstring+' '+starstring); - filenamefprintf(filename,'y',blankstring+'==> '+inputstring); - filenamefprintf(filename,'y',blankstring+' '+starstring); - filenamefprintf(filename,'y',' '); -end -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/PrintStringInfo.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/PrintStringInfo.sci deleted file mode 100644 index 6fd4ec20..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/PrintStringInfo.sci +++ /dev/null @@ -1,65 +0,0 @@ -function PrintStringInfo(str, filename, outputtype, ennewline) -// function PrintStringInfo(str,filename,outputtype,ennewline) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Prints a string into a file or on the stdout or on both. -// -// Input data: -// filename: optional parameter, that specifies the output file. -// If filename is '' or it is not provided to the function, -// the string will be printed on the stdout. -// outputtype: 'file' -> prints only on file. -// 'stdout' -> prints only on the stdout. -// 'both' -> prints on both file and stdout. -// Default is 'stdout'. -// ennewline: optional (default = 'y'); If y adds a newline character -// at the end of the input string. -// -// Output data: -// --- -// #RNU_RES_E -// -// Status: -// 02-Jan-2006 -- Nutricato Raffaele: Author. -// 02-Jan-2006 -- Nutricato Raffaele: TEST OK. -// 02-May-2006 -- Nutricato Raffaele: Added ennewline. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),0,4); - - if argn(2) < 4 - ennewline = 'y'; - if argn(2) < 3 - outputtype = 'stdout'; - if argn(2) < 2 - filename = ''; - if argn(2) < 1 - str = ''; - end - end - end - end - - if (length(filename) == 0) then - outputtype = 'stdout'; // Prints only on the stdout. - end - - if (outputtype=='both') | (outputtype=='stdout') - disp(str) - end - - if (outputtype=='both') | (outputtype=='file') - if (ennewline=='y') - filenamefprintf(filename,'y',str); - else - filenamefprintf(filename,'n',str); - end - end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/ReadStringCard.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/ReadStringCard.sci deleted file mode 100644 index 5d9358ba..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/ReadStringCard.sci +++ /dev/null @@ -1,61 +0,0 @@ -function cardvalue = ReadStringCard(filename,cardname,commentdelim,enableerror) -// function cardvalue = ReadStringCard(filename,cardname,commentdelim,enableerror) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Reads the string associated to the card cardname placed -// in filename. -// The value of cardname is assumed to be a string. -// If the card is not found an error will occur. -// -// Input data: -// filename: full path + name of the file where the card -// is being searched. -// cardname: string with the name of the card. -// commentdelim: specifies a character for an eventual comment -// (to be discarded) after the card value. -// enableerror: 'y' enable error message. -// 'n' enable warning message. -// -// Output data: -// cardvalue: string associated to the card. Blanks characters -// are discarded. -// #RNU_RES_E -// -// Status: -// 06-Feb-2004 -- Nutricato Raffaele: Author. -// 06-Feb-2004 -- Nutricato Raffaele: TEST OK. -// 25-Jun-2004 -- Nutricato Raffaele: Added Comment delimiter -// and enableerror as input parameter. -// 13-Apr-2007 -- Intelligente Fabio: Rewritten from Matlab to Scilab. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,3); - -if argn(2) == 2 then - commentdelim = ' '; - enableerror = 'y'; - -elseif argn(2) == 3 then - enableerror = 'y'; -end - -[flag_found,requested_line,dummy2] = ... - KeyString2FileStringPos(filename,cardname,'cut'); -cardvalue = stripblanks(strtok(requested_line,commentdelim)); -clear requested_line dummy2 - -if (flag_found == 0) then - if (enableerror == 'y') then - SCI2Cerror([cardname,' not found']); - else - warning([cardname,' not found']); - end -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CCreateDir.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CCreateDir.sci deleted file mode 100644 index cc152462..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CCreateDir.sci +++ /dev/null @@ -1,31 +0,0 @@ -function SCI2CCreateDir(OutDir) -// function SCI2CCreateDir(OutDir) -// ----------------------------------------------------------------- -// Create the dir OutDir. -// -// Input data: -// OutDir: full path (absolute or relative) of the directory to be created. -// -// Output data: -// --- -// -// Status: -// 25-Jun-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -[tmppath,tmpfname,tmpextension]=fileparts(OutDir) ; - -status_dir = mkdir(tmppath,tmpfname+tmpextension) ; -if (status_dir == 0) - SCI2Cerror('Cannot create: '+OutDir); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CFindFile.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CFindFile.sci deleted file mode 100644 index 912a72a8..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CFindFile.sci +++ /dev/null @@ -1,41 +0,0 @@ -function [FlagFound,SCIFileName] = SCI2CFindFile(PathList,FileName) -// function [FlagFound,SCIFileName] = SCI2CFindFile(PathList,FileName) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 11-Jul-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -FlagFound = 0; -SCIFileName = ''; - -// Perform the search in the user .sci files. -Nscipaths = size(PathList,1); -counterscipaths = 1; -while ((FlagFound == 0) & (counterscipaths <= Nscipaths)) - dirscifilename = PathList(counterscipaths); - fullpathscifilename = fullfile(dirscifilename,FileName); - if (SCI2Cfileexist(dirscifilename,FileName)) - // It is a function of the USER2C library. - FlagFound = 1; - SCIFileName = fullpathscifilename; - end - counterscipaths = counterscipaths + 1; -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CNInArgCheck.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CNInArgCheck.sci deleted file mode 100644 index 23886fed..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CNInArgCheck.sci +++ /dev/null @@ -1,28 +0,0 @@ -function SCI2CNInArgCheck(NInArgs,MinNArgs,MaxNArgs) -// function SCI2CNInArgCheck(NInArgs,MinNArgs,MaxNArgs) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Check that NInArgs is in the range specified by MinNArgs and -// MaxNArgs. -// -// Input data: -// NInArgs: number of input arguments of the function under test. -// MinNArgs: minimum number of input arguments allowed. -// MaxNArgs: maximum number of input arguments allowed. -// -// Output data: -// --- -// #RNU_RES_E -// -// Status: -// 23-Nov-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato -// ----------------------------------------------------------------- - -if ((NInArgs < MinNArgs) | (NInArgs > MaxNArgs)) - SCI2Cerror('Incorrect number of input arguments.'); -end - - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2COpenFileRead.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2COpenFileRead.sci deleted file mode 100644 index 1ad60ce5..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2COpenFileRead.sci +++ /dev/null @@ -1,30 +0,0 @@ -function fidnumber = SCI2COpenFileRead(filename) -// function fidnumber = SCI2COpenFileRead(filename) -// -------------------------------------------------------------------------------- -// Open a file in read mode. -// -// Input data: -// filename: path + name of the file to read. -// -// Output data: -// fidnumber: file identifier. -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// --- Open the .sci file (read only). --- -[fidnumber,fiderror] = mopen(filename,'r'); -if (fiderror < 0) - SCI2Cerror(['Cannot open (in read mode): '+filename]); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2COpenFileWrite.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2COpenFileWrite.sci deleted file mode 100644 index 8a816b92..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2COpenFileWrite.sci +++ /dev/null @@ -1,30 +0,0 @@ -function fidnumber = SCI2COpenFileWrite(filename) -// function fidnumber = SCI2COpenFileWrite(filename) -// -------------------------------------------------------------------------------- -// Open a file in write mode. -// -// Input data: -// filename: path + name of the file to be written. -// -// Output data: -// fidnumber: file identifier. -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// --- Open the .sci file (write mode). --- -[fidnumber,fiderror] = mopen(filename,'w'); -if (fiderror < 0) - SCI2Cerror(['Cannot open (in write mode): '+filename]); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CTemplate.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CTemplate.sci deleted file mode 100644 index e47bdd00..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CTemplate.sci +++ /dev/null @@ -1,32 +0,0 @@ -function out = SCI2CTemplate(in1,in2) -// function out = SCI2CTemplate(in1,in2) -// ----------------------------------------------------------------- -// This is a template function which shows how to comment functions. -// -// Input data: -// in1: input argument number 1 -// in2: input argument number 2 -// -// Output data: -// out: output argument number 1 -// -// Status: -// 03-Jan-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Ccopyfile.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Ccopyfile.sci deleted file mode 100644 index f95c29ef..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Ccopyfile.sci +++ /dev/null @@ -1,49 +0,0 @@ -function SCI2Ccopyfile(InFileName,OutFileName,CopyMode) -// function SCI2Ccopyfile(InFileName,OutFileName,CopyMode) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Copy the contents of infile into outfile. Append mode is used. -// -// Input data: -// InFileName: path+filename of the input file. -// OutFileName: path+filename of the input file. -// CopyMode: 'append' or 'overwrite' -// #RNU_RES_E -// -// Output data: -// --- -// -// Status: -// 23-Nov-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -if (CopyMode == 'append') - // ------------------------ - // --- Open Input file. --- - // ------------------------ - fidIn = SCI2COpenFileRead(InFileName); - - // ------------------- - // --- Read lines. --- - // ------------------- - tmpline = mgetl(fidIn,1); - while (meof(fidIn) == 0) - PrintStringInfo(tmpline, OutFileName, 'file', 'y'); - tmpline = mgetl(fidIn,1); - end - mclose(fidIn); -elseif (CopyMode == 'overwrite') - PrintStringInfo(' ', OutFileName, 'file', 'y'); // Cannot use scilab copyfile when the directory is empty!. - copyfile(InFileName,OutFileName); -else - SCI2Cerror('Unknown CopyMode: ""'+CopyMode+'""'); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cerror.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cerror.sci deleted file mode 100644 index 25851a2a..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cerror.sci +++ /dev/null @@ -1,28 +0,0 @@ -function SCI2Cerror(errorstring) -// function SCI2Cerror(errorstring) -// ----------------------------------------------------------------- -// It is the error function but before issuing the error, performs -// the mclose('all'); -// -// Input data: -// errorstring: string which specifies the error message. -// -// Output data: -// --- -// -// Status: -// 02-May-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - - -mclose('all') -error('###SCI2CERROR: '+errorstring); -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CerrorFile.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CerrorFile.sci deleted file mode 100644 index 29488876..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2CerrorFile.sci +++ /dev/null @@ -1,29 +0,0 @@ -function SCI2CerrorFile(errorstring,filename); -// function SCI2CerrorFile(errorstring,filename); -// ----------------------------------------------------------------- -// It is the error function but before issuing the error, performs -// the mclose('all'); It also write the error string into the -// file specified by filename. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 02-May-2006 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -mclose('all') -PrintStringInfo('Error: '+errorstring,filename,'both'); -error('####SCI2C_ERROR -> Read File: '+filename+'.'); -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cfileexist.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cfileexist.sci deleted file mode 100644 index 05dbf590..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cfileexist.sci +++ /dev/null @@ -1,38 +0,0 @@ -function ExistTest = SCI2Cfileexist(InDir,FileName) -// function ExistTest = SCI2Cfileexist(InDir,FileName) -// ----------------------------------------------------------------- -// Searches for the file FileName in the directory InDir. -// Return %F if it doesn't exist. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 12-Jun-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -tmppwd = pwd(); -cd(InDir); -allfiles = ls(FileName); -cd(tmppwd); - -if (size(allfiles,1) == 0) - ExistTest = %F; -elseif (size(allfiles,1) == 1) - ExistTest = %T; -else - SCI2Cerror('Very Strange! Found more than one file with the same name.'); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cflipud.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cflipud.sci deleted file mode 100644 index 2e988c1b..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cflipud.sci +++ /dev/null @@ -1,40 +0,0 @@ -function OutputData = SCI2Cflipud(InputData) -// function OutputData = SCI2Cflipud(InputData) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Inverts (flips) the position of the arguments of InputData. -// Input data can be a struct or an array. -// Ex.: -// A(1) = 'one'; -// A(2) = 'two'; -// A(3) = 'three'; -// B = SCI2Cflipud(A); -// B(1) = 'three'; -// B(2) = 'two'; -// B(3) = 'one'; -// -// Input data: -// InputData: input array or structure. -// -// Output data: -// OutputData: flipped version of the input array. -// -// #RNU_RES_E -// Status: -// 12-May-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -NInputs = size(InputData,1); -OutputData = InputData; // To be sure that they will have the same structure. -for cnt = 1:NInputs - OutputData(cnt) = InputData(NInputs-cnt+1); -end -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cisnum.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cisnum.sci deleted file mode 100644 index 50a5c14e..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cisnum.sci +++ /dev/null @@ -1,30 +0,0 @@ -function outbool = SCI2Cisnum(instring) -// function outbool = SCI2Cisnum(instring) -// ----------------------------------------------------------------- -// It fixes the bug of isnum. isnum('d') -> %T!!! -// -// Input data: -// instring: string to analyze. -// -// Output data: -// outbool: %T if instring is a number. -// -// Status: -// 12-Apr-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -instring = convstr(instring,'l'); -outbool = isnum(instring); -firstchar = part(instring,1:1); -if (firstchar == 'd' | firstchar == 'e') - outbool = %F; -end -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cmdelete.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cmdelete.sci deleted file mode 100644 index d19233dc..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cmdelete.sci +++ /dev/null @@ -1,33 +0,0 @@ -function SCI2Cmdelete(InFile) -// function SCI2Cmdelete(InFile) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Deletes the input files only if the file really exists. -// This avoids the issuing of the error generated by mdelete. -// -// Input data: -// InFile: full path of the file to be deleted. -// -// Output data: -// #RNU_RES_E -// -// Status: -// 12-Apr-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -[Inx,Inierr]=fileinfo(InFile); -if Inierr == 0 - mdelete(InFile);//NUT: questa stampa a video il file che sta cancellando. - //NUT ho fatto delle altre prove e mi funzionava tutto. solo che quando - //NUT eseguo il codice scilab to c mi stampa a video tutto il nome del file. -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cresize.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cresize.sci deleted file mode 100644 index ba78fde0..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cresize.sci +++ /dev/null @@ -1,33 +0,0 @@ -function out = SCI2Cresize(in) -// function out = SCI2Cresize(in) -// ----------------------------------------------------------------- -// #RNU_RES_B -// It is a dummy function used by the programmer to specify at a given -// point that a variable is changing its size. This will be translated -// into C code by re-assigning the size array. -// Next releases of this function will include check to avoid -// increment of the size outside the limits specified by the first -// initialization of the variable. -// -// Input data: -// in: input variable to be resized -// -// Output data: -// out: resized variable -// -// #RNU_RES_E -// Status: -// 10-Jun-2008 -- Nutricato Raffaele: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -out = in; - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstring.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstring.sci deleted file mode 100644 index cf6d4370..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstring.sci +++ /dev/null @@ -1,34 +0,0 @@ -function outstring = SCI2Cstring(innum) -// function outstring = SCI2Cstring(innum) -// ----------------------------------------------------------------- -// #RNU_RES_B -// It fixes the bug of string function when applied to -// exponential formats: -// Example: -// -->string(10e-10) -// ans = -// 1.000D-09 -// Note how the "D" is syntactically wrong. -// -// Input data: -// innnum: input number to be converted into string. -// -// Output data: -// outstring: string containing the conversion. -// #RNU_RES_E -// -// Status: -// 07-May-2008 -- Nutricato Raffaele: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -outstring=strsubst(string(innum),'D','e'); - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstrncmp.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstrncmp.sci deleted file mode 100644 index 54a5e148..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstrncmp.sci +++ /dev/null @@ -1,27 +0,0 @@ -function res = SCI2Cstrncmp(s1,s2,n) -// function res = SCI2Cstrncmp(s1,s2,n) -// ----------------------------------------------------------------- -// This function compares first n characters of strings s1 and s2. -// SCI2Cstrncmp(s1,s2,n) returns 1logical T (true) if the first n characters of -// the strings s1 and s2 are the same and logical 0 (false) otherwise. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 16-Apr-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -res = (part(s1,1:n) == part(s2,1:n)); -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstrncmps1size.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstrncmps1size.sci deleted file mode 100644 index 38e8c371..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SCI2Cstrncmps1size.sci +++ /dev/null @@ -1,32 +0,0 @@ -function res = SCI2Cstrncmps1size(s1,s2); -// function res = SCI2Cstrncmps1size(s1,s2); -// ----------------------------------------------------------------- -// #RNU_RES_B -// This function compares first n characters of strings s1 and s2. -// n is the size of the string s1. -// SCI2Cstrncmps1size returns logical T (true) if the first n characters of -// the strings s1 and s2 are the same and logical 0 (false) otherwise. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// #RNU_RES_E -// Status: -// 16-Apr-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -n = length(s1); -res = (part(s1,1:n) == part(s2,1:n)); - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/SizeInByte.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/SizeInByte.sci deleted file mode 100644 index fa2d4f94..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/SizeInByte.sci +++ /dev/null @@ -1,41 +0,0 @@ -function SizeIn = SizeInByte(InDataType) -// function SizeIn = SizeInByte(InDataType) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Returns the size in bytes of the input data type. -// -// Input data: -// InDataType: input data type. It can be: -// 'float' -// 'double' -// 'floatComplex*' -// 'doubleComplex*' -// -// Output data: -// SizeIn: size in bytes of the input data type. -// -// #RNU_RES_E -// Status: -// 12-May-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -if (InDataType == 'float') - SizeIn = 4; -elseif (InDataType == 'double') - SizeIn = 8; -elseif (InDataType == 'floatComplex*') - SizeIn = 8; -elseif (InDataType == 'doubleComplex*') - SizeIn = 16; -else - error('Unknown data type: '+InDataType); -end -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/dispina.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/dispina.sci deleted file mode 100644 index dc07cddc..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/dispina.sci +++ /dev/null @@ -1,31 +0,0 @@ -function dispina(instring); -// function dispina(instring); -// ----------------------------------------------------------------- -// Quista sacciu sulu iou comu funziona e a ce me serve. -// -// Input data: -// -// Output data: -// -// Status: -// 12-Apr-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -disp('++++++++++++++++++++++++++++++++++++++++++++++++++') -disp('++++++++++++++++++++++++++++++++++++++++++++++++++') -disp('++++++++++++++++++++++++++++++++++++++++++++++++++') -disp('++++++++++++++++++++++++++++++++++++++++++++++++++') -disp(instring); -disp('++++++++++++++++++++++++++++++++++++++++++++++++++') -disp('++++++++++++++++++++++++++++++++++++++++++++++++++') -disp('++++++++++++++++++++++++++++++++++++++++++++++++++') -disp('++++++++++++++++++++++++++++++++++++++++++++++++++') -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/filenamefprintf.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/filenamefprintf.sci deleted file mode 100644 index 99aeb81c..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/filenamefprintf.sci +++ /dev/null @@ -1,43 +0,0 @@ -function filenamefprintf(filename,ennewline,str) -// function filenamefprintf(filename,ennewline,str) -// -------------------------------------------------------------------------------- -// Uses the printf to print the string specified by varargin. filenamefprintf -// uses the filename instead of the fid parameter used by fprintf. -// Everytime filenamefprintf is called it -// opens the file, prints the string in it and then closes it. -// Opening is performed in read/append mode (at+). -// -// Input data: -// filename: string that specifies the name of the file. -// varargin are the input arguments for the printf. -// -// Output data: -// --- -// -// Status: -// 31-Jan-2006 -- Nutricato Raffaele: Author. -// 31-Jan-2006 -- Nutricato Raffaele: TEST OK. -// -// Copyright 2006 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - - -// [FidReportFile, mess] = mopen(deblank(filename),'at+'); - [FidReportFile, mess] = mopen(filename,'a+'); - if (FidReportFile == -1) then - SCI2Cerror(mess); - end - if ennewline=='y' then - mfprintf(FidReportFile,'%s\n',str); - else - mfprintf(FidReportFile,'%s',str); - end - mclose(FidReportFile); - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/float.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/float.sci deleted file mode 100644 index 634950b1..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/float.sci +++ /dev/null @@ -1,26 +0,0 @@ -function y = float(x) -// ----------------------------------------------------------------- -// Dummy function for float precision specifier. -// -// Input data: -// x: input array or scalar. -// -// Output data: -// y: output array or scalar. -// -// Status: -// 12-Apr-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - - -y = x; - -endfunction diff --git a/src/Scilab2C/Scilab2C/GeneralFunctions/squeezestrings.sci b/src/Scilab2C/Scilab2C/GeneralFunctions/squeezestrings.sci deleted file mode 100644 index 049476d1..00000000 --- a/src/Scilab2C/Scilab2C/GeneralFunctions/squeezestrings.sci +++ /dev/null @@ -1,31 +0,0 @@ -function OutString = squeezestrings(InStringArray) -// function OutString = squeezestrings(InStringArray) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Converts an array of strings into a single string. -// -// Input data: -// InStringArray: Array of strings. -// -// Output data: -// OutString: Output string. -// -// #RNU_RES_E -// Status: -// 12-Apr-2007 -- Nutricato Raffaele: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -OutString = []; -for counterstrings = 1:max(size(InStringArray)) - OutString = OutString+InStringArray(counterstrings); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/LaunchMultiRunSCI2C.sci b/src/Scilab2C/Scilab2C/LaunchMultiRunSCI2C.sci deleted file mode 100644 index bc1e118a..00000000 --- a/src/Scilab2C/Scilab2C/LaunchMultiRunSCI2C.sci +++ /dev/null @@ -1,80 +0,0 @@ -// Before launching this script, please -// check all the paths below. -// User should change parameters only in (USER PARAMETERS) sections. -// cd C:\Nutricato\OpenProjects\FP6_hArtes\WP2_SCI2C\Software\Scilab2C; exec LaunchMultiRunSCI2C.sci - -// --- CLEAN WORKSPACE --- -exec full_reset.sce; -mode(-1); - -// --- GENERAL SETTINGS (USER PARAMETERS) --- -RunsDirectory = pwd(); // Path of the SCI2CRuns directory -SCI2CDirectory = 'D:\Nutricato_GAPSVN\PROGETTI_APERTI\POLIBA\hArtes\WP2_SCI2C\Software\Version_alpha\Scilab2C'; // Path of the Scilab2C directory - -// --- SPECIFIC SETTINGS (USER PARAMETERS) --- -FullListSCI2CInputPrmFiles = ... - [... - 'D:\Nutricato_GAPSVN\PROGETTI_APERTI\POLIBA\hArtes\WP2_SCI2C\Software\Version_alpha\SCI2CTests\test999_WorkingDir\SCI2CInputParameters.sce';... - ]; -WorkingListSCI2CInputPrmFiles = ... - [... - 'D:\Nutricato_GAPSVN\PROGETTI_APERTI\POLIBA\hArtes\WP2_SCI2C\Software\Version_alpha\SCI2CTests\test999_WorkingDir\SCI2CInputParameters.sce';... - ]; - -// Select one of the two lists above. - -ListSCI2CInputPrmFiles = WorkingListSCI2CInputPrmFiles; -//ListSCI2CInputPrmFiles = FullListSCI2CInputPrmFiles; - -// ================================ -// ================================ -// ================================ -// ================================ - -// --- LAUNCH MULTIRUNSCI2C --- -NTranslations = size(ListSCI2CInputPrmFiles,1); -for cnttransl = 1:NTranslations - cd(SCI2CDirectory); - - SCI2CInputPrmFileName = ListSCI2CInputPrmFiles(cnttransl); - - // --- LAUNCH USER SCI CODE TO TEST IT BEFORE TRANSLATING IT!!! --- - cd(SCI2CDirectory) - getf("runscicode.sci"); - runscicode(SCI2CInputPrmFileName); - - // --- ASK USER FOR CONTINUATION. --- - userchoice = input('Start translation [y/n]?','s'); - if (userchoice == 'y') - - // --- LAUNCH SCI2C --- - cd(SCI2CDirectory) - getf("runsci2c.sci"); - runsci2c(SCI2CInputPrmFileName); - cd(SCI2CDirectory) - else - end -end - -// ---------------------------------------- -// --- Compile and Launch all the code. --- -// ---------------------------------------- -// This option is available only for regression tests. -if (1==1) - cd(fullfile(SCI2CDirectory,'ToolInitialization')); - exec('INIT_SCI2CLoader.sce'); - - PrintStepInfo('Generate Script for Regression Tests...Available only for Debug.','','both'); - C_GenerateLaunchScript('D:\Nutricato\OpenProjects\FP6_hArtes\WP2_SCI2C\Software\SCI2CTests\RegressionTests',ListSCI2CInputPrmFiles); -end - -// --------------------------------------- -// --- Go back to the start directory. --- -// --------------------------------------- -cd (RunsDirectory); - -// ------------------------ -// --- Close all files. --- -// ------------------------ -// --- This must be the last instruction. --- -mclose('all'); diff --git a/src/Scilab2C/Scilab2C/LaunchRunSCI2C.sci b/src/Scilab2C/Scilab2C/LaunchRunSCI2C.sci deleted file mode 100644 index 70a500eb..00000000 --- a/src/Scilab2C/Scilab2C/LaunchRunSCI2C.sci +++ /dev/null @@ -1,37 +0,0 @@ -// Before launching this script, please -// check all the paths below. -// User should change parameters only in (USER PARAMETERS) sections. -// cd C:\SCI2CTests\SCI2CRuns; exec LaunchRunSCI2C.sci - -// --- CLEAN WORKSPACE --- -exec full_reset.sce; -mode(-1); - -// --- GENERAL SETTINGS (USER PARAMETERS) --- -RunsDirectory = pwd(); // Path of the SCI2CRuns directory - -SCI2CDirectory = '.'; - -// --- SPECIFIC SETTINGS (USER PARAMETERS) --- -SCI2CInputPrmFileName = '../SCI2CTests/test999_WorkingDir/SCI2CInputParameters.sce'; - -// --- LAUNCH USER SCI CODE TO TEST IT BEFORE TRANSLATING IT!!! --- -cd(SCI2CDirectory) -getf("runscicode.sci"); -runscicode(SCI2CInputPrmFileName); - -// --- ASK USER FOR CONTINUATION. --- -userchoice = input('Start translation [y/n]?','s'); -if (userchoice == 'y') - // --- LAUNCH SCI2C --- - cd(SCI2CDirectory); - getf("runsci2c.sci"); - runsci2c(SCI2CInputPrmFileName); - cd(SCI2CDirectory); -end - -// --- GO BACK TO THE ORIGINAL DIRECTORY. --- -cd (RunsDirectory); - -// --- CLOSE ALL FILES. --- -mclose('all'); diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_AnalyzeScope.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_AnalyzeScope.sci deleted file mode 100644 index bb38ea73..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_AnalyzeScope.sci +++ /dev/null @@ -1,124 +0,0 @@ -function OutArg = ST_AnalyzeScope(OldOutArg,NOutArg,FileInfo,SharedInfo); -// function OutArg = ST_AnalyzeScope(OldOutArg,NOutArg,FileInfo,SharedInfo); -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),4,4); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Getting output arguments info from the symbol table***',ReportFileName,'file','y'); -// #RNU_RES_E - -OutArg = OldOutArg; -GlobalVarsFileName = FileInfo.GlobalVarFileName; -LocalVarsFileName = FileInfo.Funct(nxtscifunnumber).LocalVarFileName; -TempVarsFileName = FileInfo.Funct(nxtscifunnumber).TempVarFileName; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// #RNU_RES_B -// ------------------------------------------------------------------ -// --- Check if the out variables already exist in symbol tables. --- -// ------------------------------------------------------------------ -// #RNU_RES_E -for cntout = 1:NOutArg - // #RNU_RES_B - PrintStringInfo(' Symbol ""'+OutArg(cntout).Name+'""',ReportFileName,'file','y'); - // #RNU_RES_E - TBName = OutArg(cntout).Name; - - // #RNU_RES_B - // --- Check in temporary symbol table. --- - // #RNU_RES_E - SymbolTableFileName = TempVarsFileName; - [TBFlagfound,TBType,TBSize,TBValue,TBFindLike,TBDimension] = ... - ST_Get(TBName,SymbolTableFileName); - if (TBFlagfound == 0) - // #RNU_RES_B - PrintStringInfo(' ...not found in: '+SymbolTableFileName+'.',ReportFileName,'file','y'); - // #RNU_RES_E - else - SCI2CerrorFile('Found a temp symbol in '+SymbolTableFileName+... - ' with the same name of the equal output argument ""'+TBName+'"".',ReportFileName); - end - - // #RNU_RES_B - // --- Check in local symbol table. --- - // #RNU_RES_E - SymbolTableFileName = LocalVarsFileName; - [TBFlagfound,TBType,TBSize,TBValue,TBFindLike,TBDimension] = ... - ST_Get(TBName,SymbolTableFileName); - if (TBFlagfound == 0) - // #RNU_RES_B - PrintStringInfo(' ...not found in: '+SymbolTableFileName+'.',ReportFileName,'file','y'); - // #RNU_RES_E - else - // #RNU_RES_B - PrintStringInfo(' ...found in: '+SymbolTableFileName+'.',ReportFileName,'file','y'); - // #RNU_RES_E - OutArg(cntout).Scope = 'Local'; - end - - // #RNU_RES_B - // --- Check in global symbol table. --- - // #RNU_RES_E - if (TBFlagfound == 0) - // Local wins over global. - SymbolTableFileName = GlobalVarsFileName; - [TBFlagfound2,TBType,TBSize,TBValue,TBFindLike,TBDimension] = ... - ST_Get(TBName,SymbolTableFileName); - if (TBFlagfound2 == 0) - // #RNU_RES_B - PrintStringInfo(' ...not found in: '+SymbolTableFileName+'.',ReportFileName,'file','y'); - // #RNU_RES_E - if SCI2Cstrncmps1size(SharedInfo.ASTReader.TempVarsName,OutArg(cntout).Name) - OutArg(cntout).Scope = 'Temp'; - else - OutArg(cntout).Scope = 'Local'; - end - else - // #RNU_RES_B - PrintStringInfo(' ...found in: '+SymbolTableFileName+'.',ReportFileName,'file','y'); - // #RNU_RES_E - OutArg(cntout).Scope = 'Global'; - end - end - - // #RNU_RES_B - PrintStringInfo(' Type: '+OutArg(cntout).Type,ReportFileName,'file','y'); - PrintStringInfo(' Size(1): '+string(OutArg(cntout).Size(1)),ReportFileName,'file','y'); - PrintStringInfo(' Size(2): '+string(OutArg(cntout).Size(2)),ReportFileName,'file','y'); - PrintStringInfo(' Value: '+string(OutArg(cntout).Value),ReportFileName,'file','y'); - PrintStringInfo(' FindLike: '+string(OutArg(cntout).FindLike),ReportFileName,'file','y'); - PrintStringInfo(' Dimension: '+string(OutArg(cntout).Dimension),ReportFileName,'file','y'); - PrintStringInfo(' Scope: '+string(OutArg(cntout).Scope),ReportFileName,'file','y'); - PrintStringInfo(' ',ReportFileName,'file','y'); - // #RNU_RES_E -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_Del.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_Del.sci deleted file mode 100644 index 6401a2b5..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_Del.sci +++ /dev/null @@ -1,41 +0,0 @@ -function ST_Del(TBName,SymbolTableFileName) -// function ST_Del(TBName,SymbolTableFileName) -// ----------------------------------------------------------------- -// Delete function for the symbol table. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// --- Load symbol table. --- -SCI2CSymbolTable = ST_Load(SymbolTableFileName); - -// --- Find symbol position. --- -[TBFlagfound,TBPosition] = ST_FindPos(TBName,SymbolTableFileName); - -if (TBFlagfound == 0) - SCI2Cerror('Missing symbol: trying to del a non existing symbol ""'+TBName+'"".'); -elseif (TBFlagfound == 1) - // --- Update symbol table. --- - SCI2CSymbolTable(TBPosition) = []; - - // --- Save symbol table. --- - ST_Save(SymbolTableFileName,SCI2CSymbolTable); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_FindPos.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_FindPos.sci deleted file mode 100644 index bfba11d1..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_FindPos.sci +++ /dev/null @@ -1,46 +0,0 @@ -function [TBFlagfound,TBPosition] = ST_FindPos(TBName,SymbolTableFileName) -// function [TBFlagfound,TBPosition] = ST_FindPos(TBName,SymbolTableFileName) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Finds position of symbol TBName in the symbol table. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// #RNU_RES_E -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// --- Load symbol table. --- -SCI2CSymbolTable = ST_Load(SymbolTableFileName); - -// --- Find position of the line to be removed. --- -TBFlagfound = 0; -TBPosition = 0; -NEntries = max(size(SCI2CSymbolTable)); -for countertable = 1:NEntries - if (mtlb_strcmp(TBName,SCI2CSymbolTable(countertable).Name)) - TBFlagfound = TBFlagfound + 1; - TBPosition = countertable; - end -end - -if (TBFlagfound > 1) - SCI2Cerror('Symbol table conflict: found two symbols with the same name ""'+TBName+'"".'); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_Get.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_Get.sci deleted file mode 100644 index ca53fc07..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_Get.sci +++ /dev/null @@ -1,66 +0,0 @@ -function [TBFlagfound,TBType,TBSize,TBValue,TBFindLike,TBDimension] = ... - ST_Get(Field_Name,SymbolTableFileName) -// function [TBFlagfound,TBType,TBSize,TBValue,TBFindLike,TBDimension] = ... -// ST_Get(Field_Name,SymbolTableFileName) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Get function for the symbol table. -// -// #RNU_RES_E -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// -------------------------- -// --- Load Symbol Table. --- -// -------------------------- -[tmpnams,tmptyps,tmpdims,tmpvols]=listvarinfile(SymbolTableFileName); -if (max(size(tmpnams)) > 1) - SCI2Cerror('More than one variable found in ""'+SymbolTableFileName+'"".'); -end -load(SymbolTableFileName,tmpnams); -SCI2CSymbolTable = eval(tmpnams); -// ------------------------------ -// --- End Load Symbol Table. --- -// ------------------------------ - -TBFlagfound = 0; -TBType = ''; -TBSize(1) = ''; -TBSize(2) = ''; -TBValue = %nan; -TBFindLike = %nan; -TBDimension = %nan; -if (TBFlagfound == 0) - NEntries = max(size(SCI2CSymbolTable)); - for countertable = 1:NEntries - if (mtlb_strcmp(Field_Name,SCI2CSymbolTable(countertable).Name)) - TBFlagfound = TBFlagfound + 1; - TBType = SCI2CSymbolTable(countertable).Type; // String - TBSize = SCI2CSymbolTable(countertable).Size; // String - TBValue = SCI2CSymbolTable(countertable).Value; - TBFindLike = SCI2CSymbolTable(countertable).FindLike; // Number: 0 or 1. - TBDimension = SCI2CSymbolTable(countertable).Dimension; // Number: 0 or 1 or 2. - end - end -end - -if (TBFlagfound > 1) - SCI2Cerror('Symbol table conflict: found two symbols with the same name ""'+TBName+'"".'); -end -endfunction diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_GetInArgInfo.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_GetInArgInfo.sci deleted file mode 100644 index 9c93391c..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_GetInArgInfo.sci +++ /dev/null @@ -1,159 +0,0 @@ -function [UpdatedInArg,SharedInfo] = ST_GetInArgInfo(InArg,NInArg,FileInfo,SharedInfo) -// function UpdatedInArg = ST_GetInArgInfo(InArg,NInArg,FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Generate all the info concerning the input arguments. -// -// Input data: -// InArg: InArg structure containing only the names of the input -// arguments. -// //NUT: add description here -// -// Output data: -// UpdatedInArg: InArg structure with all the info on the input -// arguments. -// FileInfoDatFile: name of the .dat file containing the FileInfo -// structure. -// #RNU_RES_E -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),4,4); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Analyzing Input Arguments***',ReportFileName,'file','y'); -// #RNU_RES_E - -UpdatedInArg = InArg; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -for cntinarg = 1:NInArg - tmpname = InArg(cntinarg).Name; - tmpscope = InArg(cntinarg).Scope; - lengthNumber = length('Number_'); - if (part(tmpscope,1:lengthNumber) == 'Number_') - // #RNU_RES_B - PrintStringInfo('Input Argument '+string(cntinarg)+' is a number: '+tmpname+'.',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - // #RNU_RES_E - UpdatedInArg(cntinarg).Type = part(tmpscope,lengthNumber+1:lengthNumber+1); - if (UpdatedInArg(cntinarg).Type == 'x') - UpdatedInArg(cntinarg).Type = SharedInfo.DefaultPrecision; // It is the default. - elseif (UpdatedInArg(cntinarg).Type == 'X') - if (SharedInfo.DefaultPrecision == 's') - UpdatedInArg(cntinarg).Type = 'c'; // It is the default. - elseif (SharedInfo.DefaultPrecision == 'd') - UpdatedInArg(cntinarg).Type = 'z'; // It is the default. - else - SCI2Cerror('Unexpected value for SharedInfo.DefaultPrecision: ""'+SharedInfo.DefaultPrecision+'""'); - end - end - if (tmpname == '%pi') - UpdatedInArg(cntinarg).Name = 'SCI2C_PI'; - numvalue = %pi; - elseif (tmpname == '%T') - UpdatedInArg(cntinarg).Name = 'SCI2C_T'; - numvalue = 1; - elseif (tmpname == '%F') - UpdatedInArg(cntinarg).Name = 'SCI2C_F'; - numvalue = 0; - elseif (tmpname == '%nan') - UpdatedInArg(cntinarg).Name = 'SCI2C_NAN'; - numvalue = %nan; - elseif (tmpname == '%inf') - UpdatedInArg(cntinarg).Name = 'SCI2C_INF'; - numvalue = %nan; // Otherwise it will put in the C code Inf value. - elseif (tmpname == '%i') - // #RNU_RES_B - //NUT: Other complex numbers are always - //NUT: stored in variables, and don't appear as immediate numbers. - // #RNU_RES_E - UpdatedInArg(cntinarg).Name = 'SCI2C_IMG_'+convstr(UpdatedInArg(cntinarg).Type,'u'); - numvalue = %i; - else - numvalue = eval(tmpname); - //UpdatedInArg(cntinarg).Type = 'd'; // it is the default. - end - - UpdatedInArg(cntinarg).Size(1) = '1'; - UpdatedInArg(cntinarg).Size(2) = '1'; - UpdatedInArg(cntinarg).Value = numvalue; - UpdatedInArg(cntinarg).FindLike = 0; - UpdatedInArg(cntinarg).Dimension = 0; - UpdatedInArg(cntinarg).Scope = 'Number'; - - elseif (tmpscope == 'String') - // #RNU_RES_B - PrintStringInfo('Input Argument '+string(cntinarg)+' is a string: '+tmpname+'.',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - // #RNU_RES_E - SharedInfo.ASTReader.UsedTempVars = SharedInfo.ASTReader.UsedTempVars + 1; - TmpOutArgName = strcat([SharedInfo.ASTReader.TempVarsName,string(SharedInfo.ASTReader.UsedTempVars)]); - - UpdatedInArg(cntinarg).Name = TmpOutArgName; // Change the name. - UpdatedInArg(cntinarg).Type = 'g'; // it is the default. - UpdatedInArg(cntinarg).Size(1) = '1'; - UpdatedInArg(cntinarg).Size(2) = string(length(tmpname)+1); //+1 = (\0) - UpdatedInArg(cntinarg).Value = '""'+tmpname+'""'; - UpdatedInArg(cntinarg).FindLike = 0; - UpdatedInArg(cntinarg).Dimension = 2; //NUT: in future releases you can set this field to 1. - UpdatedInArg(cntinarg).Scope = 'Temp'; - - // #RNU_RES_B - // Add the new symbol in the symbol table. - // #RNU_RES_E - ST_InsOutArg(UpdatedInArg(cntinarg),1,FileInfo,SharedInfo,'all'); - - elseif (tmpscope == 'Variable' | tmpscope == 'Global' | tmpscope == 'Local' | tmpscope == 'Temp') - // #RNU_RES_B - //NUT: nelle future versioni qui si puo' fare una utile differenziazione per rendere piu' intelligente il tutto. - PrintStringInfo('Input Argument '+string(cntinarg)+' is a symbol: '+tmpname+'.',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - // #RNU_RES_E - [TBFlagfound,TBType,TBSize,TBValue,TBFindLike,TBDimension,TBScope] = ST_GetSymbolInfo(tmpname,FileInfo,SharedInfo); - if (TBFlagfound == 0) - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Unknown symbol ""'+tmpname+'"".',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Be sure to initialize every symbol you are using.',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Before running the SCI2C translator, remember to run the code you are trying',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: to translate in order to check syntax errors.',ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); - end - UpdatedInArg(cntinarg).Type = TBType; - UpdatedInArg(cntinarg).Size = TBSize; - UpdatedInArg(cntinarg).Value = TBValue; - UpdatedInArg(cntinarg).FindLike = TBFindLike; - UpdatedInArg(cntinarg).Dimension = TBDimension; - UpdatedInArg(cntinarg).Scope = TBScope; - - else - SCI2Cerror('Unknown scope identifier ""'+tmpscope+'"" for variable ""'+tmpname+'"".'); - end - // #RNU_RES_B - PrintStringInfo(' Type: '+UpdatedInArg(cntinarg).Type,FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - PrintStringInfo(' Size(1): '+string(UpdatedInArg(cntinarg).Size(1)),FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - PrintStringInfo(' Size(2): '+string(UpdatedInArg(cntinarg).Size(2)),FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - PrintStringInfo(' Value: '+string(UpdatedInArg(cntinarg).Value),FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - PrintStringInfo(' FindLike: '+string(UpdatedInArg(cntinarg).FindLike),FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - PrintStringInfo(' Dimension: '+string(UpdatedInArg(cntinarg).Dimension),FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - PrintStringInfo(' Scope: '+UpdatedInArg(cntinarg).Scope,FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - // #RNU_RES_E -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_GetSymbolInfo.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_GetSymbolInfo.sci deleted file mode 100644 index 1fb2f3de..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_GetSymbolInfo.sci +++ /dev/null @@ -1,99 +0,0 @@ -function [TBFlagfound,TBType,TBSize,TBValue,TBFindLike,TBDimension,TBScope] = ST_GetSymbolInfo(TBName,FileInfo,SharedInfo) -// function [TBFlagfound,TBType,TBSize,TBValue,TBFindLike,TBDimension,TBScope] = ST_GetSymbolInfo(TBName,FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -// --- Extraction of the function name and number. --- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; - -GlobalVarsFileName = FileInfo.GlobalVarFileName; -LocalVarsFileName = FileInfo.Funct(nxtscifunnumber).LocalVarFileName; -TempVarsFileName = FileInfo.Funct(nxtscifunnumber).TempVarFileName; - -TBFlagfound = 0; -TBType = ''; -TBSize(1) = ''; -TBSize(2) = ''; -TBValue = %nan -TBFindLike = %nan -TBDimension = %nan; -TBScope = ''; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// #RNU_RES_B -// ------------------------------------------------ -// --- Search in the temporary variables table. --- -// ------------------------------------------------ -PrintStringInfo('Searching ""'+TBName+'"" in '+FileInfo.Funct(nxtscifunnumber).TempVarFileName+'.',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); -// #RNU_RES_E -[TBFlagfound,TBType,TBSize,TBValue,TBFindLike,TBDimension] = ... - ST_Get(TBName,TempVarsFileName); -if (TBFlagfound == 1); - // #RNU_RES_B - PrintStringInfo('...Found in: ""'+FileInfo.Funct(nxtscifunnumber).TempVarFileName+'.',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - // #RNU_RES_E - TBScope = 'Temp'; -end - -// -------------------------------------------- -// --- Search in the local variables table. --- -// -------------------------------------------- -if (TBFlagfound == 0); - // #RNU_RES_B - PrintStringInfo('Searching ""'+TBName+'"" in '+FileInfo.Funct(nxtscifunnumber).LocalVarFileName+'.',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - // #RNU_RES_E - [TBFlagfound,TBType,TBSize,TBValue,TBFindLike,TBDimension] = ... - ST_Get(TBName,LocalVarsFileName); - if (TBFlagfound == 1); - // #RNU_RES_B - PrintStringInfo('...Found in: ""'+FileInfo.Funct(nxtscifunnumber).LocalVarFileName+'.',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - // #RNU_RES_E - TBScope = 'Local'; - end -end - -// #RNU_RES_B -// --------------------------------------------- -// --- Search in the global variables table. --- -// --------------------------------------------- -// #RNU_RES_E -if (TBFlagfound == 0); - // #RNU_RES_B - PrintStringInfo('Searching ""'+TBName+'"" in '+FileInfo.GlobalVarFileName+'.',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - // #RNU_RES_E - [TBFlagfound,TBType,TBSize,TBValue,TBFindLike,TBDimension] = ... - ST_Get(TBName,GlobalVarsFileName); - if (TBFlagfound == 1); - // #RNU_RES_B - PrintStringInfo('...Found in: ""'+FileInfo.GlobalVarFileName+'.',FileInfo.Funct(nxtscifunnumber).ReportFileName,'file'); - // #RNU_RES_E - TBScope = 'Global'; - end -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_InsForCntVars.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_InsForCntVars.sci deleted file mode 100644 index b0e6f356..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_InsForCntVars.sci +++ /dev/null @@ -1,191 +0,0 @@ -function [OutArg,SharedInfo] = ST_InsForCntVars(InArg,NInArg,OutArg,NOutArg,FunctionName,FileInfo,SharedInfo) -// function [OutArg,SharedInfo] = ST_InsForCntVars(InArg,NInArg,OutArg,NOutArg,FunctionName,FileInfo,SharedInfo) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),7,7); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Checking if the current function is handling for counter variables.***',ReportFileName,'file','y'); -// #RNU_RES_E - -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// ----------------------------------------------- -// --- Initial Check on For counter variables. --- -// ----------------------------------------------- -if ((SharedInfo.ForExpr.OnExec > 0) & (NOutArg==1) & (OutArg.Scope~='Temp')) - // #RNU_RES_B - // If we are here, for sure we are in the last assignment of a for loop expression. - // - // All the following cases must be handled: - // OpColon (1,10,cnt) or Opcolon (1,1,10,cnt) --> cnt must be redefined to dim=0 - // cnt = a; where a is scalar - // OpEqual(TMP,cnt); where TMP is matrix --> cnt must be redefined to dim=0, a SCI2Cint counter must be generated - // Fun(TMP,cnt); where TMP is matrix.--> cnt must be redefined to dim=0, a SCI2Cint counter must be generated, CNT must be generated where CNT is a Matrix - // #RNU_RES_E - if (FunctionName == 'OpColon') - // #RNU_RES_B - PrintStringInfo(' The for expression is using an OpColon-based assignment',ReportFileName,'file','y'); - // #RNU_RES_E - SharedInfo.SkipNextFun = 1; - - OutArg.Size(1) = '1'; - OutArg.Size(2) = '1'; - OutArg.Value = %nan; - OutArg.FindLike = 0; - OutArg.Dimension = 0; - SharedInfo.ForExpr.OpColonInfoIn1 = InArg(1).Name; - - if (NInArg == 2) - SharedInfo.ForExpr.OpColonInfoIn2 = '1'; - SharedInfo.ForExpr.OpColonInfoIn3 = InArg(2).Name; - else - SharedInfo.ForExpr.OpColonInfoIn2 = InArg(2).Name; - if isnan(InArg(2).Value) - EM_UnknownStep(ReportFileName); - end - - SharedInfo.ForExpr.OpColonInfoIn3 = InArg(3).Name; - end - - // #RNU_RES_B - // Generate all info to generate the C for expression - // #RNU_RES_E - SharedInfo.ForExpr.AssignmentFun = SharedInfo.CFunId.OpColon; - SharedInfo.ForExpr.IntCntArg = []; - SharedInfo.ForExpr.MtxValCntArg = []; - SharedInfo.ForExpr.SclValCntArg = OutArg; - - elseif ((FunctionName == 'OpEqual') & (SharedInfo.ForExpr.AssignmentFun == 0)) - // #RNU_RES_B - //NUT: Test also that SharedInfo.ForExpr.AssignmentFun because sometimes Equal are dummy! - //NUT: verifica se e' giusta questa mia affermazione. - // #RNU_RES_E - if (OutArg.Dimension > 0) - // #RNU_RES_B - PrintStringInfo(' The for expression is using a Matrix-Equal-based assignment',ReportFileName,'file','y'); - // #RNU_RES_E - SharedInfo.SkipNextFun = 1; //NUT: forse qui sarebbe meglio mettere uno skipnextequal per precisione. - // #RNU_RES_B - //NUT: a dire il vero occorre capire se c'e' differenza tra i vari skip. - // #RNU_RES_E - OutArg.Size(1) = '1'; - OutArg.Size(2) = '1'; - OutArg.Value = %nan; - OutArg.FindLike = 0; - OutArg.Dimension = 0; - - // #RNU_RES_B - // Introduce the int counter variable. - // #RNU_RES_E - NNewArg = 1; - NewArg(NNewArg).Name = SharedInfo.ASTReader.TempForCntVarsName+string(SharedInfo.CountForTempVars); - SharedInfo.CountForTempVars = SharedInfo.CountForTempVars + 1; - NewArg(NNewArg).Size(1) = '1'; - NewArg(NNewArg).Size(2) = '1'; - NewArg(NNewArg).Type = 'i'; - NewArg(NNewArg).Value = 0; - NewArg(NNewArg).FindLike = 0; - NewArg(NNewArg).Dimension = 0; - NewArg(NNewArg).Scope = 'Temp'; - - // #RNU_RES_B - // Insert New Arguments in the symbol table. - // #RNU_RES_E - NNewArg = 1; - ST_InsOutArg(NewArg,NNewArg,FileInfo,SharedInfo,'all'); - - // #RNU_RES_B - // Generate all info to generate the C for expression - // #RNU_RES_E - SharedInfo.ForExpr.AssignmentFun = SharedInfo.CFunId.EqMatrix; - SharedInfo.ForExpr.IntCntArg = NewArg(1); - SharedInfo.ForExpr.MtxValCntArg = InArg(1); - SharedInfo.ForExpr.SclValCntArg = OutArg; - else - // #RNU_RES_B - PrintStringInfo(' The for expression is using a Scalar-Equal-based assignment',ReportFileName,'file','y'); - // #RNU_RES_E - SharedInfo.ForExpr.AssignmentFun = SharedInfo.CFunId.EqScalar; - end - else - if (OutArg.Dimension > 0) - // #RNU_RES_B - PrintStringInfo(' The for expression is using a Matrix-Function-based assignment',ReportFileName,'file','y'); - - // Introduce the val counter variable. - // #RNU_RES_E - NewArg = OutArg; - OutArg.Name = SharedInfo.ASTReader.TempForValVarsName+OutArg.Name; - - // #RNU_RES_B - // Set the counter variable to scalar. - // #RNU_RES_E - NNewArg = 1; - NewArg(NNewArg).Size(1) = '1'; - NewArg(NNewArg).Size(2) = '1'; - NewArg(NNewArg).Value = %nan; - NewArg(NNewArg).FindLike = 0; - NewArg(NNewArg).Dimension = 0; - - // #RNU_RES_B - // Introduce the int counter variable. - // #RNU_RES_E - NNewArg = 2; - NewArg(NNewArg).Name = SharedInfo.ASTReader.TempForCntVarsName+string(SharedInfo.CountForTempVars); - SharedInfo.CountForTempVars = SharedInfo.CountForTempVars + 1; - NewArg(NNewArg).Size(1) = '1'; - NewArg(NNewArg).Size(2) = '1'; - NewArg(NNewArg).Type = 'i'; - NewArg(NNewArg).Value = 0; - NewArg(NNewArg).FindLike = 0; - NewArg(NNewArg).Dimension = 0; - NewArg(NNewArg).Scope = 'Temp'; - - // #RNU_RES_B - // Insert New Arguments in the symbol table. - // #RNU_RES_E - NNewArg = 2; - ST_InsOutArg(NewArg,NNewArg,FileInfo,SharedInfo,'all'); - - // #RNU_RES_B - // Generate all info to generate the C for expression - // #RNU_RES_E - SharedInfo.ForExpr.AssignmentFun = SharedInfo.CFunId.GenFunMtx; - SharedInfo.ForExpr.IntCntArg = NewArg(2); - SharedInfo.ForExpr.MtxValCntArg = OutArg(1); - SharedInfo.ForExpr.SclValCntArg = NewArg(1); - end - end -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_InsOutArg.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_InsOutArg.sci deleted file mode 100644 index f0df5388..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_InsOutArg.sci +++ /dev/null @@ -1,187 +0,0 @@ -function ST_InsOutArg(OutArg,NOutArg,FileInfo,SharedInfo,MatchRule) -// function ST_InsOutArg(OutArg,NOutArg,FileInfo,SharedInfo,MatchRule) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),5,5); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -nxtscifunname = SharedInfo.NextSCIFunName; -nxtscifunnumber = SharedInfo.NextSCIFunNumber; -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; -CDeclarationFileName = FileInfo.Funct(nxtscifunnumber).CDeclarationFileName; -CGblDeclarFileName = FileInfo.Funct(nxtscifunnumber).CGblDeclarFileName; - -GlobalVarsFileName = FileInfo.GlobalVarFileName; -LocalVarsFileName = FileInfo.Funct(nxtscifunnumber).LocalVarFileName; -TempVarsFileName = FileInfo.Funct(nxtscifunnumber).TempVarFileName; - -CPass1FileName = FileInfo.Funct(nxtscifunnumber).CPass1FileName; -CPass1FreeFileName = FileInfo.Funct(nxtscifunnumber).CPass1FreeFileName; - - -// #RNU_RES_B -PrintStringInfo(' ',ReportFileName,'file','y'); -PrintStringInfo('***Putting output arguments in the symbol table***',ReportFileName,'file','y'); -// #RNU_RES_E -// --------------------------- -// --- End Initialization. --- -// --------------------------- - - -for counteroutput = 1:NOutArg - // #RNU_RES_B - PrintStringInfo(' Symbol ""'+OutArg(counteroutput).Name+'""',ReportFileName,'file','y'); - PrintStringInfo(' Type: '+OutArg(counteroutput).Type,ReportFileName,'file','y'); - PrintStringInfo(' Size(1): '+string(OutArg(counteroutput).Size(1)),ReportFileName,'file','y'); - PrintStringInfo(' Size(2): '+string(OutArg(counteroutput).Size(2)),ReportFileName,'file','y'); - PrintStringInfo(' Value: '+string(OutArg(counteroutput).Value),ReportFileName,'file','y'); - PrintStringInfo(' FindLike: '+string(OutArg(counteroutput).FindLike),ReportFileName,'file','y'); - PrintStringInfo(' Dimension: '+string(OutArg(counteroutput).Dimension),ReportFileName,'file','y'); - PrintStringInfo(' Scope: '+string(OutArg(counteroutput).Scope),ReportFileName,'file','y'); - PrintStringInfo(' ',ReportFileName,'file','y'); - // #RNU_RES_E - - if mtlb_strcmp(OutArg(counteroutput).Scope,'Temp') - SymbTableFileName = TempVarsFileName; - elseif mtlb_strcmp(OutArg(counteroutput).Scope,'Local') - SymbTableFileName = LocalVarsFileName; - elseif mtlb_strcmp(OutArg(counteroutput).Scope,'Global') - SymbTableFileName = GlobalVarsFileName; - else - SCI2Cerror('Unknown scope ""'+OutArg(counteroutput).Scope+'"" for symbol: '+OutArg(counteroutput).Name); - end - // #RNU_RES_B - PrintStringInfo(' Setting symbol ""'+OutArg(counteroutput).Name+'"" in '+SymbTableFileName+'.',ReportFileName,'file','y'); - // #RNU_RES_E - - // #RNU_RES_B - // Check existence and conflicts in the symbol table. - // Here we have four possibilities: - // 1. the symbol is a global variable not initialized yet -> we have to initialize it. - // 2. the symbol already exists with different settings -> we have to issue an error. - // 3. the symbol already exists with the same settings -> ok, we don't have to do nothing. - // 4. the symbol doesn't exist -> we have to insert it into the table. - // #RNU_RES_E - [TBFlagfound,TBFlagEqualSymbols] = ... - ST_MatchSymbol(OutArg(counteroutput).Name,... - OutArg(counteroutput).Type,... - OutArg(counteroutput).Size,... - OutArg(counteroutput).Value,... - OutArg(counteroutput).FindLike,... - OutArg(counteroutput).Dimension,... - SymbTableFileName,MatchRule); - - if (TBFlagfound == 1) - if (TBFlagEqualSymbols == 0) - PrintStringInfo(' ',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Symbol Table Conflict. Trying to insert again symbol ""'+... - OutArg(counteroutput).Name+'"" with different settings',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: Please check that you are not using variable ""'+OutArg(counteroutput).Name+'""',ReportFileName,'both','y'); - PrintStringInfo('SCI2CERROR: with different sizes and/or types.',ReportFileName,'both','y'); - PrintStringInfo(' ',ReportFileName,'both','y'); - SCI2Cerror(' '); - else - // #RNU_RES_B - // It's ok symbols do match. - //NUT: forse occorre un altro check sulla size per capire se occore fare il malloc. - //NUT: qui entro anche quando ho una variabile global gia' dichiarata tale in un altro - //NUT: per cui devo dichiararala come external. - //RNU qui ci puoi mettere una warning quando stai riallocando uno stesso simbolo con size simbolica. - //RNU puoi anche aggiungere del codice in c o un semplice commento. per esempio una funzione c del tipo checksize che controlla il valore - //RNU prima dopo delle size di una data variabile. Cosa succede se cambio la size anche nel caso di array e approccio - //RNU di resize non attivo? L'unica cosa e' che molte size numeriche scompaiono e incomincio a creare numerose variabili - //RNU con size simbolica. - - // If the symbol is scalar we update its value if it is an array we update its size - // only in case we are using the 'REALLOC_ALL_RESIZE_ALL' resize approach - // #RNU_RES_E - if ((GetSymbolDimension(OutArg(counteroutput).Size)) == 0 | (SharedInfo.ResizeApproach=='REALLOC_ALL_RESIZE_ALL')) - ST_Set(OutArg(counteroutput).Name,... - OutArg(counteroutput).Type,... - OutArg(counteroutput).Size,... - OutArg(counteroutput).Value,... - OutArg(counteroutput).FindLike,... - OutArg(counteroutput).Dimension,... - SymbTableFileName); - end - end - elseif (TBFlagfound == 2) - // #RNU_RES_B - // We have a non-initialized global variable. - // Set the non-initialized global variable. - PrintStringInfo(' Found a non-initialized global variable.',ReportFileName,'file','y'); - // #RNU_RES_E - ST_Set(OutArg(counteroutput).Name,... - OutArg(counteroutput).Type,... - OutArg(counteroutput).Size,... - OutArg(counteroutput).Value,... - OutArg(counteroutput).FindLike,... - OutArg(counteroutput).Dimension,... - SymbTableFileName); - IndentLevel = 0; //NUT: forced always to 1 - FlagExt = 0; - C_GenDeclarations(OutArg(counteroutput),CGblDeclarFileName,IndentLevel,ReportFileName,FlagExt,SharedInfo.ResizeApproach); - IndentLevelMalloc = SharedInfo.NIndent; - // #RNU_RES_B - //RNU da verificare bene qui. Cio' che si verifica e' che se la size della globale e' simbolica - //RNU allora si assume che essa sia da allocare come puntatore e poi realloc. - // #RNU_RES_E - C_MemAllocOutTempVars(OutArg(counteroutput),1,CPass1FileName,CPass1FreeFileName,IndentLevelMalloc,ReportFileName,SharedInfo.ResizeApproach); - else - if (OutArg(counteroutput).FindLike == 1) - // #RNU_RES_B - // In presence of find-like functions the size must be always symbolic. - // Don't change here the value of OutArg.Size because the first time - // I need them to declare the OutArg variable with the values assumed by OutArg.Size. - // #RNU_RES_E - TmpOutArgSize(1) = '__'+OutArg(counteroutput).Name+'Size[0]'; - TmpOutArgSize(2) = '__'+OutArg(counteroutput).Name+'Size[1]'; - else - TmpOutArgSize(1) = OutArg(counteroutput).Size(1); - TmpOutArgSize(2) = OutArg(counteroutput).Size(2); - end - // #RNU_RES_B - // Set a new symbol. - // #RNU_RES_E - ST_Set(OutArg(counteroutput).Name,... - OutArg(counteroutput).Type,... - TmpOutArgSize,... - OutArg(counteroutput).Value,... - OutArg(counteroutput).FindLike,... - OutArg(counteroutput).Dimension,... - SymbTableFileName); - IndentLevelDeclaration = 1; //NUT: per ora lo forzo sempre a 1 - IndentLevelMalloc = SharedInfo.NIndent; - FlagExt = 0; - C_GenDeclarations(OutArg(counteroutput),CDeclarationFileName,IndentLevelDeclaration,ReportFileName,FlagExt,SharedInfo.ResizeApproach); - // #RNU_RES_B - //RNU aggiunta qui in modo che le malloc saranno fatte una sola volta: - //RNU verifica che tutto funzioni e chi altro usa la C_MemAlloc per capire se si puo' ottimizzare per questo stadio. - // #RNU_RES_E - C_MemAllocOutTempVars(OutArg(counteroutput),1,CPass1FileName,CPass1FreeFileName,IndentLevelMalloc,ReportFileName,SharedInfo.ResizeApproach); - end - -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_Load.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_Load.sci deleted file mode 100644 index fc99ff3c..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_Load.sci +++ /dev/null @@ -1,36 +0,0 @@ -function SCI2CSymbolTable = ST_Load(SymbolTableFileName) -// function SCI2CSymbolTable = ST_Load(SymbolTableFileName) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Load a symbol table stored into a .dat file. -// #RNU_RES_E -// -// Input data: -// //NUT: add description here -// -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// -------------------------- -// --- Load Symbol Table. --- -// -------------------------- -[tmpnams,tmptyps,tmpdims,tmpvols]=listvarinfile(SymbolTableFileName); -if (max(size(tmpnams)) > 1) - SCI2Cerror('More than one variable found in ""'+SymbolTableFileName+'"".'); -end -load(SymbolTableFileName,tmpnams); -SCI2CSymbolTable = eval(tmpnams); -// ------------------------------ -// --- End Load Symbol Table. --- -// ------------------------------ - -endfunction diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_MatchSymbol.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_MatchSymbol.sci deleted file mode 100644 index 621739fb..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_MatchSymbol.sci +++ /dev/null @@ -1,70 +0,0 @@ -function [TBFlagfound,TBFlagEqualSymbols] = ST_MatchSymbol(TBName,TBType,TBSize,TBValue,TBFindLike,TBDimension,SymbolTableFileName,MatchRule) -// function [TBFlagfound,TBFlagEqualSymbols] = ST_MatchSymbol(TBName,TBType,TBSize,TBValue,TBFindLike,TBDimension,SymbolTableFileName,MatchRule) -// ----------------------------------------------------------------- -// Match function for the symbol table. -// -// Input data: -// MatchRule: can be 'all','type','size','none' -// //NUT: add description here -// -// Output data: -// TBFlagfound: 0 = if the symbol doesn't exits. -// 1 = the symbol exits. -// 2 = the symbol exists but it is a non-initialized global variable. -// TBFlagEqualSymbols: 0 if the two symbols don't have the same settings, -// 1 if the two symbols have the same settings. -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),8,8); - -TBFlagfound = 0; -TBFlagEqualSymbols = 0; - -// --- Find symbol (If exists). --- -[TBFlagfound,tmpType,tmpSize,tmpValue,tmpFindLike,tmpDimension] = ... - ST_Get(TBName,SymbolTableFileName); - -if (TBFlagfound == 1) - if (tmpType == 'GBLToBeDefined') - TBFlagfound = 2; - TBFlagEqualSymbols = 0; // I don't want to force the error issue in ST_InsOutArg.sci - else - // Symbol already exists. Check that it has the same settings of the current output argument. - TBFlagEqualSymbols = 1; - if (MatchRule == 'type' | MatchRule == 'all') - if (mtlb_strcmp(tmpType,TBType) == %F) - TBFlagEqualSymbols = 0; - end - end - if (MatchRule == 'size' | MatchRule == 'all') - // First check the dimension. - if (tmpDimension ~= TBDimension) - TBFlagEqualSymbols = 0; - end - // Then if the size is a number also its value is compared. - if (SCI2Cisnum(tmpSize(1))) & (SCI2Cisnum(TBSize(1))) - if (mtlb_strcmp(tmpSize(1),TBSize(1)) == %F) - TBFlagEqualSymbols = 0; - end - end - if (SCI2Cisnum(tmpSize(2))) & (SCI2Cisnum(TBSize(2))) - if (mtlb_strcmp(tmpSize(2),TBSize(2)) == %F) - TBFlagEqualSymbols = 0; - end - end - end - end -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_Save.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_Save.sci deleted file mode 100644 index f2109591..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_Save.sci +++ /dev/null @@ -1,44 +0,0 @@ -function ST_Save(SymbolTableFileName,SCI2CSymbolTable) -// function ST_Save(SymbolTableFileName,SCI2CSymbolTable) -// ----------------------------------------------------------------- -// Save into a .dat file a symbol table. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -[tmpnams,tmptyps,tmpdims,tmpvols]=listvarinfile(SymbolTableFileName); -if (max(size(tmpnams)) > 1) - SCI2Cerror('More than one variable found in ""'+SymbolTableFileName+'"".'); -end - -// Identifies the Table name and save it into the .dat file. -if (mtlb_strcmp(tmpnams,'GlobalVars')) - GlobalVars = SCI2CSymbolTable; - save(SymbolTableFileName,GlobalVars); -elseif (mtlb_strcmp(tmpnams,'LocalVars')) - LocalVars = SCI2CSymbolTable; - save(SymbolTableFileName,LocalVars); -elseif (mtlb_strcmp(tmpnams,'TempVars')) - TempVars = SCI2CSymbolTable; - save(SymbolTableFileName,TempVars); -else - SCI2Cerror('Unknow table: ""'+tmpnams+'"".'); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/SymbolTable/ST_Set.sci b/src/Scilab2C/Scilab2C/SymbolTable/ST_Set.sci deleted file mode 100644 index 778f91aa..00000000 --- a/src/Scilab2C/Scilab2C/SymbolTable/ST_Set.sci +++ /dev/null @@ -1,49 +0,0 @@ -function ST_Set(TBName,TBType,TBSize,TBValue,TBFindLike,TBDimension,SymbolTableFileName) -// function ST_Set(TBName,TBType,TBSize,TBValue,TBFindLike,TBDimension,SymbolTableFileName) -// ----------------------------------------------------------------- -// Set function for the symbol table. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 26-Oct-2007 -- Raffaele Nutricato: Author. -// 26-Oct-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato & Alberto Morea. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),7,7); - -// --- Load symbol table. --- -SCI2CSymbolTable = ST_Load(SymbolTableFileName); - -// --- Find symbol position (If exists). --- -[TBFlagfound,TBPosition] = ST_FindPos(TBName,SymbolTableFileName); - -if (TBFlagfound == 0) - TBPosition = max(size(SCI2CSymbolTable))+1; -end - -// --- Update symbol table. --- -SCI2CSymbolTable(TBPosition).Name = TBName; // string. -SCI2CSymbolTable(TBPosition).Type = TBType; // char. -SCI2CSymbolTable(TBPosition).Size = TBSize; // structure of two strings (Size(1) and Size(2)). -SCI2CSymbolTable(TBPosition).Value = TBValue; // int/real/complex number. %nan when the value is not available or isn't a scalar. -SCI2CSymbolTable(TBPosition).FindLike = TBFindLike; // int number. FindLike = 1, when the symbol comes from a find-like function. - // FindLike = -1 when the function is not find-like but it is making use of input arguments that are find-like. - // FindLike = 0 in all other cases. -SCI2CSymbolTable(TBPosition).Dimension = TBDimension; // int number. - -// --- Save symbol table. --- -ST_Save(SymbolTableFileName,SCI2CSymbolTable); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_CreateDirs.sci b/src/Scilab2C/Scilab2C/ToolInitialization/INIT_CreateDirs.sci deleted file mode 100644 index e6ef184e..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_CreateDirs.sci +++ /dev/null @@ -1,65 +0,0 @@ -function INIT_CreateDirs(FileInfo) -// function INIT_CreateDirs(FileInfo) -// ----------------------------------------------------------------- -// Create directories. -// -// Input data: -// FileInfo: structure containing all info about SCI2C files. -// -// Output data: -// --- -// -// Status: -// 03-Jan-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// --------------------------- -// --- Create Directories. --- -// --------------------------- -// --- Main directories. --- -SCI2CCreateDir(FileInfo.WorkingDir); -SCI2CCreateDir(FileInfo.OutCCCodeDir); - -// --- SCI2C Library. --- -SCI2CCreateDir(FileInfo.SCI2CLibDir); -SCI2CCreateDir(FileInfo.SCI2CLibSCIAnnDir); -SCI2CCreateDir(FileInfo.SCI2CLibSCIAnnFun); -SCI2CCreateDir(FileInfo.SCI2CLibSCIAnnCls); -SCI2CCreateDir(FileInfo.SCI2CLibSCIFunListDir); -SCI2CCreateDir(FileInfo.SCI2CLibSCIFLFun); -SCI2CCreateDir(FileInfo.SCI2CLibSCIFLCls); -SCI2CCreateDir(FileInfo.SCI2CLibCAnnDir); -SCI2CCreateDir(FileInfo.SCI2CLibCAnnFun); -SCI2CCreateDir(FileInfo.SCI2CLibCAnnCls); -SCI2CCreateDir(FileInfo.SCI2CLibCFunListDir); -SCI2CCreateDir(FileInfo.SCI2CLibCFLFun); -SCI2CCreateDir(FileInfo.SCI2CLibCFLCls); - -// --- USER2C Library. --- -SCI2CCreateDir(FileInfo.USER2CLibDir); -SCI2CCreateDir(FileInfo.USER2CLibSCIAnnDir); -SCI2CCreateDir(FileInfo.USER2CLibSCIAnnFun); -SCI2CCreateDir(FileInfo.USER2CLibSCIAnnCls); -SCI2CCreateDir(FileInfo.USER2CLibSCIFunListDir); -SCI2CCreateDir(FileInfo.USER2CLibSCIFLFun); -SCI2CCreateDir(FileInfo.USER2CLibSCIFLCls); -SCI2CCreateDir(FileInfo.USER2CLibCAnnDir); -SCI2CCreateDir(FileInfo.USER2CLibCAnnFun); -SCI2CCreateDir(FileInfo.USER2CLibCAnnCls); -SCI2CCreateDir(FileInfo.USER2CLibCFunListDir); -SCI2CCreateDir(FileInfo.USER2CLibCFLFun); -SCI2CCreateDir(FileInfo.USER2CLibCFLCls); - -// --- Function List. --- -SCI2CCreateDir(FileInfo.FunctionList.MainDir); -SCI2CCreateDir(FileInfo.FunctionList.FunInfoDatDir); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_FillSCI2LibCDirs.sci b/src/Scilab2C/Scilab2C/ToolInitialization/INIT_FillSCI2LibCDirs.sci deleted file mode 100644 index 1c90a009..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_FillSCI2LibCDirs.sci +++ /dev/null @@ -1,3360 +0,0 @@ -function INIT_FillSCI2LibCDirs(FileInfo,SharedInfoExtension) -// function INIT_FillSCI2LibCDirs(FileInfo,SharedInfoExtension) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Generates files for the SCI2CLib CFunctionList and CAnnotations -// directories. -// -// Input data: -// FileInfo: structure containing all info about SCI2C files. -// SharedInfoExtension: structure containing the file extensions. -// -// Output data: -// --- -// -// #RNU_RES_E -// Status: -// 24-Dec-2007 -- Raffaele Nutricato: Author. -// 24-Dec-2007 -- Alberto Morea: Test Ok. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -SCI2CLibCAnnClsDir = FileInfo.SCI2CLibCAnnCls; -ExtensionCAnnCls = SharedInfoExtension.AnnotationClasses; - -SCI2CLibCAnnFunDir = FileInfo.SCI2CLibCAnnFun; -ExtensionCAnnFun = SharedInfoExtension.AnnotationFunctions; - -SCI2CLibCFLClsDir = FileInfo.SCI2CLibCFLCls; -ExtensionCFuncListCls = SharedInfoExtension.FuncListClasses; - -SCI2CLibCFLFunDir = FileInfo.SCI2CLibCFLFun; -ExtensionCFuncListFun = SharedInfoExtension.FuncListFunctions; - -GeneralReport = FileInfo.GeneralReport; -ArgSeparator = ','; -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// -------------------------------------------------------------------------------- -// --- Generate Function List class files for C functions of the SCI2C library. --- -// -------------------------------------------------------------------------------- -//NUT old call to INIT_GenSCI2CLibCFLCls -// INIT_GenSCI2CLibCFLCls(SCI2CLibCFLClsDir,ExtensionCFuncListCls,GeneralReport) -// SCI2CLibCFLClsDir,ExtensionCFLCls,GeneralReport - -//NUT verifica le annotazioni di tutte le classi. - -// ----------------------------------------------------------------------------------------- -// --- Generate Function List and Annotation files for C functions of the SCI2C library. --- -// ----------------------------------------------------------------------------------------- - - -// --------------------- -// --- Class Global. --- -// --------------------- -ClassName = 'Global'; -// #RNU_RES_B -//NUT: global function can work with a generic number of input arguments. -//NUT: we force the global function to work with one input argument only. -// --- Class Annotation. --- -// #RNU_RES_E -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''d''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('g2'+ArgSeparator+'d0',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'global'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// --------------------- -// --- Class Float. --- -// --------------------- -ClassName = 'Float'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''s''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'s0',ClassFileName,'file','y'); -//PrintStringInfo('c0'+ArgSeparator+'s0',ClassFileName,'file','y'); -//PrintStringInfo('z0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'s2',ClassFileName,'file','y'); -//PrintStringInfo('c2'+ArgSeparator+'s2',ClassFileName,'file','y'); -//PrintStringInfo('z2'+ArgSeparator+'s2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'float'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// --------------------- -// --- Class Double. --- -// --------------------- -ClassName = 'Double'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''d''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -//PrintStringInfo('c0'+ArgSeparator+'d0',ClassFileName,'file','y'); -//PrintStringInfo('z0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -//PrintStringInfo('c2'+ArgSeparator+'d2',ClassFileName,'file','y'); -//PrintStringInfo('z2'+ArgSeparator+'d2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'double'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ---------------------------- -// --- Class FloatComplex. --- -// ---------------------------- -//NUT sulla complex c'e' da capire se servono due o un solo argomento. -//NUT secondo me ne va bene uno perche' serve per fare il casting di una variabile -//NUT reale in una variabile complessa -ClassName = 'FloatComplex'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''c''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'c2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'floatcomplex'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ---------------------------- -// --- Class DoubleComplex. --- -// ---------------------------- -//NUT sulla complex c'e' da capire se servono due o un solo argomento. -//NUT secondo me ne va bene uno perche' serve per fare il casting di una variabile -//NUT reale in una variabile complessa -ClassName = 'DoubleComplex'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''z''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'doublecomplex'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------ -// --- Class Sin. --- -// ------------------ -ClassName = 'Sin'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'sin'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'sinh'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'asinh'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'cos'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'cosh'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'tan'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'tanh'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'exp'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'conj'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -//NUT verifica -FunctionName = 'inv'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'ceil'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'fix'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'floor'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'round'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'int'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'OpLogNot'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'SCI2Cresize'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'sign'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'chol'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------- -// --- Class Atan. --- -// ------------------- -ClassName = 'Atan'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -// PrintStringInfo('c0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -// PrintStringInfo('z0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -// PrintStringInfo('c2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -// PrintStringInfo('z2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'atan'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------- -// --- Class Sqrt. --- -// ------------------- -ClassName = 'Sqrt'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -//Was FA_TP_USER -//Cause some trouble if user specify some precision and if input(and also output) is complex. -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); //FOR INRIA changed from IN(1).TP to FA_TP_USER -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); - -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'asin'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'acos'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'acosh'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'atanh'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'sqrt'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'log'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'log10'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'log1p'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// -------------------- -// --- Class Zeros. --- -// -------------------- -ClassName = 'Zeros'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 0',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -//Was FA_TP_USER -//Cause some trouble if user specify some precision and if input(and also output) is complex. -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -//Was FA_TP_USER -//Cause some trouble if user specify some precision and if input(and also output) is complex. -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_1(IN(1).SZ)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_2(IN(1).SZ)',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -//Was FA_TP_USER -//Cause some trouble if user specify some precision and if input(and also output) is complex. -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).VAL',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(2).VAL',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); - -PrintStringInfo(ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo(ArgSeparator+'d0',ClassFileName,'file','y'); - -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -//NUT: no mixed input types are allowed. -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('s0s0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s0s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s0s0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'zeros'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'ones'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'eye'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -//NUT rand function doesn't behave like zeros and ones functions. -FunctionName = 'rand'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// -------------------- -// --- Class Sum. --- -// -------------------- -ClassName = 'Sum'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_SEL1(IN(1).SZ(1),IN(2).VAL)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_SEL2(IN(1).SZ(2),IN(2).VAL)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2s0'+ArgSeparator+'s0',ClassFileName,'file','y'); //* possible ? */ -PrintStringInfo('d2d0'+ArgSeparator+'d0',ClassFileName,'file','y'); //* possible ? */ -PrintStringInfo('c2s0'+ArgSeparator+'c0',ClassFileName,'file','y'); //* possible ? */ -PrintStringInfo('z2d0'+ArgSeparator+'z0',ClassFileName,'file','y'); //* possible ? */ -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0g2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0g2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0g2'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0g2'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2g2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d2g2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c2g2'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z2g2'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2g2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2g2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2g2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2g2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'sum'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'prod'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'mean'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'st_deviation'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'variance'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'max'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'min'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); -// -------------------- -// --- Class Abs. --- -// -------------------- -ClassName = 'Abs'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_REAL(IN(1).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'d2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'abs'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'real'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'imag'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------------ -// --- Class OpDotStar. --- -// ------------------------ -ClassName = 'OpDotStar'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_1(FA_SZ_OPDOTSTAR(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_2(FA_SZ_OPDOTSTAR(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('s0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('d0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('s2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('d2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('s0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c0s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('d0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z0d2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('s2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('d2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('s2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('d2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpDotStar'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'OpDotSlash'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - - -// ------------------------ -// --- Class OpDotHat. --- -// ------------------------ -ClassName = 'OpDotHat'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_1(FA_SZ_OPDOTSTAR(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_2(FA_SZ_OPDOTSTAR(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c0s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z0d2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpDotHat'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -//NUT verifica l'hat se e' ben annotato. L'input deve essere una matrice quadrata -FunctionName = 'OpHat'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'OpDotBackSlash'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'OpLogLt'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'OpLogLe'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'OpLogGt'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'OpLogGe'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'OpLogAnd'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'OpLogOr'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ---------------------- -// --- Class OpLogEq. --- -// ---------------------- -ClassName = 'OpLogEq'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MIN_REAL(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); //RNU -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_1(FA_SZ_OPDOTSTAR(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_2(FA_SZ_OPDOTSTAR(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('z0z0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('g0g0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('g0g0'+ArgSeparator+'d0',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2c0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('z2z0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('g2g0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('g2g0'+ArgSeparator+'d2',ClassFileName,'file','y'); - -PrintStringInfo('s0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c0c2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('z0z2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('g0g2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('g0g2'+ArgSeparator+'d2',ClassFileName,'file','y'); - -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('g2g2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('g2g2'+ArgSeparator+'d2',ClassFileName,'file','y'); - -//mixed types -PrintStringInfo('c2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2z0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2c0'+ArgSeparator+'s2',ClassFileName,'file','y'); - -PrintStringInfo('z0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0z0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s0c0'+ArgSeparator+'s0',ClassFileName,'file','y'); - -PrintStringInfo('c0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('z0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d0z2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s0c2'+ArgSeparator+'s2',ClassFileName,'file','y'); - -PrintStringInfo('c2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2z2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2c2'+ArgSeparator+'s2',ClassFileName,'file','y'); - - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpLogEq'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'OpLogNe'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// --------------------- -// --- Class OpStar. --- -// --------------------- -ClassName = 'OpStar'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_1(FA_SZ_OPSTAR(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_2(FA_SZ_OPSTAR(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c0s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z0d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s2s2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s2c2'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d2z2'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z0',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpStar'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); -//NUT vedi che la opstar non funziona quando faccio scalare*matrice. o matrice*scalare. -//NUT la lista delle funzioni disponibili e' identica a quella della classe 3. - -FunctionName = 'OpSlash'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// --------------------- -// --- Class OpApex. --- -// --------------------- -ClassName = 'OpApex'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(2)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(1)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpApex'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'OpDotApex'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'isnan'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// --------------------- -// --- Class OpPlus. --- -// --------------------- -ClassName = 'OpPlus'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_1(FA_SZ_OPPLUS(IN(1).SZ,IN(2).SZ,IN(1).TP,IN(2).TP))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_2(FA_SZ_OPPLUS(IN(1).SZ,IN(2).SZ,IN(1).TP,IN(2).TP))',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('g0g0'+ArgSeparator+'g2',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('g2g0'+ArgSeparator+'g2',ClassFileName,'file','y'); - -PrintStringInfo('s0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c0s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z0d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('g0g2'+ArgSeparator+'g2',ClassFileName,'file','y'); - -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('g2g2'+ArgSeparator+'g2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpPlus'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ---------------------- -// --- Class OpMinus. --- -// ---------------------- -ClassName = 'OpMinus'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_1(FA_SZ_OPMINUS(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_2(FA_SZ_OPMINUS(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c0s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z0d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpMinus'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------- -// --- Class OpRc. --- -// ------------------- -ClassName = 'OpRc'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_ADD(IN(1).SZ(2),IN(2).SZ(2))',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types considered -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); - -PrintStringInfo('d0d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); - -PrintStringInfo('c0c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); - -PrintStringInfo('z0z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('z0d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); - -PrintStringInfo('s0c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('s2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d0z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('d2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpRc'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------- -// --- Class OpCc. --- -// ------------------- -ClassName = 'OpCc'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_ADD(IN(1).SZ(1),IN(2).SZ(1))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types considered -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); - -PrintStringInfo('d0d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); - -PrintStringInfo('c0c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); - -PrintStringInfo('z0z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('z0d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); - -PrintStringInfo('s0c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('s2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d0z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('d2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpCc'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - - -// ------------------- -// --- Class Find. --- -// ------------------- -ClassName = 'Find'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_RTMAX(FA_MUL(IN(1).SZ(1),IN(1).SZ(2)))',ClassFileName,'file','y'); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_RTMAX(FA_MUL(IN(1).SZ(1),IN(1).SZ(2)))',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= FA_SZ_RTMAX(FA_MUL(IN(1).SZ(1),IN(1).SZ(2)))',ClassFileName,'file','y'); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_RTMAX(FA_MUL(IN(1).SZ(1),IN(1).SZ(2)))',ClassFileName,'file','y'); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_RTMAX(FA_MUL(IN(1).SZ(1),IN(1).SZ(2)))',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= FA_SZ_RTMAX(FA_MUL(IN(1).SZ(1),IN(1).SZ(2)))',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); - -PrintStringInfo('s0'+ArgSeparator+'s0s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0d0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s2s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2d2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0'+ArgSeparator+'s0s0',ClassFileName,'file','y'); -PrintStringInfo('s2s0'+ArgSeparator+'s2s2',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0d0',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2d2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'find'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// --------------------- -// --- Class Length. --- -// --------------------- -ClassName = 'Length'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_USER',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('g0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('g0'+ArgSeparator+'d0',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('g2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('g2'+ArgSeparator+'d0',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'length'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'type'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------- -// --- Class Size. --- -// ------------------- -ClassName = 'Size'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_REAL(IN(1).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''2''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_REAL(IN(1).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= FA_TP_REAL(IN(1).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_REAL(IN(1).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'d2',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'d2',ClassFileName,'file','y'); - -PrintStringInfo('s0'+ArgSeparator+'s0s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'s0s0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'d0d0',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'s0s0',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d0d0',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'s0s0',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'d0d0',ClassFileName,'file','y'); - -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'d0',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'size'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// --------------------- -// --- Class Return. --- -// --------------------- -ClassName = 'Return'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 0',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 0',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo(ArgSeparator,ClassFileName,'file','y'); - -//NUT anche se metto Return funziona bene comunque! cerca di capire il motivo. -//NUT limited use to zero in and out args only. -// --- Annotation Function And Function List Function. --- -FunctionName = 'return'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ---------------------- -// --- Class OpColon. --- -// ---------------------- -ClassName = 'OpColon'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MIN_REAL(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_INT(FA_ADD(FA_SUB(IN(2).VAL,IN(1).VAL),''1''))',ClassFileName,'file','y'); -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MIN_REAL(IN(1).TP,FA_TP_MIN_REAL(IN(2).TP,IN(3).TP))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_INT(FA_ADD(FA_DIV(FA_SUB(IN(3).VAL,IN(1).VAL),IN(2).VAL),''1''))',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('z0z0'+ArgSeparator+'d0',ClassFileName,'file','y'); - -PrintStringInfo('s0s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('z0z0'+ArgSeparator+'d2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0c0c0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('z0z0z0'+ArgSeparator+'d0',ClassFileName,'file','y'); - -PrintStringInfo('s0s0s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0d0d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c0c0c0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('z0z0z0'+ArgSeparator+'d2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpColon'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ---------------------- -// --- Class IsEmpty. --- -// ---------------------- -ClassName = 'IsEmpty'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_USER',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'d0',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'isempty'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ---------------------- -// --- Class Trace. --- -// ---------------------- -ClassName = 'Trace'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z0',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'trace'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -//NUT det is a little bit complex but for the moment we assume that -//NUT that det works as trace function. -FunctionName = 'det'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// -------------------- -// --- Class OpIns. --- -// -------------------- -ClassName = 'OpIns'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 0',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 4',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 0',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s2s0s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2s2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s0s0s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s0s2s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2s0s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2s2s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s0s2s2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2s0s2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2s2s2'+ArgSeparator,ClassFileName,'file','y'); - -PrintStringInfo('d2d0d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2d2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d0d0d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d0d2d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2d0d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2d2d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d0d2d2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2d0d2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2d2d2'+ArgSeparator,ClassFileName,'file','y'); - -PrintStringInfo('c2s0c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2c2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s0s0c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s0s2c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2s0c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2s2c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s0s2c2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2s0c2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2s2c2'+ArgSeparator,ClassFileName,'file','y'); - -PrintStringInfo('z2d0z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2z2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d0d0z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d0d2z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2d0z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2d2z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d0d2z2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2d0z2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2d2z2'+ArgSeparator,ClassFileName,'file','y'); - -//Mixed input arguments -PrintStringInfo('s2s0c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2c2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s0s0c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s0s2c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2s0c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2s2c0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s0s2c2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2s0c2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2s2s2c2'+ArgSeparator,ClassFileName,'file','y'); - -PrintStringInfo('d2d0z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2z2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d0d0z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d0d2z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2d0z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2d2z0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d0d2z2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2d0z2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2d2d2z2'+ArgSeparator,ClassFileName,'file','y'); - -PrintStringInfo('c2s0s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2s2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s0s0s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s0s2s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2s0s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2s2s0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s0s2s2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2s0s2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('c2s2s2s2'+ArgSeparator,ClassFileName,'file','y'); - -PrintStringInfo('z2d0d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2d2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d0d0d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d0d2d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2d0d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2d2d0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d0d2d2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2d0d2'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('z2d2d2d2'+ArgSeparator,ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpIns'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// -------------------- -// --- Class OpExt. --- -// -------------------- -ClassName = 'OpExt'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_MUL(IN(2).SZ(1),IN(2).SZ(2))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_MUL(IN(2).SZ(1),IN(2).SZ(2))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_MUL(IN(3).SZ(1),IN(3).SZ(2))',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s2s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('s2s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2s0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); - -PrintStringInfo('d2d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d2d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2d0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); - -PrintStringInfo('c2s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c2s2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s0s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); - -PrintStringInfo('z2d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z2d2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d0d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpExt'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------- -// --- Class Disp. --- -// ------------------- -ClassName = 'Disp'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''d''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('g0'+ArgSeparator+'d0',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('g2'+ArgSeparator+'d0',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'disp'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ---------------------- -// --- Class OpEqual. --- -// ---------------------- -ClassName = 'OpEqual'; -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_1(IN(1).SZ)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_2(IN(1).SZ)',ClassFileName,'file','y'); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_1(IN(1).SZ)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_2(IN(1).SZ)',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= IN(2).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= FA_SZ_1(IN(2).SZ)',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= FA_SZ_2(IN(2).SZ)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('g0'+ArgSeparator+'g0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('g2'+ArgSeparator+'g2',ClassFileName,'file','y'); -//NUT per ora non considero le equal con nin != 1 - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpEqual'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - - -// -------------------- -// --- Class Mopen. --- -// -------------------- -ClassName = 'Mopen'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''f''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''f''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= FA_TP_USER',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''f''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''f''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= FA_TP_USER',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''f''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''f''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= FA_TP_USER',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= ''1''',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('g2'+ArgSeparator+'f0',ClassFileName,'file','y'); -PrintStringInfo('g2'+ArgSeparator+'f0s0',ClassFileName,'file','y'); -PrintStringInfo('g2'+ArgSeparator+'f0d0',ClassFileName,'file','y'); -PrintStringInfo('g2g2'+ArgSeparator+'f0',ClassFileName,'file','y'); -PrintStringInfo('g2g2'+ArgSeparator+'f0s0',ClassFileName,'file','y'); -PrintStringInfo('g2g2'+ArgSeparator+'f0d0',ClassFileName,'file','y'); -PrintStringInfo('g2g2s0'+ArgSeparator+'f0s0',ClassFileName,'file','y'); -PrintStringInfo('g2g2s0'+ArgSeparator+'f0d0',ClassFileName,'file','y'); -PrintStringInfo('g2g2d0'+ArgSeparator+'f0s0',ClassFileName,'file','y'); -PrintStringInfo('g2g2d0'+ArgSeparator+'f0d0',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'mopen'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------- -// --- Class Mput. --- -// ------------------- -ClassName = 'Mput'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 0 ',ClassFileName,'file','y'); -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''i''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0g2f0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s2g2f0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d0g2f0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('d2g2f0'+ArgSeparator,ClassFileName,'file','y'); -PrintStringInfo('s0g2f0'+ArgSeparator+'i0',ClassFileName,'file','y'); //NUT la mput e' strana -PrintStringInfo('s2g2f0'+ArgSeparator+'i0',ClassFileName,'file','y'); -PrintStringInfo('d0g2f0'+ArgSeparator+'i0',ClassFileName,'file','y'); -PrintStringInfo('d2g2f0'+ArgSeparator+'i0',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'mput'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------- -// --- Class Mget. --- -// ------------------- -ClassName = 'Mget'; -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_USER',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_RTMAX(IN(1).VAL)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0g2f0'+ArgSeparator+'s0',ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('s0g2f0'+ArgSeparator+'d0',ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('d0g2f0'+ArgSeparator+'s0',ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('d0g2f0'+ArgSeparator+'d0',ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('s0g2f0'+ArgSeparator+'s2',ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('s0g2f0'+ArgSeparator+'d2',ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('d0g2f0'+ArgSeparator+'s2',ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('d0g2f0'+ArgSeparator+'d2',ClassFileName,'file','y'); //NUT da chiarire - -// --- Annotation Function And Function List Function. --- -FunctionName = 'mget'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// --------------------- -// --- Class Mclose. --- -// --------------------- -ClassName = 'Mclose'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 0',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''i''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('f0'+ArgSeparator,ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('f0'+ArgSeparator+'i0',ClassFileName,'file','y'); //NUT da chiarire - -// --- Annotation Function And Function List Function. --- -FunctionName = 'mclose'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// --------------------- -// --- Class Mseek. --- -// --------------------- -ClassName = 'Mseek'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 0 ',ClassFileName,'file','y'); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 0 ',ClassFileName,'file','y'); -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 0 ',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator,ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('s0f0'+ArgSeparator,ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('s0f0g2'+ArgSeparator,ClassFileName,'file','y'); //NUT da chiarire - -PrintStringInfo('d0'+ArgSeparator,ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('d0f0'+ArgSeparator,ClassFileName,'file','y'); //NUT da chiarire -PrintStringInfo('d0f0g2'+ArgSeparator,ClassFileName,'file','y'); //NUT da chiarire - -// --- Annotation Function And Function List Function. --- -FunctionName = 'mseek'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// --------------------- -// --- Class Convol. --- -// --------------------- -ClassName = 'Convol'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SUB(FA_ADD(IN(1).SZ(2),IN(2).SZ(2)),''1'')',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(2).SZ(2)',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= FA_SUB(FA_ADD(IN(1).SZ(2),IN(2).SZ(2)),''1'')',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(FA_TP_MAX(IN(1).TP,IN(2).TP),IN(3).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(2).SZ(2)',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= FA_TP_MAX(FA_TP_MAX(IN(1).TP,IN(2).TP),IN(3).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= FA_SUB(FA_ADD(IN(1).SZ(2),IN(2).SZ(2)),''1'')',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0'+ArgSeparator+'s0s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0d0',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'c0c0',ClassFileName,'file','y'); -PrintStringInfo('z0z0'+ArgSeparator+'z0z0',ClassFileName,'file','y'); - -PrintStringInfo('s0s2'+ArgSeparator+'s2s2',ClassFileName,'file','y'); -PrintStringInfo('d0d2'+ArgSeparator+'d2d2',ClassFileName,'file','y'); -PrintStringInfo('c0c2'+ArgSeparator+'c2c2',ClassFileName,'file','y'); -PrintStringInfo('z0z2'+ArgSeparator+'z2z2',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s2s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2d2',ClassFileName,'file','y'); -PrintStringInfo('c2c0'+ArgSeparator+'c2c2',ClassFileName,'file','y'); -PrintStringInfo('z2z0'+ArgSeparator+'z2z2',ClassFileName,'file','y'); - -PrintStringInfo('s2s2'+ArgSeparator+'s2s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2d2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c2c2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z2z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0s0'+ArgSeparator+'s0s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0d0'+ArgSeparator+'d0d0',ClassFileName,'file','y'); -PrintStringInfo('c0c0c0'+ArgSeparator+'c0c0',ClassFileName,'file','y'); -PrintStringInfo('z0z0z0'+ArgSeparator+'z0z0',ClassFileName,'file','y'); - -PrintStringInfo('s0s2s0'+ArgSeparator+'s2s0',ClassFileName,'file','y'); -PrintStringInfo('d0d2d0'+ArgSeparator+'d2d0',ClassFileName,'file','y'); -PrintStringInfo('c0c2c0'+ArgSeparator+'c2c0',ClassFileName,'file','y'); -PrintStringInfo('z0z2z0'+ArgSeparator+'z2z0',ClassFileName,'file','y'); - -PrintStringInfo('s2s2s2'+ArgSeparator+'s2s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2d2'+ArgSeparator+'d2d2',ClassFileName,'file','y'); -PrintStringInfo('c2c2c2'+ArgSeparator+'c2c2',ClassFileName,'file','y'); -PrintStringInfo('z2z2z2'+ArgSeparator+'z2z2',ClassFileName,'file','y'); - -PrintStringInfo('s0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c0s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z0d2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); - - -// --- Annotation Function And Function List Function. --- -FunctionName = 'convol'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------- -// --- Class IFFT. --- -// ------------------- -ClassName = 'IFFT'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); - -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'ifft'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------ -// --- Class FFT. --- -// ------------------ -ClassName = 'FFT'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); -PrintStringInfo('NIN= 4',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s0s0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0d0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('c0s0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0d0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2s0s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2s0s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2d0d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c2s0s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2d0d0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('s0s0s0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0d0d0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('c0s0s0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0d0d0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2s0s0s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0d0d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2s0s0s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2d0d0d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('c2s0s0s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2d0d0d0'+ArgSeparator+'z2',ClassFileName,'file','y'); - - -//NUT non metto tutte le combinazioni ma prima cerco di capire cosa mi offre INRIA -//NUT come libreria a disposizione. -// --- Annotation Function And Function List Function. --- -FunctionName = 'fft'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ----------------------- -// --- Class FFTShift. --- -// ----------------------- -ClassName = 'FFTShift'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('s0g2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d0g2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c0g2'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z0g2'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2g2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2g2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2g2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2g2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'fftshift'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - - -// -------------------- -// --- Class Meanf. --- -// -------------------- -ClassName = 'Meanf'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP, IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_SEL1(IN(1).SZ(1),IN(3).VAL)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_SEL2(IN(1).SZ(2),IN(3).VAL)',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2s2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s0s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('d0d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('c0s0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0d0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2s2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2d2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'meanf'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'variancef'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -FunctionName = 'stdevf'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// -------------------- -// --- Class Frmag. --- -// -------------------- -ClassName = 'Frmag'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(2).VAL',ClassFileName,'file','y'); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(2).VAL',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= IN(2).VAL',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(3).VAL',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(3).VAL',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= FA_TP_MAX(IN(1).TP,IN(2).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= IN(3).VAL',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2d2',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'d0d0',ClassFileName,'file','y'); -PrintStringInfo('d2d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2d2d0'+ArgSeparator+'d2d2',ClassFileName,'file','y'); -PrintStringInfo('d0d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d0d0d0'+ArgSeparator+'d0d0',ClassFileName,'file','y'); - -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2s0'+ArgSeparator+'s2s2',ClassFileName,'file','y'); -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('s0s0'+ArgSeparator+'s0s0',ClassFileName,'file','y'); -PrintStringInfo('s2s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2s2s0'+ArgSeparator+'s2s2',ClassFileName,'file','y'); -PrintStringInfo('s0s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('s0s0s0'+ArgSeparator+'s0s0',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'frmag'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------ -// --- Class Lev. --- -// ------------------ -ClassName = 'Lev'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SUB(FA_ADD(IN(1).SZ(1),IN(1).SZ(2)),''2'')',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SUB(FA_ADD(IN(1).SZ(1),IN(1).SZ(2)),''2'')',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 3',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SUB(FA_ADD(IN(1).SZ(1),IN(1).SZ(2)),''2'')',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(3).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(3).SZ(1)= FA_SUB(FA_ADD(IN(1).SZ(1),IN(1).SZ(2)),''2'')',ClassFileName,'file','y'); -PrintStringInfo('OUT(3).SZ(2)= ''1''',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s2s0',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'s2s0s2',ClassFileName,'file','y'); - -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2d0',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2d0d2',ClassFileName,'file','y'); - -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2c0',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2c0c2',ClassFileName,'file','y'); - -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2z0',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2z0z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'lev'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// -------------------------- -// --- Class OpBackSlash. --- -// -------------------------- -ClassName = 'OpBackSlash'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP) ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_SZ_1(FA_SZ_OPBACKSLASH(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_1(FA_SZ_OPBACKSLASH(IN(1).SZ,IN(2).SZ))',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); - -PrintStringInfo('s0s0'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('s0s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2s0'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('s2s2'+ArgSeparator+'s2',ClassFileName,'file','y'); - -PrintStringInfo('d0d0'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('d0d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2d0'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'d2',ClassFileName,'file','y'); - -PrintStringInfo('s0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('c0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); - -PrintStringInfo('c0s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('s0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c0c2'+ArgSeparator+'c2',ClassFileName,'file','y'); - -PrintStringInfo('c2s0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('s2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c0'+ArgSeparator+'c2',ClassFileName,'file','y'); - -PrintStringInfo('s2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); - -PrintStringInfo('d0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('z0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('z0d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('d0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z0z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('z2d0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('d2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z0'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('d2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'OpBackSlash'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ----------------------- -// --- Class Cepstrum. --- -// ----------------------- -ClassName = 'Cepstrum'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_MAX(IN(1).TP,IN(2).TP) ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= FA_MUL(IN(1).SZ(1),IN(1).SZ(2))',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); - -PrintStringInfo('s0s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s0c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0z0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('s2s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('s2c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - - -// --- Annotation Function And Function List Function. --- -FunctionName = 'Cepstrum'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------- -// --- Class Spec. --- -// ------------------- -ClassName = 'Spec'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_COMPLEX(IN(1).TP)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y'); - -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 2',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= FA_TP_COMPLEX(IN(1).TP)',ClassFileName,'file','y'); //FOR INRIA FA_TP_MAX NEEDS 2 Input args -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).TP= FA_TP_COMPLEX(IN(1).TP)',ClassFileName,'file','y'); //FOR INRIA FA_TP_MAX NEEDS 2 Input args -PrintStringInfo('OUT(2).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(2).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); - -PrintStringInfo('s0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'z0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'z2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -PrintStringInfo('s0'+ArgSeparator+'c0c0',ClassFileName,'file','y'); -PrintStringInfo('d0'+ArgSeparator+'z0z0',ClassFileName,'file','y'); -PrintStringInfo('c0'+ArgSeparator+'c0c0',ClassFileName,'file','y'); -PrintStringInfo('z0'+ArgSeparator+'z0z0',ClassFileName,'file','y'); - -PrintStringInfo('s2'+ArgSeparator+'s2s2',ClassFileName,'file','y'); -PrintStringInfo('s2'+ArgSeparator+'c2c2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2d2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'z2z2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'spec'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ------------------- -// --- Class Part. --- -// ------------------- -ClassName = 'Part'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''g''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_RTMAX(IN(1).SZ(2))',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); - -PrintStringInfo('g2s0'+ArgSeparator+'g2',ClassFileName,'file','y'); -PrintStringInfo('g2d0'+ArgSeparator+'g2',ClassFileName,'file','y'); -PrintStringInfo('g2s2'+ArgSeparator+'g2',ClassFileName,'file','y'); -PrintStringInfo('g2d2'+ArgSeparator+'g2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'part'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ----------------------- -// --- Class Strindex. --- -// ----------------------- -ClassName = 'Strindex'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 2',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''g''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_RTMAX(IN(1).SZ(2))',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); - -PrintStringInfo('g2g2'+ArgSeparator+'s0',ClassFileName,'file','y'); -PrintStringInfo('g2g2'+ArgSeparator+'d0',ClassFileName,'file','y'); -PrintStringInfo('g2g2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('g2g2'+ArgSeparator+'d2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'strindex'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - -// ----------------------- -// --- Class StrSubSt. --- -// ----------------------- -ClassName = 'StrSubSt'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 3',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= ''g''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= FA_SZ_RTMAX(FA_MUL(IN(1).SZ(2),IN(3).SZ(2)))',ClassFileName,'file','y'); - -// --- Function List Class. --- -//NUT: no mixed data types -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); - -PrintStringInfo('g2g2g2'+ArgSeparator+'g2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'strsubst'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - - - -// ------------------ -// --- Class Expm. --- -// ------------------ -ClassName = 'Expm'; - -// --- Class Annotation. --- -PrintStringInfo(' Adding Class: '+ClassName+'.',GeneralReport,'both','y'); -ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls); -PrintStringInfo('NIN= 1',ClassFileName,'file','y'); -PrintStringInfo('NOUT= 1 ',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).TP= IN(1).TP',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(1)= IN(1).SZ(1)',ClassFileName,'file','y'); -PrintStringInfo('OUT(1).SZ(2)= IN(1).SZ(2)',ClassFileName,'file','y'); - -// --- Function List Class. --- -ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls); -PrintStringInfo('s2'+ArgSeparator+'s2',ClassFileName,'file','y'); -PrintStringInfo('d2'+ArgSeparator+'d2',ClassFileName,'file','y'); -PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); -PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); - -// --- Annotation Function And Function List Function. --- -FunctionName = 'expm'; -PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); -INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); - - - - -// //////////////////////////////////////////// -// /////PARTE INTRODOTTA DA ALBERTO MOREA -// ///////////////////////////////////////////// -// /////////////////////////////////////////////// - -// // DOMAINS DEFINITION FOR EVERY CLASS-LEADER IN SCI2C LIBRARY - -// // In the following lets: -// // N,R ,C are the standard sets of integer,real ,complex numbers -// // I,J c R are intervals of real numbers -// // {} the empty set -// // Sel={'r','c'} or {0,1} are the selection sets r=row,c=column -// // B={T,F} is Boolean set -// // F is the standard set of File IDentify files -// // G is the standard alphanumeric string domain - -// // For every sci2c function library class we reported -// // the domains , annotations only for the class-leader - -// // Example [y1,y2]=Fun(x1,x2,x3) : scilab library function call - -// // Domain RxNxSel->{R,R} :the first input element is real number ,the second is integer , -// // the last is in the selection set -// // The first output and the second are real numbers - -// // Notice : only default (double) precision are considered for real and complex data -// // The dimension of the input/output data are provided in the mapping schema - -// // d0 = double real scalar -// // d2 = double real vector or matrix -// // z0= double complex scalar -// // z2= double complex vector or matrix - -// // --------------------- -// // --- Class Global. --- -// // --------------------- - -// // DOMAINS G -> R - -// ////////////////////////////////// - - -// // --------------------- -// // --- Class Float. --- -// // --------------------- - -// // DOMAINS R -> R - -// ////////////////////////////////// - - -// // --------------------- -// // --- Class Double. --- -// // --------------------- - -// // DOMAINS R -> R - -// ////////////////////////////////// - -// // ---------------------------- -// // --- Class FloatComplex. --- -// // ---------------------------- - -// // DOMAINS 1)R -> C -// // 2)C -> C - -// ///////////////////////////////// - -// // ---------------------------- -// // --- Class DoubleComplex. --- -// // ---------------------------- - -// // DOMAINS 1) R -> C -// // 2) C -> C - -// ///////////////////////////////// - -// // ------------------ -// // --- Class Sin. --- -// // ------------------ - -// // DOMAINS 1) IcR -> JcR -// // 2) C -> C - -// ///////////////////////////////// - -// // ------------------- -// // --- Class Atan. --- -// // ------------------- - -// // DOMAINS 1) IcR -> JcR -// // 2) C -> C -// // 3) RxR -> JcR - -// ///////////////////////////////// - -// // ------------------- -// // --- Class Sqrt. --- -// // ------------------- - -// // DOMAINS 1) IcR -> JcR -// // 2) R -> R -// // 3) C -> C - - // ///////////////////////////////// - -// // -------------------- -// // --- Class Zeros. --- -// // -------------------- - -// // DOMAINS 1) {}->R -// // 2) NxN -> R -// // 3) R -> R -// // 4) C -> R - -// ///////////////////////////////// - -// // -------------------- -// // --- Class Sum. --- -// // -------------------- - -// // DOMAINS 1) R -> R -// // 2) C -> C -// // 3) RxSel -> R -// // 4) CxSel -> R - - // ///////////////////////////////// - -// // -------------------- -// // --- Class Abs. --- -// // -------------------- - -// // DOMAINS 1) R -> R+ -// // 2) C -> R+ - -// ///////////////////////////////// - -// // ------------------------ -// // --- Class OpDotStar. --- -// // ------------------------ - -// // DOMAINS 1) RxR -> R -// // 2) CxC -> C -// // 3) RxC -> C -// // 4) CxR -> C - -// ///////////////////////////////// - -// // ------------------------ -// // --- Class OpDotHat. --- -// // ------------------------ - -// // DOMAINS 1) RxR -> R -// // 2) CxC -> C - -// ///////////////////////////////// - -// // ---------------------- -// // --- Class OpLogEq. --- -// // ---------------------- - -// // DOMAINS 1) RxR -> B -// // 2) CxC -> B -// // 3) GxG -> B - -// ///////////////////////////////// - -// // --------------------- -// // --- Class OpStar. --- -// // --------------------- - -// // DOMAINS 1) RxR -> R -// // 2) CxC -> C -// // 3) RxC -> C -// // 4) CxR -> C - -// ///////////////////////////////// - -// // --------------------- -// // --- Class OpApex. --- -// // --------------------- - -// // DOMAINS 1) R -> R -// // 2) C -> C - -// ///////////////////////////////// - -// // --------------------- -// // --- Class OpPlus. --- -// // --------------------- - -// // DOMAINS 1) R -> R -// // 2) C -> C -// // 3) RxR -> R -// // 4) CxC -> C -// // 5) RxC -> C -// // 6) CxR -> C -// // 7) GxG -> G - -// ///////////////////////////////// - -// // ---------------------- -// // --- Class OpMinus. --- -// // ---------------------- - -// // DOMAINS 1) R -> R -// // 2) C -> C -// // 3) RxR -> R -// // 4) CxC -> C -// // 5) RxC -> C -// // 6) CxR -> C - - -// ///////////////////////////////// - -// // ------------------- -// // --- Class OpRc. --- -// // ------------------- - -// // DOMAINS 1) RxR -> R -// // 2) CxC -> C - -// ///////////////////////////////// - -// // ------------------- -// // --- Class OpCc. --- -// // ------------------- - -// // DOMAINS 1) RxR -> R -// // 2) CxC -> C - -// ///////////////////////////////// - -// // ------------------- -// // --- Class Find. --- -// // ------------------- - -// // DOMAINS 1) R -> N -// // 2) R -> {N,N} -// // 3) RxN -> N -// // 4) RxN ->{N,N} - -// ///////////////////////////////// - -// // --------------------- -// // --- Class Length. --- -// // --------------------- - -// // DOMAINS 1) R -> N -// // 2) C -> N -// // 3) G -> N - -// ///////////////////////////////// - -// // ------------------- -// // --- Class Size. --- -// // ------------------- - -// // DOMAINS 1) R -> {N,N} -// // 2) C -> {N,N} -// // 3) RxSel -> {N,N} -// // 4) CxSel -> {N,N} - -// ///////////////////////////////// - -// // --------------------- -// // --- Class Return. --- -// // --------------------- -// // DOMAINS 1) {} -> {} - -// ///////////////////////////////// - -// // ---------------------- -// // --- Class OpColon. --- -// // ---------------------- - -// // DOMAINS 1) RxR -> R -// // 2) RxRxR -> R - -// ///////////////////////////////// - -// // ---------------------- -// // --- Class IsEmpty. --- -// // ---------------------- - -// // DOMAINS 1) R -> B -// // 2) C -> B - -// ///////////////////////////////// - -// // ---------------------- -// // --- Class Trace. --- -// // ---------------------- - -// // DOMAINS 1) R -> R -// // 2) C -> C - -// //////////////////////////////// - -// // -------------------- -// // --- Class OpIns. --- -// // -------------------- - -// // DOMAINS 1) RxRxR -> {} -// // 2) RxRxRxR -> {} -// // 3) CxRxR -> {} -// // 4) CxRxRxC -> {} -// // 5) CxRxC -> {} - -// //////////////////////////////// - -// // -------------------- -// // --- Class OpExt. --- -// // -------------------- - -// // DOMAINS 1) RxR -> R -// // 2) CxR -> C -// // 3) CxRxR -> C - -// //////////////////////////////// - -// // ------------------- -// // --- Class Disp. --- -// // ------------------- - -// // DOMAINS 1) R -> R -// // 2) C -> R -// // 3) G -> R - -// //////////////////////////////// - -// // ---------------------- -// // --- Class OpEqual. --- -// // ---------------------- - -// // DOMAINS 1) R -> R -// // 2) C -> C -// // 3) G -> G - -// //////////////////////////////// - -// // -------------------- -// // --- Class Mopen. --- -// // -------------------- - -// // DOMAINS 1) G -> F -// // 2) GxG -> F -// // 3) GxGxR -> {F,R} -// // 4) G -> {F,R} -// // 5) GxG -> {F,R} - -// //////////////////////////////// - -// // ------------------- -// // --- Class Mput. --- -// // ------------------- - -// // DOMAINS 1) RxGxF -> {} -// // 2) RxGxF -> N - -// //////////////////////////////// - -// // ------------------- -// // --- Class Mget. --- -// // ------------------- - -// // DOMAINS 1) RxGxF -> N - -// //////////////////////////////// - -// // --------------------- -// // --- Class Mclose. --- -// // --------------------- - -// // DOMAINS 1) {} -> N -// // 2) F -> N - -// //////////////////////////////// - -// // --------------------- -// // --- Class Mseek. --- -// // --------------------- - -// // DOMAINS 1) R -> {} -// // 2) RxF -> {} -// // 3) RxFxG -> {} - -// //////////////////////////////// - -// // --------------------- -// // --- Class Convol. --- -// // --------------------- - -// // DOMAINS 1) RxR->R - // 2) CxC->C - // 3) RxC->C - // 4) CxR->C - // 5) RxR->{R,R} - // 6) CxC->{C,C} - // 7) RxC->{C,C} - // 8) CxR->{C,C} - // 9) CxC->{C,C} - // 10) RxRxR->{R,R} - // 11) RxCxC->{C,C} - // and so on ….. - - -// //////////////////////////////// - - -// // ------------------- -// // --- Class IFFT. --- -// // ------------------- - -// // DOMAINS 1) R->C - // 2) C->C - - // //////////////////////////////// - -// // ------------------ -// // --- Class FFT. --- -// // ------------------ - -// // DOMAINS 1) R->C - // 2) RxN->C - // 3) C->C - // 4) CxN->C - // 5) RxNxN->C - // 6) CxNxN->C - // 7) RxNxNxN->C - // 8) CxNxNxN->C - -// //////////////////////////////// - -// // ----------------------- -// // --- Class FFTShift. --- -// // ----------------------- - -// // DOMAINS 1) R->R - // 2) C->C - // 3) RxR->R - // 4) RxG->R - // 5) CxR->C - // 6) CxG->C - -// //////////////////////////////// - -// // -------------------- -// // --- Class Meanf. --- -// // -------------------- - -// // DOMAINS 1) R->R - // 2) C->C - // 3) CxSel->C - // 4) RxSel->R - -// //////////////////////////////// - -// // -------------------- -// // --- Class Frmag. --- -// // -------------------- - -// // DOMAINS 1) RxN->R - // 2) RxN->{R,R} - // 3) RxRxN->R - // 4) RxRxN->{R,R} - -// //////////////////////////////// - -// // ------------------ -// // --- Class Lev. --- -// // ------------------ - -// // DOMAINS 1) R->R - // 2) R->{R,R} - // 3) R->{R,R,R} - // 4) C->C - // 5) C->{C,C} - // 6) C->{C,C,C} - -// //////////////////////////////// - -// // -------------------------- -// // --- Class OpBackSlash. --- -// // -------------------------- - -// // DOMAINS 1) RxR->R - // 2) CxC->C - // 3) RxC->C - // 4) CxR->C - -// //////////////////////////////// - -// // ----------------------- -// // --- Class Cepstrum. --- -// // ----------------------- - -// // DOMAINS 1) RxR->C - // 2) RxC->C - -// //////////////////////////////// - -// // ----------------------- -// // --- Class Spec. --- -// // ----------------------- - -// // DOMAINS 1) R->R - // 2) C->C - // 3) R->{R,R} - // 4) C->{C,C} - -// //////////////////////////////// - -// // ------------------- -// // --- Class Part. --- -// // ------------------- - -// // DOMAINS 1) GxN->G - -// //////////////////////////////// - -// // ----------------------- -// // --- Class Strindex. --- -// // ----------------------- - -// // DOMAINS 1) GxG->N - -// //////////////////////////////// - -// // ----------------------- -// // --- Class StrSubSt. --- -// // ----------------------- - -// // DOMAINS 1) GxGxG->G - -// //////////////////////////////// - - -// //////////////////////////////// -// //////////////////////////////// -// // fine parte introdotta alberto -// //////////////////////////////// -// //////////////////////////////// - -// //RNU se puoi sistema meglio la parte introdotta da al. -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenAnnFLFunctions.sci b/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenAnnFLFunctions.sci deleted file mode 100644 index 4f83814d..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenAnnFLFunctions.sci +++ /dev/null @@ -1,28 +0,0 @@ -function INIT_GenAnnFLFunctions(FunctionName,FunctionsOutDir,ClassName,ReportFile,ExtensionCAnnFun) -// function INIT_GenAnnFLFunctions(FunctionName,FunctionsOutDir,ClassName,ReportFile,ExtensionCAnnFun) -// ----------------------------------------------------------------- -// Generates annotation or file list files. -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 17-Jun-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),5,5); - -FunctionExtension = ExtensionCAnnFun; -FunctionFileName = fullfile(FunctionsOutDir,FunctionName+FunctionExtension); -PrintStringInfo('CLASS: '+ClassName,FunctionFileName,'file','y'); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenFileInfo.sci b/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenFileInfo.sci deleted file mode 100644 index 0b97af4d..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenFileInfo.sci +++ /dev/null @@ -1,110 +0,0 @@ -function FileInfo = INIT_GenFileInfo(WorkingDir,OutCCCodeDir,UserSciFilesPaths) -// function FileInfo = INIT_GenFileInfo(WorkingDir,OutCCCodeDir,UserSciFilesPaths) -// ----------------------------------------------------------------- -// #RNU_RES_B -// This function creates and initializes FileInfo structure. -// -// Input data: -// WorkingDir: see description in the SCI2CInputParameters.sce file. -// OutCCCodeDir: see description in the SCI2CInputParameters.sce file. -// UserSciFilesPaths: see description in the SCI2CInputParameters.sce file. -// -// Output data: -// FileInfo: structure containing all info about SCI2C files. -// -// #RNU_RES_E -// Status: -// 03-Jan-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),3,3); - - -// ------------------------- -// --- Main directories. --- -// ------------------------- -FileInfo.SCI2CMainDir = pwd(); -FileInfo.WorkingDir = WorkingDir; -FileInfo.OutCCCodeDir = OutCCCodeDir; -FileInfo.UserSciFilesPaths = UserSciFilesPaths; - -// ------------------- -// --- .dat Files. --- -// ------------------- -FileInfo.FileInfoDatFile = fullfile(FileInfo.WorkingDir,'FileInfo.dat'); -FileInfo.SharedInfoDatFile = fullfile(FileInfo.WorkingDir,'SharedInfo.dat'); -FileInfo.GlobalVarFileName = fullfile(FileInfo.WorkingDir,'GBLVAR.dat'); -FileInfo.ASTStackDataFile = fullfile(FileInfo.WorkingDir,'ASTStack.dat'); - -// ---------------------- -// --- SCI2C Library. --- -// ---------------------- -FileInfo.SCI2CLibDir = fullfile(FileInfo.WorkingDir,'SCI2CLib'); - -FileInfo.SCI2CLibSCIAnnDir = fullfile(FileInfo.SCI2CLibDir,'SCIAnnotations'); -FileInfo.SCI2CLibSCIAnnFun = fullfile(FileInfo.SCI2CLibSCIAnnDir,'Functions'); -FileInfo.SCI2CLibSCIAnnCls = fullfile(FileInfo.SCI2CLibSCIAnnDir,'Classes'); - -FileInfo.SCI2CLibSCIFunListDir = fullfile(FileInfo.SCI2CLibDir,'SCIFunctionList'); -FileInfo.SCI2CLibSCIFLFun = fullfile(FileInfo.SCI2CLibSCIFunListDir,'Functions'); -FileInfo.SCI2CLibSCIFLCls = fullfile(FileInfo.SCI2CLibSCIFunListDir,'Classes'); - -FileInfo.SCI2CLibCAnnDir = fullfile(FileInfo.SCI2CLibDir,'CAnnotations'); -FileInfo.SCI2CLibCAnnFun = fullfile(FileInfo.SCI2CLibCAnnDir,'Functions'); -FileInfo.SCI2CLibCAnnCls = fullfile(FileInfo.SCI2CLibCAnnDir,'Classes'); - -FileInfo.SCI2CLibCFunListDir = fullfile(FileInfo.SCI2CLibDir,'CFunctionList'); -FileInfo.SCI2CLibCFLFun = fullfile(FileInfo.SCI2CLibCFunListDir,'Functions'); -FileInfo.SCI2CLibCFLCls = fullfile(FileInfo.SCI2CLibCFunListDir,'Classes'); - - -// ----------------------- -// --- USER2C Library. --- -// ----------------------- -FileInfo.USER2CLibDir = fullfile(FileInfo.WorkingDir,'USER2CLib'); - -FileInfo.USER2CLibSCIAnnDir = fullfile(FileInfo.USER2CLibDir,'SCIAnnotations'); -FileInfo.USER2CLibSCIAnnFun = fullfile(FileInfo.USER2CLibSCIAnnDir,'Functions'); -FileInfo.USER2CLibSCIAnnCls = fullfile(FileInfo.USER2CLibSCIAnnDir,'Classes'); - -FileInfo.USER2CLibSCIFunListDir = fullfile(FileInfo.USER2CLibDir,'SCIFunctionList'); -FileInfo.USER2CLibSCIFLFun = fullfile(FileInfo.USER2CLibSCIFunListDir,'Functions'); -FileInfo.USER2CLibSCIFLCls = fullfile(FileInfo.USER2CLibSCIFunListDir,'Classes'); - -FileInfo.USER2CLibCAnnDir = fullfile(FileInfo.USER2CLibDir,'CAnnotations'); -FileInfo.USER2CLibCAnnFun = fullfile(FileInfo.USER2CLibCAnnDir,'Functions'); -FileInfo.USER2CLibCAnnCls = fullfile(FileInfo.USER2CLibCAnnDir,'Classes'); - -FileInfo.USER2CLibCFunListDir = fullfile(FileInfo.USER2CLibDir,'CFunctionList'); -FileInfo.USER2CLibCFLFun = fullfile(FileInfo.USER2CLibCFunListDir,'Functions'); -FileInfo.USER2CLibCFLCls = fullfile(FileInfo.USER2CLibCFunListDir,'Classes'); - -// ---------------------- -// --- Function List. --- -// ---------------------- -FileInfo.FunctionList.MainDir = fullfile(FileInfo.WorkingDir,'FunctionList'); -FileInfo.FunctionList.SCI2CAvailableCDat = fullfile(FileInfo.FunctionList.MainDir,'SCI2CAvailableC.dat'); -FileInfo.FunctionList.USER2CAvailableCDat = fullfile(FileInfo.FunctionList.MainDir,'USER2CAvailableC.dat'); -FileInfo.FunctionList.ConvertedDat = fullfile(FileInfo.FunctionList.MainDir,'Converted.dat'); -FileInfo.FunctionList.ToBeConvertedDat = fullfile(FileInfo.FunctionList.MainDir,'ToBeConverted.dat'); -FileInfo.FunctionList.FunInfoDatDir = fullfile(FileInfo.FunctionList.MainDir,'FunInfoDatFiles'); - -// -------------------- -// --- Other Files. --- -// -------------------- -FileInfo.GeneralReport = fullfile(FileInfo.WorkingDir,'SCI2CGeneralReport.txt'); - -// ----------------------------------- -// --- C-Style paths and Makefile. --- -// ----------------------------------- -FileInfo.CStyleSCI2CMainDir = ConvertPathMat2C(FileInfo.SCI2CMainDir,SharedInfo.CCompilerPathStyle); -FileInfo.CStyleOutCCCodeDir = ConvertPathMat2C(OutCCCodeDir,SharedInfo.CCompilerPathStyle); -FileInfo.MakefileFilename = fullfile(FileInfo.CStyleOutCCCodeDir,'Makefile'); -FileInfo.MakefileTemplate = fullfile(FileInfo.SCI2CMainDir,'CCodeGeneration','SCI2CMakefileTemplate.rc'); -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenLibraries.sci b/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenLibraries.sci deleted file mode 100644 index eb2c01b7..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenLibraries.sci +++ /dev/null @@ -1,61 +0,0 @@ -function INIT_GenLibraries(FileInfoDatFile) -// function INIT_GenLibraries(FileInfoDatFile) -// ----------------------------------------------------------------- -// #RNU_RES_B -// This function initializes the SCI2C and USER libraries. -// For each Scilab function a .ann file is created where the function -// annotations are listed into it. -// #RNU_RES_E -// -// Input data: -// FileInfoDatFile: name of the .dat file containing the FileInfo structure. -// -// Output data: -// --- -// -// Status: -// 12-Jun-2007 -- Nutricato Raffaele: Author. -// 03-Jan-2008 -- Nutricato Raffaele: Changed directory structure. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -// --- Load File Info Structure. --- -clear FileInfo -load(FileInfoDatFile,'FileInfo'); - -// --- Load Shared Info Structure. --- -clear SharedInfo -load(FileInfo.SharedInfoDatFile,'SharedInfo'); - -PrintStepInfo('Initialize SCI2C and USER2C Libraries.',... - FileInfo.GeneralReport,'both'); -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// ----------------------------------------------------------- -// --- Fills SCI2C and USER2C libs with appropriate files. --- -// ----------------------------------------------------------- -INIT_FillSCI2LibCDirs(FileInfo,SharedInfo.Extension); - -// #RNU_RES_B -//NUT the following functions will be useful in next release -//NUT for advanced use of SCI2C -//INIT_FillSCI2LibSCIDirs(FileInfo,SharedInfo.Extension); -//INIT_FillUSER2LibCDirs(FileInfo,SharedInfo.Extension); -//INIT_FillUSER2LibSCIDirs(FileInfo,SharedInfo.Extension); -// --------------------------------------------------------------- -// --- End Fills SCI2C and USER2C libs with appropriate files. --- -// --------------------------------------------------------------- -// #RNU_RES_E -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenSharedInfo.sci b/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenSharedInfo.sci deleted file mode 100644 index b9d8dcef..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_GenSharedInfo.sci +++ /dev/null @@ -1,118 +0,0 @@ -function SharedInfo = INIT_GenSharedInfo(WorkingDir,OutCCCodeDir,UserSciFilesPaths,... - RunMode,UserScilabMainFile,TotTempScalarVars,EnableTempVarsReuse,Sci2CLibMainHeaderFName) -// function SharedInfo = INIT_GenSharedInfo(WorkingDir,OutCCCodeDir,UserSciFilesPaths,... -// RunMode,UserScilabMainFile,TotTempScalarVars,EnableTempVarsReuse,Sci2CLibMainHeaderFName) -// ----------------------------------------------------------------- -// #RNU_RES_B -// This function creates and initializes SharedInfo structure. -// -// Input data: -// WorkingDir: see description in the SCI2CInputParameters.sce file. -// OutCCCodeDir: see description in the SCI2CInputParameters.sce file. -// UserSciFilesPaths: see description in the SCI2CInputParameters.sce file. -// RunMode: see description in the SCI2CInputParameters.sce file. -// UserScilabMainFile: see description in the SCI2CInputParameters.sce file. -// TotTempScalarVars: see description in the SCI2CInputParameters.sce file. -// EnableTempVarsReuse: see description in the SCI2CInputParameters.sce file. -// -// Output data: -// SharedInfo: structure containing all info about general parameters -// used by SCI2C. -// -// #RNU_RES_E -// Status: -// 03-Jan-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),8,8); - - -// ------------------------------ -// --- Initialize SharedInfo. --- -// ------------------------------ -SharedInfo.CCompilerPathStyle = CCompilerPathStyle; -SharedInfo.RunMode = RunMode; -SharedInfo.Sci2CLibMainHeaderFName = ConvertPathMat2C(Sci2CLibMainHeaderFName,SharedInfo.CCompilerPathStyle); - -// #RNU_RES_B -// File names of the next .sci files to be converted in AST and -// successively into C. -// #RNU_RES_E -SharedInfo.NextSCIFileName = UserScilabMainFile; -[scipath,funname,sciext] = fileparts(UserScilabMainFile); -SharedInfo.SCIMainFunName = funname; -SharedInfo.CMainFunName = 'main'; -SharedInfo.NextSCIFunName = SharedInfo.SCIMainFunName; //NUT: per ora no so cosa metter -SharedInfo.NextCFunName = SharedInfo.CMainFunName; //NUT: per ora no so cosa metter //NUT: questo viene aggiornato dalla C_Funcall -SharedInfo.NextSCIFunNumber = 1; -SharedInfo.NFilesToTranslate = 1; - - -// --- Annotations. --- -SharedInfo.Annotations.GBLVAR = 'global'; -SharedInfo.Annotations.DataPrec = {'SCI2Cint','float','double'}; -SharedInfo.Annotations.FUNNIN = 'NIN='; -SharedInfo.Annotations.FUNNOUT = 'NOUT='; -SharedInfo.Annotations.FUNTYPE = '''OUT(''+string(SCI2C_nout)+'').TP='''; // Type includes also precision. -SharedInfo.Annotations.FUNSIZE = '''OUT(''+string(SCI2C_nout)+'').SZ(''+string(SCI2C_nelem)+'')= '''; -SharedInfo.Annotations.FUNCLASS = 'CLASS: '; -SharedInfo.Annotations.USERFUN = '//SCI2C: '; -// #RNU_RES_B -// Note when you execute the following code: - // SCI2C_nout=1; - // SCI2C_nelem=0; - // eval(SharedInfo.Annotations.FUNSIZE) - // you get: - // O1SIZE[0] = - -// Info related to temp variables used in the C code. -// #RNU_RES_E -SharedInfo.TotTempScalarVars = TotTempScalarVars; -SharedInfo.UsedTempScalarVars = 0; -SharedInfo.TempScalarVarsName = '__Scalar'; -//NUT: verificare se le seguenti due variabili sono utili. Le sto usando in AST2Ccode -SharedInfo.WorkAreaUsedBytes = WorkAreaSizeBytes; -SharedInfo.UsedTempScalarVars = WorkAreaSizeBytes; -// Info related to temp variables used in the AST reading phase. -SharedInfo.ASTReader.fidAST = -1; -SharedInfo.ASTReader.UsedTempVars = 0; -SharedInfo.ASTReader.TempVarsName = '__temp'; -SharedInfo.ASTReader.TempForCntVarsName = '__tmpcnt'; -SharedInfo.ASTReader.TempForValVarsName = '__TmpVal'; -SharedInfo.ASTReader.TempWhileCntVarsName = '__tmpWhilecnt';//NUT: vedi se serve. -SharedInfo.ASTReader.TempWhileValVarsName = '__TmpWhileVal'; //NUT: vedi se serve -SharedInfo.ASTReader.EnableTempVarsReuse = EnableTempVarsReuse; //NUT: non so se la devo rimuovere. -SharedInfo.ASTReader.ReusableTempVars = [];//NUT: to be removed - -SharedInfo.NIndent = 0; // Indentation Level. -SharedInfo.SkipNextEqual = 0; // 1 = the next equal in the AST will not produce C code. -SharedInfo.SkipNextPrec = 0; // 1 = the next precision specifier in the AST will not produce C code. -SharedInfo.SkipNextFun = 0; -SharedInfo.CopySciCodeIntoCCode = CopySciCodeIntoCCode; -SharedInfo.CountNestedIf = 0; // Number of nested if. - -SharedInfo.CFunId.OpColon = 3; -SharedInfo.CFunId.EqScalar = 4; -SharedInfo.CFunId.EqMatrix = 5; -SharedInfo.CFunId.GenFunMtx = 6; // (scalar functions are fall in the scalar equal category.) - -SharedInfo = INIT_SharedInfoEqual(SharedInfo); -// ------------------------ -// --- File Extensions. --- -// ------------------------ -SharedInfo.Extension.AnnotationFunctions = '.ann'; // Stands for annotation -SharedInfo.Extension.AnnotationClasses = '.acls'; // Stands for annotation class. -SharedInfo.Extension.FuncListFunctions = '.lst'; // Stands for list -SharedInfo.Extension.FuncListClasses = '.lcls'; // Stands for list class - -// ------------------------ -// --- Resize Approach. --- -// ------------------------ -SharedInfo.ResizeApproach = 'NO_RESIZE'; // 'NO_RESIZE', 'RESIZE_ALL', 'RESIZE_TEMP', 'RESIZE_LOCAL', 'RESIZE_GLOBAL', 'REALLOC_ALL_RESIZE_ALL' -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_LoadLibraries.sci b/src/Scilab2C/Scilab2C/ToolInitialization/INIT_LoadLibraries.sci deleted file mode 100644 index 35ff18af..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_LoadLibraries.sci +++ /dev/null @@ -1,64 +0,0 @@ -function INIT_LoadLibraries(FileInfoDatFile) -// function INIT_LoadLibraries(FileInfoDatFile) -// ----------------------------------------------------------------- -// This function loads the SCI2C and USER libraries. -// -// Input data: -// FileInfoDatFile: name of the .dat file containing the FileInfo structure. -// -// Output data: -// --- -// -// Status: -// 12-Jun-2007 -- Raffaele Nutricato: Author. -// 03-Jan-2008 -- Raffaele Nutricato: Changed directory structure. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// ----------------------- -// --- Initialization. --- -// ----------------------- -// --- Load File Info Structure. --- -clear FileInfo -load(FileInfoDatFile,'FileInfo'); - -// --- Load Shared Info Structure. --- -clear SharedInfo -load(FileInfo.SharedInfoDatFile,'SharedInfo'); -PrintStepInfo('Load SCI2C and USER2C Libraries.',FileInfo.GeneralReport,'both'); -// --------------------------- -// --- End Initialization. --- -// --------------------------- - -// ---------------------------------- -// --- Initialize Function Lists. --- -// ---------------------------------- -SCI2CAvailableC = []; -USER2CAvailableC = []; -Converted = []; -ToBeConverted(1).SCIFunctionName = SharedInfo.NextSCIFunName; -ToBeConverted(1).CFunctionName = SharedInfo.NextCFunName; - -// --- Read the list of library functions available. --- -[SCI2CAvailableC,SCI2CNElem] = FL_ExtractFuncList(FileInfo.SCI2CLibCFLFun,FileInfo.SCI2CLibCFLCls,... - SharedInfo.Annotations.FUNCLASS,SharedInfo.Extension.FuncListClasses,FileInfo.GeneralReport); - -[USER2CAvailableC,USER2CNElem] = FL_ExtractFuncList(FileInfo.USER2CLibCFLFun,FileInfo.USER2CLibCFLCls,... - SharedInfo.Annotations.FUNCLASS,SharedInfo.Extension.FuncListClasses,FileInfo.GeneralReport); - -// --- Save .dat files. --- -Available = SCI2CAvailableC; -save(FileInfo.FunctionList.SCI2CAvailableCDat,Available); -Available = USER2CAvailableC; -save(FileInfo.FunctionList.USER2CAvailableCDat,Available); -save(FileInfo.FunctionList.ConvertedDat,Converted); -save(FileInfo.FunctionList.ToBeConvertedDat,ToBeConverted); - -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_RemoveDirs.sci b/src/Scilab2C/Scilab2C/ToolInitialization/INIT_RemoveDirs.sci deleted file mode 100644 index 0fa288bd..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_RemoveDirs.sci +++ /dev/null @@ -1,65 +0,0 @@ -function INIT_RemoveDirs(FileInfo,SharedInfoRunMode) -// function INIT_RemoveDirs(FileInfo,SharedInfoRunMode) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Removes existing directories according to the RunMode -// specified by the user. -// -// Input data: -// FileInfo: structure containing all info about SCI2C files. -// SharedInfoRunMode: execution mode specified by the user in -// the SCI2CInputParameters.sce file. -// -// Output data: -// --- -// -// #RNU_RES_E -// Status: -// 03-Jan-2008 -- Raffaele Nutricato: Author. -// -// Copyright 2008 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),2,2); - -// ---------------------------------------------------- -// --- Remove previous versions of SCI2C files/dir. --- -// ---------------------------------------------------- -if (SharedInfoRunMode == 'GenLibraryStructure' | SharedInfoRunMode == 'All') - disp('Removing directory: '+FileInfo.WorkingDir); - disp('Removing directory: '+FileInfo.OutCCCodeDir); - // Remove software<->user interaction. - // yesno=input('Are you sure [y/n]?','string'); - yesno = 'y'; - if (yesno=='y') - rmdir(FileInfo.WorkingDir,'s'); - rmdir(FileInfo.OutCCCodeDir,'s'); - else - SCI2Cerror('Cannot continue, because you don''t want to delete: '+FileInfo.WorkingDir); - SCI2Cerror('Cannot continue, because you don''t want to delete: '+FileInfo.OutCCCodeDir); - end -elseif (SharedInfoRunMode == 'Translate') - // #RNU_RES_B - //NUT: non cancella le cartelle dei file C creati nella iterazione precedente - //NUT: occorre specificarlo bene nel manuale. - // #RNU_RES_E - disp('Removing directory: '+FileInfo.OutCCCodeDir); - // Remove software<->user interaction. - // yesno=input('Are you sure [y/n]?','string'); - yesno = 'y'; - if (yesno=='y') - rmdir(FileInfo.OutCCCodeDir,'s'); - else - SCI2Cerror('Cannot continue, because you don''t want to delete: '+FileInfo.OutCCCodeDir); - end -else - disp('Unknown RunMode: ""'+SharedInfoRunMode+'"".'); - disp('Please check RunMode parameter in the SCI2CInputParameters.sce file'); - SCI2Cerror(' '); -end - -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_SCI2C.sci b/src/Scilab2C/Scilab2C/ToolInitialization/INIT_SCI2C.sci deleted file mode 100644 index c7b7a6f8..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_SCI2C.sci +++ /dev/null @@ -1,144 +0,0 @@ -function [FileInfoDatFile,SharedInfoDatFile] = INIT_SCI2C(SCI2CInputPrmFile) -// function [FileInfoDatFile,SharedInfoDatFile] = INIT_SCI2C(SCI2CInputPrmFile) -// ----------------------------------------------------------------- -// #RNU_RES_B -// This function initializes the SCI2C tool according -// to the input parameters recorded in the SCI2CParameters. -// All info will be stored into FileInfoDatFile. -// -// Input data: -// SCI2CInputPrmFile: name of the .sce file containing input parameters. -// -// Output data: -// FileInfoDatFile: name of the .dat file containing the FileInfo structure. -// SharedInfoDatFile: it is a buffer containing parameters that are exchanged by the -// functions of the SCI2C tool. -// #RNU_RES_E -// Status: -// 13-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// #RNU_RES_B -//NUT: questo file e' da rivedere quando il tool funzionera al 50% -// #RNU_RES_E -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// ------------------------------ -// --- Read Input Parameters. --- -// ------------------------------ -exec(SCI2CInputPrmFile); -// #RNU_RES_B -//NUT: queste variabili sono per usi futuri. -//NUT: e saranno introdotti nel parameter file. -// #RNU_RES_E -WorkAreaSizeBytes = 2000*8; // 2000 locations of double -// #RNU_RES_B -// Maximum number of temporary scalar variables that can be used. -// #RNU_RES_E -TotTempScalarVars = 20; -EnableTempVarsReuse = 0; // 0 = Disable; 1 = Enable. - - -// #RNU_RES_B -//NUT: I prefer to don't show this parameters to the user. -// --- Directory where all the products of the SCI2C tool will be stored. --- -// #RNU_RES_E -[SCI2CResultDir,tmpfile,tmpext] = fileparts(SCI2CInputPrmFile); - -WorkingDir = fullfile(SCI2CResultDir,'SCI2CTmpResultsReports'); -// #RNU_RES_B -// --- Directory where the generated C code will be stored. --- -// #RNU_RES_E -OutCCCodeDir = fullfile(SCI2CResultDir,'C_Code'); - -// ------------------------------ -// --- Initialize SharedInfo. --- -// ------------------------------ -SharedInfo = INIT_GenSharedInfo(WorkingDir,OutCCCodeDir,UserSciFilesPaths,... - RunMode,UserScilabMainFile,TotTempScalarVars,EnableTempVarsReuse,Sci2CLibMainHeaderFName); - -// ---------------------------- -// --- Initialize FileInfo. --- -// ---------------------------- -FileInfo = INIT_GenFileInfo(WorkingDir,OutCCCodeDir,UserSciFilesPaths); -PrintStepInfo('SCI2C hArtes/POLIBA Tool!!!',FileInfo.GeneralReport,'stdout'); - -// ---------------------------------------------------- -// --- Remove previous versions of SCI2C files/dir. --- -// ---------------------------------------------------- -INIT_RemoveDirs(FileInfo,SharedInfo.RunMode); - -// --------------------------- -// --- Create Directories. --- -// --------------------------- -INIT_CreateDirs(FileInfo); -PrintStepInfo('SCI2C hArtes/POLIBA Tool!!!',FileInfo.GeneralReport,'file'); - -// ------------------------------ -// --- Initialize GlobalVars. --- -// ------------------------------ -GlobalVars = []; -save(FileInfo.GlobalVarFileName,GlobalVars); - -// ---------------------------------- -// --- Initialize Main .dat file. --- -// ---------------------------------- -//NUT: qui va sistemata. -clear FunInfo -//NUT: qua conviene fare una unica funzione. -FunInfo.SCIFunctionName = SharedInfo.NextSCIFunName; -FunInfo.CFunctionName = SharedInfo.NextCFunName; -FunInfo.FunPrecSpecifier = ''; //NUT: si riferiscono al main verifica se sono corrette -FunInfo.FunTypeAnnot = ''; //NUT: si riferiscono al main verifica se sono corrette -FunInfo.FunSizeAnnot = ''; //NUT: si riferiscono al main verifica se sono corrette -FunInfo.NInArg = 0;//NUT: si riferiscono al main verifica se sono corrette -FunInfo.InArg(1).Name = '';//NUT: si riferiscono al main verifica se sono corrette -FunInfo.InArg(1).Type = '';//NUT: si riferiscono al main verifica se sono corrette -FunInfo.InArg(1).Value = %nan;//NUT: si riferiscono al main verifica se sono corrette -FunInfo.InArg(1).Size(1) = '';//NUT: si riferiscono al main verifica se sono corrette -FunInfo.InArg(1).Dimension = '';//NUT: si riferiscono al main verifica se sono corrette -FunInfo.InArg(2).Size(2) = '';//NUT: si riferiscono al main verifica se sono corrette -FunInfo.NOutArg = 0;//NUT: si riferiscono al main verifica se sono corrette -FunInfo.OutArg(1).Name = ''; -FunInfo.OutArg(1).Type = ''; -FunInfo.OutArg(1).Size(1) = ''; -FunInfo.OutArg(1).Size(2) = ''; -FunInfo.OutArg(1).Dimension = ''; -FunInfo.PosFirstOutScalar = 0; -FunInfo.LibTypeInfo = 'USER2C'; -save(fullfile(FileInfo.FunctionList.FunInfoDatDir,FunInfo.CFunctionName+'.dat'),FunInfo); -clear FunInfo - -// ------------------------------------- -// --- Initialize ASTStack.dat file. --- -// ------------------------------------- -//NUT: questa struttura deve sostituire le variabili global usate per lo stack -clear ASTStack -ASTStack.SCI2CSTACK = 'EMPTYSTACK'; -ASTStack.StackPosition = 1; -ASTStack.STACKDEDUG = 0; -save(FileInfo.ASTStackDataFile,ASTStack); -clear ASTStack - -// --------------------------------------------- -// --- Generate new versions of SCI2C files. --- -// --------------------------------------------- -save(FileInfo.FileInfoDatFile,FileInfo); -save(FileInfo.SharedInfoDatFile,SharedInfo); -FileInfoDatFile = FileInfo.FileInfoDatFile; -SharedInfoDatFile = FileInfo.SharedInfoDatFile; - -global anscounter; //NUT: just to fix problem with ans variables. -anscounter = 0; - -endfunction -// #RNU_RES_B -//NUT: quando genero il c della funzione utente devo anche generare il corrispondente file delle includes. -//NUT: perche' la main non la devo annotare, secondo me occorre annotarla.? -// #RNU_RES_E diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_SCI2CLoader.sce b/src/Scilab2C/Scilab2C/ToolInitialization/INIT_SCI2CLoader.sce deleted file mode 100644 index bd07f892..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_SCI2CLoader.sce +++ /dev/null @@ -1,72 +0,0 @@ -// ----------------------------------------------------------------- -// Load SCI2C directories and files. -// -// Input data: -// SCI2CLoaderMainDir: path of the directory where this script (main.sce) is stored. -// -// Output data: -// --- -// -// Status: -// 11-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -SCI2CLoaderMainDir = '..'; - -// --------------------------- -// --- Define Directories. --- -// --------------------------- -// Directory containing functions related to the management of the Abstract Syntactic tree. -ASTManagement = 'ASTManagement'; - -// Directory containing functions that produce the C code. -CCodeGeneration = 'CCodeGeneration'; - -// Directory containing functions that perform general tasks. -GeneralFunctions = 'GeneralFunctions'; - -// Directory containing functions that perform the initialization of the SCI2C tool. -ToolInitialization = 'ToolInitialization'; - -// Directory containing functions that perform the function annotation. -FunctionAnnotation = 'FunctionAnnotation'; - -// Directory containing functions that handle symbol table. -SymbolTable = 'SymbolTable'; - -// Directory containing functions that handle function lists. -FunctionList = 'FunctionList'; - -// Directory containing functions that print SCI2C error messages. -ErrorMessages = 'ErrorMessages'; - - -// ------------------------------- -// --- End Define Directories. --- -// ------------------------------- - -// ------------- -// --- getd. --- -// ------------- -getd(fullfile(SCI2CLoaderMainDir,ASTManagement)); -getd(fullfile(SCI2CLoaderMainDir,CCodeGeneration)); -getd(fullfile(SCI2CLoaderMainDir,GeneralFunctions)); -getd(fullfile(SCI2CLoaderMainDir,ToolInitialization)); -getd(fullfile(SCI2CLoaderMainDir,FunctionAnnotation)); -getd(fullfile(SCI2CLoaderMainDir,SymbolTable)); -getd(fullfile(SCI2CLoaderMainDir,FunctionList)); -getd(fullfile(SCI2CLoaderMainDir,ErrorMessages)); -// ----------------- -// --- End getd. --- -// ----------------- - -// ------------- -// --- exec. --- -// ------------- -exec(fullfile(SCI2CLoaderMainDir,ASTManagement,'%program_p.sci')); -// ----------------- -// --- End exec. --- -// ----------------- diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_SharedInfoEqual.sci b/src/Scilab2C/Scilab2C/ToolInitialization/INIT_SharedInfoEqual.sci deleted file mode 100644 index 690a43f6..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/INIT_SharedInfoEqual.sci +++ /dev/null @@ -1,43 +0,0 @@ -function SharedInfo = INIT_SharedInfoEqual(SharedInfo) -// function SharedInfo = INIT_SharedInfoEqual(SharedInfo) -// ----------------------------------------------------------------- -// #RNU_RES_B -// This function initializes the SCI2C tool according -// to the input parameters recorded in the SCI2CParameters. -// All info will be stored into FileInfoDatFile. -// -// Input data: -// SCI2CInputPrmFile: name of the .sce file containing input parameters. -// -// Output data: -// FileInfoDatFile: name of the .dat file containing the FileInfo structure. -// SharedInfoDatFile: it is a buffer containing parameters that are exchanged by the -// functions of the SCI2C tool. -// #RNU_RES_E -// Status: -// 13-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// #RNU_RES_B -//NUT: verifica se le variabili sotto elencate ti servono davvero. -//NUT: Sarebbe interessante accorpare tutte le variabili usate per la equal sotto un'unica struttura -//NUT: per esempio SharedInfo.SkipNextEqual -// #RNU_RES_E - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -SharedInfo.Equal.Enabled = 0; // 1 means enabled -> we are inside an equal AST block. -SharedInfo.Equal.NInArg = 0; -SharedInfo.Equal.InArg(1).Name = ''; -SharedInfo.Equal.NOutArg = 0; -SharedInfo.Equal.OutArg(1).Name = ''; -SharedInfo.Equal.Lhs = 0; -SharedInfo.Equal.Nins = 0; // Counts the number of ins found in the lhs of the Equal. - -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/ManageNextConversion.sci b/src/Scilab2C/Scilab2C/ToolInitialization/ManageNextConversion.sci deleted file mode 100644 index 8b2546bf..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/ManageNextConversion.sci +++ /dev/null @@ -1,87 +0,0 @@ -function FlagContinueTranslation = ManageNextConversion(FileInfoDatFile) -// function FlagContinueTranslation = ManageNextConversion(FileInfoDatFile) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -//NUT: verifica se update e managenexconversion possono essere integrate in un'unica funzione. - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// --------------------- -// --- Load section. --- -// --------------------- -// --- Load File Info Structure. --- -load(FileInfoDatFile,'FileInfo'); - -// --- Load Shared Info Structure. --- -load(FileInfo.SharedInfoDatFile,'SharedInfo'); - -// --- Load ToBeConverted .dat file. --- -load(FileInfo.FunctionList.ToBeConvertedDat,'ToBeConverted'); -// ------------------------- -// --- End load section. --- -// ------------------------- - -FlagContinueTranslation = 0; - -// ------------------------------------ -// --- Finalize the current C code. --- -// ------------------------------------ -C_FinalizeCode(FileInfo,SharedInfo); - -// ------------------------------------------------ -// --- Identify the next function to translate. --- -// ------------------------------------------------ -SharedInfo.NFilesToTranslate = SharedInfo.NFilesToTranslate - 1; -if (SharedInfo.NFilesToTranslate >= 1) - // Remove the translated C function from the ToBeConverted list - ToBeConverted(1) = []; - FlagContinueTranslation = 1; - SharedInfo.NextSCIFunName = ToBeConverted(1).SCIFunctionName; - SharedInfo.NextCFunName = ToBeConverted(1).CFunctionName; - SharedInfo.NextSCIFunNumber = SharedInfo.NextSCIFunNumber + 1; - [FlagFound,SharedInfo.NextSCIFileName] = ... - SCI2CFindFile(FileInfo.UserSciFilesPaths,SharedInfo.NextSCIFunName+'.sci'); - if (FlagFound == 0) - SCI2CerrorFile('Cannot find a scilab file to generate ""'+SharedInfo.NextCFunName+'"".',... - FileInfo.GeneralReport); - end -end -// ---------------------------------------------------- -// --- End Identify the next function to translate. --- -// ---------------------------------------------------- - - -// --------------------- -// --- Save section. --- -// --------------------- -// --- Save Shared Info Structure. --- -save(FileInfo.SharedInfoDatFile,SharedInfo); -clear SharedInfo - -// --- Save ToBeConverted .dat file. --- -save(FileInfo.FunctionList.ToBeConvertedDat,ToBeConverted); -clear ToBeConverted - -clear FileInfo -// ------------------------- -// --- End Save section. --- -// ------------------------- - -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/SCI2CInputParameters.bkp b/src/Scilab2C/Scilab2C/ToolInitialization/SCI2CInputParameters.bkp deleted file mode 100644 index 7af3343c..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/SCI2CInputParameters.bkp +++ /dev/null @@ -1,87 +0,0 @@ -// ----------------------------------------------------------------- -// === hArtes/PoliBa/GAP SCI2C tool === -// === Authors: === -// === Raffaele Nutricato === -// === raffaele.nutricato@tiscali.it === -// === Alberto Morea === -// === === -// === *************** === -// === USER PARAMETERS === -// === *************** === -// === === -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - - -// ------------------------------------------ -// --- Specify Paths of User Scilab code. --- -// ------------------------------------------ -UserSciCodeMainDir = 'C:\SCI2CTests\RegressionTests\test999'; - -// --- Path + filename of the .sci main file of the code to be translated. --- -// It is the entry point. -UserScilabMainFile = fullfile(UserSciCodeMainDir,'scilabcode\mainfun.sci'); - -// --- List of the paths containing the .sci files written by the user. --- -UserSciFilesPaths = ... - [... - fullfile(UserSciCodeMainDir,'scilabcode');... - ]; - -// -------------------------- -// --- End Specify paths. --- -// -------------------------- - - -// ---------------------------- -// --- Select the run mode. --- -// ---------------------------- -//RunMode = 'GenLibraryStructure'; -//RunMode = 'Translate'; -RunMode = 'All'; - -// --- Select one of the following options. --- - -// 'GenLibraryStructure'; -// Generates the library structure and exits. It is very -// useful when the user wants to manually change the files stored in that structure -// before running the translation. 'GenLibraryStructure' option forces SCI2C to remove -// the already existing WorkingDir and OutCCCodeDir directories. - -// 'Translate'; -// Performs the translation without generating the library structure. It means that the library -// structure must be already existing. This is useful when the user doesn't want to spend time -// to generate again that structure or when he wants to force the SCI2C tool to access to -// a manually-changed library structure. 'Translate' option forces SCI2C to don't remove -// the already existing WorkingDir. Only OutCCCodeDir directory will be removed. - -// 'All'; -// Performs all the actions listed above. - -// -------------------------------- -// --- End Select the run mode. --- -// -------------------------------- - - -// ---------------------------- -// --- Translation Options. --- -// ---------------------------- -// --- Enable (1) / Disable (0) copy of Scilab code into C code. --- -// If 1 the Scilab code will be copied into the C code in order to show -// how each Scilab code line has been translated into C code. -CopySciCodeIntoCCode = 1; - -// --- Select the path style for the C code. --- -// It can be: -// windows -// unix -// cygwin -CCompilerPathStyle = 'cygwin'; - -// --- Path + File name of the main SCI2C library header file. -Sci2CLibMainHeaderFName = 'C:\Nutricato\OpenProjects\FP6_hArtes\WP2_SCI2C\Software\Scilab2C\CFiles\sci2cincludes\sci2clib.h'; -// -------------------------------- -// --- End Translation Options. --- -// -------------------------------- diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/SCI2CInputParameters.sce b/src/Scilab2C/Scilab2C/ToolInitialization/SCI2CInputParameters.sce deleted file mode 100644 index 7af3343c..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/SCI2CInputParameters.sce +++ /dev/null @@ -1,87 +0,0 @@ -// ----------------------------------------------------------------- -// === hArtes/PoliBa/GAP SCI2C tool === -// === Authors: === -// === Raffaele Nutricato === -// === raffaele.nutricato@tiscali.it === -// === Alberto Morea === -// === === -// === *************** === -// === USER PARAMETERS === -// === *************** === -// === === -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - - -// ------------------------------------------ -// --- Specify Paths of User Scilab code. --- -// ------------------------------------------ -UserSciCodeMainDir = 'C:\SCI2CTests\RegressionTests\test999'; - -// --- Path + filename of the .sci main file of the code to be translated. --- -// It is the entry point. -UserScilabMainFile = fullfile(UserSciCodeMainDir,'scilabcode\mainfun.sci'); - -// --- List of the paths containing the .sci files written by the user. --- -UserSciFilesPaths = ... - [... - fullfile(UserSciCodeMainDir,'scilabcode');... - ]; - -// -------------------------- -// --- End Specify paths. --- -// -------------------------- - - -// ---------------------------- -// --- Select the run mode. --- -// ---------------------------- -//RunMode = 'GenLibraryStructure'; -//RunMode = 'Translate'; -RunMode = 'All'; - -// --- Select one of the following options. --- - -// 'GenLibraryStructure'; -// Generates the library structure and exits. It is very -// useful when the user wants to manually change the files stored in that structure -// before running the translation. 'GenLibraryStructure' option forces SCI2C to remove -// the already existing WorkingDir and OutCCCodeDir directories. - -// 'Translate'; -// Performs the translation without generating the library structure. It means that the library -// structure must be already existing. This is useful when the user doesn't want to spend time -// to generate again that structure or when he wants to force the SCI2C tool to access to -// a manually-changed library structure. 'Translate' option forces SCI2C to don't remove -// the already existing WorkingDir. Only OutCCCodeDir directory will be removed. - -// 'All'; -// Performs all the actions listed above. - -// -------------------------------- -// --- End Select the run mode. --- -// -------------------------------- - - -// ---------------------------- -// --- Translation Options. --- -// ---------------------------- -// --- Enable (1) / Disable (0) copy of Scilab code into C code. --- -// If 1 the Scilab code will be copied into the C code in order to show -// how each Scilab code line has been translated into C code. -CopySciCodeIntoCCode = 1; - -// --- Select the path style for the C code. --- -// It can be: -// windows -// unix -// cygwin -CCompilerPathStyle = 'cygwin'; - -// --- Path + File name of the main SCI2C library header file. -Sci2CLibMainHeaderFName = 'C:\Nutricato\OpenProjects\FP6_hArtes\WP2_SCI2C\Software\Scilab2C\CFiles\sci2cincludes\sci2clib.h'; -// -------------------------------- -// --- End Translation Options. --- -// -------------------------------- diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/UpdateSCI2CInfo.sci b/src/Scilab2C/Scilab2C/ToolInitialization/UpdateSCI2CInfo.sci deleted file mode 100644 index 32085475..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/UpdateSCI2CInfo.sci +++ /dev/null @@ -1,203 +0,0 @@ -function UpdateSCI2CInfo(FileInfoDatFile) -// function UpdateSCI2CInfo(FileInfoDatFile) -// ----------------------------------------------------------------- -// #RNU_RES_B -// Updates the FileInfo struct according to the new scilab function -// to be converted in C. -// -// Input data: -// FileInfoDatFile: name of the .dat file containing the FileInfo structure. -// -// Output data: -// --- -// -// #RNU_RES_E -// Status: -// 13-Apr-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -// --------------------------------- -// --- Load File Info Structure. --- -// --------------------------------- -clear FileInfo -load(FileInfoDatFile,'FileInfo'); - -// ----------------------------------- -// --- Load Shared Info Structure. --- -// ----------------------------------- -clear SharedInfo -load(FileInfo.SharedInfoDatFile,'SharedInfo'); - -// --------------------------------------------------- -// --- Extraction of the function name and number. --- -// --------------------------------------------------- -funname = SharedInfo.NextSCIFunName; -funnumber = SharedInfo.NextSCIFunNumber; -// #RNU_RES_B -//NUT: sicuro che mi serve questa struttura? SharedInfo.NextSCIFunNumber cioe' il numero della funzione a che serve? -// #RNU_RES_E -PrintStepInfo('Start translation of function ""'+funname+'""',... - FileInfo.GeneralReport,'both'); - -// ----------------------------------- -// --- Update File Info structure. --- -// ----------------------------------- -FileInfo.Funct(funnumber).Name = funname; -FileInfo.Funct(funnumber).SCIFileName = SharedInfo.NextSCIFileName; -FileInfo.Funct(funnumber).ASTFileName = fullfile(FileInfo.WorkingDir,funname,funname+'.ast'); -FileInfo.Funct(funnumber).CPass1FileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_pass1.c'); -FileInfo.Funct(funnumber).PfxP1ForProlFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_pass1ProlFor'); -FileInfo.Funct(funnumber).PfxP1ForEpilFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_pass1EpilFor'); -FileInfo.Funct(funnumber).PfxP1WhileProlFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_pass1ProlWhile'); -FileInfo.Funct(funnumber).PfxP1WhileEpilFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_pass1EpilWhile'); -FileInfo.Funct(funnumber).CPass1FreeFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_pass1free.c'); -FileInfo.Funct(funnumber).CPass2FileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_pass2.c'); -FileInfo.Funct(funnumber).Pass1HeaderFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'.h'); -FileInfo.Funct(funnumber).FinalCFileName = fullfile(FileInfo.OutCCCodeDir,SharedInfo.NextCFunName+'.c'); -FileInfo.Funct(funnumber).FinalHeaderFileName = fullfile(FileInfo.OutCCCodeDir,SharedInfo.NextCFunName+'.h'); -FileInfo.Funct(funnumber).CInitVarsFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_initvars.c'); -FileInfo.Funct(funnumber).CDeclarationFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_declarations.c'); -FileInfo.Funct(funnumber).CGblDeclarFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_globaldeclarations.c'); -FileInfo.Funct(funnumber).ReportFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'.rpt'); -FileInfo.Funct(funnumber).LocalVarFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_LOCVAR.dat'); -FileInfo.Funct(funnumber).TempVarFileName = fullfile(FileInfo.WorkingDir,funname,SharedInfo.NextCFunName+'_TMPVAR.dat'); -FileInfo.Funct(funnumber).SCICopyFileName = fullfile(FileInfo.WorkingDir,funname,funname+'_copy.sci'); - - -// ------------------------------------- -// --- Update Shared Info structure. --- -// ------------------------------------- -SharedInfo.NIndent = 0; // Indentation Level. Useful to produce indentated C code. -SharedInfo.SkipNextEqual = 0; // 1 = the next equal in the AST will not produce C code. -SharedInfo.SkipNextPrec = 0; // 1 = the next precision specifier in the AST will not produce C code. -SharedInfo.SkipNextFun = 0; // 1 = the next function in the AST will not produce C code. -SharedInfo.ASTReader.fidAST = -1; -SharedInfo.CountNestedIf = 0; -SharedInfo.CountForTempVars = 0; -SharedInfo.For.Level = 0; -SharedInfo.ForExpr.OnExec = 0; -SharedInfo.ForExpr.IntCntArg = []; -SharedInfo.ForExpr.MtxValCntArg = []; -SharedInfo.ForExpr.SclValCntArg = []; -SharedInfo.ForExpr.OpColonInfoIn1 = ''; -SharedInfo.ForExpr.OpColonInfoIn2 = ''; -SharedInfo.ForExpr.OpColonInfoIn3 = ''; -SharedInfo.ForExpr.AssignmentFun = 0; - -SharedInfo.WhileExpr.OnExec = 0; -SharedInfo.WhileExpr.CondVar = ''; -SharedInfo.WhileExpr.DimCondVar = -1; -SharedInfo.While.Level = 0; -//NUT: anche questa sarebbe da inizializzare con una bella funzione. - - -SharedInfo.CFunId.OpColon = 3; -SharedInfo.CFunId.EqScalar = 4; -SharedInfo.CFunId.EqMatrix = 5; -SharedInfo.CFunId.GenFunMtx = 6; // (scalar functions are fall in the scalar equal category.) - -SharedInfo = INIT_SharedInfoEqual(SharedInfo); - -// Contains the list of the C calls calls made in the current .sci file. -SharedInfo.CFunctsAlreadyCalled = '_____________'; // Initialization with a dummy name - -// --------------------------------------- -// --- Update Converted Function List. --- -// --------------------------------------- -Converted = FL_UpdateConverted(SharedInfo.NFilesToTranslate,FileInfo.FunctionList.ConvertedDat); - -// -------------------------------------- -// --- Create the function directory. --- -// -------------------------------------- -rmdir(fullfile(FileInfo.WorkingDir,funname),'s'); -mkdir(FileInfo.WorkingDir,funname); - -// ----------------------------------------- -// --- Initialize Other FileInfo fields. --- -// ----------------------------------------- -PrintStringInfo(' ',FileInfo.Funct(funnumber).SCICopyFileName,'file','y'); // Cannot use copyfile when the directory is empty!. -SCI2Ccopyfile(FileInfo.Funct(funnumber).SCIFileName,FileInfo.Funct(funnumber).SCICopyFileName,'overwrite'); - -FileInfo.Funct(funnumber).SCICopyFileFid = SCI2COpenFileRead(FileInfo.Funct(funnumber).SCICopyFileName); -// Perform a dummy reading up to the function. -//NUT: mettimi in una funzione. -scicopyfid = FileInfo.Funct(funnumber).SCICopyFileFid; -CPass1FileName = FileInfo.Funct(funnumber).CPass1FileName; -IndentLevel = SharedInfo.NIndent; -FoundFunctionKey = 0; -PrintStringInfo(C_IndentBlanks(IndentLevel)+'/*',CPass1FileName,'file','y'); -PrintStringInfo(C_IndentBlanks(IndentLevel)+' SCI2C: ------------------------------------------------------------------',CPass1FileName,'file','y'); -while (~meof(scicopyfid) & (FoundFunctionKey==0)) - // Read a line from the scilab file - sciline = mgetl(scicopyfid,1); - noblkssciline = stripblanks(sciline); - if (SCI2Cstrncmps1size('function',noblkssciline)) - FoundFunctionKey = 1; - end - PrintStringInfo(C_IndentBlanks(IndentLevel)+' SCI2C: '+sciline,CPass1FileName,'file','y'); -end -PrintStringInfo(C_IndentBlanks(IndentLevel)+' SCI2C: ------------------------------------------------------------------',CPass1FileName,'file','y'); -PrintStringInfo(C_IndentBlanks(IndentLevel)+'*/',CPass1FileName,'file','y'); - -// ------------------------- -// --- Initialize Files. --- -// ------------------------- -PrintStringInfo(' ',FileInfo.Funct(funnumber).CDeclarationFileName,'file','y'); -PrintStringInfo(' ',FileInfo.Funct(funnumber).CGblDeclarFileName,'file','y'); -PrintStringInfo(' ',FileInfo.Funct(funnumber).CInitVarsFileName,'file','y'); -CPass1FreeFileName = FileInfo.Funct(funnumber).CPass1FreeFileName; -PrintStringInfo(' ',CPass1FreeFileName,'file','y'); -PrintStringInfo(C_IndentBlanks(1)+'/*',CPass1FreeFileName,'file','y'); -PrintStringInfo(C_IndentBlanks(1)+'** --------------------- ',CPass1FreeFileName,'file','y'); -PrintStringInfo(C_IndentBlanks(1)+'** --- Free Section. --- ',CPass1FreeFileName,'file','y'); -PrintStringInfo(C_IndentBlanks(1)+'** --------------------- ',CPass1FreeFileName,'file','y'); -PrintStringInfo(C_IndentBlanks(1)+'*/',CPass1FreeFileName,'file','y'); - -// ----------------------------------- -// --- Initialize Local/Temp Vars. --- -// ----------------------------------- -LocalVars = []; -TempVars = []; - -// ------------------------------------ -// --- Determine Default Precision. --- -// ------------------------------------ -// For the current release only the following approaches are available: -// 'NO_RESIZE' -// 'REALLOC_ALL_RESIZE_ALL' -SharedInfo.DefaultPrecision = ... - FA_GetDefaultPrecision(FileInfo.Funct(funnumber).SCICopyFileName,FileInfo.Funct(funnumber).ReportFileName); - -// ---------------------------------- -// --- Determine Resize Approach. --- -// ---------------------------------- -SharedInfo.ResizeApproach = FA_GetResizeApproach(FileInfo.Funct(funnumber).SCICopyFileName,FileInfo.Funct(funnumber).ReportFileName); - -// --------------------- -// --- Save section. --- -// --------------------- -// --- Save File Info Structure. --- -save(FileInfoDatFile,FileInfo); - -// --- Save File Info Structure. --- -save(FileInfo.SharedInfoDatFile,SharedInfo); - -// --- Save Local/Temp Vars. --- -save(FileInfo.Funct(funnumber).LocalVarFileName,LocalVars); -save(FileInfo.Funct(funnumber).TempVarFileName,TempVars); - -// --- Save Converted .dat file. --- -save(FileInfo.FunctionList.ConvertedDat,Converted); -// ------------------------- -// --- End save section. --- -// ------------------------- - -endfunction diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/doublecomplex.sci b/src/Scilab2C/Scilab2C/ToolInitialization/doublecomplex.sci deleted file mode 100644 index 8b36bf65..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/doublecomplex.sci +++ /dev/null @@ -1,26 +0,0 @@ -function y = doublecomplex(x) -// function y = doublecomplex(x) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -y = x+0*%i; - -endfunction \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/ToolInitialization/floatcomplex.sci b/src/Scilab2C/Scilab2C/ToolInitialization/floatcomplex.sci deleted file mode 100644 index eedae766..00000000 --- a/src/Scilab2C/Scilab2C/ToolInitialization/floatcomplex.sci +++ /dev/null @@ -1,26 +0,0 @@ -function y = floatcomplex(x) -// function y = floatcomplex(x) -// ----------------------------------------------------------------- -// //NUT: add description here -// -// Input data: -// //NUT: add description here -// -// Output data: -// //NUT: add description here -// -// Status: -// 27-Oct-2007 -- Raffaele Nutricato: Author. -// -// Copyright 2007 Raffaele Nutricato. -// Contact: raffaele.nutricato@tiscali.it -// ----------------------------------------------------------------- - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -SCI2CNInArgCheck(argn(2),1,1); - -y = x+0*%i; - -endfunction \ No newline at end of file diff --git a/src/Scilab2C/Scilab2C/findDeps/Scilab2CDeps.sci b/src/Scilab2C/Scilab2C/findDeps/Scilab2CDeps.sci deleted file mode 100644 index c0cba6fd..00000000 --- a/src/Scilab2C/Scilab2C/findDeps/Scilab2CDeps.sci +++ /dev/null @@ -1,748 +0,0 @@ -// -// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab -// Copyright (C) 2009 - INRIA - Arnaud Torset -// -// 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 - - - -///////////////////////////////// -////// AUXILIARY FUNCTIONS ////// -///////////////////////////////// - - -//abs -scilab2ccode.deps.cabss=["ssqrts","sabss","creals","cimags"] -scilab2ccode.deps.cabsa=["cabss"] -scilab2ccode.deps.dabss=[] -scilab2ccode.deps.dabsa=["dabss"] -scilab2ccode.deps.sabss=[] -scilab2ccode.deps.sabsa=["sabss"] -scilab2ccode.deps.zabss=["dsqrts","dabss","zreals","zimags"] -scilab2ccode.deps.zabsa=["zabss"] - - -//conj -scilab2ccode.deps.cconjs=["FloatComplex","creals","cimags"] -scilab2ccode.deps.cconja=["cconjs"] -scilab2ccode.deps.zconjs=["DoubleComplex","zreals","zimags"] -scilab2ccode.deps.zconja=["zconjs"] - -//find -scilab2ccode.deps.cfinda=["creals","cimags"] -scilab2ccode.deps.dfinda=[] -scilab2ccode.deps.sfinda=[] -scilab2ccode.deps.zfinda=["zreals","zimags"] - - -//find2d -scilab2ccode.deps.cfind2da=["creals","cimags"] -scilab2ccode.deps.dfind2da=[] -scilab2ccode.deps.sfind2da=[] -scilab2ccode.deps.zfind2da=["zreals","zimags"] - - -//frexp -scilab2ccode.deps.dfrexps=[] -scilab2ccode.deps.sfrexps=[] - -//isempty -scilab2ccode.deps.cisemptys=[] -scilab2ccode.deps.cisemptya=["cfinda"] -scilab2ccode.deps.disemptys=[] -scilab2ccode.deps.disemptya=["dfinda"] -scilab2ccode.deps.sisemptys=[] -scilab2ccode.deps.sisemptya=["sfinda"] -scilab2ccode.deps.zisemptys=[] -scilab2ccode.deps.zisemptya=["zfinda"] - -//isnan -scilab2ccode.deps.cisnans=["creals","cimags"] -scilab2ccode.deps.cisnana=["cisnans"] -scilab2ccode.deps.disnans=[] -scilab2ccode.deps.disnana=["disnans"] -scilab2ccode.deps.sisnans=[] -scilab2ccode.deps.sisnana=["sisnans"] -scilab2ccode.deps.zisnans=["zreals","zimags"] -scilab2ccode.deps.zisnana=["zisnans"] - -//length - -//pythag -scilab2ccode.deps.cpythags=["csqrts","cadds","cmuls"] -scilab2ccode.deps.dpythags=["dsqrts"] -scilab2ccode.deps.spythags=["ssqrts"] -scilab2ccode.deps.cpythags=["zsqrts","zadds","zmuls"] - -//rand - -//sign -scilab2ccode.deps.csigns=["FloatComplex","cabss","creals","cimags"] -scilab2ccode.deps.csigna=["csigns"] -scilab2ccode.deps.dsigns=[] -scilab2ccode.deps.dsigna=["dsigns"] -scilab2ccode.deps.dsigns=[] -scilab2ccode.deps.dsigna=["ssigns"] -scilab2ccode.deps.zsigns=["DoubleComplex","zabss","zreals","zimags"] -scilab2ccode.deps.zsigna=["zsigns"] - -//size - -//type - - -////////////////////////////////// -////// ELEMENTARY FUNCTIONS ////// -////////////////////////////////// - -//acos -scilab2ccode.deps.cacoss=["FloatComplex","ssqrts","sabss","sacoss","satans","slogs","slog1ps","creals","cimags"] -scilab2ccode.deps.cacosa=["cacoss"] -scilab2ccode.deps.dacoss=[] -scilab2ccode.deps.dacosa=["dacoss"] -scilab2ccode.deps.sacoss=[] -scilab2ccode.deps.sacosa=["sacoss"] -scilab2ccode.deps.zacoss=["DoubleComplex","dsqrts","dabss","dacoss","datans","dlogs","dlog1ps","zreals","zimags"] -scilab2ccode.deps.zacosa=["zacoss"] - - -//acosh -scilab2ccode.deps.cacoshs=["FloatComplex","cacoss","creals","cimags"] -scilab2ccode.deps.cacosha=["cacoshs"] -scilab2ccode.deps.dacoshs=[] -scilab2ccode.deps.dacosha=["dacoshs"] -scilab2ccode.deps.sacoshs=[] -scilab2ccode.deps.sacosha=["sacoshs"] -scilab2ccode.deps.zacoshs=["DoubleComplex","zacoss","zreals","zimags"] -scilab2ccode.deps.zacosha=["zacoshs"] - -//asin -scilab2ccode.deps.casins=["FloatComplex","ssqrts","sabss","sasins","satans","slogs","slog1ps","dabss","creals","cimags"] -scilab2ccode.deps.casina=["casins"] -scilab2ccode.deps.dasins=[] -scilab2ccode.deps.dasina=["dasins"] -scilab2ccode.deps.sasins=[] -scilab2ccode.deps.sasina=["sasins"] -scilab2ccode.deps.zasins=["DoubleComplex","dsqrts","dabss","dasins","datans","dlog1ps","dlogs","zreals","zimags"] -scilab2ccode.deps.zasina=["zasins"] - -//asinh -scilab2ccode.deps.casinhs=["FloatComplex","casins","creals","cimags"] -scilab2ccode.deps.casinha=["casinhs"] -scilab2ccode.deps.dasinhs=["DoubleComplex","zasins"] -scilab2ccode.deps.dasinha=["dasinhs"] -scilab2ccode.deps.sasinhs=["FloatComplex","casins"] -scilab2ccode.deps.sasinha=["sasinhs"] -scilab2ccode.deps.zasinhs=["DoubleComplex","zasins","zreals","zimags"] -scilab2ccode.deps.zasinha=["zasinhs"] - - -//atan -scilab2ccode.deps.catans=["satans","creals","cimags","dabss","slnp1m1s","sabss","FloatComplex"] -scilab2ccode.deps.catana=["catans"] -scilab2ccode.deps.datans=[] -scilab2ccode.deps.datana=["datans"] -scilab2ccode.deps.satans=[] -scilab2ccode.deps.satana=["satans"] -scilab2ccode.deps.zatans=["datans","zreals","zimags","dabss","dlnp1m1s","DoubleComplex"] -scilab2ccode.deps.zatana=["zatans"] - - -//atan2 -scilab2ccode.deps.datan2s=[] -scilab2ccode.deps.datan2a=["datan2s"] -scilab2ccode.deps.satan2s=[] -scilab2ccode.deps.satan2a=["satan2s"] - - -//atanh -scilab2ccode.deps.catanhs=["FloatComplex","creals","cimags","catans"] -scilab2ccode.deps.catanha=["catanhs"] -scilab2ccode.deps.datanhs=["zimags","zatans","DoubleComplex"] -scilab2ccode.deps.datanha=["datanhs"] -scilab2ccode.deps.satanhs=["cimags","catans","FloatComplex"] -scilab2ccode.deps.satanha=["satanhs"] -scilab2ccode.deps.zatanhs=["DoubleComplex","zreals","zimags","zatans"] -scilab2ccode.deps.zatanha=["zatanhs"] - - -//cos -scilab2ccode.deps.ccoss=["creals","cimags","FloatComplex","scoss","scoshs","ssins","ssinhs"] -scilab2ccode.deps.ccosa=["ccoss"] -scilab2ccode.deps.dcoss=[] -scilab2ccode.deps.dcosa=["dcoss"] -scilab2ccode.deps.scoss=[] -scilab2ccode.deps.scosa=["scoss"] -scilab2ccode.deps.zcoss=["zreals","zimags","DoubleComplex","dcoss","dcoshs","dsins","dsinhs"] -scilab2ccode.deps.zcosa=["zcoss"] - - -//cosh -scilab2ccode.deps.ccoshs=["ccoss","FloatComplex","creals","cimags"] -scilab2ccode.deps.ccosha=["ccoshs"] -scilab2ccode.deps.dcoshs=["dexps","dabss"] -scilab2ccode.deps.dcosha=["dcoshs"] -scilab2ccode.deps.scoshs=["sexps","sabss"] -scilab2ccode.deps.scosha=["scoshs"] -scilab2ccode.deps.zcoshs=["zcoss","DoubleComplex","zreals","zimags"] -scilab2ccode.deps.zcosha=["zcoshs"] - - -//exp -scilab2ccode.deps.cexps=["creals","cimags","FloatComplex","sexps","scoss","ssins"] -scilab2ccode.deps.cexpa=["cexps"] -scilab2ccode.deps.dexps=[] -scilab2ccode.deps.dexpa=["dexps"] -scilab2ccode.deps.sexps=[] -scilab2ccode.deps.sexpa=["sexps"] -scilab2ccode.deps.zexps=["zreals","zimags","DoubleComplex","dexps","dcoss","dsins"] -scilab2ccode.deps.zexpa=["zexps"] - - -//exp10 -scilab2ccode.deps.cexp10s=["cpows","FloatComplex"] -scilab2ccode.deps.cexp10a=["cexp10s"] -scilab2ccode.deps.dexp10s=[] -scilab2ccode.deps.dexp10a=["dexp10s"] -scilab2ccode.deps.sexp10s=[] -scilab2ccode.deps.sexp10a=["sexp10s"] -scilab2ccode.deps.zexp10s=["zpows","DoubleComplex"] -scilab2ccode.deps.zexp10a=["zexp10s"] - - -//lnp1m1 -scilab2ccode.deps.dlnp1m1s=["dabss"] -scilab2ccode.deps.slnp1m1s=["sabss"] - - -//log -scilab2ccode.deps.clogs=["creals","cimags","slog1ps","slogs","spythags","FloatComplex"] -scilab2ccode.deps.cloga=["clogs"] -scilab2ccode.deps.dlogs=[] -scilab2ccode.deps.dloga=["dlogs"] -scilab2ccode.deps.slogs=[] -scilab2ccode.deps.sloga=["slogs"] -scilab2ccode.deps.zlogs=["zreals","zimags","zlog1ps","zlogs","zpythags","DoubleComplex"] -scilab2ccode.deps.zloga=["zlogs"] - - -//log1p -scilab2ccode.deps.clog1ps=["clogs","FloatComplex","creals","cimags"] -scilab2ccode.deps.clog1pa=["clog1ps"] -scilab2ccode.deps.dlog1ps=["dlnp1m1s","dlogs"] -scilab2ccode.deps.dlog1pa=["dlog1ps"] -scilab2ccode.deps.slog1ps=["slnp1m1s","slogs"] -scilab2ccode.deps.slog1pa=["slog1ps"] -scilab2ccode.deps.zlog1ps=["zlogs","DoubleComplex","zreals","zimags"] -scilab2ccode.deps.zlog1pa=["zlog1ps"] - - -//log10 -scilab2ccode.deps.clog10s=["clogs","FloatComplex","creals","cimags","slogs"] -scilab2ccode.deps.clog10a=["clog10s"] -scilab2ccode.deps.dlog10s=[] -scilab2ccode.deps.dlog10a=["dlog10s"] -scilab2ccode.deps.slog10s=[] -scilab2ccode.deps.slog10a=["slog10s"] -scilab2ccode.deps.zlog10s=["zlogs","DoubleComplex","zreals","zimags","dlogs"] -scilab2ccode.deps.zlog10a=["zlog10s"] - - -//pow -scilab2ccode.deps.cpows=["cexps","cmuls","clogs"] -scilab2ccode.deps.cpowa=["cpows"] -scilab2ccode.deps.dpows=[] -scilab2ccode.deps.dpowa=["dpows"] -scilab2ccode.deps.spows=[] -scilab2ccode.deps.spowa=["spows"] -scilab2ccode.deps.zpows=["zexps","zmuls","zlogs"] -scilab2ccode.deps.zpowa=["zpows"] - - -//sin -scilab2ccode.deps.csins=["creals","cimags","FloatComplex","ssins","scoshs","scoss","ssinhs"] -scilab2ccode.deps.csina=["csins"] -scilab2ccode.deps.dsins=[] -scilab2ccode.deps.dsina=["dsins"] -scilab2ccode.deps.ssins=[] -scilab2ccode.deps.ssina=["ssins"] -scilab2ccode.deps.zsins=["zreals","zimags","DoubleComplex","dsins","dcoshs","dcoss","dsinhs"] -scilab2ccode.deps.zsina=["zsins"] - - -//sinh -scilab2ccode.deps.csinhs=["creals","cimags","csins","FloatComplex"] -scilab2ccode.deps.csinha=["csinhs"] -scilab2ccode.deps.dsinhs=[] -scilab2ccode.deps.dsinha=["dsinhs"] -scilab2ccode.deps.ssinhs=[] -scilab2ccode.deps.ssinha=["ssinhs"] -scilab2ccode.deps.zsinhs=["zreals","zimags","zsins","DoubleComplex"] -scilab2ccode.deps.zsinha=["zsinhs"] - - -//sqrt -scilab2ccode.deps.csqrts=["creals","cimags","dabss","ssqrts","sabss","spythags","FloatComplex"] -scilab2ccode.deps.csqrta=["csqrts"] -scilab2ccode.deps.dsqrts=[] -scilab2ccode.deps.dsqrta=["dsqrts"] -scilab2ccode.deps.ssqrts=[] -scilab2ccode.deps.ssqrta=["ssqrts"] -scilab2ccode.deps.zsqrts=["zreals","zimags","dabss","dsqrts","dpythags","DoubleComplex"] -scilab2ccode.deps.zsqrta=["zsqrts"] - - -//tan -scilab2ccode.deps.ctans=["slogs","ssqrts","creals","cimags","scoss","ssinhs","ssins","sabss","FloatComplex"] -scilab2ccode.deps.ctana=["ctans"] -scilab2ccode.deps.dtans=[] -scilab2ccode.deps.dtana=["dtans"] -scilab2ccode.deps.stans=[] -scilab2ccode.deps.stana=["stans"] -scilab2ccode.deps.ztans=["dlogs","dsqrts","zreals","zimags","dcoss","dsinhs","dsins","dabss","DoubleComplex"] -scilab2ccode.deps.ztana=["ztans"] - - -//tanh -scilab2ccode.deps.ctanhs=["creals","cimags","ctans","FloatComplex"] -scilab2ccode.deps.ctanha=["ctanhs"] -scilab2ccode.deps.dtanhs=[] -scilab2ccode.deps.dtanha=["dtanhs"] -scilab2ccode.deps.stanhs=[] -scilab2ccode.deps.stanha=["stanhs"] -scilab2ccode.deps.ztanhs=["zreals","zimags","ztans","DoubleComplex"] -scilab2ccode.deps.ztanha=["ztanhs"] - - - -/////////////////////////////// -////// MATRIX OPERATIONS ////// -/////////////////////////////// - - -//OpRc -scilab2ccode.deps.crowcats=[] -scilab2ccode.deps.crowcata=[] -scilab2ccode.deps.drowcats=[] -scilab2ccode.deps.drowcata=[] -scilab2ccode.deps.srowcats=[] -scilab2ccode.deps.srowcata=[] -scilab2ccode.deps.zrowcats=[] -scilab2ccode.deps.zrowcata=[] - - -//OpCc -scilab2ccode.deps.ccolumncats=[] -scilab2ccode.deps.ccolumncata=[] -scilab2ccode.deps.dcolumncats=[] -scilab2ccode.deps.dcolumncata=[] -scilab2ccode.deps.scolumncats=[] -scilab2ccode.deps.scolumncata=[] -scilab2ccode.deps.zcolumncats=[] -scilab2ccode.deps.zcolumncata=[] - - -//chol -scilab2ccode.deps.cchola=["DoubleComplex","creals","cimags","FloatComplex","zreals","zimags","cdiffs","cmuls","crdivs","csqrts"] -scilab2ccode.deps.dchols=["dsqrts"] -scilab2ccode.deps.dchola=[] -scilab2ccode.deps.schols=["ssqrts"] -scilab2ccode.deps.schola=["ssqrts"] -scilab2ccode.deps.zchola=["DoubleComplex","zreals","zimags","zdiffs","zmuls","zrdivs","zsqrts"] - - -//determ -scilab2ccode.deps.cdeterma=["cdiffs","FloatComplex","cmuls","cadds","DoubleComplex","creals","cimags","zreals","zimags","zmuls","crdivs"] -scilab2ccode.deps.ddeterma=[] -scilab2ccode.deps.sdeterma=[] -scilab2ccode.deps.zdeterma=["zdiffs","zmuls","DoubleComplex","zadds","zreals","zimags","zrdivs"] - - -//dist -scilab2ccode.deps.cdists=["spows","creals","cimags","ssqrts"] -scilab2ccode.deps.cdista=["spows","creals","cimags","ssqrts"] -scilab2ccode.deps.ddists=["dpows","dsqrts"] -scilab2ccode.deps.ddista=["dpows","dsqrts"] -scilab2ccode.deps.sdists=["spows","ssqrts"] -scilab2ccode.deps.sdista=["spows","ssqrts"] -scilab2ccode.deps.zdists=["dpows","zreals","zimags","dsqrts"] -scilab2ccode.deps.zdista=["dpows","zreals","zimags","dsqrts"] - - -//OpSlash -scilab2ccode.deps.crdivma=["DoubleComplex","creals","cimags","zrdivma","FloatComplex","zreals","zimags"] -scilab2ccode.deps.drdivma=["dtransposea"] -scilab2ccode.deps.srdivma=["drdivma"] -scilab2ccode.deps.zrdivma=["ztransposea","zconja","DoubleComplex","zreals","zimags","] - - -//OpBackSlash -scilab2ccode.deps.cldivma=["DoubleComplex","creals","cimags","zldivma","FloatComplex","zreals","zimags"] -scilab2ccode.deps.dldivma=[] -scilab2ccode.deps.sldivma=["dldivma"] -scilab2ccode.deps.zldivma=[] - - -//expm -scilab2ccode.deps.cexpma=["sfrexps","cinfnorma","spows","crdivs","FloatComplex","ceyea","cmuls","cadda","cdiffa","cmulma","cldivma"] -scilab2ccode.deps.dexpma=["dfrexps","dinfnorma","dpows","deyea","dadda","ddiffa","dmulma","dldivma"] -scilab2ccode.deps.sexpma=["sfrexps","sinfnorma","spows","seyea","sadda","sdiffa","smulma","sldivma"] -scilab2ccode.deps.zexpma=["dfrexps","zinfnorma","zrdivs","DoubleComplex","zeyea","zmuls","zadda","zdiffa","zmulma","zldivma"] - - -//eye -scilab2ccode.deps.ceyea= ["FloatComplex"] -scilab2ccode.deps.deyea= [] -scilab2ccode.deps.seyea= [] -scilab2ccode.deps.zeyea= ["DoubleComplex"] - - -//fill -scilab2ccode.deps.cfilla=["conesa","cmuls"] -scilab2ccode.deps.dfilla=["donesa"] -scilab2ccode.deps.sfilla=["sonesa"] -scilab2ccode.deps.zfilla=["zonesa","zmuls"] - - -//hilbert -scilab2ccode.deps.dhilberta=[] -scilab2ccode.deps.shilberta=[] - -//infinite norm -scilab2ccode.deps.cinfnorma=["spythags","creals","cimags"] -scilab2ccode.deps.dinfnorma=[] -scilab2ccode.deps.sinfnorma=[] -scilab2ccode.deps.zinfnorma=["dpythags","zreals","zimags"] - - -//inversion -scilab2ccode.deps.cinverma=["DoubleComplex","creals","cimags","zinverma","FloatComplex","zreals","zimags"] -scilab2ccode.deps.dinverma=[] -scilab2ccode.deps.sinverma=["dinverma"] -scilab2ccode.deps.zinverma=[] - - -//jmat - - -//logm -scilab2ccode.deps.clogma=["DoubleComplex","creals","cimags","zlogma","FloatComplex","zreals","zimags"] -scilab2ccode.deps.dlogma=["DoubleComplex","zlogma"] -scilab2ccode.deps.slogma=["DoubleComplex","zlogma","FloatComplex","zreals","zimags"] -scilab2ccode.deps.zlogma=["ztransposea","zreals","zimags","zlogs","DoubleComplex","zmulma","zinverma"] - - -//magnitude -scilab2ccode.deps.cmagns=["creals","cimags","ssqrts"] -scilab2ccode.deps.cmagna=["cmagns"] -scilab2ccode.deps.dmagns=[] -scilab2ccode.deps.dmagna=["dmagns"] -scilab2ccode.deps.smagns=[] -scilab2ccode.deps.smagna=["smagns"] -scilab2ccode.deps.zmagns=["zreals","zimags","dsqrts"] -scilab2ccode.deps.zmagna=["zmagns"] - - -//OpStar -scilab2ccode.deps.cmulma=["FloatComplex","cadds","cmuls"] -scilab2ccode.deps.dmulma=[] -scilab2ccode.deps.smulma=[] -scilab2ccode.deps.zmulma=["zreala","zimaga","DoubleComplex","zadds","zmuls"] - - -//ones -scilab2ccode.deps.conesa=["FloatComplex"] -scilab2ccode.deps.donesa=[] -scilab2ccode.deps.sonesa=[] -scilab2ccode.deps.zonesa=["DoubleComplex"] - - -//Squared Magnitude -scilab2ccode.deps.csquMagns=["creals","cimags"] -scilab2ccode.deps.csquMagna=["cmagna"] -scilab2ccode.deps.dsquMagns=[] -scilab2ccode.deps.dsquMagna=["dmagna"] -scilab2ccode.deps.ssquMagns=[] -scilab2ccode.deps.ssquMagna=["smagna"] -scilab2ccode.deps.zsquMagns=["zreals","zimags"] -scilab2ccode.deps.zsquMagna=["zmagna"] - - -//trace -scilab2ccode.deps.ctracea=["creals","cimags","FloatComplex"] -scilab2ccode.deps.dtracea=[] -scilab2ccode.deps.stracea=[] -scilab2ccode.deps.ztracea=["zreals","zimags","DoubleComplex"] - - -//transpose -scilab2ccode.deps.ctransposea=["creals","cimags","FloatComplex"] -scilab2ccode.deps.dtransposea=[] -scilab2ccode.deps.stransposea=[] -scilab2ccode.deps.ztransposea=["zreals","zimags","DoubleComplex"] - - - - -//////////////////////// -////// OPERATIONS ////// -//////////////////////// - - -//OpPlus -scilab2ccode.deps.cadds=["creals","cimags","FloatComplex"] -scilab2ccode.deps.cadda=["cadds"] -scilab2ccode.deps.dadds=[] -scilab2ccode.deps.dadda=["dadds"] -scilab2ccode.deps.sadds=[] -scilab2ccode.deps.sadda=["sadds"] -scilab2ccode.deps.zadds=["zreals","zimags","DoubleComplex"] -scilab2ccode.deps.zadda=["zadds"] - - -//OpDotSlash/OpSlash -scilab2ccode.deps.crdivs=["FloatComplex"] -scilab2ccode.deps.crdiva=["crdivs"] -scilab2ccode.deps.drdivs=[] -scilab2ccode.deps.drdiva=["drdivs"] -scilab2ccode.deps.srdivs=[] -scilab2ccode.deps.srdiva=["srdivs"] -scilab2ccode.deps.zrdivs=["DoubleComplex"] -scilab2ccode.deps.zrdiva=["zrdivs"] - - -//OpBackSlash -scilab2ccode.deps.cldivs=["cmuls","cconjs","creals","cimags","FloatComplex","crdivs"] -scilab2ccode.deps.cldiva=["cldivs"] -scilab2ccode.deps.dldivs=[] -scilab2ccode.deps.dldiva=["dldivs"] -scilab2ccode.deps.sldivs=[] -scilab2ccode.deps.sldiva=["scldivs"] -scilab2ccode.deps.zldivs=["zmuls","zconjs","zreals","zimags","DoubleComplex","zrdivs"] -scilab2ccode.deps.zldiva=["zldivs"] - - -//OpStar/OpDotStar -scilab2ccode.deps.cmuls=["FloatComplex"] -scilab2ccode.deps.cmula=["cmuls"] -scilab2ccode.deps.dmuls=[] -scilab2ccode.deps.dmula=["dmuls"] -scilab2ccode.deps.smuls=[] -scilab2ccode.deps.smula=["smuls"] -scilab2ccode.deps.zmuls=["DoubleComplex"] -scilab2ccode.deps.zmula=["zmuls"] - - -//OpMinus -scilab2ccode.deps.cdiffs=["creals","cimags","FloatComplex"] -scilab2ccode.deps.cdiffa=["cdiffs"] -scilab2ccode.deps.ddiffs=[] -scilab2ccode.deps.ddiffa=["ddiffs"] -scilab2ccode.deps.sdiffs=[] -scilab2ccode.deps.sdiffa=["sdiffs"] -scilab2ccode.deps.zdiffs=["zreals","zimags","DoubleComplex"] -scilab2ccode.deps.zdiffa=["zdiffs"] - - -/////////////////////////////// -////// SIGNAL PROCESSING ////// -/////////////////////////////// - - -//conv -scilab2ccode.deps.cconva=["FloatComplex","cfftma","cmula","cifftma"] -scilab2ccode.deps.dconva=["DoubleComplex","zconva","zreala"] -scilab2ccode.deps.sconva=["FloatComplex","cconva","creala"] -scilab2ccode.deps.zconva=["DoubleComplex","zfftma","zmula","zifftma"] - - -//conv2d -scilab2ccode.deps.cconv2da=["FloatComplex","cadds","cmuls"] -scilab2ccode.deps.dconv2da=[] -scilab2ccode.deps.sconv2da=[] -scilab2ccode.deps.zconv2da=["DoubleComplex","zadds","zmuls"] - - -//cross correlation -scilab2ccode.deps.ccrossCorra=["cconjs","cconv2da"] -scilab2ccode.deps.dcrossCorra=["dconv2da"] -scilab2ccode.deps.scrossCorra=["sconv2da"] -scilab2ccode.deps.zcrossCorra=["zconjs","zconv2da"] - - -//fft -scilab2ccode.deps.cfftma=["DoubleComplex","creals","cimags","zfftma","FloatComplex","zreals","zimags"] -scilab2ccode.deps.dfft2=["dfftbi"] -scilab2ccode.deps.dfftbi=["dfftmx"] -scilab2ccode.deps.dfftmx=[] -scilab2ccode.deps.fft842=["r2tx","r4tx","r8tx","DoubleComplex","zreals","zimags"] -scilab2ccode.deps.r2tx=["zadds","zdiffs","DoubleComplex","zreals","zimags"] -scilab2ccode.deps.r4tx=["zadds","zdiffs","DoubleComplex","zreals","zimags"] -scilab2ccode.deps.r8tx=["zadds","zdiffs","DoubleComplex","zreals","zimags"] -scilab2ccode.deps.zfftma=["zreala","zimaga","fft842","dfft2","DoubleComplexMatrix"] - - -//hilbert -scilab2ccode.deps.dhilberts=[] -scilab2ccode.deps.dhilberta=["DoubleComplex","zfftma","zmuls","zifftma"] -scilab2ccode.deps.shilberts=[] -scilab2ccode.deps.shilberta=["FloatComplex","cfftma","cmuls","cifftma"] - - -//ifft -scilab2ccode.deps.cifftma=["DoubleComplex","creals","cimags","zifftma","FloatComplex","zreals","zimags"] -scilab2ccode.deps.difft2=["difftbi"] -scilab2ccode.deps.difftbi=["difftmx"] -scilab2ccode.deps.difftmx=[] -scilab2ccode.deps.ifft842=["ir2tx","ir4tx","ir8tx","DoubleComplex","zreals","zimags"] -scilab2ccode.deps.ir2tx=["zadds","zdiffs","DoubleComplex","zreals","zimags"] -scilab2ccode.deps.ir4tx=["zadds","zdiffs","DoubleComplex","zreals","zimags"] -scilab2ccode.deps.ir8tx=["zadds","zdiffs","DoubleComplex","zreals","zimags"] -scilab2ccode.deps.zifftma=["zreala","zimaga","ifft842","difft2","DoubleComplexMatrix"] - - -//levin -scilab2ccode.deps.dlevina=["dinitTab","dr1","dr2","dr3","dr4","dlevinmul","dinverma","dmulma","dlevinmul2","ddecalage","dlevinsub","dlevinsig"] -scilab2ccode.deps.slevina=["sinitTab","sr1","sr2","sr3","sr4","slevinmul","sinverma","smulma","slevinmul2","sdecalage","slevinsub","slevinsig"] -scilab2ccode.deps.dinitTab=[] -scilab2ccode.deps.dr1=[] -scilab2ccode.deps.dr2[] -scilab2ccode.deps.dr3=[] -scilab2ccode.deps.dr4=[] -scilab2ccode.deps.dlevinmul=[] -scilab2ccode.deps.dlevinmul2=[] -scilab2ccode.deps.ddecalage=[] -scilab2ccode.deps.dlevinsub=[] -scilab2ccode.deps.dlevinsig=[] -scilab2ccode.deps.sinitTab=[] -scilab2ccode.deps.sr1=[] -scilab2ccode.deps.sr2[] -scilab2ccode.deps.sr3=[] -scilab2ccode.deps.sr4=[] -scilab2ccode.deps.slevinmul=[] -scilab2ccode.deps.slevinmul2=[] -scilab2ccode.deps.sdecalage=[] -scilab2ccode.deps.slevinsub=[] -scilab2ccode.deps.slevinsig=[] - - -//lpc2cep -scilab2ccode.deps.clpc2cepa=["cfftma","clogma","cifftma"] -scilab2ccode.deps.dlpc2cepa=["DoubleComplex","zfftma","zlogma","zifftma","zreala"] -scilab2ccode.deps.slpc2cepa=["FloatComplex","cfftma","clogma","cifftma","creala"] -scilab2ccode.deps.zlpc2cepa=["zfftma","zlogma","zifftma"] - - -///////////////////////////////// -////// STATISTIC FUNCTIONS ////// -///////////////////////////////// - - -//mean -scilab2ccode.deps.cmeana=["FloatComplex","cadds","creals","cimags"] -scilab2ccode.deps.dmeana=[] -scilab2ccode.deps.smeana=[] -scilab2ccode.deps.zmeana=["DoubleComplex","zadds","zreals","zimags"] -scilab2ccode.deps.ccolumnmeana=["ccolumnsuma","crdivs","FloatComplex"] -scilab2ccode.deps.dcolumnmeana=["dcolumnsuma"] -scilab2ccode.deps.scolumnmeana=["scolumnsuma"] -scilab2ccode.deps.zcolumnmeana=["zcolumnsuma","zrdivs","DoubleComplex"] -scilab2ccode.deps.crowmeana=["crowsuma","crdivs","FloatComplex"] -scilab2ccode.deps.drowmeana=["drowsuma"] -scilab2ccode.deps.srowmeana=["srowsuma"] -scilab2ccode.deps.zrowmeana=["zrowsuma","zrdivs","DoubleComplex"] - - -//prod -scilab2ccode.deps.cproda=["cmuls"] -scilab2ccode.deps.dproda=[] -scilab2ccode.deps.sproda=[] -scilab2ccode.deps.zproda=["zmuls"] -scilab2ccode.deps.ccolumnproda=["cmuls"] -scilab2ccode.deps.dcolumnproda=[] -scilab2ccode.deps.scolumnproda=[] -scilab2ccode.deps.zcolumnproda=["zmuls"] -scilab2ccode.deps.crowproda=["cmuls"] -scilab2ccode.deps.drowproda=[] -scilab2ccode.deps.srowproda=[] -scilab2ccode.deps.zrowproda=["zmuls"] - - -//sum -scilab2ccode.deps.csuma=["cadds"] -scilab2ccode.deps.dsuma=[] -scilab2ccode.deps.ssuma=[] -scilab2ccode.deps.zsuma=["zadds"] -scilab2ccode.deps.ccolumnsuma=["cadds"] -scilab2ccode.deps.dcolumnsuma=[] -scilab2ccode.deps.scolumnsuma=[] -scilab2ccode.deps.zcolumnsuma=["zadds"] -scilab2ccode.deps.crowsuma=["cadds"] -scilab2ccode.deps.drowsuma=[] -scilab2ccode.deps.srowsuma=[] -scilab2ccode.deps.zrowsuma=["zadds"] - - -//variance -scilab2ccode.deps.cvariancea=["FloatComplex","cmeana","cdiffs","cadds","cpows","creals","cimags","crdivs"] -scilab2ccode.deps.dvariancea=["dmeana","dpows"] -scilab2ccode.deps.svariancea=["smeana","spows"] -scilab2ccode.deps.zvariancea=["DoubleComplex","zmeana","zdiffs","zadds","zpows","zreals","zimags","zrdivs"] -scilab2ccode.deps.ccolumnvariancea=["cvariancea"] -scilab2ccode.deps.dcolumnvariancea=["dvariancea"] -scilab2ccode.deps.scolumnvariancea=["svariancea"] -scilab2ccode.deps.zcolumnvariancea=["zvariancea"] -scilab2ccode.deps.crowvariancea=["ctransposea","FloatComplex","creals","cimags","cvariancea"] -scilab2ccode.deps.drowvariancea=["dtransposea","dvariancea"] -scilab2ccode.deps.srowvariancea=["stransposea","svariancea"] -scilab2ccode.deps.zrowvariancea=["ztransposea","DoubleComplex","zreals","zimags","zvariancea"] - - -//////////////////// -////// STRING ////// -//////////////////// - - -//disp -scilab2ccode.deps.cdisps=["creals","cimags"] -scilab2ccode.deps.cdispa=["creals","cimags"] -scilab2ccode.deps.ddisps=[] -scilab2ccode.deps.ddispa=[] -scilab2ccode.deps.sdisps=[] -scilab2ccode.deps.sdispa=[] -scilab2ccode.deps.zdisps=["zreals","zimags"] -scilab2ccode.deps.zdispa=["zreals","zimags"] - - -/////////////////// -////// TYPES ////// -/////////////////// - - -//floatComplex -scilab2ccode.deps.creals=[] -scilab2ccode.deps.cimags=[] -scilab2ccode.deps.creala=["creals"] -scilab2ccode.deps.cimaga=["cimags"] -scilab2ccode.deps.FloatComplex=[] -scilab2ccode.deps.FloatComplexMatrix=["FloatComplex"] -scilab2ccode.deps.cisreals=["cimags"] -scilab2ccode.deps.cisimags=["creals"] - - -//doubleComplex -scilab2ccode.deps.zreals=[] -scilab2ccode.deps.zimags=[] -scilab2ccode.deps.zreala=["zreals"] -scilab2ccode.deps.zimaga=["zimags"] -scilab2ccode.deps.DoubleComplex=[] -scilab2ccode.deps.DoubleComplexMatrix=["DoubleComplex"] -scilab2ccode.deps.zisreals=["zimags"] -scilab2ccode.deps.zisimags=["zreals"] - - - diff --git a/src/Scilab2C/Scilab2C/findDeps/findDeps.sci b/src/Scilab2C/Scilab2C/findDeps/findDeps.sci deleted file mode 100644 index 965ae8e0..00000000 --- a/src/Scilab2C/Scilab2C/findDeps/findDeps.sci +++ /dev/null @@ -1,44 +0,0 @@ -// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab -// Copyright (C) INRIA - 2009 - Arnaud TORSET -// -// 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 - - -function y=findDeps(x, deps) -//give the dependances of x -// - -nbArgsIn = size(deps.x,'c'); -//stocke deps.x dans y -y=deps.x; -for i=1:nbArgsIn, - //on boucle sur le nombre d'entrées afin de pouvoir extraire chaque éléments - //l'element est stockédans deps(deps.a(i)) - for j=1:size(deps(deps.a(i)),'c'), - //on boucle sur les dependances de cet element afin de savoir s'il faut rajoutere des dependances - nouveau = 0; - for k=1:size(y,'c'), - //on boucle sur le nombre d'elements de y afin de faire une comparaison entre les elements - //presents et absents de la liste. - //S'il est absent de la liste(nouveau=0), on le rajoute à y, sinon(nouveau=1) on fait rien - if (deps(deps.a(i))(j)==deps.y(k)) then nouveau=nouveau+1;end; - end; - if (nouveau==0) then y(1,size(y,'c')+1)=deps(deps.a(i))(j);end; - end; -end; - -//si le nb de parametres du début est égal à celui de la fin alors on arrete, sinon on continue -nbArgsOut = size(deps.y,'c'); -if (nbArgsOut>nbArgsIn) then findDeps(y, deps); -else if (nbArgsOut