summaryrefslogtreecommitdiff
path: root/thirdparty/includes/GSL/gsl/gsl_sf_coupling.h
diff options
context:
space:
mode:
authorSandeep Gupta2017-07-05 12:41:25 +0530
committerSandeep Gupta2017-07-05 12:41:25 +0530
commit06337f0dc8114c70fd0c7767083971a0d091750a (patch)
tree446481550ba88e6e0f7df2db7fdc66d2016ee2f1 /thirdparty/includes/GSL/gsl/gsl_sf_coupling.h
parentc2e305c3b82ed944d57402dd515b3d5839a31980 (diff)
downloadScilab2C_fossee_old-06337f0dc8114c70fd0c7767083971a0d091750a.tar.gz
Scilab2C_fossee_old-06337f0dc8114c70fd0c7767083971a0d091750a.tar.bz2
Scilab2C_fossee_old-06337f0dc8114c70fd0c7767083971a0d091750a.zip
LinearAlgebra and MatrixOperation Update
Diffstat (limited to 'thirdparty/includes/GSL/gsl/gsl_sf_coupling.h')
-rw-r--r--thirdparty/includes/GSL/gsl/gsl_sf_coupling.h125
1 files changed, 0 insertions, 125 deletions
diff --git a/thirdparty/includes/GSL/gsl/gsl_sf_coupling.h b/thirdparty/includes/GSL/gsl/gsl_sf_coupling.h
deleted file mode 100644
index c46b9f5..0000000
--- a/thirdparty/includes/GSL/gsl/gsl_sf_coupling.h
+++ /dev/null
@@ -1,125 +0,0 @@
-/* specfunc/gsl_sf_coupling.h
- *
- * Copyright (C) 1996,1997,1998,1999,2000,2001,2002 Gerard Jungman
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 3 of the License, or (at
- * your option) any later version.
- *
- * This program is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
- */
-
-/* Author: G. Jungman */
-
-#ifndef __GSL_SF_COUPLING_H__
-#define __GSL_SF_COUPLING_H__
-
-#include <gsl/gsl_sf_result.h>
-
-#undef __BEGIN_DECLS
-#undef __END_DECLS
-#ifdef __cplusplus
-# define __BEGIN_DECLS extern "C" {
-# define __END_DECLS }
-#else
-# define __BEGIN_DECLS /* empty */
-# define __END_DECLS /* empty */
-#endif
-
-__BEGIN_DECLS
-
-
-/* 3j Symbols: / ja jb jc \
- * \ ma mb mc /
- *
- * exceptions: GSL_EDOM, GSL_EOVRFLW
- */
-int gsl_sf_coupling_3j_e(int two_ja, int two_jb, int two_jc,
- int two_ma, int two_mb, int two_mc,
- gsl_sf_result * result
- );
-double gsl_sf_coupling_3j(int two_ja, int two_jb, int two_jc,
- int two_ma, int two_mb, int two_mc
- );
-
-
-/* 6j Symbols: / ja jb jc \
- * \ jd je jf /
- *
- * exceptions: GSL_EDOM, GSL_EOVRFLW
- */
-int gsl_sf_coupling_6j_e(int two_ja, int two_jb, int two_jc,
- int two_jd, int two_je, int two_jf,
- gsl_sf_result * result
- );
-double gsl_sf_coupling_6j(int two_ja, int two_jb, int two_jc,
- int two_jd, int two_je, int two_jf
- );
-
-/* Racah W coefficients:
- *
- * W(a b c d; e f) = (-1)^{a+b+c+d} / a b e \
- * \ d c f /
- *
- * exceptions: GSL_EDOM, GSL_EOVRFLW
- */
-int gsl_sf_coupling_RacahW_e(int two_ja, int two_jb, int two_jc,
- int two_jd, int two_je, int two_jf,
- gsl_sf_result * result
- );
-double gsl_sf_coupling_RacahW(int two_ja, int two_jb, int two_jc,
- int two_jd, int two_je, int two_jf
- );
-
-
-/* 9j Symbols: / ja jb jc \
- * | jd je jf |
- * \ jg jh ji /
- *
- * exceptions: GSL_EDOM, GSL_EOVRFLW
- */
-int gsl_sf_coupling_9j_e(int two_ja, int two_jb, int two_jc,
- int two_jd, int two_je, int two_jf,
- int two_jg, int two_jh, int two_ji,
- gsl_sf_result * result
- );
-double gsl_sf_coupling_9j(int two_ja, int two_jb, int two_jc,
- int two_jd, int two_je, int two_jf,
- int two_jg, int two_jh, int two_ji
- );
-
-
-/* INCORRECT version of 6j Symbols:
- * This function actually calculates
- * / ja jb je \
- * \ jd jc jf /
- * It represents the original implementation,
- * which had the above permutation of the
- * arguments. This was wrong and confusing,
- * and I had to fix it. Sorry for the trouble.
- * [GJ] Tue Nov 26 12:53:39 MST 2002
- *
- * exceptions: GSL_EDOM, GSL_EOVRFLW
- */
-#ifndef GSL_DISABLE_DEPRECATED
-int gsl_sf_coupling_6j_INCORRECT_e(int two_ja, int two_jb, int two_jc,
- int two_jd, int two_je, int two_jf,
- gsl_sf_result * result
- );
-double gsl_sf_coupling_6j_INCORRECT(int two_ja, int two_jb, int two_jc,
- int two_jd, int two_je, int two_jf
- );
-#endif /* !GSL_DISABLE_DEPRECATED */
-
-
-__END_DECLS
-
-#endif /* __GSL_SF_COUPLING_H__ */