Remomve the old file

1 files changed, 0 insertions, 143 deletions

diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/floatComplex.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/floatComplex.c
deleted file mode 100644
index a5483161..00000000
--- a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/floatComplex.c
+++ /dev/null
@@ -1,143 +0,0 @@
-/*
-**  -*- C -*-
-**
-** floatComplex.c
-** Made by  Bruno JOFRET <bruno.jofret@inria.fr>
-**
-** Started on  Thu Nov 30 16:27:08 2006 jofret
-** Last update Thu Aug 30 09:42:59 2007 bruno
-**
-** Copyright INRIA 2006
-*/
-
-#ifdef __STDC_VERSION__
-#  ifndef STDC
-#    define STDC
-#  endif
-#  if __STDC_VERSION__ >= 199901L
-#    ifndef STDC99
-#      define STDC99
-#    endif
-#  endif
-#endif
-
-#include <stdio.h>
-#include "floatComplex.h"
-
-#ifndef STDC99
-/*
-** \function real
-** \brief Return a Complex Real Part .
-*/
-float creals(floatComplex z) {
-  return z.real;
-}
-
-/*
-** \function imag
-** \brief Return a Complex Imaginary Part .
-*/
-float cimags(floatComplex z) {
-  return z.imag;
-}
-#else
-/*
-** \function real
-** \brief Return a Complex Real Part .
-*/
-float creals(floatComplex z) {
-  return crealf(z);
-}
-
-/*
-** \function imag
-** \brief Return a Complex Imaginary Part .
-*/
-float cimags(floatComplex z) {
-  return cimagf(z);
-}
-#endif
-
-/*
-** \function FloatComplex
-** \brief construct a Float Complex .
-*/
-floatComplex FloatComplex(float a, float b) {
-  floatComplex z;
-#ifndef STDC99
-  z.real = a;
-  z.imag = b;
-#else
-  z = a + I * b;
-#endif
-  return z;
-}
-
-/*
-** \function isreal
-** \brief check if complex is real .
-*/
-bool cisreals(floatComplex z) {
-  if (cimags(z) == 0)
-    return true;
-  return false;
-}
-
-/*
-** \function isimag
-** \brief check if complex is pure imaginary .
-*/
-bool cisimags(floatComplex z) {
-  if (creals(z) == 0)
-    return true;
-  return false;
-}
-
-/*
-** Operators
-** {
-*/
-
-/*
-** \function cadds
-** \brief add 2 Complex numbers.
-*/
-floatComplex cadds(floatComplex z1, floatComplex z2) {
-#ifndef STDC99
-  return FloatComplex(z1.real + z2.real, z1.imag + z2.imag);
-#else
-  return z1 + z2;
-#endif
-}
-
-/*
-** \function cdiffs
-** \brief diff 2 Complex numbers.
-*/
-floatComplex cdiffs(floatComplex z1, floatComplex z2) {
-#ifndef STDC99
-  return FloatComplex(z1.real - z2.real, z1.imag - z2.imag);
-#else
-  return z1 - z2;
-#endif
-}
-
-/*
-** \function ctimess
-** \brief Multiply 2 Complex numbers.
-*/
-floatComplex ctimess(floatComplex z1, floatComplex z2) {
-#ifndef STDC99
-  return FloatComplex(z1.real*z2.real - z1.imag*z2.imag,
-		       z1.real*z2.imag + z2.real*z1.imag);
-#else
-  return z1 * z2;
-#endif
-}
-
-
-
-
-/*
-** }
-*/