Bugs fixed for Scilab 6.0

1 files changed, 16 insertions, 47 deletions

diff --git a/src/c/elementaryFunctions/Trigonometry/sec/zsecs.c b/src/c/elementaryFunctions/Trigonometry/sec/zsecs.c
index b5468db..9629db7 100644
--- a/src/c/elementaryFunctions/Trigonometry/sec/zsecs.c
+++ b/src/c/elementaryFunctions/Trigonometry/sec/zsecs.c
@@ -1,57 +1,26 @@
-/*//#include "sec.h"
-//#include "cos.h"
-//#include <math.h>
-//#include "doubleComplex.h"
-//#include "division.h"
+/* Copyright (C) 2016 - IIT Bombay - FOSSEE
+
+ 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
+ Author: Shamik Guha
+ Organization: FOSSEE, IIT Bombay
+ Email: toolbox@scilab.in
 */
 
-/*#include <math.h>
-#include "sin.h"
+
+#include "sec.h"
 #include "cos.h"
-#include "sinh.h"
-#include "cosh.h"
-#include "csc.h"
+#include <math.h>
+#include "doubleComplex.h"
 #include "division.h"
-*/
-#include <complex.h>
-#include <stdio.h>
 
-/*doubleComplex zsecs(doubleComplex z)
+doubleComplex zsecs(doubleComplex z)
 {
 	
 	doubleComplex out;
 	out = zrdivs(DoubleComplex(1,0),zcoss(z));
 	return out;
-}
-*/
-void zsecs(double complex z)
-{
-	
-	//double complex out;
-	/*out = zrdivs(DoubleComplex(1,0),zcoss(z));
-	return out;
-}*/
-
-	double complex out = 1.0/(ccos(z));
-	if(cimag(out)==0.0)
-	{
-		printf("%.7lf\n",creal(out));
-		//out=creal(out);
-	}
-	else if(creal(out)==0.0)
-	{
-		printf("%.7lfi\n",cimag(out));
-		//out=cimag(out);
-	}
-	else if(creal(out)!=0.0 && cimag(out)<0.0)
-	{
-		printf("%.7lf %.7lfi\n",creal(out),cimag(out));
-		//out=x;
-	}
-	else
-	{
-		printf("%.7lf + %.7lfi\n", creal(out), cimag(out));
-		//out=x;
-	}
-    //return out;
-}
+}
\ No newline at end of file