The R Project SVN R

#ifndef MATHLIB_STANDALONE

#ifndef MATHLIB_STANDALONE

#define bessel_i	Rf_bessel_i

#define bessel_i	Rf_bessel_i

#define bessel_j	Rf_bessel_j

#define bessel_j	Rf_bessel_j

#define bessel_k	Rf_bessel_k

#define bessel_k	Rf_bessel_k

#define bessel_y	Rf_bessel_y

#define bessel_y	Rf_bessel_y

#define beta		Rf_beta

#define beta		Rf_beta

#define choose		Rf_choose

#define choose		Rf_choose

#define dbeta		Rf_dbeta

#define dbeta		Rf_dbeta

#define dbinom		Rf_dbinom

#define dbinom		Rf_dbinom

#define dcauchy		Rf_dcauchy

#define dcauchy		Rf_dcauchy

double	bessel_i(double, double, double);

double	bessel_i(double, double, double);

double	bessel_j(double, double);

double	bessel_j(double, double);

double	bessel_k(double, double, double);

double	bessel_k(double, double, double);

double	bessel_y(double, double);

double	bessel_y(double, double);

	/* General Support Functions */

	/* General Support Functions */

double 	pythag(double, double);

double 	pythag(double, double);