diff options
| author | Abhinav Dronamraju | 2017-08-10 20:33:46 +0530 |
|---|---|---|
| committer | Abhinav Dronamraju | 2017-08-10 20:33:46 +0530 |
| commit | 5b728d8239b1a1f4467e2485d54c7ed7db1d4f11 (patch) | |
| tree | d8db631e058bae294362b2087079150569fc9581 /src/c/specialFunctions/interfaces | |
| parent | 6422b5c0a45161d6571fd6d7077b6d551cbb5e26 (diff) | |
| parent | 4bc007e5b44a13b582b0275bf7fc6693942ba2ac (diff) | |
| download | Scilab2C_fossee_old-5b728d8239b1a1f4467e2485d54c7ed7db1d4f11.tar.gz Scilab2C_fossee_old-5b728d8239b1a1f4467e2485d54c7ed7db1d4f11.tar.bz2 Scilab2C_fossee_old-5b728d8239b1a1f4467e2485d54c7ed7db1d4f11.zip | |
Merge and functions added
Diffstat (limited to 'src/c/specialFunctions/interfaces')
| -rw-r--r-- | src/c/specialFunctions/interfaces/int_beta.h | 30 | ||||
| -rw-r--r-- | src/c/specialFunctions/interfaces/int_gamma.h | 31 | ||||
| -rw-r--r-- | src/c/specialFunctions/interfaces/int_gammaln.h | 31 |
3 files changed, 92 insertions, 0 deletions
diff --git a/src/c/specialFunctions/interfaces/int_beta.h b/src/c/specialFunctions/interfaces/int_beta.h new file mode 100644 index 0000000..4f3981e --- /dev/null +++ b/src/c/specialFunctions/interfaces/int_beta.h @@ -0,0 +1,30 @@ +/* Copyright (C) 2017 - 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 + */ +#ifndef __INT_BETA_H__ +#define __INT_BETA_H__ + +#ifdef __cplusplus +extern "C" { +#endif + + + +#define d0d0betad0(in1, in2) dbetas(in1, in2) +#define d2d2betad2(in1, size1, in2, size2, out) dbetaa(in1,size1[0]*size1[1], in2, size2[0]*size2[1], out) +#define s0s0betas0(in1, in2) sbetas(in1, in2) +#define s2s2betas2(in1, size1, in2, size2, out) sbetaa(in1,size1[0]*size1[1], in2, size2[0]*size2[1], out) + +#ifdef __cplusplus +} /* extern "C" */ +#endif + +#endif /*__INT_BETA_H__*/ diff --git a/src/c/specialFunctions/interfaces/int_gamma.h b/src/c/specialFunctions/interfaces/int_gamma.h new file mode 100644 index 0000000..b527fdd --- /dev/null +++ b/src/c/specialFunctions/interfaces/int_gamma.h @@ -0,0 +1,31 @@ +/* Copyright (C) 2017 - 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 + */ +#ifndef __INT_GAMMA_H__ +#define __INT_GAMMA_H__ + +#ifdef __cplusplus +extern "C" { +#endif + + + +#define d0gammad0(in1) dgammas(in1) +#define s0gammas0(in1) sgammas(in1) +#define d2gammad2(in1,size,out) dgammaa(in1,size[0]*size[1],out) +#define s2gammas2(in1,size,out) sgammaa(in1,size[0]*size[1],out) + + +#ifdef __cplusplus +} /* extern "C" */ +#endif + +#endif /*__INT_GAMMA_H__*/ diff --git a/src/c/specialFunctions/interfaces/int_gammaln.h b/src/c/specialFunctions/interfaces/int_gammaln.h new file mode 100644 index 0000000..5be29f1 --- /dev/null +++ b/src/c/specialFunctions/interfaces/int_gammaln.h @@ -0,0 +1,31 @@ +/* Copyright (C) 2017 - 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 + */ +#ifndef __INT_GAMMALN_H__ +#define __INT_GAMMALN_H__ + +#ifdef __cplusplus +extern "C" { +#endif + + + +#define d0gammalnd0(in1) dgammalns(in1) +#define s0gammalns0(in1) sgammalns(in1) +#define d2gammalnd2(in1,size,out) dgammalna(in1,size[0]*size[1],out) +#define s2gammalns2(in1,size,out) sgammalna(in1,size[0]*size[1],out) + + +#ifdef __cplusplus +} /* extern "C" */ +#endif + +#endif /*__INT_GAMMALN_H__*/ |