From e36eac94dd517bb69d3e5782516ee58942451991 Mon Sep 17 00:00:00 2001 From: Siddhesh Wani Date: Thu, 4 May 2017 16:15:18 +0530 Subject: Basic functions and image processing working with MSVC on windows x64 --- src/c/elementaryFunctions/Trigonometry/sec/zsecs.c | 63 ++++++---------------- 1 file changed, 16 insertions(+), 47 deletions(-) (limited to 'src/c/elementaryFunctions/Trigonometry/sec/zsecs.c') 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 -//#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 -#include "sin.h" + +#include "sec.h" #include "cos.h" -#include "sinh.h" -#include "cosh.h" -#include "csc.h" +#include +#include "doubleComplex.h" #include "division.h" -*/ -#include -#include -/*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 -- cgit