diff options
author | torset | 2009-02-23 15:17:22 +0000 |
---|---|---|
committer | torset | 2009-02-23 15:17:22 +0000 |
commit | 1e6772992eb9b227a0b6b46500e123a3496c0dd4 (patch) | |
tree | 3097a215867b94526ebe19c249253fdcfb05d0ae | |
parent | ee8a7431568c867c14571340c77f29a55d25c50d (diff) | |
download | scilab2c-1e6772992eb9b227a0b6b46500e123a3496c0dd4.tar.gz scilab2c-1e6772992eb9b227a0b6b46500e123a3496c0dd4.tar.bz2 scilab2c-1e6772992eb9b227a0b6b46500e123a3496c0dd4.zip |
remove OpLogEq because was useless
-rw-r--r-- | src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogEq.c | 71 |
1 files changed, 0 insertions, 71 deletions
diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogEq.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogEq.c deleted file mode 100644 index 82b2072f..00000000 --- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/OpLogEq.c +++ /dev/null @@ -1,71 +0,0 @@ -/* -** -*- C -*- -** -** OpDotSlash.c -** Made by Raffaele Nutricato <raffaele.nutricato@tiscali.it> -** -** -** Copyright Raffaele Nutricato 2007 -*/ - -/* Modified by Arnaud Torset */ - -#include "OpLogEq.h" - - -/* -void s2s0OpLogEqs2(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 d2d0OpLogEqd2(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); - } - } -} - - -void c2c0OpLogEqs2(floatComplex* in1, int* in1Size, floatComplex 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) ((creals(in1[rows*in1Size[1]+cols]) == creals(in2)) && (cimags(in1[rows*in1Size[1]+cols]) == cimags(in2)) ); - } - } -} - - -void z2z0OpLogEqd2(doubleComplex* in1, int* in1Size, doubleComplex 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] = (float) ((zreals(in1[rows*in1Size[1]+cols]) == zreals(in2)) && (zimags(in1[rows*in1Size[1]+cols]) == zimags(in2)) ); - } - } -} -*/ - |