#!/usr/bin/perl
use PDL; 
use PDL::GSLSF::GAMMA;
my $out = gsl_sf_gamma(0.4);
print "$out\n";