use Test::More tests => 4;
BEGIN {
use_ok('Geometry::Primitive::Circle');
};
my $circ = Geometry::Primitive::Circle->new( radius => 5 );
isa_ok($circ, 'Geometry::Primitive::Circle');
cmp_ok($circ->radius, '==', 5, 'radius');
cmp_ok($circ->diameter, '==', 10, 'diameter');