From be665fa018032441e5fa9352962286d96303e33c Mon Sep 17 00:00:00 2001 From: Brijeshcr Date: Fri, 28 Jul 2017 20:53:12 +0530 Subject: Added Calerf --- src/c/specialFunctions/calerf/dcalerfs.c | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) create mode 100644 src/c/specialFunctions/calerf/dcalerfs.c (limited to 'src/c/specialFunctions/calerf/dcalerfs.c') diff --git a/src/c/specialFunctions/calerf/dcalerfs.c b/src/c/specialFunctions/calerf/dcalerfs.c new file mode 100644 index 00000000..c3608653 --- /dev/null +++ b/src/c/specialFunctions/calerf/dcalerfs.c @@ -0,0 +1,29 @@ +/* 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: Brijesh Gupta C R + Organization: FOSSEE, IIT Bombay + Email: toolbox@scilab.in +*/ + +#include +#include +#include +#include "erf.h" +#include "erfc.h" +#include "erfcx.h" + +double dcalerfs (double inp1, double inp2) +{ + if (inp2 == 0) + return erf(inp1); + if (inp2 == 1) + return derfcs(inp1); + if (inp2 == 2) + return derfcxs(inp1); +} + -- cgit