# NAME

Geometry::Primitive::Circle - A Circle

# DESCRIPTION

Geometry::Primitive::Circle represents an ellipse with equal width and height.

# SYNOPSIS

```
use Geometry::Primitive::Circle;
my $circle = Geometry::Primitive::Circle->new(
radius => 15
);
print $circle->diameter;
```

# ATTRIBUTES

## origin

Set/Get the origin of this circle.

## radius

Set/Get the radius of this circle.

# METHODS

## new

Creates a new Geometry::Primitive::Circle

## area

Returns the area of this circle.

## circumference

Returns the circumference of this circle.

## diameter

Returns the diameter of this circle

## scale ($amount)

Returns a new circle whose radius is $amount times bigger than this one.

## point_end

Set/Get the "end" point of this cicle. Calls `point_start`

.

## point_start

Set/Get the "start" point of this cicle. Returns the point at the circle's origin X coordinate and the origin Y coordinate + radius / 2.

# AUTHOR

Cory Watson <gphat@cpan.org>

# COPYRIGHT & LICENSE

You can redistribute and/or modify this code under the same terms as Perl itself.