Commit b258f03f authored by Alvarez, Gonzalo's avatar Alvarez, Gonzalo
Browse files

added Gamma Function

parent aab5e808

src/GammaFunction.cpp

0 → 100644
+14 −0
Original line number Diff line number Diff line 
#include "GammaFunction.h"



namespace PsimagLite {

std::complex<double> LnGammaFunction(const std::complex<double>& z)

{

	GslWrapper gslWrapper;

	double lnr = 0.0;

	double arg = 0.0;

	gslWrapper.gsl_sf_lngamma_complex_e(std::real(z),std::imag(z),&lnr,&arg);

	return std::complex<double>(lnr,arg);

}



}

src/GammaFunction.h

0 → 100644
+11 −0
Original line number Diff line number Diff line 
#ifndef GAMMAFUNCTION_H

#define GAMMAFUNCTION_H

#include "GslWrapper.h"



namespace PsimagLite {



std::complex<double> LnGammaFunction(const std::complex<double>&);



}

#endif // GAMMAFUNCTION_H