#!/usr/bin/perl -w

use lib "d:/Programs/Perl/lib";

use strict;
use Sci::Science;

for(my $x = 0.5 ; $x <= 5.0001 ; $x += 0.5) {
	my $y = Sci::Gamma($x);
	print "$x\t$y\n";
}