diff options
Diffstat (limited to 'src/c/elementaryFunctions/Trigonometry/sec/zsecs.c')
| -rw-r--r-- | src/c/elementaryFunctions/Trigonometry/sec/zsecs.c | 63 |
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 |